1317: LIKE_DstTableName IN VARCHAR2 , -- DEFAULT '%',
1318: LIKE_PhaseName IN VARCHAR2 -- DEFAULT '%'
1319: ) IS
1320: CURSOR C_GETSET IS
1321: SELECT DST_TABLE,XFR_GROUP,DISABLED FROM CZ_XFR_TABLES
1322: WHERE DST_TABLE LIKE LIKE_DstTableName AND XFR_GROUP LIKE LIKE_PhaseName;
1323: slDstTable CZ_XFR_TABLES.DST_TABLE%TYPE;
1324: slXfrGroup CZ_XFR_TABLES.XFR_GROUP%TYPE;
1325: slDisabled CZ_XFR_TABLES.DISABLED%TYPE;
1319: ) IS
1320: CURSOR C_GETSET IS
1321: SELECT DST_TABLE,XFR_GROUP,DISABLED FROM CZ_XFR_TABLES
1322: WHERE DST_TABLE LIKE LIKE_DstTableName AND XFR_GROUP LIKE LIKE_PhaseName;
1323: slDstTable CZ_XFR_TABLES.DST_TABLE%TYPE;
1324: slXfrGroup CZ_XFR_TABLES.XFR_GROUP%TYPE;
1325: slDisabled CZ_XFR_TABLES.DISABLED%TYPE;
1326: BEGIN
1327: errbuf:='';
1320: CURSOR C_GETSET IS
1321: SELECT DST_TABLE,XFR_GROUP,DISABLED FROM CZ_XFR_TABLES
1322: WHERE DST_TABLE LIKE LIKE_DstTableName AND XFR_GROUP LIKE LIKE_PhaseName;
1323: slDstTable CZ_XFR_TABLES.DST_TABLE%TYPE;
1324: slXfrGroup CZ_XFR_TABLES.XFR_GROUP%TYPE;
1325: slDisabled CZ_XFR_TABLES.DISABLED%TYPE;
1326: BEGIN
1327: errbuf:='';
1328: retcode:=0;
1321: SELECT DST_TABLE,XFR_GROUP,DISABLED FROM CZ_XFR_TABLES
1322: WHERE DST_TABLE LIKE LIKE_DstTableName AND XFR_GROUP LIKE LIKE_PhaseName;
1323: slDstTable CZ_XFR_TABLES.DST_TABLE%TYPE;
1324: slXfrGroup CZ_XFR_TABLES.XFR_GROUP%TYPE;
1325: slDisabled CZ_XFR_TABLES.DISABLED%TYPE;
1326: BEGIN
1327: errbuf:='';
1328: retcode:=0;
1329: OPEN C_GETSET;
1351: ) IS
1352: BEGIN
1353: errbuf:='';
1354: retcode:=0;
1355: UPDATE CZ_XFR_TABLES SET
1356: DISABLED=DECODE(UPPER(EnableImport),'0','1','OFF','1','N','1','DISABLE','1',
1357: '1','0','ON','0','Y','0','ENABLE','0',DISABLED)
1358: WHERE DST_TABLE=DstTableName AND XFR_GROUP LIKE LIKE_PhaseName;
1359: IF(SQL%NOTFOUND)THEN