[Home] [Help]
825:
826: BEGIN
827: SELECT 1
828: INTO VN_INTERFACE_EXISTS
829: FROM BNE_INTERFACES_B BIB, BNE_INTERFACES_TL BIT
830: WHERE BIB.APPLICATION_ID = BIT.APPLICATION_ID
831: AND BIB.INTERFACE_CODE = BIT.INTERFACE_CODE
832: AND BIB.APPLICATION_ID = P_APPLICATION_ID
833: AND BIT.LANGUAGE = P_LANGUAGE
851: VALUES
852: (P_APPLICATION_ID, P_INTERFACE_CODE, 1, P_APPLICATION_ID, P_INTEGRATOR_CODE,
853: P_INTERFACE_TABLE_NAME, 1, P_USER_ID, SYSDATE, P_USER_ID, SYSDATE);
854:
855: -- Insert into BNE_INTERFACES_TL table
856:
857: INSERT INTO BNE_INTERFACES_TL
858: (APPLICATION_ID, INTERFACE_CODE, LANGUAGE, SOURCE_LANG, USER_NAME,
859: CREATED_BY, CREATION_DATE, LAST_UPDATED_BY, LAST_UPDATE_DATE)
853: P_INTERFACE_TABLE_NAME, 1, P_USER_ID, SYSDATE, P_USER_ID, SYSDATE);
854:
855: -- Insert into BNE_INTERFACES_TL table
856:
857: INSERT INTO BNE_INTERFACES_TL
858: (APPLICATION_ID, INTERFACE_CODE, LANGUAGE, SOURCE_LANG, USER_NAME,
859: CREATED_BY, CREATION_DATE, LAST_UPDATED_BY, LAST_UPDATE_DATE)
860: VALUES
861: (P_APPLICATION_ID, P_INTERFACE_CODE, P_LANGUAGE, P_SOURCE_LANG, P_INTERFACE_USER_NAME,
1140:
1141: BEGIN
1142: SELECT 1
1143: INTO VN_INTERFACE_EXISTS
1144: FROM BNE_INTERFACES_B BIB, BNE_INTERFACES_TL BIT
1145: WHERE BIB.APPLICATION_ID = BIT.APPLICATION_ID
1146: AND BIB.INTERFACE_CODE = BIT.INTERFACE_CODE
1147: AND BIB.INTEGRATOR_APP_ID = P_APPLICATION_ID
1148: AND BIB.INTEGRATOR_CODE = P_INTEGRATOR_CODE
1217: SYSDATE,
1218: P_USER_ID,
1219: SYSDATE);
1220:
1221: -- Create the interface in the BNE_INTERFACES_TL table
1222:
1223: INSERT INTO BNE_INTERFACES_TL
1224: (APPLICATION_ID,
1225: INTERFACE_CODE,
1219: SYSDATE);
1220:
1221: -- Create the interface in the BNE_INTERFACES_TL table
1222:
1223: INSERT INTO BNE_INTERFACES_TL
1224: (APPLICATION_ID,
1225: INTERFACE_CODE,
1226: LANGUAGE,
1227: SOURCE_LANG,
1417: BEGIN
1418: SELECT 1
1419: INTO VN_INTERFACE_EXISTS
1420: FROM BNE_INTERFACES_B BI,
1421: BNE_INTERFACES_TL BITL,
1422: BNE_CONTENTS_B BC,
1423: BNE_CONTENTS_TL BCTL
1424: WHERE BI.APPLICATION_ID = P_APPLICATION_ID
1425: AND BI.APPLICATION_ID = BC.APPLICATION_ID
1461: VALUES
1462: (P_APPLICATION_ID, P_INTERFACE_CODE, 1, P_APPLICATION_ID, P_INTEGRATOR_CODE,
1463: P_INTERFACE_CODE, 4, P_USER_ID, SYSDATE, P_USER_ID, SYSDATE);
1464:
1465: -- Insert into BNE_INTERFACES_TL
1466:
1467: INSERT INTO BNE_INTERFACES_TL
1468: (APPLICATION_ID, INTERFACE_CODE, LANGUAGE, SOURCE_LANG, USER_NAME,
1469: CREATED_BY, CREATION_DATE, LAST_UPDATED_BY, LAST_UPDATE_DATE)
1463: P_INTERFACE_CODE, 4, P_USER_ID, SYSDATE, P_USER_ID, SYSDATE);
1464:
1465: -- Insert into BNE_INTERFACES_TL
1466:
1467: INSERT INTO BNE_INTERFACES_TL
1468: (APPLICATION_ID, INTERFACE_CODE, LANGUAGE, SOURCE_LANG, USER_NAME,
1469: CREATED_BY, CREATION_DATE, LAST_UPDATED_BY, LAST_UPDATE_DATE)
1470: VALUES
1471: (P_APPLICATION_ID, P_INTERFACE_CODE, P_LANGUAGE, P_SOURCE_LANG, VV_DESCRIPTION,
4590: DELETE FROM BNE_INTERFACES_B
4591: WHERE APPLICATION_ID = P_APPLICATION_ID
4592: AND INTERFACE_CODE = P_INTERFACE_CODE;
4593:
4594: DELETE FROM BNE_INTERFACES_TL
4595: WHERE APPLICATION_ID = P_APPLICATION_ID
4596: AND INTERFACE_CODE = P_INTERFACE_CODE;
4597:
4598: -- Duplicate key information ...