DBA Data[Home] [Help]

APPS.ZX_TCM_PTP_PKG dependencies on FND_API

Line 172: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

168:
169: -- Checking parameters are not null
170: IF (p_party_type_code is null) THEN
171: -- bug 8569734
172: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
173:
174: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
175: l_log_msg := 'party type is null for party_id ' || to_char(p_party_id);
176: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_procedure_name, l_log_msg);

Line 207: p_return_status := FND_API.G_RET_STS_SUCCESS;

203: END IF;
204: -- Logging Infra: Statement level
205: ----------------------------------------------------------------------------------
206:
207: p_return_status := FND_API.G_RET_STS_SUCCESS;
208: RETURN;
209: ELSE
210: /*Reinitialize p_ptp_id */
211: p_ptp_id := NULL;

Line 235: p_return_status := FND_API.G_RET_STS_SUCCESS;

231: END IF;
232: -- Logging Infra: Statement level
233: ---------------------------------------------------------------------------------
234:
235: p_return_status := FND_API.G_RET_STS_SUCCESS;
236: RETURN;
237: ELSE
238: /*Reinitialize p_ptp_id */
239: p_ptp_id := NULL;

Line 263: p_return_status := FND_API.G_RET_STS_SUCCESS;

259: END IF;
260: -- Logging Infra: Statement level
261: ---------------------------------------------------------------------------------
262:
263: p_return_status := FND_API.G_RET_STS_SUCCESS;
264: RETURN;
265: ELSE
266: /*Reinitialize p_ptp_id */
267: p_ptp_id := NULL;

Line 291: p_return_status := FND_API.G_RET_STS_SUCCESS;

287: END IF;
288: -- Logging Infra: Statement level
289: ---------------------------------------------------------------------------------
290:
291: p_return_status := FND_API.G_RET_STS_SUCCESS;
292: RETURN;
293: ELSE
294: /*Reinitialize p_ptp_id */
295: p_ptp_id := NULL;

Line 308: p_return_status := FND_API.G_RET_STS_SUCCESS;

304: l_log_msg := 'There is not an establishment associated. Returning without error.';
305: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
306: END IF;
307: ---------------------------------------------------------------------------------
308: p_return_status := FND_API.G_RET_STS_SUCCESS;
309: END IF; -- If5
310: -- END P_Party_Type_Code = 'LEGAL_ESTABLISHMENT'
311:
312: -- Checking First Party

Line 323: p_return_status := FND_API.G_RET_STS_SUCCESS;

319: AND ptp.party_id = xle.party_id
320: AND ptp.Party_Type_Code = p_party_type_code;
321:
322: -- Set Status Parameter to Success
323: p_return_status := FND_API.G_RET_STS_SUCCESS;
324:
325: ---------------------------------------------------------------------------------
326: -- Logging Infra: Statement level
327: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 360: p_return_status := FND_API.G_RET_STS_SUCCESS;

356: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_procedure_name, l_log_msg);
357: END IF;
358: ---------------------------------------------------------------------------------
359: p_ptp_id := NULL;
360: p_return_status := FND_API.G_RET_STS_SUCCESS;
361: ELSE
362: ---------------------------------------------------------------------------------
363: -- Logging Infra: Statement level
364: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 374: p_return_status := FND_API.G_RET_STS_ERROR;

370: ---------------------------------------------------------------------------------
371: -- Bug 4512462
372: FND_MESSAGE.SET_NAME('ZX', 'ZX_PARTY_NOT_EXISTS');
373: FND_MESSAGE.SET_TOKEN('PARTY_TYPE', p_party_type_code);
374: p_return_status := FND_API.G_RET_STS_ERROR;
375: END IF;
376: --close c_get_ptp_id;
377: ELSE
378:

Line 389: p_return_status := FND_API.G_RET_STS_SUCCESS;

385: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
386: END IF;
387: -- Logging Infra: Statement level
388: ---------------------------------------------------------------------------------
389: p_return_status := FND_API.G_RET_STS_SUCCESS;
390: --close c_get_ptp_id;
391: END IF;
392: END IF; -- End IF for Party Types
393: ---------------------------------------------------------------------------------

Line 421: p_return_status := FND_API.G_RET_STS_ERROR;

417: FETCH get_le_name_csr INTO l_party_name;
418: CLOSE get_le_name_csr;
419: END IF;
420: FND_MESSAGE.SET_TOKEN('PARTY_NAME', l_party_name);
421: p_return_status := FND_API.G_RET_STS_ERROR;
422: WHEN INVALID_CURSOR THEN
423: --bug 8568734
424: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
425: --FND_MESSAGE.Set_Name ('ZX','ZX_GENERIC_MESSAGE');

Line 424: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

420: FND_MESSAGE.SET_TOKEN('PARTY_NAME', l_party_name);
421: p_return_status := FND_API.G_RET_STS_ERROR;
422: WHEN INVALID_CURSOR THEN
423: --bug 8568734
424: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
425: --FND_MESSAGE.Set_Name ('ZX','ZX_GENERIC_MESSAGE');
426: --FND_MESSAGE.Set_Token('GENERIC_TEXT', SQLERRM);
427: -- Logging Infra: Statement level
428: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 434: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

430: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
431: END IF;
432: WHEN OTHERS THEN
433: -- bug 8568734
434: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
435: --FND_MESSAGE.Set_Name ('ZX','ZX_GENERIC_MESSAGE');
436: --FND_MESSAGE.Set_Token('GENERIC_TEXT', SQLERRM);
437:
438: -- Logging Infra: Statement level

Line 515: p_return_status := FND_API.G_RET_STS_ERROR;

511: l_ptp_id_tbl(l_ptp_id_indx).ptp_id := p_ptp_id;
512: END IF;
513:
514: IF P_PTP_ID is null Then
515: p_return_status := FND_API.G_RET_STS_ERROR;
516: FND_MESSAGE.SET_NAME('ZX', 'ZX_PARTY_NOT_EXISTS');
517: -- bug 8568734
518: OPEN get_le_name_csr;
519: FETCH get_le_name_csr INTO l_party_name;

Line 525: p_return_status := FND_API.G_RET_STS_SUCCESS;

521: FND_MESSAGE.SET_TOKEN('PARTY_TYPE', 'LEGAL_ESTABLISHMENT');
522: FND_MESSAGE.SET_TOKEN('PARTY_NAME', 'l_party_name');
523:
524: ELSE
525: p_return_status := FND_API.G_RET_STS_SUCCESS;
526: END IF;
527:
528: ---------------------------------------------------------------------------------
529: -- Logging Infra: Statement level

Line 540: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

536: -- Logging Infra: Statement level
537: ---------------------------------------------------------------------------------
538: EXCEPTION
539: WHEN INVALID_CURSOR THEN
540: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
541: --FND_MESSAGE.Set_Name ('ZX','ZX_GENERIC_MESSAGE');
542: --FND_MESSAGE.Set_Token('GENERIC_TEXT', SQLERRM);
543: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
544: l_log_msg := 'Error Message: '||SQLERRM;

Line 549: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

545: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
546: END IF;
547:
548: WHEN OTHERS THEN
549: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
550: --FND_MESSAGE.Set_Name ('ZX','ZX_GENERIC_MESSAGE');
551: --FND_MESSAGE.Set_Token('GENERIC_TEXT', SQLERRM);
552:
553: -- Logging Infra: Statement level

Line 626: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

622: IF p_le_id IS NULL THEN
623: p_ptp_id := NULL;
624:
625: -- bug 8568734
626: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
627: -- Logging Infra: Statement level
628: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
629: l_log_msg := 'Legal Entity Id is NULL';
630: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

Line 644: p_return_status := FND_API.G_RET_STS_ERROR;

640: Fetch c_ptp_of_le into p_ptp_id;
641:
642: IF c_ptp_of_le%NOTFOUND THEN
643: p_ptp_id := NULL;
644: p_return_status := FND_API.G_RET_STS_ERROR;
645: FND_MESSAGE.SET_NAME('ZX', 'ZX_PARTY_NOT_EXISTS');
646:
647: OPEN get_le_name_csr;
648: FETCH get_le_name_csr INTO l_party_name;

Line 655: p_return_status := FND_API.G_RET_STS_SUCCESS;

651: FND_MESSAGE.SET_TOKEN('PARTY_TYPE', 'LEGAL_ENTITY');
652: FND_MESSAGE.SET_TOKEN('PARTY_NAME', l_party_name);
653: close c_ptp_of_le;
654: ELSE
655: p_return_status := FND_API.G_RET_STS_SUCCESS;
656: END IF;
657:
658: --
659: -- Case: Both parameter P_LE_ID and P_ORG_ID are not NULL

Line 698: p_return_status := FND_API.G_RET_STS_SUCCESS;

694:
695: IF l_chk_le_flg = 'N' OR l_chk_le_flg IS NULL THEN
696:
697: IF p_ptp_id IS NOT NULL THEN
698: p_return_status := FND_API.G_RET_STS_SUCCESS;
699: --close c_get_ptp;
700: ELSE
701: p_ptp_id := NULL;
702: p_return_status := FND_API.G_RET_STS_ERROR;

Line 702: p_return_status := FND_API.G_RET_STS_ERROR;

698: p_return_status := FND_API.G_RET_STS_SUCCESS;
699: --close c_get_ptp;
700: ELSE
701: p_ptp_id := NULL;
702: p_return_status := FND_API.G_RET_STS_ERROR;
703: FND_MESSAGE.SET_NAME('ZX', 'ZX_PARTY_NOT_EXISTS');
704: -- bug 8568734
705: OPEN get_ou_name_csr;
706: FETCH get_ou_name_csr INTO l_party_name;

Line 724: p_return_status := FND_API.G_RET_STS_ERROR;

720: Fetch c_ptp_of_le into p_ptp_id;
721:
722: IF c_ptp_of_le%NOTFOUND THEN
723: p_ptp_id := NULL;
724: p_return_status := FND_API.G_RET_STS_ERROR;
725: FND_MESSAGE.SET_NAME('ZX', 'ZX_PARTY_NOT_EXISTS');
726: FND_MESSAGE.SET_TOKEN('PARTY_TYPE', 'LEGAL_ENTITY');
727:
728: OPEN get_le_name_csr;

Line 735: p_return_status := FND_API.G_RET_STS_SUCCESS;

731:
732: FND_MESSAGE.SET_TOKEN('PARTY_NAME', l_party_name);
733: close c_ptp_of_le;
734: ELSE
735: p_return_status := FND_API.G_RET_STS_SUCCESS;
736: close c_ptp_of_le;
737: END IF;
738:
739: ---------------------------------------------------------------------------------

Line 750: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

746: -- Logging Infra: Statement level
747: ---------------------------------------------------------------------------------
748:
749: ELSE
750: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
751: -- FND_MESSAGE.SET_NAME('ZX', 'ZX_PARTY_NOT_EXISTS');
752: ---------------------------------------------------------------------------------
753: -- Logging Infra: Statement level
754: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 768: p_return_status := FND_API.G_RET_STS_ERROR;

764: Fetch c_ptp_of_le into p_ptp_id;
765:
766: IF c_ptp_of_le%NOTFOUND THEN
767: p_ptp_id := NULL;
768: p_return_status := FND_API.G_RET_STS_ERROR;
769: FND_MESSAGE.SET_NAME('ZX', 'ZX_PARTY_NOT_EXISTS');
770: -- bug 8568734
771: OPEN get_le_name_csr;
772: FETCH get_le_name_csr INTO l_party_name;

Line 778: p_return_status := FND_API.G_RET_STS_SUCCESS;

774: FND_MESSAGE.SET_TOKEN('PARTY_TYPE', 'LEGAL_ENTITY');
775: FND_MESSAGE.SET_TOKEN('PARTY_NAME', l_party_name);
776: close c_ptp_of_le;
777: ELSE
778: p_return_status := FND_API.G_RET_STS_SUCCESS;
779: close c_ptp_of_le;
780: END IF;
781:
782: ---------------------------------------------------------------------------------

Line 794: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

790:
791: END IF;
792: ELSE
793: p_ptp_id := NULL;
794: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
795: ---------------------------------------------------------------------------------
796: -- Logging Infra: Statement level
797: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
798: l_log_msg := 'Invalid p_le_id, p_org_id';

Line 816: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

812: ---------------------------------------------------------------------------------
813:
814: EXCEPTION
815: WHEN INVALID_CURSOR THEN
816: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
817: --FND_MESSAGE.SET_NAME ('ZX','ZX_GENERIC_MESSAGE');
818: --FND_MESSAGE.SET_TOKEN('GENERIC_TEXT', SQLERRM);
819: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
820: l_log_msg := 'Error Message: '||SQLERRM;

Line 824: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

820: l_log_msg := 'Error Message: '||SQLERRM;
821: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
822: END IF;
823: WHEN OTHERS THEN
824: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
825: --FND_MESSAGE.SET_NAME ('ZX','ZX_GENERIC_MESSAGE');
826: --FND_MESSAGE.SET_TOKEN('GENERIC_TEXT', SQLERRM);
827:
828: -- Logging Infra: Statement level

Line 893: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

889: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
890: END IF;
891: -- Logging Infra: Statement level
892: --------------------------------------------------------------------------------
893: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
894: --FND_MESSAGE.SET_NAME('ZX', 'ZX_LOCATION_NOT_EXIST');
895: close c_get_location_id;
896: ELSIF p_location_id IS NULL THEN
897: --------------------------------------------------------------------------------

Line 905: p_return_status := FND_API.G_RET_STS_ERROR;

901: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
902: END IF;
903: -- Logging Infra: Statement level
904: --------------------------------------------------------------------------------
905: p_return_status := FND_API.G_RET_STS_ERROR;
906: FND_MESSAGE.SET_NAME('ZX', 'ZX_LOCATION_NOT_EXIST');
907: FND_MESSAGE.SET_TOKEN('BU', l_party_name);
908: close c_get_location_id;
909: ELSE

Line 910: p_return_status := FND_API.G_RET_STS_SUCCESS;

906: FND_MESSAGE.SET_NAME('ZX', 'ZX_LOCATION_NOT_EXIST');
907: FND_MESSAGE.SET_TOKEN('BU', l_party_name);
908: close c_get_location_id;
909: ELSE
910: p_return_status := FND_API.G_RET_STS_SUCCESS;
911: close c_get_location_id;
912:
913: --------------------------------------------------------------------------------
914: -- Logging Infra: Statement level

Line 933: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

929: --------------------------------------------------------------------------------
930:
931: EXCEPTION
932: WHEN INVALID_CURSOR THEN
933: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
934: --FND_MESSAGE.SET_NAME ('ZX','ZX_GENERIC_MESSAGE');
935: --FND_MESSAGE.SET_TOKEN('GENERIC_TEXT', SQLERRM);
936: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
937: l_log_msg := 'Error Message: '||SQLERRM;

Line 942: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

938: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
939: END IF;
940:
941: WHEN OTHERS THEN
942: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
943: --FND_MESSAGE.SET_NAME ('ZX','ZX_GENERIC_MESSAGE');
944: --FND_MESSAGE.SET_TOKEN('GENERIC_TEXT', SQLERRM);
945:
946: -----------------------------------------------------------------------------

Line 1011: IF NOT FND_API.Compatible_API_Call(

1007: /*--------------------------------------------------+
1008: | Standard call to check for call compatibility |
1009: +--------------------------------------------------*/
1010:
1011: IF NOT FND_API.Compatible_API_Call(
1012: l_api_version,
1013: p_api_version,
1014: l_api_name,
1015: G_PKG_NAME

Line 1017: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1013: p_api_version,
1014: l_api_name,
1015: G_PKG_NAME
1016: ) THEN
1017: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1018: END IF;
1019:
1020: /*-----------------------------------------+
1021: | Initialize return status to SUCCESS |

Line 1024: x_return_status := FND_API.G_RET_STS_SUCCESS;

1020: /*-----------------------------------------+
1021: | Initialize return status to SUCCESS |
1022: +-----------------------------------------*/
1023:
1024: x_return_status := FND_API.G_RET_STS_SUCCESS;
1025:
1026:
1027: Open c_get_reg_id;
1028: Fetch c_get_reg_id into l_tax_registration_id;

Line 1031: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1027: Open c_get_reg_id;
1028: Fetch c_get_reg_id into l_tax_registration_id;
1029:
1030: IF c_get_reg_id%NOTFOUND THEN
1031: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1032: -- FND_MESSAGE.SET_NAME('ZX','ZX_GENERIC_MESSAGE');
1033: close c_get_reg_id;
1034:
1035: -- Logging Infra: Statement level

Line 1043: x_return_status := FND_API.G_RET_STS_SUCCESS;

1039: END IF;
1040: -- Logging Infra: Statement level
1041:
1042: ELSE
1043: x_return_status := FND_API.G_RET_STS_SUCCESS;
1044: close c_get_reg_id;
1045: END IF;
1046:
1047: -- Logging Infra: Procedure level

Line 1054: WHEN FND_API.G_EXC_ERROR THEN

1050: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
1051: END IF;
1052:
1053: EXCEPTION
1054: WHEN FND_API.G_EXC_ERROR THEN
1055: ROLLBACK TO Check_Tax_Registrations_PVT;
1056: x_return_status := FND_API.G_RET_STS_ERROR ;
1057:
1058: IF ( G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 1056: x_return_status := FND_API.G_RET_STS_ERROR ;

1052:
1053: EXCEPTION
1054: WHEN FND_API.G_EXC_ERROR THEN
1055: ROLLBACK TO Check_Tax_Registrations_PVT;
1056: x_return_status := FND_API.G_RET_STS_ERROR ;
1057:
1058: IF ( G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
1059: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name,'');
1060: END IF;

Line 1062: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1058: IF ( G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
1059: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name,'');
1060: END IF;
1061:
1062: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1063: ROLLBACK TO Check_Tax_Registrations_PVT;
1064: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1065:
1066: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 1064: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1060: END IF;
1061:
1062: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1063: ROLLBACK TO Check_Tax_Registrations_PVT;
1064: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1065:
1066: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
1067: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,'');
1068: END IF;

Line 1071: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1067: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,'');
1068: END IF;
1069:
1070: WHEN INVALID_CURSOR THEN
1071: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1072: --FND_MESSAGE.SET_NAME('ZX','ZX_GENERIC_MESSAGE');
1073: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1074: l_log_msg := 'Error Message: '||SQLERRM;
1075: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

Line 1079: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1075: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1076: END IF;
1077:
1078: WHEN OTHERS THEN
1079: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1080: --FND_MESSAGE.SET_NAME('ZX','ZX_GENERIC_MESSAGE');
1081:
1082: -- Logging Infra: Statement level
1083: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 1214: IF NOT FND_API.Compatible_API_Call(

1210: /*--------------------------------------------------+
1211: | Standard call to check for call compatibility |
1212: +--------------------------------------------------*/
1213:
1214: IF NOT FND_API.Compatible_API_Call(
1215: l_api_version,
1216: p_api_version,
1217: l_api_name,
1218: G_PKG_NAME

Line 1220: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1216: p_api_version,
1217: l_api_name,
1218: G_PKG_NAME
1219: ) THEN
1220: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1221: END IF;
1222:
1223:
1224: /*-----------------------------------------+

Line 1228: x_return_status := FND_API.G_RET_STS_SUCCESS;

1224: /*-----------------------------------------+
1225: | Initialize return status to SUCCESS |
1226: +-----------------------------------------*/
1227:
1228: x_return_status := FND_API.G_RET_STS_SUCCESS;
1229:
1230:
1231: OPEN c_find_reg_num;
1232: LOOP

Line 1291: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1287:
1288: EXIT WHEN c_find_reg_num%NOTFOUND;
1289:
1290: IF c_find_reg_num%ROWCOUNT = 0 Then
1291: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1292: -- FND_MESSAGE.SET_NAME('ZX','ZX_GENERIC_MESSAGE');
1293: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1294: l_log_msg := 'c_find_reg_num%ROWCOUNT = 0';
1295: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);

Line 1302: x_return_status := FND_API.G_RET_STS_SUCCESS;

1298: EXIT;
1299: CLOSE c_find_reg_num;
1300:
1301: ELSE
1302: x_return_status := FND_API.G_RET_STS_SUCCESS;
1303:
1304: IF p_le_new_reg_id IS NULL and p_le_old_end_date IS NULL THEN
1305: update ZX_REGISTRATIONS set
1306: effective_to = SYSDATE

Line 1564: WHEN FND_API.G_EXC_ERROR THEN

1560: END IF;
1561:
1562: EXCEPTION
1563:
1564: WHEN FND_API.G_EXC_ERROR THEN
1565: ROLLBACK TO Sync_Tax_Registrations_PVT;
1566: x_return_status := FND_API.G_RET_STS_ERROR ;
1567:
1568: IF ( G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 1566: x_return_status := FND_API.G_RET_STS_ERROR ;

1562: EXCEPTION
1563:
1564: WHEN FND_API.G_EXC_ERROR THEN
1565: ROLLBACK TO Sync_Tax_Registrations_PVT;
1566: x_return_status := FND_API.G_RET_STS_ERROR ;
1567:
1568: IF ( G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
1569: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name,'');
1570: END IF;

Line 1572: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1568: IF ( G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
1569: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name,'');
1570: END IF;
1571:
1572: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1573: ROLLBACK TO Sync_Tax_Registrations_PVT;
1574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1575:
1576: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 1574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1570: END IF;
1571:
1572: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1573: ROLLBACK TO Sync_Tax_Registrations_PVT;
1574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1575:
1576: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
1577: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,'');
1578: END IF;

Line 1580: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1576: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
1577: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,'');
1578: END IF;
1579:
1580: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1581: --FND_MESSAGE.SET_NAME('ZX','ZX_GENERIC_MESSAGE');
1582: -- Logging Infra: Statement level
1583: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1584: l_log_msg := 'Error Message: '||SQLERRM;

Line 1588: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1584: l_log_msg := 'Error Message: '||SQLERRM;
1585: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_api_name, l_log_msg);
1586: END IF;
1587: WHEN OTHERS THEN
1588: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1589: --FND_MESSAGE.SET_NAME('ZX','ZX_GENERIC_MESSAGE');
1590: -- Logging Infra: Statement level
1591: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1592: l_log_msg := 'Error Message: '||SQLERRM;

Line 1639: x_return_status := FND_API.G_RET_STS_SUCCESS;

1635: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
1636:
1637: BEGIN
1638:
1639: x_return_status := FND_API.G_RET_STS_SUCCESS;
1640: l_tbl_index := dbms_utility.get_hash_value(p_party_type_code||'$'||to_char(p_party_id), 1, 8192);
1641:
1642: IF (ZX_GLOBAL_STRUCTURES_PKG.g_party_tax_prof_id_info_tbl.exists(l_tbl_index)
1643: AND ZX_GLOBAL_STRUCTURES_PKG.g_party_tax_prof_id_info_tbl(l_tbl_index).party_type_code = p_party_type_code

Line 1749: x_return_status := FND_API.G_RET_STS_SUCCESS;

1745: l_tbl_index binary_integer;
1746:
1747: BEGIN
1748:
1749: x_return_status := FND_API.G_RET_STS_SUCCESS;
1750:
1751: IF ZX_GLOBAL_STRUCTURES_PKG.G_PARTY_TAX_PROF_INFO_TBL.exists(p_party_tax_profile_id)
1752: THEN
1753: