DBA Data[Home] [Help]

APPS.CZ_IMP_AC_XFR dependencies on CZ_IMP_AC_XFR

Line 1: PACKAGE BODY CZ_IMP_AC_XFR AS

1: PACKAGE BODY CZ_IMP_AC_XFR AS
2: /* $Header: cziacxfb.pls 115.14 2002/11/27 16:59:28 askhacha ship $ */
3:
4: PROCEDURE XFR_CONTACT ( inRUN_ID IN PLS_INTEGER,
5: COMMIT_SIZE IN PLS_INTEGER,

Line 144: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_CONTACT',11276);

140: UPDATE CZ_IMP_contact
141: SET REC_STATUS='ERR'
142: WHERE CONTACT_ID=p_xfr_contact.CONTACT_ID AND RUN_ID=inRUN_ID;
143: END;
144: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_CONTACT',11276);
145: END ;
146: ELSIF (p_xfr_contact.DISPOSITION = 'M') THEN
147: BEGIN
148: UPDATE CZ_CONTACTS SET

Line 200: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_CONTACT',11276);

196: UPDATE CZ_IMP_contact
197: SET REC_STATUS='ERR'
198: WHERE CONTACT_ID=p_xfr_contact.CONTACT_ID AND RUN_ID=inRUN_ID;
199: END;
200: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_CONTACT',11276);
201: END ;
202: END IF;
203: END LOOP;
204: CLOSE c_xfr_contact;

Line 211: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_CONTACT',11276);

207: UPDATES:=nUpdateCount;
208: FAILED:=nFailed;
209: EXCEPTION
210: WHEN OTHERS THEN
211: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_CONTACT',11276);
212: END;
213: END XFR_CONTACT;
214: /*<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<0>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>*/
215: PROCEDURE XFR_CUSTOMER ( inRUN_ID IN PLS_INTEGER,

Line 336: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_CUSTOMER',11276);

332: UPDATE CZ_IMP_customer
333: SET REC_STATUS='ERR'
334: WHERE CUSTOMER_ID=p_xfr_customer.CUSTOMER_ID AND RUN_ID=inRUN_ID;
335: END;
336: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_CUSTOMER',11276);
337: END ;
338: ELSIF (p_xfr_CUSTOMER.DISPOSITION = 'M') THEN
339: BEGIN
340: UPDATE CZ_CUSTOMERS SET

Line 383: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_CUSTOMER',11276);

379: UPDATE CZ_IMP_customer
380: SET REC_STATUS='ERR'
381: WHERE CUSTOMER_ID=p_xfr_customer.CUSTOMER_ID AND RUN_ID=inRUN_ID;
382: END;
383: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_CUSTOMER',11276);
384: END ;
385: END IF;
386: END LOOP;
387: CLOSE c_xfr_CUSTOMER;

Line 394: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_CUSTOMER',11276);

390: UPDATES:=nUpdateCount;
391: FAILED:=nFailed;
392: EXCEPTION
393: WHEN OTHERS THEN
394: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_CUSTOMER',11276);
395: END;
396: END XFR_CUSTOMER;
397: /*<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<0>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>*/
398: PROCEDURE XFR_ADDRESS ( inRUN_ID IN PLS_INTEGER,

Line 502: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_ADDRESS',11276);

498: UPDATE CZ_IMP_address
499: SET REC_STATUS='ERR'
500: WHERE ADDRESS_ID=p_xfr_address.ADDRESS_ID AND RUN_ID=inRUN_ID;
501: END;
502: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_ADDRESS',11276);
503: END ;
504: ELSIF (p_xfr_ADDRESS.DISPOSITION = 'M') THEN
505: BEGIN
506: UPDATE CZ_ADDRESSES SET

Line 543: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_ADDRESS',11276);

539: UPDATE CZ_IMP_address
540: SET REC_STATUS='ERR'
541: WHERE ADDRESS_ID=p_xfr_address.ADDRESS_ID AND RUN_ID=inRUN_ID;
542: END;
543: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_ADDRESS',11276);
544: END ;
545: END IF;
546: END LOOP;
547: CLOSE c_xfr_ADDRESS;

Line 554: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_ADDRESS',11276);

550: UPDATES:=nUpdateCount;
551: FAILED:=nFailed;
552: EXCEPTION
553: WHEN OTHERS THEN
554: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_ADDRESS',11276);
555: END;
556: END XFR_ADDRESS;
557: /*<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<0>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>*/
558: PROCEDURE XFR_ADDRESS_USES(inRUN_ID IN PLS_INTEGER,

Line 647: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_ADDRESS_USES',11276);

643: UPDATE CZ_IMP_address_use
644: SET REC_STATUS='ERR'
645: WHERE ADDRESS_USE_ID=p_xfr_address_uses.ADDRESS_USE_ID AND RUN_ID=inRUN_ID;
646: END;
647: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_ADDRESS_USES',11276);
648: END ;
649: ELSIF(p_xfr_address_uses.disposition = 'M') THEN
650: BEGIN
651: UPDATE cz_address_uses SET

Line 681: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_ADDRESS_USES',11276);

677: UPDATE CZ_IMP_address_use
678: SET REC_STATUS='ERR'
679: WHERE ADDRESS_USE_ID=p_xfr_address_uses.ADDRESS_USE_ID AND RUN_ID=inRUN_ID;
680: END;
681: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_ADDRESS_USES',11276);
682: END ;
683: END IF;
684: END LOOP;
685:

Line 693: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_ADDRESS_USES',11276);

689: UPDATES:=nUpdateCount;
690: FAILED:=nFailed;
691: EXCEPTION
692: WHEN OTHERS THEN
693: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_ADDRESS_USES',11276);
694: END;
695: END XFR_ADDRESS_USES;
696: /*<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<0>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>*/
697: PROCEDURE XFR_CUSTOMER_END_USER ( inRUN_ID IN PLS_INTEGER,

Line 982: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_END_USER',11276);

978: UPDATE CZ_IMP_end_user
979: SET REC_STATUS='ERR'
980: WHERE END_USER_ID=p_xfr_enduser.END_USER_ID AND RUN_ID=inRUN_ID;
981: END;
982: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_END_USER',11276);
983: END ;
984: ELSIF (p_xfr_enduser.DISPOSITION = 'M') THEN
985: BEGIN
986: UPDATE CZ_END_USERS SET

Line 1044: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_END_USER',11276);

1040: UPDATE CZ_IMP_end_user
1041: SET REC_STATUS='ERR'
1042: WHERE END_USER_ID=p_xfr_enduser.END_USER_ID AND RUN_ID=inRUN_ID;
1043: END;
1044: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_END_USER',11276);
1045: END ;
1046: END IF;
1047: END LOOP;
1048: CLOSE c_xfr_enduser;

Line 1055: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_END_USER',11276);

1051: UPDATES:=nUpdateCount;
1052: FAILED:=nFailed;
1053: EXCEPTION
1054: WHEN OTHERS THEN
1055: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_END_USER',11276);
1056: END;
1057: END XFR_END_USER;
1058: /*<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<0>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>*/
1059: PROCEDURE XFR_END_USER_GROUP ( inRUN_ID IN PLS_INTEGER,

Line 1161: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_END_USER_GROUP',11276);

1157: SET REC_STATUS='ERR'
1158: WHERE END_USER_ID=p_xfr_endusergroup.END_USER_ID
1159: AND USER_GROUP_ID=p_xfr_endusergroup.USER_GROUP_ID AND RUN_ID=inRUN_ID;
1160: END;
1161: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_END_USER_GROUP',11276);
1162: END ;
1163: ELSIF (p_xfr_endusergroup.DISPOSITION = 'M') THEN
1164: BEGIN
1165: UPDATE CZ_END_USER_GROUPS SET DATE_ADDED_USER=DECODE(NOUPDATE_DATE_ADDED_USER,0,p_xfr_endusergroup.DATE_ADDED_USER,DATE_ADDED_USER),

Line 1197: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_END_USER_GROUP',11276);

1193: SET REC_STATUS='ERR'
1194: WHERE END_USER_ID=p_xfr_endusergroup.END_USER_ID
1195: AND USER_GROUP_ID=p_xfr_endusergroup.USER_GROUP_ID AND RUN_ID=inRUN_ID;
1196: END;
1197: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_END_USER_GROUP',11276);
1198: END ;
1199: END IF;
1200: END LOOP;
1201: CLOSE c_xfr_endusergroup;

Line 1208: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_END_USER_GROUP',11276);

1204: UPDATES:=nUpdateCount;
1205: FAILED:=nFailed;
1206: EXCEPTION
1207: WHEN OTHERS THEN
1208: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_END_USER_GROUP',11276);
1209: END;
1210: END XFR_END_USER_GROUP;
1211: /*<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<0>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>*/
1212: /*<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<0>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>*/

Line 1314: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_USER_GROUP',11276);

1310: UPDATE CZ_IMP_user_group
1311: SET REC_STATUS='ERR'
1312: WHERE USER_GROUP_ID=p_xfr_usergroup.USER_GROUP_ID AND RUN_ID=inRUN_ID;
1313: END;
1314: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_USER_GROUP',11276);
1315: END ;
1316: ELSIF (p_xfr_usergroup.DISPOSITION = 'M') THEN
1317: BEGIN
1318: UPDATE CZ_USER_GROUPS SET

Line 1354: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_USER_GROUP',11276);

1350: UPDATE CZ_IMP_user_group
1351: SET REC_STATUS='ERR'
1352: WHERE USER_GROUP_ID=p_xfr_usergroup.USER_GROUP_ID AND RUN_ID=inRUN_ID;
1353: END;
1354: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_USER_GROUP',11276);
1355: END ;
1356: END IF;
1357: END LOOP;
1358: CLOSE c_xfr_usergroup;

Line 1365: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_USER_GROUP',11276);

1361: UPDATES:=nUpdateCount;
1362: FAILED:=nFailed;
1363: EXCEPTION
1364: WHEN OTHERS THEN
1365: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_USER_GROUP',11276);
1366: END;
1367: END XFR_USER_GROUP;
1368: /*<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<0>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>*/
1369: END CZ_IMP_AC_XFR;

Line 1369: END CZ_IMP_AC_XFR;

1365: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_AC_XFR.XFR_USER_GROUP',11276);
1366: END;
1367: END XFR_USER_GROUP;
1368: /*<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<0>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>*/
1369: END CZ_IMP_AC_XFR;