180: l_party_object_version_number hz_relationships.object_version_number%TYPE := NULL;
181: l_cont_object_version_number hz_relationships.object_version_number%TYPE;
182: l_rel_object_version_number hz_relationships.object_version_number%TYPE;
183: l_tca_relationship_record HZ_RELATIONSHIP_V2PUB.relationship_rec_type;
184: l_tca_contact_role_record HZ_PARTY_CONTACT_V2PUB.ORG_CONTACT_ROLE_REC_TYPE;
185: l_tca_contact_record HZ_PARTY_CONTACT_V2PUB.ORG_CONTACT_REC_TYPE;
186: l_org_contact_role_id NUMBER;
187: l_org_contact_id NUMBER;
188: l_primary_flag VARCHAR2(1);
181: l_cont_object_version_number hz_relationships.object_version_number%TYPE;
182: l_rel_object_version_number hz_relationships.object_version_number%TYPE;
183: l_tca_relationship_record HZ_RELATIONSHIP_V2PUB.relationship_rec_type;
184: l_tca_contact_role_record HZ_PARTY_CONTACT_V2PUB.ORG_CONTACT_ROLE_REC_TYPE;
185: l_tca_contact_record HZ_PARTY_CONTACT_V2PUB.ORG_CONTACT_REC_TYPE;
186: l_org_contact_role_id NUMBER;
187: l_org_contact_id NUMBER;
188: l_primary_flag VARCHAR2(1);
189: l_status VARCHAR2(1);
229:
230: IF (FND_LOG.LEVEL_STATEMENT >= g_debug_level)
231: THEN
232: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
233: l_module,'calling HZ_PARTY_CONTACT_V2PUB.update_org_contact');
234: END IF;
235:
236: HZ_PARTY_CONTACT_V2PUB.update_org_contact(
237: p_init_msg_list => nvl(p_init_msg_list, FND_API.G_FALSE),
232: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
233: l_module,'calling HZ_PARTY_CONTACT_V2PUB.update_org_contact');
234: END IF;
235:
236: HZ_PARTY_CONTACT_V2PUB.update_org_contact(
237: p_init_msg_list => nvl(p_init_msg_list, FND_API.G_FALSE),
238: p_org_contact_rec => l_tca_contact_record,
239: p_cont_object_version_number => l_cont_object_version_number,
240: p_rel_object_version_number => l_rel_object_version_number,
247:
248: IF (FND_LOG.LEVEL_STATEMENT >= g_debug_level)
249: THEN
250: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
251: l_module, 'completed call to HZ_PARTY_CONTACT_V2PUB.update_org_contact'
252: || ' Status ' || x_return_status);
253: END IF;
254:
255: IF x_return_status <> 'S'
278:
279: IF (FND_LOG.LEVEL_STATEMENT >= g_debug_level)
280: THEN
281: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
282: l_module,'calling HZ_PARTY_CONTACT_V2PUB.update_org_contact_role');
283: END IF;
284:
285: HZ_PARTY_CONTACT_V2PUB.update_org_contact_role(
286: p_init_msg_list => nvl(p_init_msg_list, FND_API.G_FALSE),
281: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
282: l_module,'calling HZ_PARTY_CONTACT_V2PUB.update_org_contact_role');
283: END IF;
284:
285: HZ_PARTY_CONTACT_V2PUB.update_org_contact_role(
286: p_init_msg_list => nvl(p_init_msg_list, FND_API.G_FALSE),
287: p_org_contact_role_rec => l_tca_contact_role_record,
288: p_object_version_number => l_object_version_number,
289: x_return_status => x_return_status,
294:
295: IF (FND_LOG.LEVEL_STATEMENT >= g_debug_level)
296: THEN
297: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
298: l_module, 'completed call to HZ_PARTY_CONTACT_V2PUB.update_org_contact_role'
299: || ' Status ' || x_return_status);
300: END IF;
301:
302: IF x_return_status <> 'S'
416: l_relationship_id NUMBER(15);
417: l_party_id NUMBER(15);
418: l_party_number VARCHAR2(30);
419: l_tca_relationship_record HZ_RELATIONSHIP_V2PUB.relationship_rec_type;
420: l_tca_contact_role_record HZ_PARTY_CONTACT_V2PUB.ORG_CONTACT_ROLE_REC_TYPE;
421: l_tca_contact_record HZ_PARTY_CONTACT_V2PUB.ORG_CONTACT_REC_TYPE;
422: l_org_contact_role_id NUMBER;
423: l_org_contact_id NUMBER;
424: l_party_rel_id NUMBER;
417: l_party_id NUMBER(15);
418: l_party_number VARCHAR2(30);
419: l_tca_relationship_record HZ_RELATIONSHIP_V2PUB.relationship_rec_type;
420: l_tca_contact_role_record HZ_PARTY_CONTACT_V2PUB.ORG_CONTACT_ROLE_REC_TYPE;
421: l_tca_contact_record HZ_PARTY_CONTACT_V2PUB.ORG_CONTACT_REC_TYPE;
422: l_org_contact_role_id NUMBER;
423: l_org_contact_id NUMBER;
424: l_party_rel_id NUMBER;
425:
453:
454: IF (FND_LOG.LEVEL_STATEMENT >= g_debug_level)
455: THEN
456: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
457: l_module,'calling HZ_PARTY_CONTACT_V2PUB.create_org_contact');
458: END IF;
459:
460: HZ_PARTY_CONTACT_V2PUB.create_org_contact(
461: p_init_msg_list => nvl(p_init_msg_list, FND_API.G_FALSE),
456: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
457: l_module,'calling HZ_PARTY_CONTACT_V2PUB.create_org_contact');
458: END IF;
459:
460: HZ_PARTY_CONTACT_V2PUB.create_org_contact(
461: p_init_msg_list => nvl(p_init_msg_list, FND_API.G_FALSE),
462: p_org_contact_rec => l_tca_contact_record,
463: x_org_contact_id => l_org_contact_id,
464: x_party_rel_id => l_party_rel_id,
472: --dbms_output.put_line('3 : '||x_return_status||x_msg_count||x_msg_data);
473: IF (FND_LOG.LEVEL_STATEMENT >= g_debug_level)
474: THEN
475: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
476: l_module, 'completed call to HZ_PARTY_CONTACT_V2PUB.create_org_contact'
477: || ' Status ' || x_return_status);
478: END IF;
479:
480: IF x_return_status <> 'S'
489:
490: IF (FND_LOG.LEVEL_STATEMENT >= g_debug_level)
491: THEN
492: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
493: l_module,'calling HZ_PARTY_CONTACT_V2PUB.create_org_contact_role');
494: END IF;
495:
496: HZ_PARTY_CONTACT_V2PUB.create_org_contact_role(
497: p_init_msg_list => nvl(p_init_msg_list, FND_API.G_FALSE),
492: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
493: l_module,'calling HZ_PARTY_CONTACT_V2PUB.create_org_contact_role');
494: END IF;
495:
496: HZ_PARTY_CONTACT_V2PUB.create_org_contact_role(
497: p_init_msg_list => nvl(p_init_msg_list, FND_API.G_FALSE),
498: p_org_contact_role_rec => l_tca_contact_role_record,
499: x_org_contact_role_id => l_org_contact_role_id,
500: x_return_status => x_return_status,
505: --dbms_output.put_line('4 : '||x_return_status||x_msg_count||x_msg_data);
506: IF (FND_LOG.LEVEL_STATEMENT >= g_debug_level)
507: THEN
508: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
509: l_module, 'completed call to HZ_PARTY_CONTACT_V2PUB.create_org_contact_role'
510: || ' Status ' || x_return_status);
511: END IF;
512:
513: IF x_return_status <> 'S'
658: l_relationship_id NUMBER(15);
659: l_party_id NUMBER(15);
660: l_party_number VARCHAR2(30);
661: l_tca_relationship_record HZ_RELATIONSHIP_V2PUB.relationship_rec_type;
662: l_tca_contact_role_record HZ_PARTY_CONTACT_V2PUB.ORG_CONTACT_ROLE_REC_TYPE;
663: l_tca_contact_record HZ_PARTY_CONTACT_V2PUB.ORG_CONTACT_REC_TYPE;
664: l_org_contact_role_id NUMBER;
665: l_org_contact_id NUMBER;
666: l_party_rel_id NUMBER;
659: l_party_id NUMBER(15);
660: l_party_number VARCHAR2(30);
661: l_tca_relationship_record HZ_RELATIONSHIP_V2PUB.relationship_rec_type;
662: l_tca_contact_role_record HZ_PARTY_CONTACT_V2PUB.ORG_CONTACT_ROLE_REC_TYPE;
663: l_tca_contact_record HZ_PARTY_CONTACT_V2PUB.ORG_CONTACT_REC_TYPE;
664: l_org_contact_role_id NUMBER;
665: l_org_contact_id NUMBER;
666: l_party_rel_id NUMBER;
667:
696:
697: IF (FND_LOG.LEVEL_STATEMENT >= g_debug_level)
698: THEN
699: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
700: l_module,'calling HZ_PARTY_CONTACT_V2PUB.create_org_contact');
701: END IF;
702:
703: HZ_PARTY_CONTACT_V2PUB.create_org_contact(
704: p_init_msg_list => nvl(p_init_msg_list, FND_API.G_FALSE),
699: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
700: l_module,'calling HZ_PARTY_CONTACT_V2PUB.create_org_contact');
701: END IF;
702:
703: HZ_PARTY_CONTACT_V2PUB.create_org_contact(
704: p_init_msg_list => nvl(p_init_msg_list, FND_API.G_FALSE),
705: p_org_contact_rec => l_tca_contact_record,
706: x_org_contact_id => l_org_contact_id,
707: x_party_rel_id => l_party_rel_id,
715:
716: IF (FND_LOG.LEVEL_STATEMENT >= g_debug_level)
717: THEN
718: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
719: l_module, 'completed call to HZ_PARTY_CONTACT_V2PUB.create_org_contact'
720: || ' Status ' || x_return_status);
721: END IF;
722:
723: IF x_return_status <> 'S'
732:
733: IF (FND_LOG.LEVEL_STATEMENT >= g_debug_level)
734: THEN
735: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
736: l_module,'calling HZ_PARTY_CONTACT_V2PUB.create_org_contact_role');
737: END IF;
738:
739:
740: HZ_PARTY_CONTACT_V2PUB.create_org_contact_role(
736: l_module,'calling HZ_PARTY_CONTACT_V2PUB.create_org_contact_role');
737: END IF;
738:
739:
740: HZ_PARTY_CONTACT_V2PUB.create_org_contact_role(
741: p_init_msg_list => nvl(p_init_msg_list, FND_API.G_FALSE),
742: p_org_contact_role_rec => l_tca_contact_role_record,
743: x_org_contact_role_id => l_org_contact_role_id,
744: x_return_status => x_return_status,
748: --dbms_output.put_line('6 : '||x_return_status||x_msg_count||x_msg_data);
749: IF (FND_LOG.LEVEL_STATEMENT >= g_debug_level)
750: THEN
751: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
752: l_module, 'completed call to HZ_PARTY_CONTACT_V2PUB.create_org_contact_role'
753: || ' Status ' || x_return_status);
754: END IF;
755:
756: IF x_return_status <> 'S'