GaramX

“개발 및 수정작업”화면들에서 등록가능하지만 procedure로 복사하는 방법.

DECLARE 
  AV_RET_CODE VARCHAR2(4000);
  AV_RET_MESSAGE VARCHAR2(4000);
BEGIN 
  EHR_DSEC.P_MAKE_ENTITY ( 'INT', 'S_INT_SEQUENCE', 'INT_Y08_BIZ', 'EHR_DSEC', AV_RET_CODE, AV_RET_MESSAGE );
END; 
COMMIT;

DECLARE 
  AV_RET_CODE VARCHAR2(4000);
  AV_RET_MESSAGE VARCHAR2(4000);
BEGIN 
  P_FRM_MESSAGE_COPY ( 'MT_ORM0003_01_06', 'MT_ORM0003_01_07', AV_RET_CODE, AV_RET_MESSAGE );
END; 
COMMIT;

DECLARE 
  AV_RET_CODE VARCHAR2(4000);
  AV_RET_MESSAGE VARCHAR2(4000);
BEGIN
  P_FRM_SQL_COPY ( 'DTM5020_00_R01', 'DTM0041_00_R01', AV_RET_CODE, AV_RET_MESSAGE );
END; 
COMMIT;

DECLARE 
  AV_RET_CODE VARCHAR2(4000);
  AV_RET_MESSAGE VARCHAR2(4000);
BEGIN
  P_FRM_SERVICE_COPY ( 'DTM5020_02_S01', 'DTM0041_02_S01', '9999999', AV_RET_CODE, AV_RET_MESSAGE );
END; 
COMMIT;