[Home] [Help]
19: G_ERROR_FLAG VARCHAR2(1) := 'N';
20: G_PARTY_INTERFACE_ID NUMBER(15);
21:
22: TYPE related_duns_rec_type IS RECORD(
23: DUNS_NUMBER hz_party_interface.HQ_DUNS_NUMBER%TYPE,
24: NAME hz_party_interface.HQ_NAME%TYPE,
25: COUNTRY hz_party_interface.HQ_COUNTRY%TYPE,
26: ADDRESS1 hz_party_interface.HQ_ADDRESS1%TYPE,
27: CITY hz_party_interface.HQ_CITY%TYPE,
20: G_PARTY_INTERFACE_ID NUMBER(15);
21:
22: TYPE related_duns_rec_type IS RECORD(
23: DUNS_NUMBER hz_party_interface.HQ_DUNS_NUMBER%TYPE,
24: NAME hz_party_interface.HQ_NAME%TYPE,
25: COUNTRY hz_party_interface.HQ_COUNTRY%TYPE,
26: ADDRESS1 hz_party_interface.HQ_ADDRESS1%TYPE,
27: CITY hz_party_interface.HQ_CITY%TYPE,
28: PRIMARY_GEO_AREA hz_party_interface.HQ_PRIMARY_GEO_AREA%TYPE,
21:
22: TYPE related_duns_rec_type IS RECORD(
23: DUNS_NUMBER hz_party_interface.HQ_DUNS_NUMBER%TYPE,
24: NAME hz_party_interface.HQ_NAME%TYPE,
25: COUNTRY hz_party_interface.HQ_COUNTRY%TYPE,
26: ADDRESS1 hz_party_interface.HQ_ADDRESS1%TYPE,
27: CITY hz_party_interface.HQ_CITY%TYPE,
28: PRIMARY_GEO_AREA hz_party_interface.HQ_PRIMARY_GEO_AREA%TYPE,
29: COUNTY hz_party_interface.HQ_COUNTY%TYPE,
22: TYPE related_duns_rec_type IS RECORD(
23: DUNS_NUMBER hz_party_interface.HQ_DUNS_NUMBER%TYPE,
24: NAME hz_party_interface.HQ_NAME%TYPE,
25: COUNTRY hz_party_interface.HQ_COUNTRY%TYPE,
26: ADDRESS1 hz_party_interface.HQ_ADDRESS1%TYPE,
27: CITY hz_party_interface.HQ_CITY%TYPE,
28: PRIMARY_GEO_AREA hz_party_interface.HQ_PRIMARY_GEO_AREA%TYPE,
29: COUNTY hz_party_interface.HQ_COUNTY%TYPE,
30: POSTAL_CODE hz_party_interface.HQ_POSTAL_CODE%TYPE,
23: DUNS_NUMBER hz_party_interface.HQ_DUNS_NUMBER%TYPE,
24: NAME hz_party_interface.HQ_NAME%TYPE,
25: COUNTRY hz_party_interface.HQ_COUNTRY%TYPE,
26: ADDRESS1 hz_party_interface.HQ_ADDRESS1%TYPE,
27: CITY hz_party_interface.HQ_CITY%TYPE,
28: PRIMARY_GEO_AREA hz_party_interface.HQ_PRIMARY_GEO_AREA%TYPE,
29: COUNTY hz_party_interface.HQ_COUNTY%TYPE,
30: POSTAL_CODE hz_party_interface.HQ_POSTAL_CODE%TYPE,
31: PHONE_NUMBER hz_party_interface.HQ_PHONE_NUMBER%TYPE,
24: NAME hz_party_interface.HQ_NAME%TYPE,
25: COUNTRY hz_party_interface.HQ_COUNTRY%TYPE,
26: ADDRESS1 hz_party_interface.HQ_ADDRESS1%TYPE,
27: CITY hz_party_interface.HQ_CITY%TYPE,
28: PRIMARY_GEO_AREA hz_party_interface.HQ_PRIMARY_GEO_AREA%TYPE,
29: COUNTY hz_party_interface.HQ_COUNTY%TYPE,
30: POSTAL_CODE hz_party_interface.HQ_POSTAL_CODE%TYPE,
31: PHONE_NUMBER hz_party_interface.HQ_PHONE_NUMBER%TYPE,
32: RELATIONSHIP_CODE hz_relationships.relationship_code%type,
25: COUNTRY hz_party_interface.HQ_COUNTRY%TYPE,
26: ADDRESS1 hz_party_interface.HQ_ADDRESS1%TYPE,
27: CITY hz_party_interface.HQ_CITY%TYPE,
28: PRIMARY_GEO_AREA hz_party_interface.HQ_PRIMARY_GEO_AREA%TYPE,
29: COUNTY hz_party_interface.HQ_COUNTY%TYPE,
30: POSTAL_CODE hz_party_interface.HQ_POSTAL_CODE%TYPE,
31: PHONE_NUMBER hz_party_interface.HQ_PHONE_NUMBER%TYPE,
32: RELATIONSHIP_CODE hz_relationships.relationship_code%type,
33: RELATIONSHIP_TYPE hz_relationships.relationship_type%type,
26: ADDRESS1 hz_party_interface.HQ_ADDRESS1%TYPE,
27: CITY hz_party_interface.HQ_CITY%TYPE,
28: PRIMARY_GEO_AREA hz_party_interface.HQ_PRIMARY_GEO_AREA%TYPE,
29: COUNTY hz_party_interface.HQ_COUNTY%TYPE,
30: POSTAL_CODE hz_party_interface.HQ_POSTAL_CODE%TYPE,
31: PHONE_NUMBER hz_party_interface.HQ_PHONE_NUMBER%TYPE,
32: RELATIONSHIP_CODE hz_relationships.relationship_code%type,
33: RELATIONSHIP_TYPE hz_relationships.relationship_type%type,
34: MAIN_PARTY_ID NUMBER,
27: CITY hz_party_interface.HQ_CITY%TYPE,
28: PRIMARY_GEO_AREA hz_party_interface.HQ_PRIMARY_GEO_AREA%TYPE,
29: COUNTY hz_party_interface.HQ_COUNTY%TYPE,
30: POSTAL_CODE hz_party_interface.HQ_POSTAL_CODE%TYPE,
31: PHONE_NUMBER hz_party_interface.HQ_PHONE_NUMBER%TYPE,
32: RELATIONSHIP_CODE hz_relationships.relationship_code%type,
33: RELATIONSHIP_TYPE hz_relationships.relationship_type%type,
34: MAIN_PARTY_ID NUMBER,
35: MAIN_DUNS_NUMBER VARCHAR2(15),
37: );
38:
39:
40: procedure do_map(
41: p_interface_rec IN OUT NOCOPY HZ_PARTY_INTERFACE%ROWTYPE,
42: x_return_status IN OUT NOCOPY VARCHAR2
43: );
44:
45: procedure check_mosr_mapping (
53: );
54:
55: procedure populate_to_classification(
56: p_code_assignment_rec IN OUT NOCOPY hz_classification_v2pub.code_assignment_rec_type,
57: p_interface_rec IN OUT NOCOPY HZ_PARTY_INTERFACE%ROWTYPE,
58: -- p_is_new_party IN BOOLEAN ,
59: x_return_status IN OUT NOCOPY VARCHAR2
60: ) ;
61: -- Bug 3417357 : Added parameter p_create_new
69:
70: procedure store_financial_report(
71: --p_fin_rep_rec IN OUT NOCOPY hz_org_info_pub.financial_reports_rec_type,
72: p_fin_rep_rec IN OUT NOCOPY HZ_ORGANIZATION_INFO_V2PUB.financial_report_rec_type,
73: p_interface_rec IN OUT NOCOPY HZ_PARTY_INTERFACE%ROWTYPE,
74: x_return_status IN OUT NOCOPY VARCHAR2
75: );
76:
77:
75: );
76:
77:
78: procedure store_financial_number(
79: p_interface_rec IN OUT NOCOPY HZ_PARTY_INTERFACE%ROWTYPE,
80: --p_fin_num_rec IN OUT NOCOPY hz_org_info_pub.financial_numbers_rec_type,
81: p_fin_num_rec IN OUT NOCOPY HZ_ORGANIZATION_INFO_V2PUB.financial_number_rec_type,
82: p_new_fin_report IN VARCHAR2,
83: p_type_of_financial_report IN VARCHAR2,
105: );
106:
107:
108: procedure do_assign_org_record(
109: p_interface_rec IN OUT NOCOPY HZ_PARTY_INTERFACE%ROWTYPE,
110: l_organization_rec OUT NOCOPY HZ_PARTY_V2PUB.organization_rec_type
111: );
112:
113:
111: );
112:
113:
114: procedure do_assign_location_record(
115: p_interface_rec IN HZ_PARTY_INTERFACE%ROWTYPE,
116: l_location_rec OUT NOCOPY hz_location_v2pub.location_rec_type
117: );
118:
119: procedure do_assign_credit_ratings(
116: l_location_rec OUT NOCOPY hz_location_v2pub.location_rec_type
117: );
118:
119: procedure do_assign_credit_ratings(
120: p_interface_rec IN HZ_PARTY_INTERFACE%ROWTYPE,
121: p_organization_rec IN HZ_PARTY_V2PUB.ORGANIZATION_REC_TYPE,
122: --l_credit_ratings_rec OUT NOCOPY HZ_PARTY_INFO_PUB.CREDIT_RATINGS_REC_TYPE
123: l_credit_ratings_rec OUT NOCOPY HZ_PARTY_INFO_V2PUB.CREDIT_RATING_REC_TYPE
124: );
123: l_credit_ratings_rec OUT NOCOPY HZ_PARTY_INFO_V2PUB.CREDIT_RATING_REC_TYPE
124: );
125:
126: procedure do_assign_financial_report(
127: p_interface_rec IN HZ_PARTY_INTERFACE%ROWTYPE,
128: --l_fin_rep_rec IN OUT NOCOPY HZ_ORG_INFO_PUB.FINANCIAL_REPORTS_REC_TYPE,
129: l_fin_rep_rec IN OUT NOCOPY HZ_ORGANIZATION_INFO_V2PUB.FINANCIAL_REPORT_REC_TYPE,
130: p_type_of_financial_report IN HZ_FINANCIAL_REPORTS.TYPE_OF_FINANCIAL_REPORT%type
131: );
130: p_type_of_financial_report IN HZ_FINANCIAL_REPORTS.TYPE_OF_FINANCIAL_REPORT%type
131: );
132:
133: PROCEDURE create_dynamic_lookups(
134: p_party_interface_rec IN HZ_PARTY_INTERFACE%ROWTYPE,
135: x_return_status IN OUT NOCOPY VARCHAR2
136: );
137:
138: PROCEDURE create_lookup(
141: x_return_status IN OUT NOCOPY VARCHAR2
142: );
143:
144: PROCEDURE rectify_error_fields(
145: p_interface_rec IN OUT NOCOPY HZ_PARTY_INTERFACE%ROWTYPE
146: );
147:
148: PROCEDURE set_hz_dnb_invalid_data(
149: p_column_name IN VARCHAR2,
161: | set_hz_dnb_invalid_data
162: |
163: | DESCRIPTION
164: | o If value for any field passed by DNB is not valid, then this
165: | information is stored in hz_party_interface_errors
166: |
167: | SCOPE - PRIVATE
168: |
169: | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED
205: FND_MESSAGE.SET_TOKEN('TCA_VALUE',p_tca_value);
206: END IF;
207: l_message_text := FND_MESSAGE.GET;
208:
209: INSERT INTO hz_party_interface_errors (
210: interface_error_id,
211: party_interface_id,
212: message_text,
213: created_by,
215: last_updated_by,
216: last_update_date,
217: last_update_login)
218: VALUES (
219: hz_party_interface_errors_s.nextval,
220: G_PARTY_INTERFACE_ID,
221: l_message_text,
222: hz_utility_v2pub.created_by,
223: hz_utility_v2pub.creation_date,
239: | ( So that information bought from DNB does not error out NOCOPY ).
240: | ~ Yes/ No lookups will be defaulted to N.
241: | ~ Currency code columns will be set to NULL.
242: | ~ Other lookup code columns will be set to NULL.
243: | o Status in hz_party_interface will be W1, W2 instead of P1,
244: | P2 respectively if this procedure modifies any errorneous
245: | DNB data.
246: | o Inserts a record in hz_party_interface_errors for each field
247: | rectified.
242: | ~ Other lookup code columns will be set to NULL.
243: | o Status in hz_party_interface will be W1, W2 instead of P1,
244: | P2 respectively if this procedure modifies any errorneous
245: | DNB data.
246: | o Inserts a record in hz_party_interface_errors for each field
247: | rectified.
248: |
249: | SCOPE - PRIVATE
250: |
272: | of interface record to 'NACE'.
273: +===========================================================================*/
274:
275: PROCEDURE rectify_error_fields(
276: p_interface_rec IN OUT NOCOPY HZ_PARTY_INTERFACE%ROWTYPE
277: ) IS
278:
279: CURSOR c_currency_field (p_currency_code IN VARCHAR2) IS
280: SELECT '1'
1054: |
1055: +===========================================================================*/
1056:
1057: procedure do_create_request_log(
1058: p_interface_rec IN HZ_PARTY_INTERFACE%ROWTYPE,
1059: l_request_log_id OUT NOCOPY NUMBER
1060: ) IS PRAGMA AUTONOMOUS_TRANSACTION;
1061:
1062: l_party_interface_id NUMBER;
1081: hz_utility_v2pub.LAST_UPDATED_BY,
1082: hz_utility_v2pub.LAST_UPDATE_DATE )
1083: RETURNING REQUEST_ID INTO l_request_log_id;
1084:
1085: UPDATE hz_party_interface
1086: SET REQUEST_LOG_ID = l_request_log_id
1087: WHERE party_interface_id = p_interface_rec.party_interface_id;
1088:
1089: COMMIT;
1199: | MODIFICATION HISTORY
1200: |
1201: | 19-AUG-2004 Rajib Ranjan Borah o Bug 3107162. Added call to
1202: | rectify_error_fields
1203: | o Status in HZ_PARTY_INTERFACE will
1204: | be set to W1 and not P1 if any column
1205: | value passed by DNB is invalid.
1206: | o IF G_ERROR_FLAG = 'Y', push message
1207: | HZ_DNB_INVALID_NULL to stack.
1226: l_api_version CONSTANT NUMBER := 1.0;
1227:
1228: CURSOR c1 IS
1229: SELECT * FROM
1230: HZ_PARTY_INTERFACE
1231: WHERE NVL(group_id, FND_API.G_MISS_NUM) = NVL(p_group_id, FND_API.G_MISS_NUM)
1232: AND status = 'N';
1233:
1234: l_interface_rec HZ_PARTY_INTERFACE%ROWTYPE;
1230: HZ_PARTY_INTERFACE
1231: WHERE NVL(group_id, FND_API.G_MISS_NUM) = NVL(p_group_id, FND_API.G_MISS_NUM)
1232: AND status = 'N';
1233:
1234: l_interface_rec HZ_PARTY_INTERFACE%ROWTYPE;
1235: l_organization_rec HZ_PARTY_V2PUB.organization_rec_type;
1236: l_party_rel_rec HZ_RELATIONSHIP_V2PUB.relationship_rec_type;
1237: l_location_rec HZ_LOCATION_V2PUB.location_rec_type;
1238:
1421:
1422: IF l_final_party_id IS NULL THEN
1423: l_final_party_id := l_interface_rec.party_id;
1424:
1425: update hz_party_interface set party_id = l_final_party_id
1426: where party_interface_id = l_interface_rec.party_interface_id;
1427: END IF;
1428:
1429: ELSE
1694: --
1695:
1696: IF x_return_status = 'S' THEN
1697: IF G_ERROR_FLAG = 'N' THEN -- Bug 3107162
1698: UPDATE hz_party_interface
1699: SET status = 'P1',
1700: party_id = l_final_party_id -- Bug 5440525
1701: WHERE party_interface_id = l_interface_rec.party_interface_id;
1702: ELSE
1699: SET status = 'P1',
1700: party_id = l_final_party_id -- Bug 5440525
1701: WHERE party_interface_id = l_interface_rec.party_interface_id;
1702: ELSE
1703: UPDATE hz_party_interface
1704: SET status = 'W1',
1705: party_id = l_final_party_id -- Bug 5440525
1706: WHERE party_interface_id = l_interface_rec.party_interface_id;
1707: l_any_rectification_in_batch := TRUE;
2298: |
2299: +===========================================================================*/
2300:
2301: procedure do_map(
2302: p_interface_rec IN OUT NOCOPY HZ_PARTY_INTERFACE%ROWTYPE,
2303: x_return_status IN OUT NOCOPY VARCHAR2
2304: ) IS
2305: l_organization_rec HZ_PARTY_V2PUB.organization_rec_type;
2306: l_location_rec hz_location_v2pub.location_rec_type;
2697: |
2698: +===========================================================================*/
2699:
2700: procedure do_assign_org_record(
2701: p_interface_rec IN OUT NOCOPY HZ_PARTY_INTERFACE%ROWTYPE,
2702: l_organization_rec OUT NOCOPY HZ_PARTY_V2PUB.organization_rec_type
2703: ) IS
2704: BEGIN
2705:
2872: END do_assign_org_record;
2873:
2874:
2875: procedure do_assign_location_record(
2876: p_interface_rec IN HZ_PARTY_INTERFACE%ROWTYPE,
2877: l_location_rec OUT NOCOPY hz_location_v2pub.location_rec_type
2878: ) IS
2879: BEGIN
2880:
2898:
2899: END do_assign_location_record;
2900:
2901: procedure do_assign_credit_ratings(
2902: p_interface_rec IN HZ_PARTY_INTERFACE%ROWTYPE,
2903: p_organization_rec IN HZ_PARTY_V2PUB.ORGANIZATION_REC_TYPE,
2904: --l_credit_ratings_rec OUT NOCOPY HZ_PARTY_INFO_PUB.CREDIT_RATINGS_REC_TYPE
2905: l_credit_ratings_rec OUT NOCOPY HZ_PARTY_INFO_V2PUB.CREDIT_RATING_REC_TYPE
2906: ) IS
3042: END do_assign_credit_ratings;
3043:
3044:
3045: procedure do_assign_financial_report(
3046: p_interface_rec IN HZ_PARTY_INTERFACE%ROWTYPE,
3047: --l_fin_rep_rec IN OUT NOCOPY HZ_ORG_INFO_PUB.FINANCIAL_REPORTS_REC_TYPE,
3048: l_fin_rep_rec IN OUT NOCOPY HZ_ORGANIZATION_INFO_V2PUB.FINANCIAL_REPORT_REC_TYPE,
3049: p_type_of_financial_report IN HZ_FINANCIAL_REPORTS.TYPE_OF_FINANCIAL_REPORT%type
3050: ) IS
3452: +===========================================================================*/
3453:
3454: procedure populate_to_classification(
3455: p_code_assignment_rec IN OUT NOCOPY hz_classification_v2pub.code_assignment_rec_type,
3456: p_interface_rec IN OUT NOCOPY HZ_PARTY_INTERFACE%ROWTYPE,
3457: -- p_is_new_party IN BOOLEAN ,
3458: x_return_status IN OUT NOCOPY VARCHAR2
3459: ) IS
3460:
3524: p_code_assignment_rec.class_code := SUBSTRB(replace(p_code_assignment_rec.class_code, ' ', ''), 1, 4);
3525: END IF;
3526:
3527: -- The below for loop will pick all code assignment records whose class code is
3528: -- not present in SIC_CODE1 to SIC_CODE6 in hz_party_interface for this party.
3529: -- It will end date all these code assignments because as per new data they
3530: -- are not valid and should not be active in TCA Registry.
3531:
3532: FOR codes in old_code_assignment
3547: );
3548: END LOOP;
3549:
3550: -- Below sql will check if the existing primary code for this party
3551: -- is same as SIC_CODE1 in hz_party_interface for this party.
3552: -- If the two codes are different, it will update the existing
3553: -- code assignment to Non-Primary as the party has another primary SIC code.
3554: BEGIN
3555: select code_assignment_id, object_version_number
4954:
4955: procedure store_financial_report(
4956: --p_fin_rep_rec IN OUT NOCOPY hz_org_info_pub.financial_reports_rec_type,
4957: p_fin_rep_rec IN OUT NOCOPY HZ_ORGANIZATION_INFO_V2PUB.financial_report_rec_type,
4958: p_interface_rec IN OUT NOCOPY HZ_PARTY_INTERFACE%ROWTYPE,
4959: x_return_status IN OUT NOCOPY VARCHAR2
4960: ) IS
4961: --l_fin_num_rec hz_org_info_pub.financial_numbers_rec_type;
4962: l_fin_num_rec HZ_ORGANIZATION_INFO_V2PUB.financial_number_rec_type;
5021: |
5022: +===========================================================================*/
5023:
5024: procedure store_financial_number(
5025: p_interface_rec IN OUT NOCOPY HZ_PARTY_INTERFACE%ROWTYPE,
5026: --p_fin_num_rec IN OUT NOCOPY hz_org_info_pub.financial_numbers_rec_type,
5027: p_fin_num_rec IN OUT NOCOPY HZ_ORGANIZATION_INFO_V2PUB.financial_number_rec_type,
5028: p_new_fin_report IN VARCHAR2,
5029: p_type_of_financial_report IN VARCHAR2,
5739: | NOTES
5740: |
5741: | MODIFICATION HISTORY
5742: |
5743: | 19-AUG-2004 Rajib Ranjan Borah o Bug 3107162.Status in hz_party_interface
5744: | can be either P1 or W1. Therefore added
5745: | W1 in cursor c1.
5746: | o If previous status was P1, set it to P2.
5747: | If previous status was W1, set it to W2.
5753: x_return_status IN OUT NOCOPY VARCHAR2
5754: ) IS
5755: CURSOR c1 IS
5756: SELECT * FROM
5757: HZ_PARTY_INTERFACE
5758: WHERE NVL(group_id, FND_API.G_MISS_NUM) = NVL(p_group_id, FND_API.G_MISS_NUM)
5759: AND status IN ('P1','W1'); -- Bug 3107162
5760:
5761: l_interface_rec HZ_PARTY_INTERFACE%ROWTYPE;
5757: HZ_PARTY_INTERFACE
5758: WHERE NVL(group_id, FND_API.G_MISS_NUM) = NVL(p_group_id, FND_API.G_MISS_NUM)
5759: AND status IN ('P1','W1'); -- Bug 3107162
5760:
5761: l_interface_rec HZ_PARTY_INTERFACE%ROWTYPE;
5762: l_related_duns_rec related_duns_rec_type;
5763: num_of_rec NUMBER;
5764: l_profile VARCHAR2(1);
5765:
5958: --
5959:
5960: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
5961: IF l_interface_rec.status = 'W1' THEN -- Bug 3107162
5962: UPDATE hz_party_interface
5963: SET status = 'W2'
5964: WHERE party_interface_id = l_interface_rec.party_interface_id;
5965: ELSE -- i.e. previous status was 'P1'
5966: UPDATE hz_party_interface
5962: UPDATE hz_party_interface
5963: SET status = 'W2'
5964: WHERE party_interface_id = l_interface_rec.party_interface_id;
5965: ELSE -- i.e. previous status was 'P1'
5966: UPDATE hz_party_interface
5967: SET status = 'P2'
5968: WHERE party_interface_id = l_interface_rec.party_interface_id;
5969: END IF;
5970:
6648:
6649: arp_util.debug('HZ_MAP_PARTY_PUB.STORE_ERROR (+) ');
6650:
6651:
6652: UPDATE hz_party_interface
6653: SET status = p_status
6654: WHERE party_interface_id = p_party_interface_id;
6655:
6656: --reset the message table index used in reading messages to point to the top of the message table.
6657:
6658: FND_MSG_PUB.RESET;
6659:
6660: FOR I IN 1..FND_MSG_PUB.Count_Msg LOOP
6661: -- SELECT hz_party_interface_errors_s.nextval INTO l_interface_error_id from dual;
6662:
6663: l_message_text := FND_MSG_PUB.Get(
6664: p_encoded => FND_API.G_FALSE );
6665:
6662:
6663: l_message_text := FND_MSG_PUB.Get(
6664: p_encoded => FND_API.G_FALSE );
6665:
6666: INSERT INTO hz_party_interface_errors (
6667: interface_error_id,
6668: party_interface_id,
6669: message_text,
6670: created_by,
6672: last_updated_by,
6673: last_update_date,
6674: last_update_login)
6675: VALUES (
6676: hz_party_interface_errors_s.nextval ,
6677: p_party_interface_id,
6678: l_message_text,
6679: hz_utility_v2pub.created_by,
6680: hz_utility_v2pub.creation_date,
6683: hz_utility_v2pub.last_update_login);
6684:
6685: END LOOP;
6686:
6687: COMMIT; /* commit update to hz_party_interface and inserts into hz_party_interface_errors */
6688:
6689: arp_util.debug('HZ_MAP_PARTY_PUB.STORE_ERROR (-) ');
6690:
6691: END store_error;
6919: -- Bug 3848365
6920: -- SIC_CODE1 to SIC_CODE6
6921:
6922: PROCEDURE create_dynamic_lookups(
6923: p_party_interface_rec IN HZ_PARTY_INTERFACE%ROWTYPE,
6924: x_return_status IN OUT NOCOPY VARCHAR2
6925: ) IS
6926:
6927: -- bug 3809276: added a local variable to store local_activity_code_type