eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.ARI_SELF_REGISTRATION_PKG dependencies on STANDARD

Line 101: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');

97: --------------------------------------------------------------------
98: l_debug_info := 'In debug mode, log we have entered this procedure';
99: --------------------------------------------------------------------
100: IF (PG_DEBUG = 'Y') THEN
101: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');
102: END IF;
103:
104: --------------------------------------------------------------------------
105: l_debug_info := 'Calling OpenCustAcctCur';

Line 108: arp_standard.debug(l_debug_info);

104: --------------------------------------------------------------------------
105: l_debug_info := 'Calling OpenCustAcctCur';
106: ---------------------------------------------------------------------------
107: IF (PG_DEBUG = 'Y') THEN
108: arp_standard.debug(l_debug_info);
109: END IF;
110: OpenCustAcctCur(p_customer_id => p_customer_id,
111: p_cust_acct_cur => l_cust_acct_cur);
112:

Line 117: arp_standard.debug(l_debug_info);

113: ------------------------------------------------------------------------
114: l_debug_info := 'Fetching the results of the cursor';
115: ------------------------------------------------------------------------
116: IF (PG_DEBUG = 'Y') THEN
117: arp_standard.debug(l_debug_info);
118: END IF;
119: ------------------------------------------------------------------------
120: LOOP
121: FETCH l_cust_acct_cur INTO l_cust_acct_id,

Line 134: arp_standard.debug(l_debug_info);

130: ----------------------------------------------------------------
131: l_debug_info := 'Exact match on customer_id provided';
132: ----------------------------------------------------------------
133: IF (PG_DEBUG = 'Y') THEN
134: arp_standard.debug(l_debug_info);
135: END IF;
136:
137: x_result_code := G_EXACT_MATCH;
138:

Line 150: arp_standard.debug(l_debug_info);

146: ----------------------------------------------------------------------
147: l_debug_info := 'Non-unique match on customer_id provided';
148: ----------------------------------------------------------------------
149: IF (PG_DEBUG = 'Y') THEN
150: arp_standard.debug(l_debug_info);
151: END IF;
152: x_result_code := G_NOT_UNIQUE;
153:
154: ELSE

Line 159: arp_standard.debug(l_debug_info);

155: -------------------------------------------------------------------------
156: l_debug_info := 'No record found based on customer_id provided';
157: -------------------------------------------------------------------------
158: IF (PG_DEBUG = 'Y') THEN
159: arp_standard.debug(l_debug_info);
160: END IF;
161: x_result_code := G_NO_ROWS;
162:
163: END IF;

Line 169: arp_standard.debug(l_debug_info);

165: ------------------------------------------------------------------------
166: l_debug_info := 'Close Cust Account Cursor';
167: ------------------------------------------------------------------------
168: IF (PG_DEBUG = 'Y') THEN
169: arp_standard.debug(l_debug_info);
170: END IF;
171: CLOSE l_cust_acct_cur;
172:
173: --------------------------------------------------------------------

Line 177: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');

173: --------------------------------------------------------------------
174: l_debug_info := 'In debug mode, log we have exited this procedure';
175: --------------------------------------------------------------------
176: IF (PG_DEBUG = 'Y') THEN
177: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');
178: END IF;
179:
180: EXCEPTION
181: WHEN OTHERS THEN

Line 184: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);

180: EXCEPTION
181: WHEN OTHERS THEN
182: IF (SQLCODE <> -20001) THEN
183: IF (PG_DEBUG = 'Y') THEN
184: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
185: arp_standard.debug('Debug Info: ' || l_debug_info);
186: arp_standard.debug(SQLERRM);
187: END IF;
188: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');

Line 185: arp_standard.debug('Debug Info: ' || l_debug_info);

181: WHEN OTHERS THEN
182: IF (SQLCODE <> -20001) THEN
183: IF (PG_DEBUG = 'Y') THEN
184: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
185: arp_standard.debug('Debug Info: ' || l_debug_info);
186: arp_standard.debug(SQLERRM);
187: END IF;
188: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
189: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);

Line 186: arp_standard.debug(SQLERRM);

182: IF (SQLCODE <> -20001) THEN
183: IF (PG_DEBUG = 'Y') THEN
184: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
185: arp_standard.debug('Debug Info: ' || l_debug_info);
186: arp_standard.debug(SQLERRM);
187: END IF;
188: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
189: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
190: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);

Line 249: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');

245: --------------------------------------------------------------------
246: l_debug_info := 'In debug mode, log we have entered this procedure';
247: --------------------------------------------------------------------
248: IF (PG_DEBUG = 'Y') THEN
249: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');
250: END IF;
251:
252: IF (FND_API.to_Boolean(p_init_msg_list)) THEN
253: -----------------------------------------------------------------------

Line 370: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');

366: ----------------------------------------------------------------------------
367: l_debug_info := 'In debug mode, log that we have exited this procedure';
368: ----------------------------------------------------------------------------
369: IF (PG_DEBUG = 'Y') THEN
370: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');
371: END IF;
372:
373: EXCEPTION
374: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 382: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);

378: WHEN OTHERS THEN
379: x_return_status := FND_API.G_RET_STS_ERROR;
380: IF (SQLCODE <> -20001) THEN
381: IF (PG_DEBUG = 'Y') THEN
382: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
383: arp_standard.debug('Debug Info: ' || l_debug_info);
384: arp_standard.debug(SQLERRM);
385: END IF;
386: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');

Line 383: arp_standard.debug('Debug Info: ' || l_debug_info);

379: x_return_status := FND_API.G_RET_STS_ERROR;
380: IF (SQLCODE <> -20001) THEN
381: IF (PG_DEBUG = 'Y') THEN
382: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
383: arp_standard.debug('Debug Info: ' || l_debug_info);
384: arp_standard.debug(SQLERRM);
385: END IF;
386: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
387: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);

Line 384: arp_standard.debug(SQLERRM);

380: IF (SQLCODE <> -20001) THEN
381: IF (PG_DEBUG = 'Y') THEN
382: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
383: arp_standard.debug('Debug Info: ' || l_debug_info);
384: arp_standard.debug(SQLERRM);
385: END IF;
386: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
387: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
388: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);

Line 421: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');

417: --------------------------------------------------------------------
418: l_debug_info := 'In debug mode, log we have entered this procedure';
419: --------------------------------------------------------------------
420: IF (PG_DEBUG = 'Y') THEN
421: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');
422: END IF;
423:
424: --------------------------------------------------------------------
425: l_debug_info := 'Open p_cust_acct_cur';

Line 441: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');

437: --------------------------------------------------------------------
438: l_debug_info := 'In debug mode, log we have exited this procedure';
439: --------------------------------------------------------------------
440: IF (PG_DEBUG = 'Y') THEN
441: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');
442: END IF;
443:
444: EXCEPTION
445: WHEN OTHERS THEN

Line 448: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);

444: EXCEPTION
445: WHEN OTHERS THEN
446: IF (SQLCODE <> -20001) THEN
447: IF (PG_DEBUG = 'Y') THEN
448: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
449: arp_standard.debug('Debug Info: ' || l_debug_info);
450: arp_standard.debug(SQLERRM);
451: END IF;
452: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');

Line 449: arp_standard.debug('Debug Info: ' || l_debug_info);

445: WHEN OTHERS THEN
446: IF (SQLCODE <> -20001) THEN
447: IF (PG_DEBUG = 'Y') THEN
448: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
449: arp_standard.debug('Debug Info: ' || l_debug_info);
450: arp_standard.debug(SQLERRM);
451: END IF;
452: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
453: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);

Line 450: arp_standard.debug(SQLERRM);

446: IF (SQLCODE <> -20001) THEN
447: IF (PG_DEBUG = 'Y') THEN
448: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
449: arp_standard.debug('Debug Info: ' || l_debug_info);
450: arp_standard.debug(SQLERRM);
451: END IF;
452: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
453: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
454: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);

Line 492: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);

488: EXCEPTION
489: WHEN OTHERS THEN
490: IF (SQLCODE <> -20001) THEN
491: IF (PG_DEBUG = 'Y') THEN
492: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
493: arp_standard.debug('Debug Info: ' || l_debug_info);
494: arp_standard.debug(SQLERRM);
495: END IF;
496: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');

Line 493: arp_standard.debug('Debug Info: ' || l_debug_info);

489: WHEN OTHERS THEN
490: IF (SQLCODE <> -20001) THEN
491: IF (PG_DEBUG = 'Y') THEN
492: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
493: arp_standard.debug('Debug Info: ' || l_debug_info);
494: arp_standard.debug(SQLERRM);
495: END IF;
496: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
497: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);

Line 494: arp_standard.debug(SQLERRM);

490: IF (SQLCODE <> -20001) THEN
491: IF (PG_DEBUG = 'Y') THEN
492: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
493: arp_standard.debug('Debug Info: ' || l_debug_info);
494: arp_standard.debug(SQLERRM);
495: END IF;
496: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
497: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
498: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);

Line 538: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');

534: ----------------------------------------------------------------------------
535: l_debug_info := 'In debug mode, log we have entered this procedure';
536: ----------------------------------------------------------------------------
537: IF (PG_DEBUG = 'Y') THEN
538: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');
539: END IF;
540:
541: ----------------------------------------------------------------------------
542: l_debug_info := 'Insert Row, reg_id = ' || to_char(p_registration_id) || ',ip_addr= ' ||

Line 547: arp_standard.debug(l_debug_info);

543: p_client_ip_address || 'customer_id = ' || to_char(p_customer_id) || ',customer_site_id = ' ||
544: to_char(p_customer_site_use_id);
545: ----------------------------------------------------------------------------
546: IF (PG_DEBUG = 'Y') THEN
547: arp_standard.debug(l_debug_info);
548: END IF;
549:
550: --If customer site id is -1, pass null to ARI_SELF_REG_CONFIG
551: IF (p_customer_site_use_id <> -1) THEN

Line 588: arp_standard.debug('after insert row');

584:
585: COMMIT;
586:
587: IF (PG_DEBUG = 'Y') THEN
588: arp_standard.debug('after insert row');
589: END IF;
590: ----------------------------------------------------------------------------
591: l_debug_info := 'In debug mode, log that we have exited this procedure';
592: ----------------------------------------------------------------------------

Line 594: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');

590: ----------------------------------------------------------------------------
591: l_debug_info := 'In debug mode, log that we have exited this procedure';
592: ----------------------------------------------------------------------------
593: IF (PG_DEBUG = 'Y') THEN
594: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');
595: END IF;
596:
597: EXCEPTION
598: WHEN OTHERS THEN

Line 601: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);

597: EXCEPTION
598: WHEN OTHERS THEN
599: IF (SQLCODE <> -20001) THEN
600: IF (PG_DEBUG = 'Y') THEN
601: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
602: arp_standard.debug('Debug Info: ' || l_debug_info);
603: arp_standard.debug(SQLERRM);
604: END IF;
605: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');

Line 602: arp_standard.debug('Debug Info: ' || l_debug_info);

598: WHEN OTHERS THEN
599: IF (SQLCODE <> -20001) THEN
600: IF (PG_DEBUG = 'Y') THEN
601: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
602: arp_standard.debug('Debug Info: ' || l_debug_info);
603: arp_standard.debug(SQLERRM);
604: END IF;
605: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
606: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);

Line 603: arp_standard.debug(SQLERRM);

599: IF (SQLCODE <> -20001) THEN
600: IF (PG_DEBUG = 'Y') THEN
601: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
602: arp_standard.debug('Debug Info: ' || l_debug_info);
603: arp_standard.debug(SQLERRM);
604: END IF;
605: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
606: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
607: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);

Line 640: arp_standard.debug(l_debug_info);

636: ----------------------------------------------------------------------------------------
637: l_debug_info := 'Delete all records in Registration GT';
638: -----------------------------------------------------------------------------------------
639: IF (PG_DEBUG = 'Y') THEN
640: arp_standard.debug(l_debug_info);
641: END IF;
642:
643: DELETE FROM ARI_REG_VERIFICATIONS_GT;
644:

Line 651: arp_standard.debug(l_debug_info);

647: ----------------------------------------------------------------------------------------
648: l_debug_info := 'All records in Registration GT deleted';
649: -----------------------------------------------------------------------------------------
650: IF (PG_DEBUG = 'Y') THEN
651: arp_standard.debug(l_debug_info);
652: END IF;
653:
654: EXCEPTION
655: WHEN OTHERS THEN

Line 657: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);

653:
654: EXCEPTION
655: WHEN OTHERS THEN
656: IF (PG_DEBUG = 'Y') THEN
657: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
658: arp_standard.debug('ERROR =>'|| SQLERRM);
659: END IF;
660:
661: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');

Line 658: arp_standard.debug('ERROR =>'|| SQLERRM);

654: EXCEPTION
655: WHEN OTHERS THEN
656: IF (PG_DEBUG = 'Y') THEN
657: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
658: arp_standard.debug('ERROR =>'|| SQLERRM);
659: END IF;
660:
661: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
662: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);

Line 700: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');

696: ----------------------------------------------------------------------------
697: l_debug_info := 'In debug mode, log we have entered this procedure';
698: ----------------------------------------------------------------------------
699: IF (PG_DEBUG = 'Y') THEN
700: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');
701: END IF;
702: ----------------------------------------------------------------------------
703: l_debug_info := 'Insert Row,ip_addr= ' || p_client_ip_address || 'customer_id = ' || to_char(p_customer_id);
704: ----------------------------------------------------------------------------

Line 706: arp_standard.debug(l_debug_info);

702: ----------------------------------------------------------------------------
703: l_debug_info := 'Insert Row,ip_addr= ' || p_client_ip_address || 'customer_id = ' || to_char(p_customer_id);
704: ----------------------------------------------------------------------------
705: IF (PG_DEBUG = 'Y') THEN
706: arp_standard.debug(l_debug_info);
707: END IF;
708:
709: ARI_SELF_REG_CONFIG.validate_cust_detail_access(p_customer_id => p_customer_id,
710: x_verify_access => l_verify_access,

Line 741: arp_standard.debug('after insert row');

737:
738: COMMIT;
739:
740: IF (PG_DEBUG = 'Y') THEN
741: arp_standard.debug('after insert row');
742: END IF;
743: ----------------------------------------------------------------------------
744: l_debug_info := 'In debug mode, log that we have exited this procedure';
745: ----------------------------------------------------------------------------

Line 747: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');

743: ----------------------------------------------------------------------------
744: l_debug_info := 'In debug mode, log that we have exited this procedure';
745: ----------------------------------------------------------------------------
746: IF (PG_DEBUG = 'Y') THEN
747: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');
748: END IF;
749:
750: EXCEPTION
751: WHEN OTHERS THEN

Line 754: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);

750: EXCEPTION
751: WHEN OTHERS THEN
752: IF (SQLCODE <> -20001) THEN
753: IF (PG_DEBUG = 'Y') THEN
754: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
755: arp_standard.debug('Debug Info: ' || l_debug_info);
756: arp_standard.debug(SQLERRM);
757: END IF;
758: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');

Line 755: arp_standard.debug('Debug Info: ' || l_debug_info);

751: WHEN OTHERS THEN
752: IF (SQLCODE <> -20001) THEN
753: IF (PG_DEBUG = 'Y') THEN
754: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
755: arp_standard.debug('Debug Info: ' || l_debug_info);
756: arp_standard.debug(SQLERRM);
757: END IF;
758: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
759: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);

Line 756: arp_standard.debug(SQLERRM);

752: IF (SQLCODE <> -20001) THEN
753: IF (PG_DEBUG = 'Y') THEN
754: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
755: arp_standard.debug('Debug Info: ' || l_debug_info);
756: arp_standard.debug(SQLERRM);
757: END IF;
758: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
759: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
760: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);

Line 854: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');

850: ----------------------------------------------------------------------------
851: l_debug_info := 'In debug mode, log we have entered this procedure';
852: ----------------------------------------------------------------------------
853: IF (PG_DEBUG = 'Y') THEN
854: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');
855: END IF;
856:
857: SAVEPOINT RemoveAccessStart;
858:

Line 863: arp_standard.debug(l_debug_info);

859: ----------------------------------------------------------------------------
860: l_debug_info := 'Update Cust Account Role';
861: ----------------------------------------------------------------------------
862: IF (PG_DEBUG = 'Y') THEN
863: arp_standard.debug(l_debug_info);
864: END IF;
865:
866: FOR role_record IN cust_acct_role_cur(p_person_party_id,
867: p_customer_id,

Line 1071: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');

1067: ----------------------------------------------------------------------------
1068: l_debug_info := 'In debug mode, log we have entered this procedure';
1069: ----------------------------------------------------------------------------
1070: IF (PG_DEBUG = 'Y') THEN
1071: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');
1072: END IF;
1073:
1074: ----------------------------------------------------------------------------
1075: l_debug_info := 'Read values from the event';

Line 1078: arp_standard.debug(l_debug_info);

1074: ----------------------------------------------------------------------------
1075: l_debug_info := 'Read values from the event';
1076: ----------------------------------------------------------------------------
1077: IF (PG_DEBUG = 'Y') THEN
1078: arp_standard.debug(l_debug_info);
1079: END IF;
1080: l_first_name := p_event.getvalueforparameter('FIRST_NAME');
1081: l_last_name := p_event.getvalueforparameter('LAST_NAME');
1082: l_middle_name := p_event.getvalueforparameter('MIDDLE_NAME');

Line 1090: arp_standard.debug(l_debug_info);

1086: ----------------------------------------------------------------------------
1087: l_debug_info := 'Populate person record';
1088: ----------------------------------------------------------------------------
1089: IF (PG_DEBUG = 'Y') THEN
1090: arp_standard.debug(l_debug_info);
1091: END IF;
1092:
1093: l_person_rec.person_first_name := l_first_name;
1094: l_person_rec.person_middle_name := l_middle_name;

Line 1114: arp_standard.debug(l_debug_info);

1110: ----------------------------------------------------------------------------
1111: l_debug_info := 'Completed Hz_party_v2_pub.createperson: Status'||x_return_status;
1112: ----------------------------------------------------------------------------
1113: IF (PG_DEBUG = 'Y') THEN
1114: arp_standard.debug(l_debug_info);
1115: END IF;
1116:
1117: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
1118: ----------------------------------------------------------------------------

Line 1122: arp_standard.debug(l_debug_info);

1118: ----------------------------------------------------------------------------
1119: l_debug_info := 'Completed Hz_party_v2_pub.createperson: Message'||X_Msg_Data;
1120: ----------------------------------------------------------------------------
1121: IF (PG_DEBUG = 'Y') THEN
1122: arp_standard.debug(l_debug_info);
1123: END IF;
1124: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1125: end if;
1126:

Line 1132: arp_standard.debug(l_debug_info);

1128: l_debug_info := 'After creating person party, if this is an Additional Access flow,
1129: associate the created person party id with the user';
1130: ----------------------------------------------------------------------------
1131: IF (PG_DEBUG = 'Y') THEN
1132: arp_standard.debug(l_debug_info);
1133: END IF;
1134:
1135: l_reg_type := p_event.getvalueforparameter('REG_SERVICE_TYPE');
1136:

Line 1149: arp_standard.debug(l_debug_info);

1145: ----------------------------------------------------------------------------
1146: l_debug_info := 'Call FND_USER_PKG to update user with person party id';
1147: ----------------------------------------------------------------------------
1148: IF (PG_DEBUG = 'Y') THEN
1149: arp_standard.debug(l_debug_info);
1150: END IF;
1151:
1152: FND_USER_PKG.UpdateUser (
1153: x_user_name => l_reg_user_name,

Line 1165: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');

1161: ----------------------------------------------------------------------------
1162: l_debug_info := 'In debug mode, log that we have exited this procedure';
1163: ----------------------------------------------------------------------------
1164: IF (PG_DEBUG = 'Y') THEN
1165: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');
1166: END IF;
1167:
1168: EXCEPTION
1169: WHEN OTHERS THEN

Line 1172: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);

1168: EXCEPTION
1169: WHEN OTHERS THEN
1170: IF (SQLCODE <> -20001) THEN
1171: IF (PG_DEBUG = 'Y') THEN
1172: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
1173: arp_standard.debug('Debug Info: ' || l_debug_info);
1174: arp_standard.debug(SQLERRM);
1175: END IF;
1176: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');

Line 1173: arp_standard.debug('Debug Info: ' || l_debug_info);

1169: WHEN OTHERS THEN
1170: IF (SQLCODE <> -20001) THEN
1171: IF (PG_DEBUG = 'Y') THEN
1172: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
1173: arp_standard.debug('Debug Info: ' || l_debug_info);
1174: arp_standard.debug(SQLERRM);
1175: END IF;
1176: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
1177: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);

Line 1174: arp_standard.debug(SQLERRM);

1170: IF (SQLCODE <> -20001) THEN
1171: IF (PG_DEBUG = 'Y') THEN
1172: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
1173: arp_standard.debug('Debug Info: ' || l_debug_info);
1174: arp_standard.debug(SQLERRM);
1175: END IF;
1176: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
1177: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
1178: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);

Line 1316: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');

1312: ----------------------------------------------------------------------------
1313: l_debug_info := 'In debug mode, log we have entered this procedure';
1314: ----------------------------------------------------------------------------
1315: IF (PG_DEBUG = 'Y') THEN
1316: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');
1317: END IF;
1318:
1319: l_customer_id := p_event.getvalueforparameter('CUSTOMER_ID');
1320: l_cust_site_use_id := p_event.getvalueforparameter('CUSTOMER_SITE_USE_ID');

Line 1331: arp_standard.debug(l_debug_info);

1327: ----------------------------------------------------------------------------
1328: l_debug_info := 'Check if relationship already exists';
1329: ----------------------------------------------------------------------------
1330: IF (PG_DEBUG = 'Y') THEN
1331: arp_standard.debug(l_debug_info);
1332: END IF;
1333: BEGIN
1334: --Bug 4764121: Storing the value of party_id (even when relationship exists)
1335: SELECT 'Y',party_id

Line 1360: arp_standard.debug(l_debug_info);

1356: ----------------------------------------------------------------------------
1357: l_debug_info := 'Create the org contact relationship';
1358: ----------------------------------------------------------------------------
1359: IF (PG_DEBUG = 'Y') THEN
1360: arp_standard.debug(l_debug_info);
1361: END IF;
1362:
1363: l_party_rel_rec.subject_id := p_person_party_id;
1364: l_party_rel_rec.subject_type := 'PERSON';

Line 1404: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');

1400: ----------------------------------------------------------------------------
1401: l_debug_info := 'In debug mode, log that we have exited this procedure';
1402: ----------------------------------------------------------------------------
1403: IF (PG_DEBUG = 'Y') THEN
1404: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');
1405: END IF;
1406:
1407: EXCEPTION
1408: WHEN OTHERS THEN

Line 1411: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);

1407: EXCEPTION
1408: WHEN OTHERS THEN
1409: IF (SQLCODE <> -20001) THEN
1410: IF (PG_DEBUG = 'Y') THEN
1411: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
1412: arp_standard.debug('Debug Info: ' || l_debug_info);
1413: arp_standard.debug(SQLERRM);
1414: END IF;
1415: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');

Line 1412: arp_standard.debug('Debug Info: ' || l_debug_info);

1408: WHEN OTHERS THEN
1409: IF (SQLCODE <> -20001) THEN
1410: IF (PG_DEBUG = 'Y') THEN
1411: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
1412: arp_standard.debug('Debug Info: ' || l_debug_info);
1413: arp_standard.debug(SQLERRM);
1414: END IF;
1415: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
1416: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);

Line 1413: arp_standard.debug(SQLERRM);

1409: IF (SQLCODE <> -20001) THEN
1410: IF (PG_DEBUG = 'Y') THEN
1411: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
1412: arp_standard.debug('Debug Info: ' || l_debug_info);
1413: arp_standard.debug(SQLERRM);
1414: END IF;
1415: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
1416: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
1417: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);

Line 1473: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');

1469: ----------------------------------------------------------------------------
1470: l_debug_info := 'In debug mode, log we have entered this procedure';
1471: ----------------------------------------------------------------------------
1472: IF (PG_DEBUG = 'Y') THEN
1473: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');
1474: END IF;
1475:
1476: -- get the values from event object
1477: l_email_address := p_event.getvalueforparameter('EMAIL_ADDRESS');

Line 1498: arp_standard.debug(l_debug_info);

1494: ----------------------------------------------------------------------------
1495: l_debug_info := 'Email Address not null - create/update email contact point';
1496: ----------------------------------------------------------------------------
1497: IF (PG_DEBUG = 'Y') THEN
1498: arp_standard.debug(l_debug_info);
1499: END IF;
1500:
1501: l_contact_point_rec.contact_point_type := 'EMAIL';
1502:

Line 1510: arp_standard.debug(l_debug_info);

1506: ----------------------------------------------------------------------------
1507: l_debug_info := 'Check if an email record already exists';
1508: ----------------------------------------------------------------------------
1509: IF (PG_DEBUG = 'Y') THEN
1510: arp_standard.debug(l_debug_info);
1511: END IF;
1512: BEGIN
1513: l_contact_point_id := null;
1514:

Line 1537: arp_standard.debug(l_debug_info);

1533: ----------------------------------------------------------------------------
1534: l_debug_info := 'Create email contact point';
1535: ----------------------------------------------------------------------------
1536: IF (PG_DEBUG = 'Y') THEN
1537: arp_standard.debug(l_debug_info);
1538: END IF;
1539:
1540: HZ_CONTACT_POINT_V2PUB.create_contact_point (
1541: p_contact_point_rec => l_contact_point_rec,

Line 1553: arp_standard.debug(l_debug_info);

1549: ----------------------------------------------------------------------------
1550: l_debug_info := 'Update email contact point';
1551: ----------------------------------------------------------------------------
1552: IF (PG_DEBUG = 'Y') THEN
1553: arp_standard.debug(l_debug_info);
1554: END IF;
1555:
1556: SELECT object_version_number
1557: INTO l_object_version_number

Line 1575: arp_standard.debug(l_debug_info);

1571: ----------------------------------------------------------------------------
1572: l_debug_info := 'Contact point done: Status' || X_Return_Status;
1573: ----------------------------------------------------------------------------
1574: IF (PG_DEBUG = 'Y') THEN
1575: arp_standard.debug(l_debug_info);
1576: END IF;
1577:
1578: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
1579: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1591: arp_standard.debug(l_debug_info);

1587: ----------------------------------------------------------------------------
1588: l_debug_info := 'Primary Phone not null - create/update phone contact point';
1589: ----------------------------------------------------------------------------
1590: IF (PG_DEBUG = 'Y') THEN
1591: arp_standard.debug(l_debug_info);
1592: END IF;
1593:
1594: l_contact_point_rec.contact_point_type := 'PHONE';
1595: l_contact_point_rec.contact_point_purpose := l_phone_purpose;

Line 1607: arp_standard.debug(l_debug_info);

1603: ----------------------------------------------------------------------------
1604: l_debug_info := 'Check if a phone record already exists';
1605: ----------------------------------------------------------------------------
1606: IF (PG_DEBUG = 'Y') THEN
1607: arp_standard.debug(l_debug_info);
1608: END IF;
1609: BEGIN
1610: l_contact_point_id := null;
1611:

Line 1634: arp_standard.debug(l_debug_info);

1630: ----------------------------------------------------------------------------
1631: l_debug_info := 'Create phone contact point';
1632: ----------------------------------------------------------------------------
1633: IF (PG_DEBUG = 'Y') THEN
1634: arp_standard.debug(l_debug_info);
1635: END IF;
1636:
1637: HZ_CONTACT_POINT_V2PUB.create_contact_point (
1638: p_contact_point_rec => l_contact_point_rec,

Line 1650: arp_standard.debug(l_debug_info);

1646: ----------------------------------------------------------------------------
1647: l_debug_info := 'Update phone contact point';
1648: ----------------------------------------------------------------------------
1649: IF (PG_DEBUG = 'Y') THEN
1650: arp_standard.debug(l_debug_info);
1651: END IF;
1652:
1653: SELECT object_version_number
1654: INTO l_object_version_number

Line 1671: arp_standard.debug(l_debug_info);

1667: ----------------------------------------------------------------------------
1668: l_debug_info := 'Contact point done: Status' || X_Return_Status;
1669: ----------------------------------------------------------------------------
1670: IF (PG_DEBUG = 'Y') THEN
1671: arp_standard.debug(l_debug_info);
1672: END IF;
1673:
1674: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
1675: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1684: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');

1680: ----------------------------------------------------------------------------
1681: l_debug_info := 'In debug mode, log that we have exited this procedure';
1682: ----------------------------------------------------------------------------
1683: IF (PG_DEBUG = 'Y') THEN
1684: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');
1685: END IF;
1686:
1687: EXCEPTION
1688: WHEN OTHERS THEN

Line 1691: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);

1687: EXCEPTION
1688: WHEN OTHERS THEN
1689: IF (SQLCODE <> -20001) THEN
1690: IF (PG_DEBUG = 'Y') THEN
1691: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
1692: arp_standard.debug('Debug Info: ' || l_debug_info);
1693: arp_standard.debug(SQLERRM);
1694: END IF;
1695: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');

Line 1692: arp_standard.debug('Debug Info: ' || l_debug_info);

1688: WHEN OTHERS THEN
1689: IF (SQLCODE <> -20001) THEN
1690: IF (PG_DEBUG = 'Y') THEN
1691: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
1692: arp_standard.debug('Debug Info: ' || l_debug_info);
1693: arp_standard.debug(SQLERRM);
1694: END IF;
1695: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
1696: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);

Line 1693: arp_standard.debug(SQLERRM);

1689: IF (SQLCODE <> -20001) THEN
1690: IF (PG_DEBUG = 'Y') THEN
1691: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
1692: arp_standard.debug('Debug Info: ' || l_debug_info);
1693: arp_standard.debug(SQLERRM);
1694: END IF;
1695: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
1696: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
1697: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);

Line 1743: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');

1739: ----------------------------------------------------------------------------
1740: l_debug_info := 'In debug mode, log we have entered this procedure';
1741: ----------------------------------------------------------------------------
1742: IF (PG_DEBUG = 'Y') THEN
1743: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');
1744: END IF;
1745:
1746: l_customer_id := p_event.getvalueforparameter('CUSTOMER_ID');
1747: l_cust_site_use_id := p_event.getvalueforparameter('CUSTOMER_SITE_USE_ID');

Line 1755: arp_standard.debug(l_debug_info);

1751: ----------------------------------------------------------------------------
1752: l_debug_info := 'Check if role already exists';
1753: ----------------------------------------------------------------------------
1754: IF (PG_DEBUG = 'Y') THEN
1755: arp_standard.debug(l_debug_info);
1756: END IF;
1757:
1758: BEGIN
1759: l_already_exists := 'N';

Line 1777: arp_standard.debug(l_debug_info);

1773: ----------------------------------------------------------------------------
1774: l_debug_info := 'Role exists but is Inactive.Trying to activate it.Role Id= '||p_cust_acct_role_id;
1775: ----------------------------------------------------------------------------
1776: IF (PG_DEBUG = 'Y') THEN
1777: arp_standard.debug(l_debug_info);
1778: END IF;
1779:
1780: l_cust_acct_roles_rec.party_id := p_party_id;
1781: l_cust_acct_roles_rec.cust_account_id := l_customer_id;

Line 1819: arp_standard.debug(l_debug_info);

1815: ----------------------------------------------------------------------------
1816: l_debug_info := 'Create customer account role';
1817: ----------------------------------------------------------------------------
1818: IF (PG_DEBUG = 'Y') THEN
1819: arp_standard.debug(l_debug_info);
1820: END IF;
1821:
1822: l_cust_acct_roles_rec.party_id := p_party_id;
1823: l_cust_acct_roles_rec.cust_account_id := l_customer_id;

Line 1859: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');

1855: ----------------------------------------------------------------------------
1856: l_debug_info := 'In debug mode, log that we have exited this procedure';
1857: ----------------------------------------------------------------------------
1858: IF (PG_DEBUG = 'Y') THEN
1859: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');
1860: END IF;
1861:
1862: EXCEPTION
1863: WHEN OTHERS THEN

Line 1866: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);

1862: EXCEPTION
1863: WHEN OTHERS THEN
1864: IF (SQLCODE <> -20001) THEN
1865: IF (PG_DEBUG = 'Y') THEN
1866: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
1867: arp_standard.debug('Debug Info: ' || l_debug_info);
1868: arp_standard.debug(SQLERRM);
1869: END IF;
1870: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');

Line 1867: arp_standard.debug('Debug Info: ' || l_debug_info);

1863: WHEN OTHERS THEN
1864: IF (SQLCODE <> -20001) THEN
1865: IF (PG_DEBUG = 'Y') THEN
1866: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
1867: arp_standard.debug('Debug Info: ' || l_debug_info);
1868: arp_standard.debug(SQLERRM);
1869: END IF;
1870: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
1871: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);

Line 1868: arp_standard.debug(SQLERRM);

1864: IF (SQLCODE <> -20001) THEN
1865: IF (PG_DEBUG = 'Y') THEN
1866: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
1867: arp_standard.debug('Debug Info: ' || l_debug_info);
1868: arp_standard.debug(SQLERRM);
1869: END IF;
1870: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
1871: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
1872: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);

Line 1912: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');

1908: ----------------------------------------------------------------------------
1909: l_debug_info := 'In debug mode, log we have entered this procedure';
1910: ----------------------------------------------------------------------------
1911: IF (PG_DEBUG = 'Y') THEN
1912: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');
1913: END IF;
1914:
1915: ----------------------------------------------------------------------------
1916: l_debug_info := 'Check if role responsbility already exists';

Line 1919: arp_standard.debug(l_debug_info);

1915: ----------------------------------------------------------------------------
1916: l_debug_info := 'Check if role responsbility already exists';
1917: ----------------------------------------------------------------------------
1918: IF (PG_DEBUG = 'Y') THEN
1919: arp_standard.debug(l_debug_info);
1920: END IF;
1921:
1922: BEGIN
1923: l_already_exists := 'N';

Line 1949: arp_standard.debug(l_debug_info);

1945: --------------------------------------------------------------------
1946: l_debug_info := 'Call HZ_CUST_ACCOUNT_ROLE_V2PUB.create_role_responsibility';
1947: --------------------------------------------------------------------
1948: IF (PG_DEBUG = 'Y') THEN
1949: arp_standard.debug(l_debug_info);
1950: END IF;
1951: HZ_CUST_ACCOUNT_ROLE_V2PUB.create_role_responsibility(
1952: p_init_msg_list => FND_API.G_TRUE,
1953: p_role_responsibility_rec => l_role_resp_rec,

Line 1964: arp_standard.debug(l_debug_info);

1960: ----------------------------------------------------------------------
1961: l_debug_info := 'Return role responsibility id';
1962: ----------------------------------------------------------------------
1963: IF (PG_DEBUG = 'Y') THEN
1964: arp_standard.debug(l_debug_info);
1965: END IF;
1966: p_role_resp_id := l_responsibility_id;
1967: ELSE
1968: ----------------------------------------------------------------------

Line 1972: arp_standard.debug(l_debug_info);

1968: ----------------------------------------------------------------------
1969: l_debug_info := 'Error Calling HZ Create Role Resp API: ' || l_msg_data;
1970: ----------------------------------------------------------------------
1971: IF (PG_DEBUG = 'Y') THEN
1972: arp_standard.debug(l_debug_info);
1973: END IF;
1974: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1975:
1976: END IF;

Line 1984: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');

1980: ----------------------------------------------------------------------------
1981: l_debug_info := 'In debug mode, log that we have exited this procedure';
1982: ----------------------------------------------------------------------------
1983: IF (PG_DEBUG = 'Y') THEN
1984: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');
1985: END IF;
1986:
1987: EXCEPTION
1988: WHEN OTHERS THEN

Line 1991: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);

1987: EXCEPTION
1988: WHEN OTHERS THEN
1989: IF (SQLCODE <> -20001) THEN
1990: IF (PG_DEBUG = 'Y') THEN
1991: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
1992: arp_standard.debug('Debug Info: ' || l_debug_info);
1993: arp_standard.debug(SQLERRM);
1994: END IF;
1995: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');

Line 1992: arp_standard.debug('Debug Info: ' || l_debug_info);

1988: WHEN OTHERS THEN
1989: IF (SQLCODE <> -20001) THEN
1990: IF (PG_DEBUG = 'Y') THEN
1991: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
1992: arp_standard.debug('Debug Info: ' || l_debug_info);
1993: arp_standard.debug(SQLERRM);
1994: END IF;
1995: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
1996: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);

Line 1993: arp_standard.debug(SQLERRM);

1989: IF (SQLCODE <> -20001) THEN
1990: IF (PG_DEBUG = 'Y') THEN
1991: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
1992: arp_standard.debug('Debug Info: ' || l_debug_info);
1993: arp_standard.debug(SQLERRM);
1994: END IF;
1995: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
1996: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
1997: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);

Line 2038: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');

2034: ----------------------------------------------------------------------------
2035: l_debug_info := 'In debug mode, log we have entered this procedure';
2036: ----------------------------------------------------------------------------
2037: IF (PG_DEBUG = 'Y') THEN
2038: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');
2039: END IF;
2040:
2041: IF (p_person_party_id IS NULL) THEN
2042: CreatePersonPartyInternal(p_event,p_person_party_id);

Line 2053: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');

2049: ----------------------------------------------------------------------------
2050: l_debug_info := 'In debug mode, log that we have exited this procedure';
2051: ----------------------------------------------------------------------------
2052: IF (PG_DEBUG = 'Y') THEN
2053: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');
2054: END IF;
2055:
2056: END RegisterB2BUser;
2057:

Line 2095: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');

2091: ----------------------------------------------------------------------------
2092: l_debug_info := 'In debug mode, log we have entered this procedure';
2093: ----------------------------------------------------------------------------
2094: IF (PG_DEBUG = 'Y') THEN
2095: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');
2096: END IF;
2097:
2098: IF (p_person_party_id IS NULL) THEN
2099: l_new_user := 'Y';

Line 2128: arp_standard.debug(l_debug_info);

2124: ----------------------------------------------------------------------------
2125: l_debug_info := 'Create contact preference';
2126: ----------------------------------------------------------------------------
2127: IF (PG_DEBUG = 'Y') THEN
2128: arp_standard.debug(l_debug_info);
2129: END IF;
2130:
2131: HZ_CONTACT_PREFERENCE_V2PUB.create_contact_preference(
2132: p_contact_preference_rec => l_contact_preference_rec,

Line 2148: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');

2144: ----------------------------------------------------------------------------
2145: l_debug_info := 'In debug mode, log that we have exited this procedure';
2146: ----------------------------------------------------------------------------
2147: IF (PG_DEBUG = 'Y') THEN
2148: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');
2149: END IF;
2150:
2151: END RegisterB2CUser;
2152:

Line 2176: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');

2172: ----------------------------------------------------------------------------
2173: l_debug_info := 'In debug mode, log we have entered this procedure';
2174: ----------------------------------------------------------------------------
2175: IF (PG_DEBUG = 'Y') THEN
2176: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');
2177: END IF;
2178:
2179: ----------------------------------------------------------------------------
2180: l_debug_info := 'Check if the customer access requested if of BUSINESS or CONSUMER type';

Line 2183: arp_standard.debug(l_debug_info);

2179: ----------------------------------------------------------------------------
2180: l_debug_info := 'Check if the customer access requested if of BUSINESS or CONSUMER type';
2181: ----------------------------------------------------------------------------
2182: IF (PG_DEBUG = 'Y') THEN
2183: arp_standard.debug(l_debug_info);
2184: END IF;
2185:
2186: l_cust_acct_type := p_event.getvalueforparameter('CUST_ACCT_TYPE');
2187:

Line 2198: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');

2194: ----------------------------------------------------------------------------
2195: l_debug_info := 'In debug mode, log we have entered this procedure';
2196: ----------------------------------------------------------------------------
2197: IF (PG_DEBUG = 'Y') THEN
2198: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');
2199: END IF;
2200:
2201: END RegisterUser;
2202:

Line 2233: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');

2229: ----------------------------------------------------------------------------
2230: l_debug_info := 'In debug mode, log we have entered this procedure';
2231: ----------------------------------------------------------------------------
2232: IF (PG_DEBUG = 'Y') THEN
2233: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');
2234: END IF;
2235:
2236: -- This function is called on the event 'oracle.apps.fnd.umx.requestapproved'
2237: -- To ensure that the code to add access gets executed only for Add Access flow

Line 2251: arp_standard.debug(l_debug_info);

2247: ----------------------------------------------------------------------------
2248: l_debug_info := 'Add access for the user';
2249: ----------------------------------------------------------------------------
2250: IF (PG_DEBUG = 'Y') THEN
2251: arp_standard.debug(l_debug_info);
2252: END IF;
2253: l_person_party_id := p_event.getvalueforparameter('PERSON_PARTY_ID');
2254:
2255: RegisterUser(p_event, l_person_party_id);

Line 2263: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');

2259: ----------------------------------------------------------------------------
2260: l_debug_info := 'In debug mode, log we have entered this procedure';
2261: ----------------------------------------------------------------------------
2262: IF (PG_DEBUG = 'Y') THEN
2263: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');
2264: END IF;
2265:
2266: l_success := 'success';
2267: RETURN l_success;

Line 2320: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');

2316: ----------------------------------------------------------------------------
2317: l_debug_info := 'In debug mode, log we have entered this procedure';
2318: ----------------------------------------------------------------------------
2319: IF (PG_DEBUG = 'Y') THEN
2320: arp_standard.debug(G_PKG_NAME || l_procedure_name || '+');
2321: END IF;
2322:
2323: ----------------------------------------------------------------------------
2324: l_debug_info := 'Create B2C party and populate the event object back to main workflow';

Line 2327: arp_standard.debug(l_debug_info);

2323: ----------------------------------------------------------------------------
2324: l_debug_info := 'Create B2C party and populate the event object back to main workflow';
2325: ----------------------------------------------------------------------------
2326: IF (PG_DEBUG = 'Y') THEN
2327: arp_standard.debug(l_debug_info);
2328: END IF;
2329:
2330: if(p_event.getValueForParameter('UMX_CUSTOM_EVENT_CONTEXT') =
2331: UMX_PUB.BEFORE_ACT_ACTIVATION) then

Line 2339: arp_standard.debug(l_debug_info);

2335: ----------------------------------------------------------------------------
2336: l_debug_info := 'Person Party Created:' || p_person_party_id;
2337: ----------------------------------------------------------------------------
2338: IF (PG_DEBUG = 'Y') THEN
2339: arp_standard.debug(l_debug_info);
2340: END IF;
2341:
2342: l_success := UMX_REGISTRATION_UTIL.set_event_object(p_event,'PERSON_PARTY_ID',p_person_party_id);
2343:

Line 2350: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');

2346: ----------------------------------------------------------------------------
2347: l_debug_info := 'In debug mode, log that we have exited this procedure';
2348: ----------------------------------------------------------------------------
2349: IF (PG_DEBUG = 'Y') THEN
2350: arp_standard.debug(G_PKG_NAME || l_procedure_name || '-');
2351: END IF;
2352:
2353: IF l_success <> 'success' THEN
2354: WF_CORE.CONTEXT('ARI_SELF_REGISTRATION_PKG', 'CREATE_PERSON_PARTY',