[Home] [Help]
1754: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||':'||l_api_name||'()+');
1755: END IF;
1756:
1757: -- Set the return status to Success
1758: x_return_status := FND_API.G_RET_STS_SUCCESS;
1759: l_stmt_num := 0;
1760:
1761: -- Insert records in ZX_LINES_DET_FACTORS
1762: --Start Bug 8269616
2980: -- Following exception added for Error Handling Fix Bug#10062401
2981: WHEN cons_violation THEN
2982: l_err_count := SQL%BULK_EXCEPTIONS.COUNT;
2983:
2984: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2985: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
2986: FND_LOG.STRING(G_LEVEL_STATEMENT,
2987: 'ZX.PLSQL.ZX_SRVC_TYP_PKG.db_insert_line_det_factors',
2988: TO_CHAR(l_err_count)||' Error(s) occured while inserting record into ZX_LINES_DET_FACTORS.');
3028: END IF;
3029: END LOOP;
3030:
3031: WHEN OTHERS THEN
3032: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3033: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3034: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,SQLERRM);
3035: END IF;
3036: END db_insert_line_det_factors;
3071: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||':'||l_api_name||'()+');
3072: END IF;
3073:
3074: /*Set the return status to Success */
3075: x_return_status := FND_API.G_RET_STS_SUCCESS;
3076: l_stmt_num := 0;
3077:
3078: /* In case of UPDATE, then if line_level_action in (UPDATE/DISCARD/CANCEL/SYNCHRONIZE) then UPDATE
3079: if line_level_action in (CREATE/CREATE_TAX_ONLY/APPLY_FROM/UNAPPLY_FROM/LINE_INFO_TAX_ONLY) then INSERT
3090: NULL,
3091: NULL,
3092: l_return_status
3093: );
3094: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3095: x_return_status := l_return_status ;
3096: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3097: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,G_PKG_NAME||': '||l_api_name||':ZX_R11I_TAX_PARTNER_PKG.copy_trx_line_for_ptnr_bef_upd returned errors');
3098: END IF;
3152: SUPPLIER_TAX_INVOICE_NUMBER = p_trx_line_dist_tbl.SUPPLIER_TAX_INVOICE_NUMBER(i),
3153: SUPPLIER_TAX_INVOICE_DATE = p_trx_line_dist_tbl.SUPPLIER_TAX_INVOICE_DATE(i),
3154: SUPPLIER_EXCHANGE_RATE = p_trx_line_dist_tbl.SUPPLIER_EXCHANGE_RATE(i),
3155: TAX_INVOICE_DATE = DECODE(p_trx_line_dist_tbl.TAX_INVOICE_DATE(i)
3156: ,FND_API.G_MISS_DATE,TAX_INVOICE_DATE
3157: ,DECODE(USER_UPD_DET_FACTORS_FLAG
3158: ,'Y', TAX_INVOICE_DATE
3159: , p_trx_line_dist_tbl.TAX_INVOICE_DATE(i))
3160: ),
3157: ,DECODE(USER_UPD_DET_FACTORS_FLAG
3158: ,'Y', TAX_INVOICE_DATE
3159: , p_trx_line_dist_tbl.TAX_INVOICE_DATE(i))
3160: ),
3161: TAX_INVOICE_NUMBER = DECODE(p_trx_line_dist_tbl.TAX_INVOICE_NUMBER(i), FND_API.G_MISS_CHAR, TAX_INVOICE_NUMBER
3162: ,p_trx_line_dist_tbl.TAX_INVOICE_NUMBER(i)),
3163: FIRST_PTY_ORG_ID = p_trx_line_dist_tbl.FIRST_PTY_ORG_ID(i),
3164: TAX_EVENT_CLASS_CODE = p_event_class_rec.TAX_EVENT_CLASS_CODE,
3165: TAX_EVENT_TYPE_CODE = p_event_class_rec.TAX_EVENT_TYPE_CODE,
3344: TRX_BATCH_ID = p_trx_line_dist_tbl.TRX_BATCH_ID(i),
3345: APPLIED_TO_TRX_NUMBER = p_trx_line_dist_tbl.APPLIED_TO_TRX_NUMBER(i),
3346: SOURCE_APPLICATION_ID = p_trx_line_dist_tbl.SOURCE_APPLICATION_ID(i),
3347: SOURCE_ENTITY_CODE = p_trx_line_dist_tbl.SOURCE_ENTITY_CODE(i),
3348: SOURCE_EVENT_CLASS_CODE = DECODE(p_trx_line_dist_tbl.SOURCE_EVENT_CLASS_CODE(i),FND_API.G_MISS_CHAR,SOURCE_EVENT_CLASS_CODE,p_trx_line_dist_tbl.SOURCE_EVENT_CLASS_CODE(i)),
3349: SOURCE_TRX_ID = p_trx_line_dist_tbl.SOURCE_TRX_ID(i),
3350: SOURCE_LINE_ID = p_trx_line_dist_tbl.SOURCE_LINE_ID(i),
3351: SOURCE_TRX_LEVEL_TYPE = p_trx_line_dist_tbl.SOURCE_TRX_LEVEL_TYPE(i),
3352: SOURCE_TAX_LINE_ID = p_trx_line_dist_tbl.SOURCE_TAX_LINE_ID(i),
3371: LINE_TRX_USER_KEY5 = p_trx_line_dist_tbl.LINE_TRX_USER_KEY5(i),
3372: LINE_TRX_USER_KEY6 = p_trx_line_dist_tbl.LINE_TRX_USER_KEY6(i),
3373: EXEMPTION_CONTROL_FLAG = p_trx_line_dist_tbl.EXEMPTION_CONTROL_FLAG(i),
3374: EXEMPT_REASON_CODE = p_trx_line_dist_tbl.EXEMPT_REASON_CODE(i),
3375: INTERFACE_ENTITY_CODE = DECODE(p_trx_line_dist_tbl.INTERFACE_ENTITY_CODE(i),FND_API.G_MISS_CHAR,INTERFACE_ENTITY_CODE,p_trx_line_dist_tbl.INTERFACE_ENTITY_CODE(i)),
3376: INTERFACE_LINE_ID = DECODE(p_trx_line_dist_tbl.INTERFACE_LINE_ID(i),FND_API.G_MISS_NUM,INTERFACE_LINE_ID,p_trx_line_dist_tbl.INTERFACE_LINE_ID(i)),
3377: DEFAULTING_ATTRIBUTE1 = p_trx_line_dist_tbl.DEFAULTING_ATTRIBUTE1(i),
3378: DEFAULTING_ATTRIBUTE2 = p_trx_line_dist_tbl.DEFAULTING_ATTRIBUTE2(i),
3379: DEFAULTING_ATTRIBUTE3 = p_trx_line_dist_tbl.DEFAULTING_ATTRIBUTE3(i),
3372: LINE_TRX_USER_KEY6 = p_trx_line_dist_tbl.LINE_TRX_USER_KEY6(i),
3373: EXEMPTION_CONTROL_FLAG = p_trx_line_dist_tbl.EXEMPTION_CONTROL_FLAG(i),
3374: EXEMPT_REASON_CODE = p_trx_line_dist_tbl.EXEMPT_REASON_CODE(i),
3375: INTERFACE_ENTITY_CODE = DECODE(p_trx_line_dist_tbl.INTERFACE_ENTITY_CODE(i),FND_API.G_MISS_CHAR,INTERFACE_ENTITY_CODE,p_trx_line_dist_tbl.INTERFACE_ENTITY_CODE(i)),
3376: INTERFACE_LINE_ID = DECODE(p_trx_line_dist_tbl.INTERFACE_LINE_ID(i),FND_API.G_MISS_NUM,INTERFACE_LINE_ID,p_trx_line_dist_tbl.INTERFACE_LINE_ID(i)),
3377: DEFAULTING_ATTRIBUTE1 = p_trx_line_dist_tbl.DEFAULTING_ATTRIBUTE1(i),
3378: DEFAULTING_ATTRIBUTE2 = p_trx_line_dist_tbl.DEFAULTING_ATTRIBUTE2(i),
3379: DEFAULTING_ATTRIBUTE3 = p_trx_line_dist_tbl.DEFAULTING_ATTRIBUTE3(i),
3380: DEFAULTING_ATTRIBUTE4 = p_trx_line_dist_tbl.DEFAULTING_ATTRIBUTE4(i),
3455: SUPPLIER_TAX_INVOICE_NUMBER = p_trx_line_dist_tbl.SUPPLIER_TAX_INVOICE_NUMBER(i),
3456: SUPPLIER_TAX_INVOICE_DATE = p_trx_line_dist_tbl.SUPPLIER_TAX_INVOICE_DATE(i),
3457: SUPPLIER_EXCHANGE_RATE = p_trx_line_dist_tbl.SUPPLIER_EXCHANGE_RATE(i),
3458: TAX_INVOICE_DATE = DECODE(p_trx_line_dist_tbl.TAX_INVOICE_DATE(i)
3459: ,FND_API.G_MISS_DATE,TAX_INVOICE_DATE
3460: ,DECODE(USER_UPD_DET_FACTORS_FLAG
3461: ,'Y', TAX_INVOICE_DATE
3462: , p_trx_line_dist_tbl.TAX_INVOICE_DATE(i))
3463: ),
3460: ,DECODE(USER_UPD_DET_FACTORS_FLAG
3461: ,'Y', TAX_INVOICE_DATE
3462: , p_trx_line_dist_tbl.TAX_INVOICE_DATE(i))
3463: ),
3464: TAX_INVOICE_NUMBER = DECODE(p_trx_line_dist_tbl.TAX_INVOICE_NUMBER(i), FND_API.G_MISS_CHAR, TAX_INVOICE_NUMBER
3465: ,p_trx_line_dist_tbl.TAX_INVOICE_NUMBER(i)),
3466: FIRST_PTY_ORG_ID = p_trx_line_dist_tbl.FIRST_PTY_ORG_ID(i),
3467: TAX_EVENT_CLASS_CODE = p_event_class_rec.TAX_EVENT_CLASS_CODE,
3468: TAX_EVENT_TYPE_CODE = p_event_class_rec.TAX_EVENT_TYPE_CODE,
3647: TRX_BATCH_ID = p_trx_line_dist_tbl.TRX_BATCH_ID(i),
3648: APPLIED_TO_TRX_NUMBER = p_trx_line_dist_tbl.APPLIED_TO_TRX_NUMBER(i),
3649: SOURCE_APPLICATION_ID = p_trx_line_dist_tbl.SOURCE_APPLICATION_ID(i),
3650: SOURCE_ENTITY_CODE = p_trx_line_dist_tbl.SOURCE_ENTITY_CODE(i),
3651: SOURCE_EVENT_CLASS_CODE = DECODE(p_trx_line_dist_tbl.SOURCE_EVENT_CLASS_CODE(i),FND_API.G_MISS_CHAR,SOURCE_EVENT_CLASS_CODE,p_trx_line_dist_tbl.SOURCE_EVENT_CLASS_CODE(i)),
3652: SOURCE_TRX_ID = p_trx_line_dist_tbl.SOURCE_TRX_ID(i),
3653: SOURCE_LINE_ID = p_trx_line_dist_tbl.SOURCE_LINE_ID(i),
3654: SOURCE_TRX_LEVEL_TYPE = p_trx_line_dist_tbl.SOURCE_TRX_LEVEL_TYPE(i),
3655: SOURCE_TAX_LINE_ID = p_trx_line_dist_tbl.SOURCE_TAX_LINE_ID(i),
3674: LINE_TRX_USER_KEY5 = p_trx_line_dist_tbl.LINE_TRX_USER_KEY5(i),
3675: LINE_TRX_USER_KEY6 = p_trx_line_dist_tbl.LINE_TRX_USER_KEY6(i),
3676: EXEMPTION_CONTROL_FLAG = p_trx_line_dist_tbl.EXEMPTION_CONTROL_FLAG(i),
3677: EXEMPT_REASON_CODE = p_trx_line_dist_tbl.EXEMPT_REASON_CODE(i),
3678: INTERFACE_ENTITY_CODE = DECODE(p_trx_line_dist_tbl.INTERFACE_ENTITY_CODE(i),FND_API.G_MISS_CHAR,INTERFACE_ENTITY_CODE,p_trx_line_dist_tbl.INTERFACE_ENTITY_CODE(i)),
3679: INTERFACE_LINE_ID = DECODE(p_trx_line_dist_tbl.INTERFACE_LINE_ID(i),FND_API.G_MISS_NUM,INTERFACE_LINE_ID,p_trx_line_dist_tbl.INTERFACE_LINE_ID(i)),
3680: DEFAULTING_ATTRIBUTE1 = p_trx_line_dist_tbl.DEFAULTING_ATTRIBUTE1(i),
3681: DEFAULTING_ATTRIBUTE2 = p_trx_line_dist_tbl.DEFAULTING_ATTRIBUTE2(i),
3682: DEFAULTING_ATTRIBUTE3 = p_trx_line_dist_tbl.DEFAULTING_ATTRIBUTE3(i),
3675: LINE_TRX_USER_KEY6 = p_trx_line_dist_tbl.LINE_TRX_USER_KEY6(i),
3676: EXEMPTION_CONTROL_FLAG = p_trx_line_dist_tbl.EXEMPTION_CONTROL_FLAG(i),
3677: EXEMPT_REASON_CODE = p_trx_line_dist_tbl.EXEMPT_REASON_CODE(i),
3678: INTERFACE_ENTITY_CODE = DECODE(p_trx_line_dist_tbl.INTERFACE_ENTITY_CODE(i),FND_API.G_MISS_CHAR,INTERFACE_ENTITY_CODE,p_trx_line_dist_tbl.INTERFACE_ENTITY_CODE(i)),
3679: INTERFACE_LINE_ID = DECODE(p_trx_line_dist_tbl.INTERFACE_LINE_ID(i),FND_API.G_MISS_NUM,INTERFACE_LINE_ID,p_trx_line_dist_tbl.INTERFACE_LINE_ID(i)),
3680: DEFAULTING_ATTRIBUTE1 = p_trx_line_dist_tbl.DEFAULTING_ATTRIBUTE1(i),
3681: DEFAULTING_ATTRIBUTE2 = p_trx_line_dist_tbl.DEFAULTING_ATTRIBUTE2(i),
3682: DEFAULTING_ATTRIBUTE3 = p_trx_line_dist_tbl.DEFAULTING_ATTRIBUTE3(i),
3683: DEFAULTING_ATTRIBUTE4 = p_trx_line_dist_tbl.DEFAULTING_ATTRIBUTE4(i),
3732: END IF;
3733:
3734: EXCEPTION
3735: WHEN OTHERS THEN
3736: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3737: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
3738: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
3739: END IF;
3740: END db_update_line_det_factors;
3765: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
3766: END IF;
3767:
3768: /*Set the return status to Success */
3769: x_return_status := FND_API.G_RET_STS_SUCCESS;
3770:
3771: BEGIN
3772: INSERT INTO ZX_DETAIL_TAX_LINES_GT(
3773: tax_line_id,
4382: END IF;
4383:
4384: EXCEPTION
4385: WHEN OTHERS THEN
4386: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4387: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
4388: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
4389: END IF;
4390: END insert_detail_tax_lines_gt;
4719: IF ( G_LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4720: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
4721: END IF;
4722:
4723: x_return_status := FND_API.G_RET_STS_SUCCESS ;
4724:
4725: OPEN fetch_det_factors_for_lte(p_event_class_rec);
4726: LOOP
4727: FETCH fetch_det_factors_for_lte BULK COLLECT INTO
5037: x_return_status => l_return_status
5038: );
5039: END IF;
5040:
5041: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5042: x_return_status := l_return_status ;
5043: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
5044: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'LTE calculate tax returned errors. Return_Status = '||x_return_status);
5045: END IF;
5058: END IF;
5059:
5060: EXCEPTION
5061: WHEN OTHERS THEN
5062: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5063: IF fetch_det_factors_for_lte%ISOPEN THEN CLOSE fetch_det_factors_for_lte; END IF;
5064: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
5065: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
5066: END IF;
5091: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
5092: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
5093: END IF;
5094:
5095: x_return_status := FND_API.G_RET_STS_SUCCESS ;
5096:
5097: IF p_event_class_rec.TAX_EVENT_TYPE_CODE = 'UPDATE' THEN
5098: /*Lock trx line det factors*/
5099: SELECT *
5120: WHEN NO_DATA_FOUND THEN
5121: null;
5122: WHEN OTHERS THEN
5123: IF (SQLCODE = 54) THEN
5124: x_return_status := FND_API.G_RET_STS_ERROR ;
5125: FND_MESSAGE.SET_NAME('ZX','ZX_RESOURCE_BUSY');
5126: l_context_info_rec.APPLICATION_ID := p_event_class_rec.APPLICATION_ID;
5127: l_context_info_rec.ENTITY_CODE := p_event_class_rec.ENTITY_CODE;
5128: l_context_info_rec.EVENT_CLASS_CODE := p_event_class_rec.EVENT_CLASS_CODE;
5133: IF ( G_LEVEL_EXCEPTION >= G_CURRENT_RUNTIME_LEVEL) THEN
5134: FND_LOG.STRING(G_LEVEL_EXCEPTION,G_MODULE_NAME||l_api_name,SQLERRM);
5135: END IF;
5136: ELSE
5137: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5138: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
5139: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
5140: END IF;
5141: END IF;
5236: END IF;
5237:
5238: EXCEPTION
5239: WHEN OTHERS THEN
5240: -- x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5241: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
5242: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
5243: END IF;
5244: END populate_ptnr_tax_regime_tbl;
5417: END IF;
5418:
5419: EXCEPTION
5420: WHEN OTHERS THEN
5421: -- x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5422: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
5423: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
5424: END IF;
5425: END fetch_ptnr_tax_regime_tbl;
5602: END IF;
5603:
5604: EXCEPTION
5605: WHEN OTHERS THEN
5606: -- x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5607: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
5608: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
5609: END IF;
5610: END initialise_partner_tables;
5786: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
5787: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
5788: END IF;
5789:
5790: x_return_status := FND_API.G_RET_STS_SUCCESS;
5791: l_add_idx := p_table||to_char(p_location_id);
5792:
5793: IF l_add_idx is NOT NULL THEN
5794: IF (NOT(l_ptnr_addr_tbl.EXISTS(l_add_idx))) THEN
5839: END IF;
5840:
5841: EXCEPTION
5842: WHEN OTHERS THEN
5843: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5844: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
5845: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
5846: END IF;
5847: END get_address_elements;
5888: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
5889: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
5890: END IF;
5891:
5892: x_return_status := FND_API.G_RET_STS_SUCCESS;
5893:
5894: --Get the ptp ids from zx_lines_det_factors
5895: SELECT ship_to_party_tax_prof_id,
5896: bill_to_party_tax_prof_id,
6156: END IF;
6157:
6158: EXCEPTION
6159: WHEN OTHERS THEN
6160: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6161: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
6162: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
6163: END IF;
6164: END populate_parties;
6187: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
6188: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
6189: END IF;
6190:
6191: x_return_status := FND_API.G_RET_STS_SUCCESS;
6192:
6193: IF p_location_type = 'SHIP_FROM' THEN
6194: IF p_loc_idx = 1 THEN
6195: l_ptnr_loc_tbl.ship_from_geography_type1(p_ptnr_idx) := p_geo_type;
6389: END IF;
6390:
6391: EXCEPTION
6392: WHEN OTHERS THEN
6393: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6394: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
6395: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
6396: END IF;
6397: END POPULATE_PTNR_LOC_TBL;
6513: location_type_tbl => l_location_type_tbl,
6514: location_id_tbl => l_location_id_tbl,
6515: x_return_status => l_return_status
6516: );
6517: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6518: x_return_status := l_return_status;
6519: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6520: l_context_info_rec.APPLICATION_ID := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.APPLICATION_ID(p_trx_line_index);
6521: l_context_info_rec.ENTITY_CODE := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ENTITY_CODE(p_trx_line_index);
6515: x_return_status => l_return_status
6516: );
6517: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6518: x_return_status := l_return_status;
6519: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6520: l_context_info_rec.APPLICATION_ID := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.APPLICATION_ID(p_trx_line_index);
6521: l_context_info_rec.ENTITY_CODE := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ENTITY_CODE(p_trx_line_index);
6522: l_context_info_rec.EVENT_CLASS_CODE := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.EVENT_CLASS_CODE(p_trx_line_index);
6523: l_context_info_rec.TRX_ID := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_ID(p_trx_line_index);
6539: END IF;
6540:
6541: EXCEPTION
6542: WHEN OTHERS THEN
6543: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6544: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
6545: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
6546: END IF;
6547: END prepare_for_loc_caching;
6594: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
6595: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
6596: END IF;
6597:
6598: x_return_status := FND_API.G_RET_STS_SUCCESS;
6599: l_first := TRUE;
6600:
6601: /*
6602: FOR l_regime_index IN nvl(ZX_GLOBAL_STRUCTURES_PKG.tax_regime_tbl.FIRST,0) .. nvl(ZX_GLOBAL_STRUCTURES_PKG.tax_regime_tbl.LAST,-99)
7359: END IF;
7360:
7361: EXCEPTION
7362: WHEN OTHERS THEN
7363: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7364: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
7365: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
7366: END IF;
7367: END PARTNER_LOCATION_POPULATION;
7417: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
7418: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
7419: END IF;
7420:
7421: x_return_status := FND_API.G_RET_STS_SUCCESS;
7422:
7423: /*
7424: The global variable ZX_TAX_PARTNER_PKG.G_BUSINESS_FLOW is usually populated while determining the service provider.
7425: But, when only DELETE action is taken on item line, ZX_TAX_PARTNER_PKG.G_BUSINESS_FLOW is not populated
7494: END IF;
7495:
7496: EXCEPTION
7497: WHEN OTHERS THEN
7498: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7499: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
7500: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
7501: END IF;
7502: END GET_REGIMES_FOR_DEL_ITEM_LINES;
7555: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
7556: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
7557: END IF;
7558:
7559: x_return_status := FND_API.G_RET_STS_SUCCESS;
7560:
7561:
7562: /***********************PARTNER CODE START***************************/
7563: IF p_event_class_rec.record_flag ='Y' AND
7595: p_event_class_rec,
7596: l_return_status
7597: );
7598:
7599: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7600: x_return_status := l_return_status;
7601: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
7602: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
7603: ' RETURN_STATUS = ' || x_return_status);
7612: ZX_GLOBAL_STRUCTURES_PKG.tax_regime_tbl(l_regime_index).tax_provider_id,
7613: 'DERIVE_HDR_ATTRS',
7614: l_return_status
7615: );
7616: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7617: x_return_status := l_return_status;
7618: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
7619: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
7620: ' RETURN_STATUS = ' || x_return_status);
7628: 'DERIVE_LINE_ATTRS',
7629: l_return_status
7630: );
7631:
7632: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7633: x_return_status := l_return_status;
7634: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
7635: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
7636: ' RETURN_STATUS = ' || x_return_status);
7665: p_event_class_rec,
7666: l_return_status
7667: );
7668:
7669: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7670: x_return_status := l_return_status;
7671: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
7672: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
7673: ' RETURN_STATUS = ' || x_return_status);
7681: p_event_class_rec,
7682: l_return_status
7683: );
7684:
7685: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7686: x_return_status := l_return_status;
7687: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
7688: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
7689: ' RETURN_STATUS = ' || x_return_status);
7702: END IF;
7703:
7704: EXCEPTION
7705: WHEN OTHERS THEN
7706: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7707: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
7708: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
7709: END IF;
7710: END partner_inclusive_tax_override;
7746: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
7747: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
7748: END IF;
7749:
7750: x_return_status := FND_API.G_RET_STS_SUCCESS;
7751:
7752: IF p_event_class_rec.prod_family_grp_code = 'O2C' AND
7753: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.poo_party_id(p_trx_line_index) IS NULL THEN
7754: IF p_event_class_rec.application_id = 222 THEN
7866: END IF;
7867:
7868: EXCEPTION
7869: WHEN OTHERS THEN
7870: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7871: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
7872: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
7873: END IF;
7874: END derive_poo_parameters;
7902: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
7903: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
7904: END IF;
7905:
7906: x_return_status := FND_API.G_RET_STS_SUCCESS;
7907:
7908: IF p_event_class_rec.prod_family_grp_code = 'O2C' AND
7909: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.poa_party_id(p_trx_line_index) IS NULL THEN
7910: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.poa_party_id(p_trx_line_index) :=
7919: END IF;
7920:
7921: EXCEPTION
7922: WHEN OTHERS THEN
7923: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7924: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
7925: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
7926: END IF;
7927: END derive_poa_parameters;
7957: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
7958: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
7959: END IF;
7960:
7961: x_return_status := FND_API.G_RET_STS_SUCCESS;
7962:
7963: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.first_pty_org_id(p_trx_line_index) := p_event_class_rec.first_pty_org_id;
7964: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.tax_event_class_code(p_trx_line_index) := p_event_class_rec.tax_event_class_code;
7965: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.tax_event_type_code(p_trx_line_index):= p_event_class_rec.tax_event_type_code;
7989: NULL,
7990: l_tax_prof_id
7991: );
7992:
7993: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
7994: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
7995: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the ship_to_party_tax_profile_id for ship_to_party_id : '||
7996: to_char(zx_global_structures_pkg.trx_line_dist_tbl.ship_to_party_id(p_trx_line_index)));
7997: END IF;
7994: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
7995: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the ship_to_party_tax_profile_id for ship_to_party_id : '||
7996: to_char(zx_global_structures_pkg.trx_line_dist_tbl.ship_to_party_id(p_trx_line_index)));
7997: END IF;
7998: RAISE FND_API.G_EXC_ERROR;
7999: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8000: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8001: RETURN;
8002: ELSE /* Return Status is SUCCESS */
7995: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the ship_to_party_tax_profile_id for ship_to_party_id : '||
7996: to_char(zx_global_structures_pkg.trx_line_dist_tbl.ship_to_party_id(p_trx_line_index)));
7997: END IF;
7998: RAISE FND_API.G_EXC_ERROR;
7999: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8000: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8001: RETURN;
8002: ELSE /* Return Status is SUCCESS */
8003: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_to_party_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
7996: to_char(zx_global_structures_pkg.trx_line_dist_tbl.ship_to_party_id(p_trx_line_index)));
7997: END IF;
7998: RAISE FND_API.G_EXC_ERROR;
7999: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8000: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8001: RETURN;
8002: ELSE /* Return Status is SUCCESS */
8003: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_to_party_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8004: END IF;
8016: l_tax_prof_id,
8017: l_return_status
8018: );
8019:
8020: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
8021: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8022: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the hq_estb_party_tax_prof_id for legal_entity : '||
8023: to_char(zx_global_structures_pkg.trx_line_dist_tbl.legal_entity_id(p_trx_line_index)));
8024: END IF;
8021: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8022: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the hq_estb_party_tax_prof_id for legal_entity : '||
8023: to_char(zx_global_structures_pkg.trx_line_dist_tbl.legal_entity_id(p_trx_line_index)));
8024: END IF;
8025: RAISE FND_API.G_EXC_ERROR;
8026: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8027: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8028: RETURN;
8029: ELSE /* Return Status is success */
8022: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the hq_estb_party_tax_prof_id for legal_entity : '||
8023: to_char(zx_global_structures_pkg.trx_line_dist_tbl.legal_entity_id(p_trx_line_index)));
8024: END IF;
8025: RAISE FND_API.G_EXC_ERROR;
8026: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8027: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8028: RETURN;
8029: ELSE /* Return Status is success */
8030: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.hq_estb_party_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8023: to_char(zx_global_structures_pkg.trx_line_dist_tbl.legal_entity_id(p_trx_line_index)));
8024: END IF;
8025: RAISE FND_API.G_EXC_ERROR;
8026: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8027: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8028: RETURN;
8029: ELSE /* Return Status is success */
8030: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.hq_estb_party_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8031: END IF;
8047: NULL,
8048: l_tax_prof_id
8049: );
8050:
8051: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
8052: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8053: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the ship_from_party_tax_prof_id for ship_from_party_id: '||
8054: to_char(zx_global_structures_pkg.trx_line_dist_tbl.ship_from_party_id(p_trx_line_index)));
8055: END IF;
8052: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8053: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the ship_from_party_tax_prof_id for ship_from_party_id: '||
8054: to_char(zx_global_structures_pkg.trx_line_dist_tbl.ship_from_party_id(p_trx_line_index)));
8055: END IF;
8056: RAISE FND_API.G_EXC_ERROR;
8057: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8058: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8059: RETURN;
8060: ELSE /* Return Status is success */
8053: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the ship_from_party_tax_prof_id for ship_from_party_id: '||
8054: to_char(zx_global_structures_pkg.trx_line_dist_tbl.ship_from_party_id(p_trx_line_index)));
8055: END IF;
8056: RAISE FND_API.G_EXC_ERROR;
8057: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8058: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8059: RETURN;
8060: ELSE /* Return Status is success */
8061: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_from_party_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8054: to_char(zx_global_structures_pkg.trx_line_dist_tbl.ship_from_party_id(p_trx_line_index)));
8055: END IF;
8056: RAISE FND_API.G_EXC_ERROR;
8057: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8058: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8059: RETURN;
8060: ELSE /* Return Status is success */
8061: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_from_party_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8062: END IF;
8088: NULL,
8089: l_tax_prof_id
8090: );
8091:
8092: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
8093: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8094: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the poa_party_tax_prof_id for poa_party_id: '||
8095: to_char(zx_global_structures_pkg.trx_line_dist_tbl.poa_party_id(p_trx_line_index)));
8096: END IF;
8093: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8094: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the poa_party_tax_prof_id for poa_party_id: '||
8095: to_char(zx_global_structures_pkg.trx_line_dist_tbl.poa_party_id(p_trx_line_index)));
8096: END IF;
8097: RAISE FND_API.G_EXC_ERROR;
8098: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8099: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8100: RETURN;
8101: ELSE -- Return status is success
8094: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the poa_party_tax_prof_id for poa_party_id: '||
8095: to_char(zx_global_structures_pkg.trx_line_dist_tbl.poa_party_id(p_trx_line_index)));
8096: END IF;
8097: RAISE FND_API.G_EXC_ERROR;
8098: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8099: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8100: RETURN;
8101: ELSE -- Return status is success
8102: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.poa_party_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8095: to_char(zx_global_structures_pkg.trx_line_dist_tbl.poa_party_id(p_trx_line_index)));
8096: END IF;
8097: RAISE FND_API.G_EXC_ERROR;
8098: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8099: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8100: RETURN;
8101: ELSE -- Return status is success
8102: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.poa_party_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8103: END IF;
8128: NULL,
8129: l_tax_prof_id
8130: );
8131:
8132: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
8133: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8134: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the poo_party_tax_prof_id for poo_party_id: '||
8135: to_char(zx_global_structures_pkg.trx_line_dist_tbl.poo_party_id(p_trx_line_index)));
8136: END IF;
8133: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8134: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the poo_party_tax_prof_id for poo_party_id: '||
8135: to_char(zx_global_structures_pkg.trx_line_dist_tbl.poo_party_id(p_trx_line_index)));
8136: END IF;
8137: RAISE FND_API.G_EXC_ERROR;
8138: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8139: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8140: RETURN;
8141: ELSE -- Return status is success
8134: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the poo_party_tax_prof_id for poo_party_id: '||
8135: to_char(zx_global_structures_pkg.trx_line_dist_tbl.poo_party_id(p_trx_line_index)));
8136: END IF;
8137: RAISE FND_API.G_EXC_ERROR;
8138: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8139: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8140: RETURN;
8141: ELSE -- Return status is success
8142: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.poo_party_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8135: to_char(zx_global_structures_pkg.trx_line_dist_tbl.poo_party_id(p_trx_line_index)));
8136: END IF;
8137: RAISE FND_API.G_EXC_ERROR;
8138: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8139: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8140: RETURN;
8141: ELSE -- Return status is success
8142: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.poo_party_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8143: END IF;
8162: NULL,
8163: l_tax_prof_id
8164: );
8165:
8166: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
8167: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8168: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the bill_to_party_tax_prof_id for bill_to_party_id: '||
8169: to_char(zx_global_structures_pkg.trx_line_dist_tbl.bill_to_party_id(p_trx_line_index)));
8170: END IF;
8167: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8168: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the bill_to_party_tax_prof_id for bill_to_party_id: '||
8169: to_char(zx_global_structures_pkg.trx_line_dist_tbl.bill_to_party_id(p_trx_line_index)));
8170: END IF;
8171: RAISE FND_API.G_EXC_ERROR;
8172: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8173: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8174: RETURN;
8175: ELSE /* Return status is success */
8168: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the bill_to_party_tax_prof_id for bill_to_party_id: '||
8169: to_char(zx_global_structures_pkg.trx_line_dist_tbl.bill_to_party_id(p_trx_line_index)));
8170: END IF;
8171: RAISE FND_API.G_EXC_ERROR;
8172: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8173: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8174: RETURN;
8175: ELSE /* Return status is success */
8176: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_to_party_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8169: to_char(zx_global_structures_pkg.trx_line_dist_tbl.bill_to_party_id(p_trx_line_index)));
8170: END IF;
8171: RAISE FND_API.G_EXC_ERROR;
8172: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8173: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8174: RETURN;
8175: ELSE /* Return status is success */
8176: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_to_party_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8177: END IF;
8197: NULL,
8198: l_tax_prof_id
8199: );
8200:
8201: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
8202: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8203: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the bill_from_party_tax_prof_id for bill_from_party_id: '||
8204: to_char(zx_global_structures_pkg.trx_line_dist_tbl.bill_from_party_id(p_trx_line_index)));
8205: END IF;
8202: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8203: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the bill_from_party_tax_prof_id for bill_from_party_id: '||
8204: to_char(zx_global_structures_pkg.trx_line_dist_tbl.bill_from_party_id(p_trx_line_index)));
8205: END IF;
8206: RAISE FND_API.G_EXC_ERROR;
8207: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8208: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8209: RETURN;
8210: ELSE /* Return status is success */
8203: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the bill_from_party_tax_prof_id for bill_from_party_id: '||
8204: to_char(zx_global_structures_pkg.trx_line_dist_tbl.bill_from_party_id(p_trx_line_index)));
8205: END IF;
8206: RAISE FND_API.G_EXC_ERROR;
8207: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8208: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8209: RETURN;
8210: ELSE /* Return status is success */
8211: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_from_party_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8204: to_char(zx_global_structures_pkg.trx_line_dist_tbl.bill_from_party_id(p_trx_line_index)));
8205: END IF;
8206: RAISE FND_API.G_EXC_ERROR;
8207: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8208: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8209: RETURN;
8210: ELSE /* Return status is success */
8211: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_from_party_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8212: END IF;
8232: zx_global_structures_pkg.trx_line_dist_tbl.ship_to_party_site_id(p_trx_line_index) ,
8233: l_tax_prof_id
8234: );
8235:
8236: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
8237: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8238: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the ship_to_site_tax_prof_id for ship_to_party_site_id: '||
8239: to_char(zx_global_structures_pkg.trx_line_dist_tbl.ship_to_party_site_id(p_trx_line_index)));
8240: END IF;
8237: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8238: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the ship_to_site_tax_prof_id for ship_to_party_site_id: '||
8239: to_char(zx_global_structures_pkg.trx_line_dist_tbl.ship_to_party_site_id(p_trx_line_index)));
8240: END IF;
8241: RAISE FND_API.G_EXC_ERROR;
8242: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8243: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8244: RETURN;
8245: ELSE /* Return status is success */
8238: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the ship_to_site_tax_prof_id for ship_to_party_site_id: '||
8239: to_char(zx_global_structures_pkg.trx_line_dist_tbl.ship_to_party_site_id(p_trx_line_index)));
8240: END IF;
8241: RAISE FND_API.G_EXC_ERROR;
8242: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8243: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8244: RETURN;
8245: ELSE /* Return status is success */
8246: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_to_site_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8239: to_char(zx_global_structures_pkg.trx_line_dist_tbl.ship_to_party_site_id(p_trx_line_index)));
8240: END IF;
8241: RAISE FND_API.G_EXC_ERROR;
8242: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8243: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8244: RETURN;
8245: ELSE /* Return status is success */
8246: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_to_site_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8247: END IF;
8267: zx_global_structures_pkg.trx_line_dist_tbl.ship_from_party_site_id(p_trx_line_index),
8268: l_tax_prof_id
8269: );
8270:
8271: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
8272: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8273: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the ship_from_site_tax_prof_id for ship_from_party_site_id: '||
8274: to_char(zx_global_structures_pkg.trx_line_dist_tbl.ship_from_party_site_id(p_trx_line_index)));
8275: END IF;
8272: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8273: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the ship_from_site_tax_prof_id for ship_from_party_site_id: '||
8274: to_char(zx_global_structures_pkg.trx_line_dist_tbl.ship_from_party_site_id(p_trx_line_index)));
8275: END IF;
8276: RAISE FND_API.G_EXC_ERROR;
8277: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8278: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8279: RETURN;
8280: ELSE /* Return status is success */
8273: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the ship_from_site_tax_prof_id for ship_from_party_site_id: '||
8274: to_char(zx_global_structures_pkg.trx_line_dist_tbl.ship_from_party_site_id(p_trx_line_index)));
8275: END IF;
8276: RAISE FND_API.G_EXC_ERROR;
8277: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8278: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8279: RETURN;
8280: ELSE /* Return status is success */
8281: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_from_site_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8274: to_char(zx_global_structures_pkg.trx_line_dist_tbl.ship_from_party_site_id(p_trx_line_index)));
8275: END IF;
8276: RAISE FND_API.G_EXC_ERROR;
8277: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8278: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8279: RETURN;
8280: ELSE /* Return status is success */
8281: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_from_site_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8282: END IF;
8298: zx_global_structures_pkg.trx_line_dist_tbl.poa_party_site_id(p_trx_line_index),
8299: l_tax_prof_id
8300: );
8301:
8302: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
8303: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8304: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the poa_site_tax_prof_id for poa_party_site_id: '||
8305: to_char(zx_global_structures_pkg.trx_line_dist_tbl.poa_party_site_id(p_trx_line_index)));
8306: END IF;
8303: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8304: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the poa_site_tax_prof_id for poa_party_site_id: '||
8305: to_char(zx_global_structures_pkg.trx_line_dist_tbl.poa_party_site_id(p_trx_line_index)));
8306: END IF;
8307: RAISE FND_API.G_EXC_ERROR;
8308: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8309: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8310: RETURN;
8311: ELSE /* Return status is success */
8304: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the poa_site_tax_prof_id for poa_party_site_id: '||
8305: to_char(zx_global_structures_pkg.trx_line_dist_tbl.poa_party_site_id(p_trx_line_index)));
8306: END IF;
8307: RAISE FND_API.G_EXC_ERROR;
8308: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8309: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8310: RETURN;
8311: ELSE /* Return status is success */
8312: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.poa_site_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8305: to_char(zx_global_structures_pkg.trx_line_dist_tbl.poa_party_site_id(p_trx_line_index)));
8306: END IF;
8307: RAISE FND_API.G_EXC_ERROR;
8308: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8309: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8310: RETURN;
8311: ELSE /* Return status is success */
8312: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.poa_site_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8313: END IF;
8326: zx_global_structures_pkg.trx_line_dist_tbl.poo_party_site_id(p_trx_line_index) ,
8327: l_tax_prof_id
8328: );
8329:
8330: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
8331: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8332: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the poo_site_tax_prof_id for poo_party_site_id: '||
8333: to_char(zx_global_structures_pkg.trx_line_dist_tbl.poo_party_site_id(p_trx_line_index)));
8334: END IF;
8331: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8332: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the poo_site_tax_prof_id for poo_party_site_id: '||
8333: to_char(zx_global_structures_pkg.trx_line_dist_tbl.poo_party_site_id(p_trx_line_index)));
8334: END IF;
8335: RAISE FND_API.G_EXC_ERROR;
8336: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8337: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8338: RETURN;
8339: ELSE /* Return status is success */
8332: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the poo_site_tax_prof_id for poo_party_site_id: '||
8333: to_char(zx_global_structures_pkg.trx_line_dist_tbl.poo_party_site_id(p_trx_line_index)));
8334: END IF;
8335: RAISE FND_API.G_EXC_ERROR;
8336: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8337: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8338: RETURN;
8339: ELSE /* Return status is success */
8340: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.poo_site_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8333: to_char(zx_global_structures_pkg.trx_line_dist_tbl.poo_party_site_id(p_trx_line_index)));
8334: END IF;
8335: RAISE FND_API.G_EXC_ERROR;
8336: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8337: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8338: RETURN;
8339: ELSE /* Return status is success */
8340: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.poo_site_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8341: END IF;
8358: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_to_party_site_id(p_trx_line_index),
8359: l_tax_prof_id
8360: );
8361:
8362: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
8363: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8364: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the bill_to_site_tax_prof_id for bill_to_party_site_id: '||
8365: to_char(zx_global_structures_pkg.trx_line_dist_tbl.bill_to_party_site_id(p_trx_line_index)));
8366: END IF;
8363: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8364: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the bill_to_site_tax_prof_id for bill_to_party_site_id: '||
8365: to_char(zx_global_structures_pkg.trx_line_dist_tbl.bill_to_party_site_id(p_trx_line_index)));
8366: END IF;
8367: RAISE FND_API.G_EXC_ERROR;
8368: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8369: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8370: RETURN;
8371: ELSE /* Return status is success */
8364: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the bill_to_site_tax_prof_id for bill_to_party_site_id: '||
8365: to_char(zx_global_structures_pkg.trx_line_dist_tbl.bill_to_party_site_id(p_trx_line_index)));
8366: END IF;
8367: RAISE FND_API.G_EXC_ERROR;
8368: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8369: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8370: RETURN;
8371: ELSE /* Return status is success */
8372: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_to_site_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8365: to_char(zx_global_structures_pkg.trx_line_dist_tbl.bill_to_party_site_id(p_trx_line_index)));
8366: END IF;
8367: RAISE FND_API.G_EXC_ERROR;
8368: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8369: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8370: RETURN;
8371: ELSE /* Return status is success */
8372: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_to_site_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8373: END IF;
8393: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_from_party_site_id(p_trx_line_index),
8394: l_tax_prof_id
8395: );
8396:
8397: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
8398: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8399: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the bill_from_site_tax_prof_id for bill_from_party_site_id: '||
8400: to_char(zx_global_structures_pkg.trx_line_dist_tbl.bill_from_party_site_id(p_trx_line_index)));
8401: END IF;
8398: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8399: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the bill_from_site_tax_prof_id for bill_from_party_site_id: '||
8400: to_char(zx_global_structures_pkg.trx_line_dist_tbl.bill_from_party_site_id(p_trx_line_index)));
8401: END IF;
8402: RAISE FND_API.G_EXC_ERROR;
8403: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8404: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8405: RETURN;
8406: ELSE /* Return status is success */
8399: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,'Error: Unable to get the bill_from_site_tax_prof_id for bill_from_party_site_id: '||
8400: to_char(zx_global_structures_pkg.trx_line_dist_tbl.bill_from_party_site_id(p_trx_line_index)));
8401: END IF;
8402: RAISE FND_API.G_EXC_ERROR;
8403: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8404: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8405: RETURN;
8406: ELSE /* Return status is success */
8407: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_from_site_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8400: to_char(zx_global_structures_pkg.trx_line_dist_tbl.bill_from_party_site_id(p_trx_line_index)));
8401: END IF;
8402: RAISE FND_API.G_EXC_ERROR;
8403: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8404: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8405: RETURN;
8406: ELSE /* Return status is success */
8407: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_from_site_tax_prof_id(p_trx_line_index) := l_tax_prof_id;
8408: END IF;
8514: FND_MESSAGE.SET_NAME('ZX', 'ZX_ITEM_ORG_ASSOC_NOT_EXIST');
8515: FND_MESSAGE.SET_TOKEN('ITEM',L_ITEM_NAME);
8516: FND_MESSAGE.SET_TOKEN('ORG_NAME',L_ORG_NAME);
8517: --Bug 10179680 Ends
8518: RAISE FND_API.G_EXC_ERROR;
8519: END;
8520: END IF;
8521: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8522: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME||': '||l_api_name||'()-'||', RETURN_STATUS = ' || x_return_status);
8522: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME||': '||l_api_name||'()-'||', RETURN_STATUS = ' || x_return_status);
8523: END IF;
8524:
8525: EXCEPTION
8526: WHEN FND_API.G_EXC_ERROR THEN
8527: x_return_status := FND_API.G_RET_STS_ERROR ;
8528: l_context_info_rec.APPLICATION_ID := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.APPLICATION_ID(p_trx_line_index);
8529: l_context_info_rec.ENTITY_CODE := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ENTITY_CODE(p_trx_line_index);
8530: l_context_info_rec.EVENT_CLASS_CODE := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.EVENT_CLASS_CODE(p_trx_line_index);
8523: END IF;
8524:
8525: EXCEPTION
8526: WHEN FND_API.G_EXC_ERROR THEN
8527: x_return_status := FND_API.G_RET_STS_ERROR ;
8528: l_context_info_rec.APPLICATION_ID := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.APPLICATION_ID(p_trx_line_index);
8529: l_context_info_rec.ENTITY_CODE := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ENTITY_CODE(p_trx_line_index);
8530: l_context_info_rec.EVENT_CLASS_CODE := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.EVENT_CLASS_CODE(p_trx_line_index);
8531: l_context_info_rec.TRX_ID := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_ID(p_trx_line_index);
8532: l_context_info_rec.TRX_LINE_ID := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_LINE_ID(p_trx_line_index);
8533: l_context_info_rec.TRX_LEVEL_TYPE := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_LEVEL_TYPE(p_trx_line_index);
8534: ZX_API_PUB.add_msg (p_context_info_rec => l_context_info_rec);
8535: WHEN OTHERS THEN
8536: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8537: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
8538: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
8539: END IF;
8540: END derive_internal_parameters;
8571: IF ( G_LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8572: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
8573: END IF;
8574:
8575: x_return_status := FND_API.G_RET_STS_SUCCESS ;
8576:
8577: --Bugfix 4420279 - Stamp line level action as CREATE in case of quote call
8578: IF nvl(p_event_class_rec.quote_flag,'N') = 'Y' THEN
8579: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.line_level_action(p_trx_line_index) := 'CREATE';
8592: p_trx_level_type => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.adjusted_doc_trx_level_type(p_trx_line_index),
8593: x_return_status => l_return_status
8594: );
8595:
8596: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8597: x_return_status := l_return_status;
8598: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8599: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
8600: ' RETURN_STATUS = ' || x_return_status);
8618: p_event_class_rec => p_event_class_rec,
8619: x_return_status => l_return_status
8620: );
8621:
8622: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8623: x_return_status := l_return_status;
8624: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8625: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
8626: ' RETURN_STATUS = ' || x_return_status);
8645: 'LINE',
8646: l_return_status
8647: );
8648:
8649: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8650: x_return_status := l_return_status;
8651: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8652: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
8653: ' RETURN_STATUS = ' || x_return_status);
8662: p_trx_line_index,
8663: p_event_class_rec
8664: );
8665:
8666: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8667: x_return_status := l_return_status;
8668: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8669: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
8670: ' RETURN_STATUS = ' || x_return_status);
8964: ,p_event_class_rec
8965: ,l_return_status
8966: );
8967:
8968: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8969: x_return_status := l_return_status;
8970: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8971: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
8972: ' RETURN_STATUS = ' || x_return_status);
8983: ,p_trx_line_index
8984: ,l_return_status
8985: );
8986:
8987: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8988: x_return_status := l_return_status;
8989: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8990: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
8991: ' RETURN_STATUS = ' || x_return_status);
9000: ,p_event_class_rec
9001: ,l_return_status
9002: );
9003:
9004: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9005: x_return_status := l_return_status;
9006: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
9007: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
9008: ' RETURN_STATUS = ' || x_return_status);
9030: ,p_event_class_rec
9031: ,l_return_status
9032: );
9033:
9034: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9035: x_return_status := l_return_status;
9036: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
9037: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
9038: ' RETURN_STATUS = ' || x_return_status);
9047: END IF;
9048:
9049: EXCEPTION
9050: WHEN OTHERS THEN
9051: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9052: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
9053: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
9054: END IF;
9055: END calculate_tax_pvt;
9082: IF ( G_LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9083: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
9084: END IF;
9085:
9086: x_return_status := FND_API.G_RET_STS_SUCCESS ;
9087: l_negative_index := -99; --set the negative index to store regimes served by old provider
9088:
9089: /*Commented following condition, because for sales order both the flags would be 'N'*/
9090: -- IF p_event_class_rec.record_flag ='Y'
9230:
9231: partner_location_population (p_event_class_rec => p_event_class_rec,
9232: x_return_status => l_return_status);
9233:
9234: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9235: x_return_status := l_return_status;
9236: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
9237: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
9238: ' RETURN_STATUS = ' || x_return_status);
9243: IF nvl(l_deleted_line_exists,'N') = 'Y' THEN
9244:
9245: get_regimes_for_del_item_lines (p_event_class_rec => p_event_class_rec,
9246: x_return_status => l_return_status);
9247: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9248: x_return_status := l_return_status;
9249: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
9250: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
9251: ' RETURN_STATUS = ' || x_return_status);
9274: ZX_GLOBAL_STRUCTURES_PKG.tax_regime_tbl(l_regime_index).partner_processing_flag,
9275: p_event_class_rec,
9276: l_return_status
9277: );
9278: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9279: x_return_status := l_return_status;
9280: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
9281: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
9282: ' RETURN_STATUS = ' || x_return_status);
9291: 'DERIVE_HDR_ATTRS',
9292: l_return_status
9293: );
9294:
9295: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9296: x_return_status := l_return_status;
9297: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
9298: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
9299: ' RETURN_STATUS = ' || x_return_status);
9307: 'DERIVE_LINE_ATTRS',
9308: l_return_status
9309: );
9310:
9311: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9312: x_return_status := l_return_status;
9313: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
9314: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
9315: ' RETURN_STATUS = ' || x_return_status);
9333: p_event_class_rec,
9334: l_return_status
9335: );
9336:
9337: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9338: x_return_status := l_return_status;
9339: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
9340: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
9341: 'Incorrect Status returned by ZX_TPI_SERVICES_PKG.call_partner_service. RETURN_STATUS = '||x_return_status);
9353: p_provider_id => ZX_GLOBAL_STRUCTURES_PKG.tax_regime_tbl(l_regime_index).tax_provider_id,
9354: x_return_status => l_return_status
9355: );
9356:
9357: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9358: x_return_status := l_return_status;
9359: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
9360: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
9361: ' RETURN_STATUS = ' || x_return_status);
9374: p_trx_level_type => null,
9375: x_return_status => l_return_status
9376: );
9377:
9378: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9379: x_return_status := l_return_status;
9380: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
9381: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
9382: ' RETURN_STATUS = ' || x_return_status);
9398: p_event_class_rec,
9399: l_return_status
9400: );
9401:
9402: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9403: x_return_status := l_return_status;
9404: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
9405: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
9406: 'Incorrect Status returned by ZX_TPI_SERVICES_PKG.call_partner_service. RETURN_STATUS = '||x_return_status);
9415: p_event_class_rec,
9416: l_return_status
9417: );
9418:
9419: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9420: x_return_status := l_return_status;
9421: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
9422: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
9423: ' RETURN_STATUS = ' || x_return_status);
9437: END IF;
9438:
9439: EXCEPTION
9440: WHEN OTHERS THEN
9441: -- x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9442: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
9443: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
9444: END IF;
9445: END ptnr_calculate_tax_pvt;
9459: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
9460: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
9461: END IF;
9462:
9463: x_return_status := FND_API.G_RET_STS_SUCCESS;
9464:
9465: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
9466: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
9467: 'DATA_TRANSFER_MODE = '||ZX_API_PUB.G_DATA_TRANSFER_MODE);
9496: ptnr_calculate_tax_pvt(p_event_class_rec => l_event_class_rec ,
9497: x_return_status => l_return_status
9498: );
9499:
9500: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9501: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
9502: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
9503: 'Incorrect Status returned by Ptnr_calculate_tax_pvt. RETURN_STATUS = ' || x_return_status);
9504: END IF;
9501: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
9502: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
9503: 'Incorrect Status returned by Ptnr_calculate_tax_pvt. RETURN_STATUS = ' || x_return_status);
9504: END IF;
9505: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
9506: RAISE FND_API.G_EXC_ERROR;
9507: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
9508: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9509: END IF;
9502: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
9503: 'Incorrect Status returned by Ptnr_calculate_tax_pvt. RETURN_STATUS = ' || x_return_status);
9504: END IF;
9505: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
9506: RAISE FND_API.G_EXC_ERROR;
9507: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
9508: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9509: END IF;
9510: END IF;
9503: 'Incorrect Status returned by Ptnr_calculate_tax_pvt. RETURN_STATUS = ' || x_return_status);
9504: END IF;
9505: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
9506: RAISE FND_API.G_EXC_ERROR;
9507: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
9508: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9509: END IF;
9510: END IF;
9511:
9504: END IF;
9505: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
9506: RAISE FND_API.G_EXC_ERROR;
9507: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
9508: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9509: END IF;
9510: END IF;
9511:
9512: END IF; -- 5711466
9511:
9512: END IF; -- 5711466
9513:
9514: EXCEPTION
9515: WHEN FND_API.G_EXC_ERROR THEN
9516: ROLLBACK TO Ptnr_Bulk_Calc_Tax_Pvt;
9517: x_return_status := FND_API.G_RET_STS_ERROR ;
9518:
9519: Delete_from_lines_det_gt(p_event_class_rec => l_event_class_rec ,
9513:
9514: EXCEPTION
9515: WHEN FND_API.G_EXC_ERROR THEN
9516: ROLLBACK TO Ptnr_Bulk_Calc_Tax_Pvt;
9517: x_return_status := FND_API.G_RET_STS_ERROR ;
9518:
9519: Delete_from_lines_det_gt(p_event_class_rec => l_event_class_rec ,
9520: x_return_status => l_return_status);
9521:
9542:
9543: EXCEPTION
9544:
9545: WHEN OTHERS THEN
9546: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9547:
9548: IF (g_level_unexpected >= g_current_runtime_level ) THEN
9549: FND_LOG.STRING(g_level_unexpected,
9550: G_MODULE_NAME||l_api_name,
9561: BEGIN
9562: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
9563: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
9564: END IF;
9565: x_return_status := FND_API.G_RET_STS_SUCCESS;
9566:
9567: delete from zx_lines_det_factors
9568: WHERE application_id = p_event_class_rec.application_id
9569: AND entity_code = p_event_class_rec.entity_code
9593: END IF;
9594: EXCEPTION
9595:
9596: WHEN OTHERS THEN
9597: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9598:
9599: IF (g_level_unexpected >= g_current_runtime_level ) THEN
9600: FND_LOG.STRING(g_level_unexpected,
9601: G_MODULE_NAME||l_api_name,
9667: --Initialise local variables
9668: l_lines_passed := 1;
9669: l_update_index := 0; --store index upto which records need to updated
9670:
9671: x_return_status := FND_API.G_RET_STS_SUCCESS ;
9672:
9673: --Call get_location of TCM to get the location of internal organization
9674: ZX_TCM_PTP_PKG.get_location_id(p_event_class_rec.internal_organization_id,
9675: l_internal_org_location_id,
9675: l_internal_org_location_id,
9676: l_return_status
9677: );
9678:
9679: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9680: x_return_status := l_return_status;
9681: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
9682: l_context_info_rec.APPLICATION_ID := p_event_class_rec.APPLICATION_ID;
9683: l_context_info_rec.ENTITY_CODE := p_event_class_rec.ENTITY_CODE;
9677: );
9678:
9679: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9680: x_return_status := l_return_status;
9681: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
9682: l_context_info_rec.APPLICATION_ID := p_event_class_rec.APPLICATION_ID;
9683: l_context_info_rec.ENTITY_CODE := p_event_class_rec.ENTITY_CODE;
9684: l_context_info_rec.EVENT_CLASS_CODE := p_event_class_rec.EVENT_CLASS_CODE;
9685: l_context_info_rec.TRX_ID := p_event_class_rec.TRX_ID;
9743: l_return_status,
9744: l_error_buffer
9745: );
9746:
9747: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9748: x_return_status := l_return_status;
9749: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
9750: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
9751: ' RETURN_STATUS = ' || x_return_status);
9757: --ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg (p_tax_prof_id => ZX_TDS_CALC_SERVICES_PUB_PKG.g_rnd_lvl_party_tax_prof_id,
9758: -- x_return_status => l_return_status
9759: -- );
9760: --
9761: --IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9762: -- x_return_status := l_return_status;
9763: -- IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
9764: -- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
9765: -- ' RETURN_STATUS = ' || x_return_status);
9785: l_no_of_trx := 0;
9786: END;
9787:
9788: IF l_no_of_trx = 0 THEN
9789: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9790: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
9791: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
9792: 'No record found in Headers GT Table.');
9793: END IF;
10202: p_event_class_rec.source_tax_event_class_code := NULL;
10203: p_event_class_rec.source_process_for_appl_flag := NULL;
10204: END IF;
10205:
10206: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10207: x_return_status := l_return_status;
10208: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10209: RAISE FND_API.G_EXC_ERROR;
10210: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10204: END IF;
10205:
10206: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10207: x_return_status := l_return_status;
10208: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10209: RAISE FND_API.G_EXC_ERROR;
10210: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10211: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10212: END IF;
10205:
10206: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10207: x_return_status := l_return_status;
10208: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10209: RAISE FND_API.G_EXC_ERROR;
10210: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10211: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10212: END IF;
10213: END IF;
10206: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10207: x_return_status := l_return_status;
10208: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10209: RAISE FND_API.G_EXC_ERROR;
10210: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10211: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10212: END IF;
10213: END IF;
10214:
10207: x_return_status := l_return_status;
10208: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10209: RAISE FND_API.G_EXC_ERROR;
10210: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10211: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10212: END IF;
10213: END IF;
10214:
10215: /* ----------------------------------------------------------------------+
10219: l_effective_date,
10220: l_return_status
10221: );
10222:
10223: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10224: x_return_status := l_return_status;
10225: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10226: RAISE FND_API.G_EXC_ERROR;
10227: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10221: );
10222:
10223: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10224: x_return_status := l_return_status;
10225: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10226: RAISE FND_API.G_EXC_ERROR;
10227: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10228: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10229: END IF;
10222:
10223: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10224: x_return_status := l_return_status;
10225: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10226: RAISE FND_API.G_EXC_ERROR;
10227: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10228: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10229: END IF;
10230: END IF;
10223: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10224: x_return_status := l_return_status;
10225: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10226: RAISE FND_API.G_EXC_ERROR;
10227: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10228: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10229: END IF;
10230: END IF;
10231:
10224: x_return_status := l_return_status;
10225: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10226: RAISE FND_API.G_EXC_ERROR;
10227: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10228: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10229: END IF;
10230: END IF;
10231:
10232: IF l_legal_entity_id <> zx_global_structures_pkg.trx_line_dist_tbl.legal_entity_id(l_trx_line_index)
10238: l_effective_date,
10239: l_return_status
10240: );
10241:
10242: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10243: x_return_status := l_return_status;
10244: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10245: RAISE FND_API.G_EXC_ERROR;
10246: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10240: );
10241:
10242: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10243: x_return_status := l_return_status;
10244: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10245: RAISE FND_API.G_EXC_ERROR;
10246: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10247: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10248: END IF;
10241:
10242: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10243: x_return_status := l_return_status;
10244: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10245: RAISE FND_API.G_EXC_ERROR;
10246: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10247: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10248: END IF;
10249: END IF;
10242: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10243: x_return_status := l_return_status;
10244: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10245: RAISE FND_API.G_EXC_ERROR;
10246: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10247: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10248: END IF;
10249: END IF;
10250: ELSE
10243: x_return_status := l_return_status;
10244: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10245: RAISE FND_API.G_EXC_ERROR;
10246: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10247: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10248: END IF;
10249: END IF;
10250: ELSE
10251: zx_security.g_effective_date := l_effective_date;
10264: ,p_event_class_rec.tax_event_type_code
10265: ,p_event_class_rec.doc_status_code
10266: );
10267:
10268: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10269: x_return_status := l_return_status;
10270: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10271: RAISE FND_API.G_EXC_ERROR;
10272: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10266: );
10267:
10268: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10269: x_return_status := l_return_status;
10270: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10271: RAISE FND_API.G_EXC_ERROR;
10272: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10273: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10274: END IF;
10267:
10268: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10269: x_return_status := l_return_status;
10270: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10271: RAISE FND_API.G_EXC_ERROR;
10272: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10273: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10274: END IF;
10275: END IF;
10268: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10269: x_return_status := l_return_status;
10270: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10271: RAISE FND_API.G_EXC_ERROR;
10272: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10273: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10274: END IF;
10275: END IF;
10276: --Bug 8736358
10269: x_return_status := l_return_status;
10270: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10271: RAISE FND_API.G_EXC_ERROR;
10272: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10273: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10274: END IF;
10275: END IF;
10276: --Bug 8736358
10277: IF p_event_class_rec.tax_event_type_code = 'UPDATE' THEN
10292: l_effective_date,
10293: p_event_class_rec
10294: );
10295:
10296: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10297: x_return_status := l_return_status;
10298: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10299: RAISE FND_API.G_EXC_ERROR;
10300: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10294: );
10295:
10296: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10297: x_return_status := l_return_status;
10298: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10299: RAISE FND_API.G_EXC_ERROR;
10300: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10301: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10302: END IF;
10295:
10296: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10297: x_return_status := l_return_status;
10298: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10299: RAISE FND_API.G_EXC_ERROR;
10300: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10301: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10302: END IF;
10303: END IF;
10296: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10297: x_return_status := l_return_status;
10298: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10299: RAISE FND_API.G_EXC_ERROR;
10300: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10301: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10302: END IF;
10303: END IF;
10304:
10297: x_return_status := l_return_status;
10298: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10299: RAISE FND_API.G_EXC_ERROR;
10300: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10301: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10302: END IF;
10303: END IF;
10304:
10305: /* ----------------------------------------------------------------------+
10310: p_trx_line_index => l_trx_line_index,
10311: x_return_status => l_return_status
10312: );
10313:
10314: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10315: x_return_status := l_return_status;
10316: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10317: RAISE FND_API.G_EXC_ERROR;
10318: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10312: );
10313:
10314: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10315: x_return_status := l_return_status;
10316: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10317: RAISE FND_API.G_EXC_ERROR;
10318: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10319: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10320: END IF;
10313:
10314: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10315: x_return_status := l_return_status;
10316: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10317: RAISE FND_API.G_EXC_ERROR;
10318: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10319: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10320: END IF;
10321: END IF;
10314: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10315: x_return_status := l_return_status;
10316: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10317: RAISE FND_API.G_EXC_ERROR;
10318: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10319: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10320: END IF;
10321: END IF;
10322:
10315: x_return_status := l_return_status;
10316: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10317: RAISE FND_API.G_EXC_ERROR;
10318: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10319: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10320: END IF;
10321: END IF;
10322:
10323: zx_global_structures_pkg.g_event_class_rec := p_event_class_rec;
10335: x_return_status => l_return_status,
10336: x_error_buffer => l_error_buffer
10337: );
10338:
10339: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10340: x_return_status := l_return_status;
10341: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10342: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10343: ' RETURN_STATUS = ' || x_return_status);
10341: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10342: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10343: ' RETURN_STATUS = ' || x_return_status);
10344: END IF;
10345: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10346: RAISE FND_API.G_EXC_ERROR;
10347: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10348: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10349: END IF;
10342: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10343: ' RETURN_STATUS = ' || x_return_status);
10344: END IF;
10345: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10346: RAISE FND_API.G_EXC_ERROR;
10347: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10348: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10349: END IF;
10350: END IF;
10343: ' RETURN_STATUS = ' || x_return_status);
10344: END IF;
10345: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10346: RAISE FND_API.G_EXC_ERROR;
10347: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10348: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10349: END IF;
10350: END IF;
10351:
10344: END IF;
10345: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10346: RAISE FND_API.G_EXC_ERROR;
10347: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10348: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10349: END IF;
10350: END IF;
10351:
10352: ZX_TRL_SUMMARY_OVERRIDE_PKG.lock_summ_tax_lines_for_doc(p_application_id => p_event_class_rec.application_id,
10355: p_trx_id => p_event_class_rec.trx_id,
10356: x_return_status => l_return_status,
10357: x_error_buffer => l_error_buffer
10358: );
10359: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10360: x_return_status := l_return_status;
10361: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10362: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10363: ' RETURN_STATUS = ' || x_return_status);
10361: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10362: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10363: ' RETURN_STATUS = ' || x_return_status);
10364: END IF;
10365: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10366: RAISE FND_API.G_EXC_ERROR;
10367: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10368: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10369: END IF;
10362: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10363: ' RETURN_STATUS = ' || x_return_status);
10364: END IF;
10365: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10366: RAISE FND_API.G_EXC_ERROR;
10367: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10368: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10369: END IF;
10370: END IF;
10363: ' RETURN_STATUS = ' || x_return_status);
10364: END IF;
10365: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10366: RAISE FND_API.G_EXC_ERROR;
10367: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10368: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10369: END IF;
10370: END IF;
10371:
10364: END IF;
10365: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10366: RAISE FND_API.G_EXC_ERROR;
10367: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10368: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10369: END IF;
10370: END IF;
10371:
10372: ZX_TRL_DISTRIBUTIONS_PKG.lock_rec_nrec_dist_for_doc (p_application_id => p_event_class_rec.application_id,
10375: p_trx_id => p_event_class_rec.trx_id,
10376: x_return_status => l_return_status,
10377: x_error_buffer => l_error_buffer
10378: );
10379: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10380: x_return_status := l_return_status;
10381: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10382: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10383: ' RETURN_STATUS = ' || x_return_status);
10381: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10382: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10383: ' RETURN_STATUS = ' || x_return_status);
10384: END IF;
10385: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10386: RAISE FND_API.G_EXC_ERROR;
10387: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10388: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10389: END IF;
10382: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10383: ' RETURN_STATUS = ' || x_return_status);
10384: END IF;
10385: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10386: RAISE FND_API.G_EXC_ERROR;
10387: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10388: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10389: END IF;
10390: END IF;
10383: ' RETURN_STATUS = ' || x_return_status);
10384: END IF;
10385: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10386: RAISE FND_API.G_EXC_ERROR;
10387: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10388: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10389: END IF;
10390: END IF;
10391:
10384: END IF;
10385: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10386: RAISE FND_API.G_EXC_ERROR;
10387: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10388: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10389: END IF;
10390: END IF;
10391:
10392: END IF; --tax event type ='UPDATE'
10403: 'HEADER',
10404: l_return_status
10405: );
10406:
10407: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10408: x_return_status := l_return_status;
10409: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10410: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,G_PKG_NAME||': '||l_api_name||':ZX_TDS_CALC_SERVICES_PUB_PKG.initialize returned errors');
10411: END IF;
10408: x_return_status := l_return_status;
10409: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10410: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,G_PKG_NAME||': '||l_api_name||':ZX_TDS_CALC_SERVICES_PUB_PKG.initialize returned errors');
10411: END IF;
10412: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10413: RAISE FND_API.G_EXC_ERROR;
10414: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10415: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10416: END IF;
10409: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10410: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,G_PKG_NAME||': '||l_api_name||':ZX_TDS_CALC_SERVICES_PUB_PKG.initialize returned errors');
10411: END IF;
10412: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10413: RAISE FND_API.G_EXC_ERROR;
10414: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10415: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10416: END IF;
10417: END IF;
10410: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,G_PKG_NAME||': '||l_api_name||':ZX_TDS_CALC_SERVICES_PUB_PKG.initialize returned errors');
10411: END IF;
10412: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10413: RAISE FND_API.G_EXC_ERROR;
10414: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10415: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10416: END IF;
10417: END IF;
10418: --Bug 9452928
10411: END IF;
10412: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10413: RAISE FND_API.G_EXC_ERROR;
10414: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10415: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10416: END IF;
10417: END IF;
10418: --Bug 9452928
10419: ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg := NULL;
10427: l_return_status,
10428: l_error_buffer
10429: );
10430:
10431: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10432: x_return_status := l_return_status;
10433: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10434: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10435: ' RETURN_STATUS = ' || x_return_status);
10433: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10434: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10435: ' RETURN_STATUS = ' || x_return_status);
10436: END IF;
10437: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10438: RAISE FND_API.G_EXC_ERROR;
10439: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10440: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10441: END IF;
10434: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10435: ' RETURN_STATUS = ' || x_return_status);
10436: END IF;
10437: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10438: RAISE FND_API.G_EXC_ERROR;
10439: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10440: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10441: END IF;
10442: END IF;
10435: ' RETURN_STATUS = ' || x_return_status);
10436: END IF;
10437: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10438: RAISE FND_API.G_EXC_ERROR;
10439: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10440: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10441: END IF;
10442: END IF;
10443:
10436: END IF;
10437: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10438: RAISE FND_API.G_EXC_ERROR;
10439: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10440: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10441: END IF;
10442: END IF;
10443:
10444: --Bug 14122718
10449: 'HEADER',
10450: x_return_status
10451: );
10452:
10453: IF X_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10454: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10455: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10456: ' RETURN_STATUS = ' || x_return_status);
10457: END IF;
10454: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10455: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10456: ' RETURN_STATUS = ' || x_return_status);
10457: END IF;
10458: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
10459: RAISE FND_API.G_EXC_ERROR;
10460: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10461: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10462: END IF;
10455: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10456: ' RETURN_STATUS = ' || x_return_status);
10457: END IF;
10458: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
10459: RAISE FND_API.G_EXC_ERROR;
10460: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10461: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10462: END IF;
10463: END IF;
10456: ' RETURN_STATUS = ' || x_return_status);
10457: END IF;
10458: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
10459: RAISE FND_API.G_EXC_ERROR;
10460: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10461: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10462: END IF;
10463: END IF;
10464: --Bug 14122718
10457: END IF;
10458: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
10459: RAISE FND_API.G_EXC_ERROR;
10460: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10461: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10462: END IF;
10463: END IF;
10464: --Bug 14122718
10465:
10468: --ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg (p_tax_prof_id => ZX_TDS_CALC_SERVICES_PUB_PKG.g_rnd_lvl_party_tax_prof_id,
10469: -- x_return_status => l_return_status
10470: -- );
10471:
10472: --IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10473: -- x_return_status := l_return_status;
10474: -- IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10475: -- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10476: -- ' RETURN_STATUS = ' || x_return_status);
10474: -- IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10475: -- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10476: -- ' RETURN_STATUS = ' || x_return_status);
10477: -- END IF;
10478: -- IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10479: -- RAISE FND_API.G_EXC_ERROR;
10480: -- ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10481: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10482: -- END IF;
10475: -- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10476: -- ' RETURN_STATUS = ' || x_return_status);
10477: -- END IF;
10478: -- IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10479: -- RAISE FND_API.G_EXC_ERROR;
10480: -- ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10481: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10482: -- END IF;
10483: --END IF;
10476: -- ' RETURN_STATUS = ' || x_return_status);
10477: -- END IF;
10478: -- IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10479: -- RAISE FND_API.G_EXC_ERROR;
10480: -- ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10481: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10482: -- END IF;
10483: --END IF;
10484:
10477: -- END IF;
10478: -- IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10479: -- RAISE FND_API.G_EXC_ERROR;
10480: -- ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10481: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10482: -- END IF;
10483: --END IF;
10484:
10485: /*-------------------------------------------------------------+
10505: ,p_trx_line_id => NULL
10506: ,x_return_status => l_return_status
10507: );
10508:
10509: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10510: x_return_status := l_return_status;
10511: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10512: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10513: ' JAI_TAX_PROCESSING_PKG.CALCULATE_TAX RETURN_STATUS = ' || x_return_status);
10511: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10512: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10513: ' JAI_TAX_PROCESSING_PKG.CALCULATE_TAX RETURN_STATUS = ' || x_return_status);
10514: END IF;
10515: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10516: RAISE FND_API.G_EXC_ERROR;
10517: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10518: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10519: END IF;
10512: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10513: ' JAI_TAX_PROCESSING_PKG.CALCULATE_TAX RETURN_STATUS = ' || x_return_status);
10514: END IF;
10515: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10516: RAISE FND_API.G_EXC_ERROR;
10517: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10518: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10519: END IF;
10520: END IF;
10513: ' JAI_TAX_PROCESSING_PKG.CALCULATE_TAX RETURN_STATUS = ' || x_return_status);
10514: END IF;
10515: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10516: RAISE FND_API.G_EXC_ERROR;
10517: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10518: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10519: END IF;
10520: END IF;
10521:
10514: END IF;
10515: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10516: RAISE FND_API.G_EXC_ERROR;
10517: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10518: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10519: END IF;
10520: END IF;
10521:
10522: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10539: p_event_class_rec,
10540: l_return_status
10541: );
10542:
10543: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10544: x_return_status := l_return_status;
10545: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10546: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10547: ' RETURN_STATUS = ' || x_return_status);
10545: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10546: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10547: ' RETURN_STATUS = ' || x_return_status);
10548: END IF;
10549: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10550: RAISE FND_API.G_EXC_ERROR;
10551: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10552: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10553: END IF;
10546: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10547: ' RETURN_STATUS = ' || x_return_status);
10548: END IF;
10549: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10550: RAISE FND_API.G_EXC_ERROR;
10551: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10552: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10553: END IF;
10554: END IF;
10547: ' RETURN_STATUS = ' || x_return_status);
10548: END IF;
10549: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10550: RAISE FND_API.G_EXC_ERROR;
10551: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10552: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10553: END IF;
10554: END IF;
10555:
10548: END IF;
10549: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10550: RAISE FND_API.G_EXC_ERROR;
10551: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10552: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10553: END IF;
10554: END IF;
10555:
10556: pop_estb_id (l_trx_line_index,
10558: 'LINE', --14122718
10559: l_return_status
10560: );
10561:
10562: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10563: x_return_status := l_return_status;
10564: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10565: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10566: ' RETURN_STATUS = ' || x_return_status);
10564: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10565: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10566: ' RETURN_STATUS = ' || x_return_status);
10567: END IF;
10568: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10569: RAISE FND_API.G_EXC_ERROR;
10570: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10571: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10572: END IF;
10565: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10566: ' RETURN_STATUS = ' || x_return_status);
10567: END IF;
10568: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10569: RAISE FND_API.G_EXC_ERROR;
10570: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10571: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10572: END IF;
10573: END IF;
10566: ' RETURN_STATUS = ' || x_return_status);
10567: END IF;
10568: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10569: RAISE FND_API.G_EXC_ERROR;
10570: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10571: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10572: END IF;
10573: END IF;
10574:
10567: END IF;
10568: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10569: RAISE FND_API.G_EXC_ERROR;
10570: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10571: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10572: END IF;
10573: END IF;
10574:
10575: IF zx_global_structures_pkg.trx_line_dist_tbl.INSERT_UPDATE_FLAG(l_trx_line_index) is not null AND
10606: l_trx_line_index,
10607: l_return_status
10608: );
10609:
10610: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10611: x_return_status := l_return_status;
10612: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10613: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10614: ' RETURN_STATUS = ' || x_return_status);
10613: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10614: ' RETURN_STATUS = ' || x_return_status);
10615: END IF;
10616: -- Raise exception depending upon return_status
10617: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10618: RAISE FND_API.G_EXC_ERROR;
10619: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10620: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10621: END IF;
10614: ' RETURN_STATUS = ' || x_return_status);
10615: END IF;
10616: -- Raise exception depending upon return_status
10617: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10618: RAISE FND_API.G_EXC_ERROR;
10619: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10620: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10621: END IF;
10622: END IF;
10615: END IF;
10616: -- Raise exception depending upon return_status
10617: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10618: RAISE FND_API.G_EXC_ERROR;
10619: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10620: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10621: END IF;
10622: END IF;
10623:
10616: -- Raise exception depending upon return_status
10617: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
10618: RAISE FND_API.G_EXC_ERROR;
10619: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10620: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10621: END IF;
10622: END IF;
10623:
10624: ELSIF l_flag = FALSE THEN
10629: +--------------------------------------------------------------*/
10630: Pop_Index_Attrbs_To_Null ( p_index => l_trx_line_index,
10631: x_return_status => l_return_status);
10632:
10633: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10634: x_return_status := l_return_status;
10635: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10636: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10637: ' RETURN_STATUS = ' || x_return_status);
10635: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10636: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10637: ' RETURN_STATUS = ' || x_return_status);
10638: END IF;
10639: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10640: END IF;
10641:
10642: END IF; -- End of Bug fix 5524869
10643:
10641:
10642: END IF; -- End of Bug fix 5524869
10643:
10644: EXCEPTION
10645: WHEN FND_API.G_EXC_ERROR THEN
10646: ROLLBACK TO Calculate_Tax;
10647: l_flag := FALSE;
10648: IF ( G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
10649: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name,'');
10715: p_event_class_rec => p_event_class_rec,
10716: p_insert_index => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.application_id.FIRST,
10717: x_return_status => l_return_status
10718: );
10719: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10720: x_return_status := l_return_status;
10721: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10722: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10723: ' RETURN_STATUS = ' || x_return_status);
10732: p_event_class_rec => p_event_class_rec,
10733: p_update_index => l_update_index,
10734: x_return_status => l_return_status
10735: );
10736: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10737: x_return_status := l_return_status;
10738: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10739: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10740: ' RETURN_STATUS = ' || x_return_status);
10747: p_event_class_rec => p_event_class_rec,
10748: p_insert_index => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.application_id.FIRST,
10749: x_return_status => l_return_status
10750: );
10751: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10752: x_return_status := l_return_status;
10753: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10754: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10755: ' RETURN_STATUS = ' || x_return_status);
10761: p_event_class_rec => p_event_class_rec,
10762: p_insert_index => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.application_id.FIRST,
10763: x_return_status => l_return_status
10764: );
10765: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10766: x_return_status := l_return_status;
10767: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10768: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10769: ' RETURN_STATUS = ' || x_return_status);
10798: lock_line_det_facts (l_trx_line_index,
10799: p_event_class_rec,
10800: l_return_status
10801: );
10802: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10803: x_return_status := l_return_status;
10804: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10805: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10806: ' RETURN_STATUS = ' || x_return_status);
10872: l_trx_line_index,
10873: l_return_status
10874: );
10875:
10876: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10877: x_return_status := l_return_status;
10878: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10879: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
10880: ' RETURN_STATUS = ' || x_return_status);
11234: AND line_level_action = 'DELETE';
11235:
11236: IF l_count <> 0 THEN
11237: GET_REGIMES_FOR_DEL_ITEM_LINES (p_event_class_rec,l_return_status);
11238: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11239: x_return_status := l_return_status;
11240: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
11241: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,' RETURN_STATUS = ' || x_return_status);
11242: END IF;
11292: lock_line_det_facts(l_trx_line_index,
11293: p_event_class_rec,
11294: l_return_status
11295: );
11296: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11297: x_return_status := l_return_status;
11298: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
11299: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
11300: ' RETURN_STATUS = ' || x_return_status);
11309: l_trx_line_index,
11310: l_return_status
11311: );
11312:
11313: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11314: x_return_status := l_return_status;
11315: IF get_lines_det_factors%ISOPEN THEN CLOSE get_lines_det_factors; END IF;
11316: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
11317: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
11329: p_event_class_rec => p_event_class_rec,
11330: p_update_index => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.application_id.LAST,
11331: x_return_status => l_return_status
11332: );
11333: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11334: x_return_status := l_return_status;
11335: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
11336: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
11337: ' RETURN_STATUS = ' || x_return_status);
11367: p_event_class_rec => p_event_class_rec,
11368: p_insert_index => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.application_id.FIRST,
11369: x_return_status => l_return_status
11370: );
11371: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11372: x_return_status := l_return_status;
11373: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
11374: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
11375: ' RETURN_STATUS = ' || x_return_status);
11385: p_event_class_rec => p_event_class_rec,
11386: p_update_index => l_update_index,
11387: x_return_status => l_return_status
11388: );
11389: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11390: x_return_status := l_return_status;
11391: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
11392: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
11393: ' RETURN_STATUS = ' || x_return_status);
11400: p_event_class_rec => p_event_class_rec,
11401: p_insert_index => l_update_index+1,
11402: x_return_status => l_return_status
11403: );
11404: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11405: x_return_status := l_return_status;
11406: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
11407: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
11408: ' RETURN_STATUS = ' || x_return_status);
11414: p_event_class_rec => p_event_class_rec,
11415: p_update_index => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.application_id.LAST,
11416: x_return_status => l_return_status
11417: );
11418: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11419: x_return_status := l_return_status;
11420: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
11421: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
11422: ' RETURN_STATUS = ' || x_return_status);
11430: p_event_class_rec => p_event_class_rec,
11431: p_insert_index => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.application_id.FIRST,
11432: x_return_status => l_return_status
11433: );
11434: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11435: x_return_status := l_return_status;
11436: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
11437: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
11438: ' RETURN_STATUS = ' || x_return_status);
11447: p_update_index => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.application_id.LAST,
11448: x_return_status => l_return_status
11449: );
11450:
11451: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11452: x_return_status := l_return_status;
11453: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
11454: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
11455: ' RETURN_STATUS = ' || x_return_status);
11475: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
11476: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
11477: 'Not able to find event type code - No transaction lines passed');
11478: END IF;
11479: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11480: END;
11481: /* ----------------------------------------------------------------------+
11482: | Get Tax Event Type |
11483: + ----------------------------------------------------------------------*/
11490: ,p_event_class_rec.tax_event_type_code
11491: ,p_event_class_rec.doc_status_code
11492: );
11493:
11494: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11495: x_return_status := l_return_status;
11496: Return;
11497: END IF;
11498: END IF;
11510: x_return_status => l_return_status,
11511: x_error_buffer => l_error_buffer
11512: );
11513:
11514: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11515: x_return_status := l_return_status;
11516: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
11517: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
11518: ' RETURN_STATUS = ' || x_return_status);
11516: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
11517: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
11518: ' RETURN_STATUS = ' || x_return_status);
11519: END IF;
11520: RAISE FND_API.G_EXC_ERROR;
11521: END IF;
11522:
11523: ZX_TRL_SUMMARY_OVERRIDE_PKG.lock_summ_tax_lines_for_doc(p_application_id => p_event_class_rec.application_id,
11524: p_entity_code => p_event_class_rec.entity_code,
11526: p_trx_id => p_event_class_rec.trx_id,
11527: x_return_status => l_return_status,
11528: x_error_buffer => l_error_buffer
11529: );
11530: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11531: x_return_status := l_return_status;
11532: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
11533: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
11534: ' RETURN_STATUS = ' || x_return_status);
11532: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
11533: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
11534: ' RETURN_STATUS = ' || x_return_status);
11535: END IF;
11536: RAISE FND_API.G_EXC_ERROR;
11537: END IF;
11538:
11539: ZX_TRL_DISTRIBUTIONS_PKG.lock_rec_nrec_dist_for_doc (p_application_id => p_event_class_rec.application_id,
11540: p_entity_code => p_event_class_rec.entity_code,
11542: p_trx_id => p_event_class_rec.trx_id,
11543: x_return_status => l_return_status,
11544: x_error_buffer => l_error_buffer
11545: );
11546: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11547: x_return_status := l_return_status;
11548: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
11549: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
11550: ' RETURN_STATUS = ' || x_return_status);
11548: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
11549: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
11550: ' RETURN_STATUS = ' || x_return_status);
11551: END IF;
11552: RAISE FND_API.G_EXC_ERROR;
11553: END IF;
11554:
11555: END IF; --tax event type ='UPDATE'
11556:
11581: ,p_trx_line_id => NULL
11582: ,x_return_status => l_return_status
11583: );
11584:
11585: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11586: x_return_status := l_return_status;
11587: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
11588: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
11589: ' JAI_TAX_PROCESSING_PKG.CALCULATE_TAX RETURN_STATUS = ' || x_return_status);
11587: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
11588: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
11589: ' JAI_TAX_PROCESSING_PKG.CALCULATE_TAX RETURN_STATUS = ' || x_return_status);
11590: END IF;
11591: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
11592: RAISE FND_API.G_EXC_ERROR;
11593: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
11594: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11595: END IF;
11588: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
11589: ' JAI_TAX_PROCESSING_PKG.CALCULATE_TAX RETURN_STATUS = ' || x_return_status);
11590: END IF;
11591: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
11592: RAISE FND_API.G_EXC_ERROR;
11593: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
11594: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11595: END IF;
11596: END IF;
11589: ' JAI_TAX_PROCESSING_PKG.CALCULATE_TAX RETURN_STATUS = ' || x_return_status);
11590: END IF;
11591: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
11592: RAISE FND_API.G_EXC_ERROR;
11593: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
11594: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11595: END IF;
11596: END IF;
11597:
11590: END IF;
11591: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
11592: RAISE FND_API.G_EXC_ERROR;
11593: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
11594: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11595: END IF;
11596: END IF;
11597:
11598: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
11619: call_lte (p_event_class_rec => p_event_class_rec,
11620: x_return_status => l_return_status
11621: );
11622:
11623: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11624: x_return_status := l_return_status;
11625: RETURN;
11626: END IF;
11627:
11660: ZX_GLOBAL_STRUCTURES_PKG.lte_trx_tbl(l_trx_id_index).effective_date,
11661: l_return_status
11662: );
11663:
11664: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11665: x_return_status := l_return_status;
11666: RAISE FND_API.G_EXC_ERROR;
11667: END IF;
11668:
11662: );
11663:
11664: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11665: x_return_status := l_return_status;
11666: RAISE FND_API.G_EXC_ERROR;
11667: END IF;
11668:
11669: call_lte (p_event_class_rec => l_event_class_rec,
11670: x_return_status => l_return_status
11669: call_lte (p_event_class_rec => l_event_class_rec,
11670: x_return_status => l_return_status
11671: );
11672:
11673: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11674: x_return_status := l_return_status;
11675: IF ( G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
11676: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name,'Incorrect status returned by Call_lte. Return_Status'||x_return_status);
11677: END IF;
11674: x_return_status := l_return_status;
11675: IF ( G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
11676: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name,'Incorrect status returned by Call_lte. Return_Status'||x_return_status);
11677: END IF;
11678: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
11679: RAISE FND_API.G_EXC_ERROR;
11680: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
11681: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11682: END IF;
11675: IF ( G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
11676: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name,'Incorrect status returned by Call_lte. Return_Status'||x_return_status);
11677: END IF;
11678: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
11679: RAISE FND_API.G_EXC_ERROR;
11680: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
11681: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11682: END IF;
11683: END IF;
11676: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name,'Incorrect status returned by Call_lte. Return_Status'||x_return_status);
11677: END IF;
11678: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
11679: RAISE FND_API.G_EXC_ERROR;
11680: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
11681: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11682: END IF;
11683: END IF;
11684: EXCEPTION
11677: END IF;
11678: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
11679: RAISE FND_API.G_EXC_ERROR;
11680: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
11681: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11682: END IF;
11683: END IF;
11684: EXCEPTION
11685: WHEN FND_API.G_EXC_ERROR THEN
11681: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11682: END IF;
11683: END IF;
11684: EXCEPTION
11685: WHEN FND_API.G_EXC_ERROR THEN
11686: ROLLBACK TO Calculate_Tax_LTE;
11687: IF ( G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
11688: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name,'Deleting Records from Zx_Lines_Det_Factors for Trx_id : '||l_event_class_rec.trx_id );
11689: END IF;
11707: ZX_GLOBAL_STRUCTURES_PKG.delete_trx_line_dist_tbl;
11708: END LOOP;
11709: END IF;
11710:
11711: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11712: x_return_status := l_return_status;
11713: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
11714: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
11715: ' RETURN_STATUS = ' || x_return_status);
11732: --ELSE
11733: ptnr_bulk_calc_tax_pvt(x_return_status => l_return_status);
11734: --END IF;
11735:
11736: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11737: x_return_status := l_return_status;
11738: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
11739: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
11740: 'Incorrect status returned by Ptnr_bulk_calc_tax_pvt. RETURN_STATUS = '||x_return_status);
11749: END IF;
11750:
11751: EXCEPTION
11752: WHEN OTHERS THEN
11753: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
11754: IF lines%ISOPEN THEN CLOSE lines; END IF;
11755: IF get_lines_det_factors%ISOPEN THEN CLOSE get_lines_det_factors; END IF;
11756: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
11757: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
11808: IF ( G_LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
11809: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
11810: END IF;
11811:
11812: x_return_status := FND_API.G_RET_STS_SUCCESS ;
11813:
11814: ZX_TCM_PTP_PKG.get_location_id(p_event_class_rec.internal_organization_id,
11815: l_internal_org_location_id,
11816: l_return_status
11815: l_internal_org_location_id,
11816: l_return_status
11817: );
11818:
11819: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11820: x_return_status := l_return_status;
11821: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
11822: l_context_info_rec.APPLICATION_ID := p_event_class_rec.APPLICATION_ID;
11823: l_context_info_rec.ENTITY_CODE := p_event_class_rec.ENTITY_CODE;
11817: );
11818:
11819: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11820: x_return_status := l_return_status;
11821: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
11822: l_context_info_rec.APPLICATION_ID := p_event_class_rec.APPLICATION_ID;
11823: l_context_info_rec.ENTITY_CODE := p_event_class_rec.ENTITY_CODE;
11824: l_context_info_rec.EVENT_CLASS_CODE := p_event_class_rec.EVENT_CLASS_CODE;
11825: l_context_info_rec.TRX_ID := p_event_class_rec.TRX_ID;
12271: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,G_PKG_NAME||': '||l_api_name||':JAI processing start +');
12272: END IF;
12273:
12274: JAI_TAX_PROCESSING_PKG.import_document_with_tax(p_event_class_rec,l_return_status);
12275: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12276: x_return_status := l_return_status;
12277: RAISE FND_API.G_EXC_ERROR;
12278: END IF;
12279: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12273:
12274: JAI_TAX_PROCESSING_PKG.import_document_with_tax(p_event_class_rec,l_return_status);
12275: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12276: x_return_status := l_return_status;
12277: RAISE FND_API.G_EXC_ERROR;
12278: END IF;
12279: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12280: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,G_PKG_NAME||': '||l_api_name||':JAI processing end -');
12281: END IF;
12294: pop_src_evnt_cls_info
12295: ( p_trx_line_index => l_trx_line_index,
12296: p_event_class_rec => p_event_class_rec,
12297: x_return_status => l_return_status);
12298: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12299: x_return_status := l_return_status;
12300: RAISE FND_API.G_EXC_ERROR;
12301: END IF;
12302: ELSE
12296: p_event_class_rec => p_event_class_rec,
12297: x_return_status => l_return_status);
12298: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12299: x_return_status := l_return_status;
12300: RAISE FND_API.G_EXC_ERROR;
12301: END IF;
12302: ELSE
12303: p_event_class_rec.source_event_class_mapping_id := NULL;
12304: p_event_class_rec.source_tax_event_class_code := NULL;
12312: l_effective_date,
12313: l_return_status
12314: );
12315:
12316: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12317: x_return_status := l_return_status;
12318: RAISE FND_API.G_EXC_ERROR;
12319: END IF;
12320:
12314: );
12315:
12316: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12317: x_return_status := l_return_status;
12318: RAISE FND_API.G_EXC_ERROR;
12319: END IF;
12320:
12321: IF l_legal_entity_id <> zx_global_structures_pkg.trx_line_dist_tbl.legal_entity_id(l_trx_line_index)
12322: OR l_org_id <> zx_global_structures_pkg.trx_line_dist_tbl.internal_organization_id(l_trx_line_index) THEN
12327: l_effective_date,
12328: l_return_status
12329: );
12330:
12331: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12332: x_return_status := l_return_status;
12333: RAISE FND_API.G_EXC_ERROR;
12334: END IF;
12335: ELSE
12329: );
12330:
12331: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12332: x_return_status := l_return_status;
12333: RAISE FND_API.G_EXC_ERROR;
12334: END IF;
12335: ELSE
12336: zx_security.g_effective_date := l_effective_date;
12337: zx_security.name_value('EFFECTIVEDATE',to_char(l_effective_date));
12349: ,p_event_class_rec.tax_event_type_code
12350: ,p_event_class_rec.doc_status_code
12351: );
12352:
12353: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12354: x_return_status := l_return_status;
12355: RAISE FND_API.G_EXC_ERROR;
12356: END IF;
12357:
12351: );
12352:
12353: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12354: x_return_status := l_return_status;
12355: RAISE FND_API.G_EXC_ERROR;
12356: END IF;
12357:
12358: /* ----------------------------------------------------------------------+
12359: | Populate Event Class Options |
12362: l_effective_date,
12363: p_event_class_rec
12364: );
12365:
12366: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12367: x_return_status := l_return_status;
12368: RAISE FND_API.G_EXC_ERROR;
12369: END IF;
12370:
12364: );
12365:
12366: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12367: x_return_status := l_return_status;
12368: RAISE FND_API.G_EXC_ERROR;
12369: END IF;
12370:
12371: /* ----------------------------------------------------------------------+
12372: | Get the locations for parties and their ptp ids |
12377: p_trx_line_index => l_trx_line_index,
12378: x_return_status => l_return_status
12379: );
12380:
12381: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12382: x_return_status := l_return_status;
12383: RAISE FND_API.G_EXC_ERROR;
12384: END IF;
12385:
12379: );
12380:
12381: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12382: x_return_status := l_return_status;
12383: RAISE FND_API.G_EXC_ERROR;
12384: END IF;
12385:
12386: zx_global_structures_pkg.g_event_class_rec := p_event_class_rec;
12387:
12398: l_return_status
12399: );
12400:
12401:
12402: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12403: x_return_status := l_return_status;
12404: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12405: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,G_PKG_NAME||': '||l_api_name||':ZX_TDS_CALC_SERVICES_PUB_PKG.initialize returned errors');
12406: END IF;
12403: x_return_status := l_return_status;
12404: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12405: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,G_PKG_NAME||': '||l_api_name||':ZX_TDS_CALC_SERVICES_PUB_PKG.initialize returned errors');
12406: END IF;
12407: RAISE FND_API.G_EXC_ERROR;
12408: END IF;
12409:
12410: --Bug 9452928
12411: ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg := NULL;
12419: l_return_status,
12420: l_error_buffer
12421: );
12422:
12423: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12424: x_return_status := l_return_status;
12425: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12426: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
12427: ' RETURN_STATUS = ' || x_return_status);
12425: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12426: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
12427: ' RETURN_STATUS = ' || x_return_status);
12428: END IF;
12429: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
12430: RAISE FND_API.G_EXC_ERROR;
12431: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
12432: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12433: END IF;
12426: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
12427: ' RETURN_STATUS = ' || x_return_status);
12428: END IF;
12429: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
12430: RAISE FND_API.G_EXC_ERROR;
12431: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
12432: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12433: END IF;
12434: END IF;
12427: ' RETURN_STATUS = ' || x_return_status);
12428: END IF;
12429: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
12430: RAISE FND_API.G_EXC_ERROR;
12431: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
12432: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12433: END IF;
12434: END IF;
12435:
12428: END IF;
12429: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
12430: RAISE FND_API.G_EXC_ERROR;
12431: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
12432: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12433: END IF;
12434: END IF;
12435:
12436: --Bug 14122718
12441: 'HEADER',
12442: x_return_status
12443: );
12444:
12445: IF X_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12446: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12447: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
12448: ' RETURN_STATUS = ' || x_return_status);
12449: END IF;
12446: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12447: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
12448: ' RETURN_STATUS = ' || x_return_status);
12449: END IF;
12450: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
12451: RAISE FND_API.G_EXC_ERROR;
12452: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
12453: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12454: END IF;
12447: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
12448: ' RETURN_STATUS = ' || x_return_status);
12449: END IF;
12450: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
12451: RAISE FND_API.G_EXC_ERROR;
12452: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
12453: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12454: END IF;
12455: END IF;
12448: ' RETURN_STATUS = ' || x_return_status);
12449: END IF;
12450: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
12451: RAISE FND_API.G_EXC_ERROR;
12452: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
12453: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12454: END IF;
12455: END IF;
12456:
12449: END IF;
12450: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
12451: RAISE FND_API.G_EXC_ERROR;
12452: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
12453: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12454: END IF;
12455: END IF;
12456:
12457: --Bug 14122718
12481: -- ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines (p_event_class_rec,
12482: -- l_return_status
12483: -- );
12484: --
12485: -- IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12486: -- x_return_status := l_return_status;
12487: -- IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12488: -- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,G_PKG_NAME||': '||l_api_name||'ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines returned errors');
12489: -- END IF;
12486: -- x_return_status := l_return_status;
12487: -- IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12488: -- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,G_PKG_NAME||': '||l_api_name||'ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines returned errors');
12489: -- END IF;
12490: -- RAISE FND_API.G_EXC_ERROR;
12491: -- END IF;
12492: -- END IF;
12493:
12494: --Bug 9452928
12496: --ZX_TDS_CALC_SERVICES_PUB_PKG.get_process_for_appl_flg (p_tax_prof_id => ZX_TDS_CALC_SERVICES_PUB_PKG.g_rnd_lvl_party_tax_prof_id,
12497: -- x_return_status => l_return_status
12498: -- );
12499:
12500: --IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12501: -- x_return_status := l_return_status;
12502: -- IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12503: -- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
12504: -- ' RETURN_STATUS = ' || x_return_status);
12502: -- IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12503: -- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
12504: -- ' RETURN_STATUS = ' || x_return_status);
12505: -- END IF;
12506: -- RAISE FND_API.G_EXC_ERROR;
12507: --END IF;
12508:
12509: END IF; -- trx header changed
12510:
12516: 'LINE', --14122718
12517: l_return_status
12518: );
12519:
12520: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12521: x_return_status := l_return_status;
12522: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12523: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
12524: ' RETURN_STATUS = ' || x_return_status);
12522: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12523: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
12524: ' RETURN_STATUS = ' || x_return_status);
12525: END IF;
12526: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
12527: RAISE FND_API.G_EXC_ERROR;
12528: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
12529: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12530: END IF;
12523: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
12524: ' RETURN_STATUS = ' || x_return_status);
12525: END IF;
12526: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
12527: RAISE FND_API.G_EXC_ERROR;
12528: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
12529: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12530: END IF;
12531: END IF;
12524: ' RETURN_STATUS = ' || x_return_status);
12525: END IF;
12526: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
12527: RAISE FND_API.G_EXC_ERROR;
12528: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
12529: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12530: END IF;
12531: END IF;
12532:
12525: END IF;
12526: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
12527: RAISE FND_API.G_EXC_ERROR;
12528: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
12529: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12530: END IF;
12531: END IF;
12532:
12533: --need to call prorate_imported_sum_tax_lines for the whole document if any line
12553: ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines (p_event_class_rec,
12554: l_return_status
12555: );
12556:
12557: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12558: x_return_status := l_return_status;
12559: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12560: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,G_PKG_NAME||': '||l_api_name||'ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines returned errors');
12561: END IF;
12558: x_return_status := l_return_status;
12559: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12560: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,G_PKG_NAME||': '||l_api_name||'ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines returned errors');
12561: END IF;
12562: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
12563: RAISE FND_API.G_EXC_ERROR;
12564: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
12565: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12566: END IF;
12559: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12560: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,G_PKG_NAME||': '||l_api_name||'ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines returned errors');
12561: END IF;
12562: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
12563: RAISE FND_API.G_EXC_ERROR;
12564: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
12565: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12566: END IF;
12567: END IF;
12560: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,G_PKG_NAME||': '||l_api_name||'ZX_TDS_CALC_SERVICES_PUB_PKG.prorate_imported_sum_tax_lines returned errors');
12561: END IF;
12562: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
12563: RAISE FND_API.G_EXC_ERROR;
12564: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
12565: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12566: END IF;
12567: END IF;
12568: END IF;
12561: END IF;
12562: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
12563: RAISE FND_API.G_EXC_ERROR;
12564: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
12565: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12566: END IF;
12567: END IF;
12568: END IF;
12569: END IF;
12585: 'LINE',
12586: l_return_status
12587: );
12588:
12589: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12590: x_return_status := l_return_status;
12591: -- IF c_lines%ISOPEN THEN CLOSE c_lines; END IF; --Bug 10179680
12592: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12593: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
12592: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12593: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
12594: ' RETURN_STATUS = ' || x_return_status);
12595: END IF;
12596: RAISE FND_API.G_EXC_ERROR;
12597: END IF;
12598:
12599: /* ----------------------------------------------------+
12600: | Derive Internal_Flag Parameters |
12603: l_trx_line_index,
12604: p_event_class_rec
12605: );
12606:
12607: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12608: x_return_status := l_return_status;
12609: -- IF c_lines%ISOPEN THEN CLOSE c_lines; END IF; --Bug 10179680
12610: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12611: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
12610: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12611: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
12612: ' RETURN_STATUS = ' || x_return_status);
12613: END IF;
12614: RAISE FND_API.G_EXC_ERROR;
12615: END IF;
12616:
12617: BEGIN
12618: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12963: p_event_class_rec,
12964: l_return_status
12965: );
12966:
12967: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12968: x_return_status := l_return_status;
12969: -- IF c_lines%ISOPEN THEN CLOSE c_lines; END IF; --Bug 10179680
12970: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12971: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
12970: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12971: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
12972: ' RETURN_STATUS = ' || x_return_status);
12973: END IF;
12974: RAISE FND_API.G_EXC_ERROR;
12975: END IF;
12976: END IF; --line level action is CREATE
12977: /**************************PARTNER CODE START - Point 1b****************************/
12978: /*Stamp the provider information on the regimes table returned by the get_tax_regimes procedure
12984: ,l_trx_line_index
12985: ,l_return_status
12986: );
12987:
12988: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12989: x_return_status := l_return_status;
12990: -- IF c_lines%ISOPEN THEN CLOSE c_lines; END IF; --Bug 10179680
12991: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12992: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
12991: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
12992: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
12993: ' RETURN_STATUS = ' || x_return_status);
12994: END IF;
12995: RAISE FND_API.G_EXC_ERROR;
12996: END IF;
12997:
12998: /* -----------------------------------------------+
12999: | Call TCM Location Caching API |
13003: ,p_event_class_rec
13004: ,l_return_status
13005: );
13006:
13007: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
13008: x_return_status := l_return_status;
13009: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
13010: l_context_info_rec.APPLICATION_ID := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.APPLICATION_ID(l_trx_line_index);
13011: l_context_info_rec.ENTITY_CODE := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ENTITY_CODE(l_trx_line_index);
13005: );
13006:
13007: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
13008: x_return_status := l_return_status;
13009: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
13010: l_context_info_rec.APPLICATION_ID := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.APPLICATION_ID(l_trx_line_index);
13011: l_context_info_rec.ENTITY_CODE := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ENTITY_CODE(l_trx_line_index);
13012: l_context_info_rec.EVENT_CLASS_CODE := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.EVENT_CLASS_CODE(l_trx_line_index);
13013: l_context_info_rec.TRX_ID := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_ID(l_trx_line_index);
13018: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
13019: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
13020: ' RETURN_STATUS = ' || x_return_status);
13021: END IF;
13022: RAISE FND_API.G_EXC_ERROR;
13023: END IF;
13024:
13025: END IF; -- zx_global_structures_pkg.g_ptnr_srvc_subscr_flag = 'Y'
13026:
13046: ZX_TDS_CALC_SERVICES_PUB_PKG.calculate_tax_for_import(l_trx_line_index,
13047: p_event_class_rec,
13048: l_return_status
13049: );
13050: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
13051: x_return_status := l_return_status;
13052: -- IF c_lines%ISOPEN THEN CLOSE c_lines; END IF; --Bug 10179680
13053: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
13054: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
13053: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
13054: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
13055: ' RETURN_STATUS = ' || x_return_status);
13056: END IF;
13057: RAISE FND_API.G_EXC_ERROR;
13058: END IF;
13059:
13060: /* Handle LTE outside the loop
13061: ELSIF nvl(p_event_class_rec.TAX_METHOD_CODE,'EBTAX') = 'LTE' THEN
13061: ELSIF nvl(p_event_class_rec.TAX_METHOD_CODE,'EBTAX') = 'LTE' THEN
13062: ZX_PRODUCT_INTEGRATION_PKG.import_document_with_tax(p_event_class_rec => p_event_class_rec,
13063: x_return_status => l_return_status
13064: );
13065: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
13066: x_return_status := l_return_status;
13067: IF c_lines%ISOPEN THEN CLOSE c_lines; END IF;
13068: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
13069: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
13084: +--------------------------------------------------------------*/
13085: Pop_Index_Attrbs_To_Null ( p_index => l_trx_line_index,
13086: x_return_status => l_return_status);
13087:
13088: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
13089: x_return_status := l_return_status;
13090: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
13091: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
13092: ' RETURN_STATUS = ' || x_return_status);
13090: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
13091: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
13092: ' RETURN_STATUS = ' || x_return_status);
13093: END IF;
13094: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
13095: END IF;
13096:
13097:
13098: END IF; -- End of Bug fix 5524869
13097:
13098: END IF; -- End of Bug fix 5524869
13099: --Bug 10179680 Starts
13100: EXCEPTION
13101: WHEN FND_API.G_EXC_ERROR THEN
13102: ROLLBACK TO Import_Doc;
13103: l_flag := FALSE;
13104: IF ( G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
13105: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name,'');
13191: IF ( ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl.LAST >= 1000) THEN
13192:
13193: ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt(x_return_status => l_return_status );
13194:
13195: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
13196: x_return_status := l_return_status ;
13197: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
13198: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,G_PKG_NAME||': '||l_api_name||':ZX_TDS_CALC_SERVICES_PUB_PKG.dump_detail_tax_lines_into_gt returned errors');
13199: END IF;
13215: p_insert_index => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.application_id.FIRST,
13216: x_return_status => l_return_status
13217: );
13218:
13219: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
13220: x_return_status := l_return_status;
13221: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
13222: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
13223: ' RETURN_STATUS = ' || x_return_status);
13281: ZX_GLOBAL_STRUCTURES_PKG.lte_trx_tbl(l_trx_id_index).effective_date,
13282: l_return_status
13283: );
13284:
13285: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
13286: x_return_status := l_return_status;
13287: RAISE FND_API.G_EXC_ERROR;
13288: END IF;
13289:
13283: );
13284:
13285: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
13286: x_return_status := l_return_status;
13287: RAISE FND_API.G_EXC_ERROR;
13288: END IF;
13289:
13290: call_lte( p_event_class_rec => l_event_class_rec,
13291: p_calling_proc => 'IMPORT',
13291: p_calling_proc => 'IMPORT',
13292: x_return_status => l_return_status
13293: );
13294:
13295: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
13296: x_return_status := l_return_status;
13297: IF ( G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
13298: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name,'Incorrect status returned by Call_lte. Return_Status'||x_return_status);
13299: END IF;
13296: x_return_status := l_return_status;
13297: IF ( G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
13298: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name,'Incorrect status returned by Call_lte. Return_Status'||x_return_status);
13299: END IF;
13300: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
13301: RAISE FND_API.G_EXC_ERROR;
13302: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
13303: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
13304: END IF;
13297: IF ( G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
13298: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name,'Incorrect status returned by Call_lte. Return_Status'||x_return_status);
13299: END IF;
13300: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
13301: RAISE FND_API.G_EXC_ERROR;
13302: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
13303: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
13304: END IF;
13305: END IF;
13298: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name,'Incorrect status returned by Call_lte. Return_Status'||x_return_status);
13299: END IF;
13300: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
13301: RAISE FND_API.G_EXC_ERROR;
13302: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
13303: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
13304: END IF;
13305: END IF;
13306:
13299: END IF;
13300: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
13301: RAISE FND_API.G_EXC_ERROR;
13302: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
13303: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
13304: END IF;
13305: END IF;
13306:
13307: EXCEPTION
13304: END IF;
13305: END IF;
13306:
13307: EXCEPTION
13308: WHEN FND_API.G_EXC_ERROR THEN
13309: ROLLBACK TO Import_Tax_LTE;
13310: IF ( G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
13311: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name,'Deleting Records from Zx_Lines_Det_Factors for Trx_id : '||l_event_class_rec.trx_id );
13312: END IF;
13344: -- if l_return_status from LTE returned error, it has
13345: -- been handled by the exception already, end of this
13346: -- loop set status to successful to commit other
13347: -- invoices that went through fine w/o error
13348: x_return_status := FND_API.G_RET_STS_SUCCESS;
13349:
13350: END IF;
13351:
13352: /**********************PARTNER CODE START ****************************/
13364: --ELSE
13365: ptnr_bulk_calc_tax_pvt(x_return_status => l_return_status);
13366: --END IF;
13367:
13368: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
13369: x_return_status := l_return_status;
13370: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
13371: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
13372: 'Incorrect status returned by Ptnr_bulk_calc_tax_pvt. RETURN_STATUS = '||x_return_status);
13383: END IF;
13384:
13385: EXCEPTION
13386: WHEN OTHERS THEN
13387: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
13388: IF c_lines%ISOPEN THEN CLOSE c_lines; END IF;
13389: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
13390: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
13391: END IF;
13414: IF ( G_LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
13415: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
13416: END IF;
13417:
13418: x_return_status := FND_API.G_RET_STS_SUCCESS ;
13419:
13420: OPEN get_overridden_lines(p_event_class_rec.event_id);
13421: LOOP
13422: FETCH get_overridden_lines BULK COLLECT INTO
13704: ZX_TDS_CALC_SERVICES_PUB_PKG.initialize (p_event_class_rec ,
13705: 'LINE' ,
13706: l_return_status
13707: );
13708: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
13709: x_return_status := l_return_status;
13710: IF get_overridden_lines%ISOPEN THEN CLOSE get_overridden_lines; END IF;
13711: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
13712: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
13726: ,p_event_class_rec
13727: ,l_return_status
13728: );
13729:
13730: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
13731: x_return_status := l_return_status;
13732: IF get_overridden_lines%ISOPEN THEN CLOSE get_overridden_lines; END IF;
13733: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
13734: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
13748: END IF;
13749:
13750: EXCEPTION
13751: WHEN OTHERS THEN
13752: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
13753: IF get_overridden_lines%ISOPEN THEN CLOSE get_overridden_lines; END IF;
13754: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
13755: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
13756: END IF;
13780: IF ( G_LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
13781: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
13782: END IF;
13783:
13784: x_return_status := FND_API.G_RET_STS_SUCCESS ;
13785:
13786: OPEN get_overridden_lines(p_event_class_rec.event_id);
13787: LOOP
13788: FETCH get_overridden_lines BULK COLLECT INTO
14072: 'LINE' ,
14073: l_return_status
14074: );
14075:
14076: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14077: x_return_status := l_return_status;
14078: IF get_overridden_lines%ISOPEN THEN CLOSE get_overridden_lines; END IF;
14079: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
14080: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
14095: ,p_event_class_rec
14096: ,l_return_status
14097: );
14098:
14099: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14100: x_return_status := l_return_status;
14101: IF get_overridden_lines%ISOPEN THEN CLOSE get_overridden_lines; END IF;
14102: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
14103: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
14117: END IF;
14118:
14119: EXCEPTION
14120: WHEN OTHERS THEN
14121: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
14122: IF get_overridden_lines%ISOPEN THEN CLOSE get_overridden_lines; END IF;
14123: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
14124: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
14125: END IF;
14167: BEGIN
14168: IF ( G_LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
14169: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
14170: END IF;
14171: x_return_status := FND_API.G_RET_STS_SUCCESS ;
14172:
14173: /*--------------------------------------------------+
14174: | Call Service Type Override Summary or Override |
14175: | Detail Tax Lines depending of the overriding |
14178: IF p_override_level = 'SUMMARY_OVERRIDE' THEN
14179: override_summary_tax_lines(p_event_class_rec,
14180: l_return_status
14181: );
14182: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14183: x_return_status := l_return_status;
14184: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
14185: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
14186: ' RETURN_STATUS = ' || x_return_status);
14190: ELSIF p_override_level = 'DETAIL_OVERRIDE' THEN
14191: override_detail_tax_lines(p_event_class_rec,
14192: l_return_status
14193: );
14194: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14195: x_return_status := l_return_status;
14196: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
14197: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
14198: ' RETURN_STATUS = ' || x_return_status);
14199: END IF;
14200: RETURN;
14201: END IF;
14202: END IF;
14203: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14204: x_return_status := l_return_status;
14205: RETURN;
14206: END IF;
14207:
14223: p_ptnr_tax_lines_insert => l_ptnr_tax_lines_insert,
14224: x_return_status => l_return_status
14225: );
14226:
14227: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14228: x_return_status := l_return_status;
14229: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
14230: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
14231: ' RETURN_STATUS = ' || x_return_status);
14269: , p_ptnr_processing_flag => ZX_GLOBAL_STRUCTURES_PKG.tax_regime_tbl(l_regime_index).partner_processing_flag
14270: , p_event_class_rec => p_event_class_rec
14271: , x_return_status => l_return_status);
14272:
14273: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14274: x_return_status := l_return_status;
14275: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
14276: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
14277: ' RETURN_STATUS = ' || x_return_status);
14285: 'DERIVE_HDR_ATTRS',
14286: l_return_status
14287: );
14288:
14289: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14290: x_return_status := l_return_status;
14291: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
14292: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
14293: ' RETURN_STATUS = ' || x_return_status);
14301: p_event_class_rec,
14302: l_return_status
14303: );
14304:
14305: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14306: x_return_status := l_return_status;
14307: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
14308: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
14309: ' RETURN_STATUS = ' || x_return_status);
14316: p_event_class_rec,
14317: l_return_status
14318: );
14319:
14320: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14321: x_return_status := l_return_status;
14322: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
14323: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
14324: ' RETURN_STATUS = ' || x_return_status);
14336: p_provider_id => null,
14337: x_return_status => l_return_status
14338: );
14339:
14340: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14341: x_return_status := l_return_status;
14342: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
14343: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
14344: ' RETURN_STATUS = ' || x_return_status);
14371: partner_inclusive_tax_override(p_event_class_rec,
14372: l_return_status
14373: );
14374:
14375: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14376: x_return_status := l_return_status;
14377: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
14378: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
14379: ' RETURN_STATUS = ' || x_return_status);
14387: END IF;
14388:
14389: EXCEPTION
14390: WHEN OTHERS THEN
14391: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
14392: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
14393: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
14394: END IF;
14395: END override_tax_lines;
14416: BEGIN
14417: IF ( G_LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
14418: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
14419: END IF;
14420: x_return_status := FND_API.G_RET_STS_SUCCESS ;
14421:
14422: /* --------------------------------------------------------------------------------+
14423: |For tax event type UNFREEZE FOR TAX, confirmation from partner is first required |
14424: |since partner may have already reported tax to authority. Hence call to TRL |
14433: p_event_class_rec,
14434: p_tax_hold_released_code
14435: );
14436:
14437: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14438: x_return_status := l_return_status;
14439: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
14440: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
14441: ' RETURN_STATUS = ' || x_return_status);
14468: p_event_class_rec,
14469: l_return_status
14470: );
14471:
14472: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14473: x_return_status := l_return_status;
14474: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
14475: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
14476: ' RETURN_STATUS = ' || x_return_status);
14488: p_event_class_rec,
14489: p_tax_hold_released_code
14490: );
14491:
14492: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14493: x_return_status := l_return_status;
14494: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
14495: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
14496: ' RETURN_STATUS = ' || x_return_status);
14505: END IF;
14506:
14507: EXCEPTION
14508: WHEN OTHERS THEN
14509: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
14510: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
14511: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
14512: END IF;
14513: END document_level_changes;
14533: BEGIN
14534: IF ( G_LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
14535: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
14536: END IF;
14537: x_return_status := FND_API.G_RET_STS_SUCCESS ;
14538:
14539: /* -------------------------------------------------------+
14540: | Mark Tax Lines Delete |
14541: + -------------------------------------------------------*/
14540: | Mark Tax Lines Delete |
14541: + -------------------------------------------------------*/
14542: ZX_TRL_PUB_PKG.mark_tax_lines_delete(l_return_status,p_trx_line_rec);
14543:
14544: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14545: x_return_status := l_return_status;
14546: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
14547: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
14548: ' RETURN_STATUS = ' || x_return_status);
14555: END IF;
14556:
14557: EXCEPTION
14558: WHEN OTHERS THEN
14559: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
14560: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
14561: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
14562: END IF;
14563: END mark_tax_lines_deleted;
14904: BEGIN
14905: IF ( G_LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
14906: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
14907: END IF;
14908: x_return_status := FND_API.G_RET_STS_SUCCESS ;
14909:
14910: /* -------------------------------------------------------+
14911: | Reverse Document |
14912: + -------------------------------------------------------*/
14913: ZX_TDS_CALC_SERVICES_PUB_PKG.reverse_document(p_event_class_rec,
14914: l_return_status
14915: );
14916:
14917: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14918: x_return_status := l_return_status;
14919: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
14920: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
14921: ' RETURN_STATUS = ' || x_return_status);
15291: p_insert_index => zx_global_structures_pkg.trx_line_dist_tbl.APPLICATION_ID.FIRST,
15292: x_return_status => l_return_status
15293: );
15294:
15295: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
15296: x_return_status := l_return_status;
15297: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
15298: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
15299: ' RETURN_STATUS = ' || x_return_status);
15311: p_ptnr_tax_lines_insert => l_ptnr_tax_lines_insert,
15312: x_return_status => l_return_status
15313: );
15314:
15315: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
15316: x_return_status := l_return_status;
15317: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
15318: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
15319: ' RETURN_STATUS = ' || x_return_status);
15360: ,p_event_class_rec
15361: ,l_return_status
15362: );
15363:
15364: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
15365: x_return_status := l_return_status;
15366: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
15367: l_context_info_rec.APPLICATION_ID := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.APPLICATION_ID(l_trx_line_index);
15368: l_context_info_rec.ENTITY_CODE := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ENTITY_CODE(l_trx_line_index);
15362: );
15363:
15364: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
15365: x_return_status := l_return_status;
15366: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
15367: l_context_info_rec.APPLICATION_ID := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.APPLICATION_ID(l_trx_line_index);
15368: l_context_info_rec.ENTITY_CODE := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ENTITY_CODE(l_trx_line_index);
15369: l_context_info_rec.EVENT_CLASS_CODE := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.EVENT_CLASS_CODE(l_trx_line_index);
15370: l_context_info_rec.TRX_ID := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TRX_ID(l_trx_line_index);
15386:
15387: partner_location_population (p_event_class_rec => p_event_class_rec,
15388: x_return_status => l_return_status);
15389:
15390: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
15391: x_return_status := l_return_status;
15392: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
15393: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
15394: ' RETURN_STATUS = ' || x_return_status);
15404: ZX_GLOBAL_STRUCTURES_PKG.tax_regime_tbl(l_regime_index).partner_processing_flag,
15405: p_event_class_rec,
15406: l_return_status
15407: );
15408: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
15409: x_return_status := l_return_status;
15410: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
15411: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
15412: ' RETURN_STATUS = ' || x_return_status);
15420: 'DERIVE_HDR_ATTRS',
15421: l_return_status
15422: );
15423:
15424: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
15425: x_return_status := l_return_status;
15426: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
15427: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
15428: ' RETURN_STATUS = ' || x_return_status);
15434: ZX_GLOBAL_STRUCTURES_PKG.tax_regime_tbl(l_regime_index).tax_provider_id,
15435: 'DERIVE_LINE_ATTRS',
15436: l_return_status
15437: );
15438: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
15439: x_return_status := l_return_status;
15440: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
15441: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
15442: ' RETURN_STATUS = ' || x_return_status);
15449: 'CALCULATE_TAX',
15450: p_event_class_rec,
15451: l_return_status
15452: );
15453: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
15454: x_return_status := l_return_status;
15455: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
15456: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
15457: ' RETURN_STATUS = ' || x_return_status);
15470: END IF;
15471:
15472: EXCEPTION
15473: WHEN OTHERS THEN
15474: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
15475: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
15476: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
15477: END IF;
15478: END reverse_document;
15497: BEGIN
15498: IF ( G_LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
15499: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
15500: END IF;
15501: x_return_status := FND_API.G_RET_STS_SUCCESS ;
15502:
15503: /* -------------------------------------------------------+
15504: | Reverse Distributions |
15505: + -------------------------------------------------------*/
15504: | Reverse Distributions |
15505: + -------------------------------------------------------*/
15506: ZX_TRD_SERVICES_PUB_PKG.reverse_distributions(l_return_status);
15507:
15508: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
15509: x_return_status := l_return_status;
15510: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
15511: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
15512: ' RETURN_STATUS = ' || x_return_status);
15520: END IF;
15521:
15522: EXCEPTION
15523: WHEN OTHERS THEN
15524: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
15525: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
15526: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
15527: END IF;
15528: END reverse_distributions;
15548: BEGIN
15549: IF ( G_LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
15550: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
15551: END IF;
15552: x_return_status := FND_API.G_RET_STS_SUCCESS ;
15553: l_return_status := FND_API.G_RET_STS_SUCCESS ;
15554:
15555: /* -------------------------------------------------------+
15556: | Determine recovery |
15549: IF ( G_LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
15550: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
15551: END IF;
15552: x_return_status := FND_API.G_RET_STS_SUCCESS ;
15553: l_return_status := FND_API.G_RET_STS_SUCCESS ;
15554:
15555: /* -------------------------------------------------------+
15556: | Determine recovery |
15557: + -------------------------------------------------------*/
15559: ZX_TRD_SERVICES_PUB_PKG.determine_recovery(p_event_class_rec,
15560: l_return_status
15561: );
15562:
15563: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
15564: x_return_status := l_return_status;
15565: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
15566: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
15567: ' RETURN_STATUS = ' || x_return_status);
15575: END IF;
15576:
15577: EXCEPTION
15578: WHEN OTHERS THEN
15579: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
15580: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
15581: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
15582: END IF;
15583: END determine_recovery;
15603: BEGIN
15604: IF ( G_LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
15605: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
15606: END IF;
15607: x_return_status := FND_API.G_RET_STS_SUCCESS ;
15608:
15609: ZX_TRD_SERVICES_PUB_PKG.override_recovery(p_event_class_rec,
15610: x_return_status
15611: );
15609: ZX_TRD_SERVICES_PUB_PKG.override_recovery(p_event_class_rec,
15610: x_return_status
15611: );
15612:
15613: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
15614: x_return_status := l_return_status;
15615: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
15616: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
15617: ' RETURN_STATUS = ' || x_return_status);
15625: END IF;
15626:
15627: EXCEPTION
15628: WHEN OTHERS THEN
15629: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
15630: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
15631: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
15632: END IF;
15633: END override_recovery;
15654: BEGIN
15655: IF ( G_LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
15656: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
15657: END IF;
15658: x_return_status := FND_API.G_RET_STS_SUCCESS ;
15659:
15660: /* -------------------------------------------------------+
15661: | Freeze tax distributions |
15662: + -------------------------------------------------------*/
15663: ZX_TRL_PUB_PKG.freeze_taxdistributions(l_return_status,
15664: p_event_class_rec
15665: );
15666:
15667: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
15668: x_return_status := l_return_status;
15669: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
15670: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
15671: ' RETURN_STATUS = ' || x_return_status);
15679: END IF;
15680:
15681: EXCEPTION
15682: WHEN OTHERS THEN
15683: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
15684: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
15685: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
15686: END IF;
15687: END freeze_distribution_lines;
15710: BEGIN
15711: IF ( G_LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
15712: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
15713: END IF;
15714: x_return_status := FND_API.G_RET_STS_SUCCESS ;
15715:
15716: /* -------------------------------------------------------+
15717: | Validate document for tax |
15718: + -------------------------------------------------------*/
15722: x_validate_status => x_validation_status,
15723: x_return_status => l_return_status
15724: );
15725:
15726: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
15727: x_return_status := l_return_status;
15728: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
15729: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
15730: ' RETURN_STATUS = ' || x_return_status);
15738: END IF;
15739:
15740: EXCEPTION
15741: WHEN OTHERS THEN
15742: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
15743: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
15744: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
15745: END IF;
15746: END validate_document_for_tax;
15768: BEGIN
15769: IF ( G_LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
15770: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
15771: END IF;
15772: x_return_status := FND_API.G_RET_STS_SUCCESS ;
15773:
15774: /* -------------------------------------------------------+
15775: | Discard tax only lines |
15776: + -------------------------------------------------------*/
15778: ZX_TRL_PUB_PKG.discard_tax_only_lines(l_return_status,
15779: p_event_class_rec
15780: );
15781:
15782: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
15783: x_return_status := l_return_status;
15784: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
15785: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
15786: ' RETURN_STATUS = ' || x_return_status);
15812: 'DERIVE_HDR_ATTRS',
15813: l_return_status
15814: );
15815:
15816: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
15817: x_return_status := l_return_status;
15818: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
15819: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
15820: ' RETURN_STATUS = ' || x_return_status);
15828: p_event_class_rec,
15829: l_return_status
15830: );
15831:
15832: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
15833: x_return_status := l_return_status;
15834: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
15835: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
15836: ' RETURN_STATUS = ' || x_return_status);
15843: p_event_class_rec,
15844: l_return_status
15845: );
15846:
15847: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
15848: x_return_status := l_return_status;
15849: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
15850: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
15851: ' RETURN_STATUS = ' || x_return_status);
15862: p_provider_id => null,
15863: x_return_status => l_return_status
15864: );
15865:
15866: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
15867: x_return_status := l_return_status;
15868: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
15869: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
15870: ' RETURN_STATUS = ' || x_return_status);
15880: END IF;
15881:
15882: EXCEPTION
15883: WHEN OTHERS THEN
15884: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
15885: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
15886: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
15887: END IF;
15888: END discard_tax_only_lines;
15912: BEGIN
15913: IF ( G_LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
15914: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
15915: END IF;
15916: x_return_status := FND_API.G_RET_STS_SUCCESS ;
15917:
15918: /* -------------------------------------------------------+
15919: | Discard tax only lines |
15920: + -------------------------------------------------------*/
16026: ZX_GLOBAL_STRUCTURES_PKG.tax_regime_tbl(l_regime_index).partner_processing_flag,
16027: p_event_class_rec,
16028: l_return_status
16029: );
16030: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
16031: x_return_status := l_return_status;
16032: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
16033: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
16034: ' RETURN_STATUS = ' || x_return_status);
16047: 'DERIVE_HDR_ATTRS',
16048: l_return_status
16049: );
16050:
16051: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
16052: x_return_status := l_return_status;
16053: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
16054: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
16055: ' RETURN_STATUS = ' || x_return_status);
16067: p_event_class_rec,
16068: l_return_status
16069: );
16070:
16071: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
16072: x_return_status := l_return_status;
16073: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
16074: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
16075: ' RETURN_STATUS = ' || x_return_status);
16097: END IF;
16098:
16099: EXCEPTION
16100: WHEN OTHERS THEN
16101: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
16102: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
16103: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
16104: END IF;
16105: END synchronize_tax;
16132: IF ( G_LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
16133: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
16134: END IF;
16135:
16136: x_return_status := FND_API.G_RET_STS_SUCCESS ;
16137:
16138: FOR l_trx_index IN ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.application_id.FIRST .. ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.application_id.LAST
16139: LOOP
16140: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
16161: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.INTERNAL_ORG_LOCATION_ID(l_trx_index),
16162: l_return_status
16163: );
16164:
16165: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
16166: x_return_status := l_return_status;
16167: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
16168: l_context_info_rec.APPLICATION_ID := p_event_class_rec.APPLICATION_ID;
16169: l_context_info_rec.ENTITY_CODE := p_event_class_rec.ENTITY_CODE;
16163: );
16164:
16165: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
16166: x_return_status := l_return_status;
16167: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
16168: l_context_info_rec.APPLICATION_ID := p_event_class_rec.APPLICATION_ID;
16169: l_context_info_rec.ENTITY_CODE := p_event_class_rec.ENTITY_CODE;
16170: l_context_info_rec.EVENT_CLASS_CODE := p_event_class_rec.EVENT_CLASS_CODE;
16171: l_context_info_rec.TRX_ID := p_event_class_rec.TRX_ID;
16203: l_trx_index,
16204: p_event_class_rec
16205: );
16206:
16207: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
16208: x_return_status := l_return_status;
16209: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
16210: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
16211: ' RETURN_STATUS = ' || x_return_status);
16294: p_event_class_rec => p_event_class_rec,
16295: p_insert_index => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.application_id.FIRST,
16296: x_return_status => l_return_status
16297: );
16298: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
16299: x_return_status := l_return_status;
16300: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
16301: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
16302: ' RETURN_STATUS = ' || x_return_status);
16324: p_update_index => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.application_id.LAST,
16325: x_return_status => l_return_status
16326: );
16327:
16328: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
16329: x_return_status := l_return_status;
16330: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
16331: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
16332: ' RETURN_STATUS = ' || x_return_status);
16340: G_PKG_NAME||': '||l_api_name||'()-'||' RETURN_STATUS = ' || x_return_status);
16341: END IF;
16342: EXCEPTION
16343: WHEN OTHERS THEN
16344: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
16345: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
16346: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
16347: END IF;
16348: END insupd_line_det_factors;
16375: IF ( G_LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
16376: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
16377: END IF;
16378:
16379: x_return_status := FND_API.G_RET_STS_SUCCESS ;
16380:
16381: IF p_event ='UPDATE' THEN
16382: UPDATE ZX_LINES
16383: SET sync_with_prvdr_flag ='N'
16401: END IF;
16402:
16403: EXCEPTION
16404: WHEN OTHERS THEN
16405: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
16406: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
16407: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
16408: END IF;
16409: END zx_lines_table_handler;
16444: ', p_party_site_id: '||to_char(p_party_site_id)
16445: );
16446: END IF;
16447:
16448: x_return_status := FND_API.G_RET_STS_SUCCESS;
16449:
16450: IF p_party_id IS NOT NULL THEN
16451: l_party_index := p_party_type_code||to_char(p_party_id);
16452: IF (p_party_tax_prof_id_tbl.EXISTS(l_party_index)) THEN
16460: ,x_tax_prof_id
16461: ,l_return_status
16462: );
16463:
16464: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
16465: x_return_status := l_return_status;
16466: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
16467: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
16468: ' RETURN_STATUS = ' || x_return_status);
16485: ,x_tax_prof_id
16486: ,l_return_status
16487: );
16488:
16489: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
16490: x_return_status := l_return_status;
16491: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
16492: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
16493: ' RETURN_STATUS = ' || x_return_status);
16557: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
16558: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
16559: END IF;
16560:
16561: x_return_status := FND_API.G_RET_STS_SUCCESS;
16562:
16563: --Defaulting Automation accepts event class rec as IN OUT parameter while it is a IN parameter here
16564: --Hence need to populate event class details into intermediate record l_event_class_rec
16565: --Populating only those used by the defaulting automation API
16610: l_upg_trx_info_rec.trx_id := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.adjusted_doc_trx_id(p_trx_line_index);
16611: ZX_ON_FLY_TRX_UPGRADE_PKG.upgrade_trx_on_fly(p_upg_trx_info_rec => l_upg_trx_info_rec,
16612: x_return_status => l_return_status
16613: );
16614: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
16615: x_return_status := l_return_status;
16616: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
16617: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
16618: ' RETURN_STATUS = ' || x_return_status);
16689: l_upg_trx_info_rec.trx_id := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.applied_from_trx_id(p_trx_line_index);
16690: ZX_ON_FLY_TRX_UPGRADE_PKG.upgrade_trx_on_fly(p_upg_trx_info_rec => l_upg_trx_info_rec,
16691: x_return_status => l_return_status
16692: );
16693: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
16694: x_return_status := l_return_status;
16695: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
16696: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
16697: ' RETURN_STATUS = ' || x_return_status);
16799: l_upg_trx_info_rec.trx_id := ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.source_trx_id(p_trx_line_index);
16800: ZX_ON_FLY_TRX_UPGRADE_PKG.upgrade_trx_on_fly(p_upg_trx_info_rec => l_upg_trx_info_rec,
16801: x_return_status => l_return_status
16802: );
16803: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
16804: x_return_status := l_return_status;
16805: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
16806: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
16807: ' RETURN_STATUS = ' || x_return_status);
16876: p_tax_invoice_number=> ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TAX_INVOICE_NUMBER(p_trx_line_index),
16877: p_tax_invoice_date => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.TAX_INVOICE_DATE(p_trx_line_index),
16878: x_return_status => l_return_status
16879: );
16880: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
16881: x_return_status := l_return_status;
16882: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
16883: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
16884: ' RETURN_STATUS = ' || x_return_status);
16902: END IF;
16903:
16904: EXCEPTION
16905: WHEN OTHERS THEN
16906: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
16907: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
16908: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
16909: END IF;
16910: END default_tax_attrs_wrapper;
17327: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
17328: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
17329: END IF;
17330:
17331: x_return_status := FND_API.G_RET_STS_SUCCESS;
17332:
17333: OPEN lines(p_event_class_rec);
17334: LOOP
17335: FETCH lines BULK COLLECT INTO
17684: call_redefaulting_APIs(p_event_class_rec => p_event_class_rec,
17685: p_trx_line_index => l_trx_line_index,
17686: x_return_status => l_return_status
17687: );
17688: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
17689: x_return_status := l_return_status;
17690: IF lines%ISOPEN THEN CLOSE lines; END IF;
17691: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
17692: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
17707: ZX_DEFAULT_AUTOMATION_PKG.default_tax_attributes_for_po(p_trx_line_index => l_trx_line_index,
17708: x_return_status => l_return_status
17709: );
17710:
17711: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
17712: x_return_status := l_return_status;
17713: IF lines%ISOPEN THEN CLOSE lines; END IF;
17714: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
17715: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
17731: p_event_class_rec => p_event_class_rec,
17732: x_return_status => l_return_status
17733: );
17734:
17735: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
17736: x_return_status := l_return_status;
17737: IF lines%ISOPEN THEN CLOSE lines; END IF;
17738: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
17739: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
17758: p_line_amt => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.LINE_AMT(l_trx_line_index),
17759: x_assessable_value => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ASSESSABLE_VALUE(l_trx_line_index),
17760: x_return_status => l_return_status
17761: );
17762: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
17763: x_return_status := l_return_status;
17764: IF lines%ISOPEN THEN CLOSE lines; END IF;
17765: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
17766: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
17815: END IF;
17816:
17817: EXCEPTION
17818: WHEN OTHERS THEN
17819: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
17820: IF lines%ISOPEN THEN CLOSE lines; END IF;
17821: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
17822: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,SQLERRM);
17823: END IF;
17998: IF ( G_LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
17999: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'()+');
18000: END IF;
18001:
18002: x_return_status := FND_API.G_RET_STS_SUCCESS ;
18003:
18004: --Bug 8565358
18005: -- reverting the changes done for Bug 7045194
18006: -- Bug#7045194
18058: l_upg_trx_info_rec.trx_id := p_event_class_rec.trx_id;
18059: ZX_ON_FLY_TRX_UPGRADE_PKG.upgrade_trx_on_fly(p_upg_trx_info_rec => l_upg_trx_info_rec,
18060: x_return_status => l_return_status
18061: );
18062: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
18063: x_return_status := l_return_status;
18064: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
18065: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
18066: ' RETURN_STATUS = ' || x_return_status);
18122: p_item_org_id => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.PRODUCT_ORG_ID(p_trx_line_index) ,
18123: x_intended_use => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.LINE_INTENDED_USE(p_trx_line_index),
18124: x_return_status => l_return_status
18125: );
18126: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
18127: x_return_status := l_return_status;
18128: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
18129: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
18130: ' RETURN_STATUS = ' || x_return_status);
18142: x_prod_fisc_class_code => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.PRODUCT_FISC_CLASSIFICATION(p_trx_line_index),
18143: x_return_status => l_return_status
18144: );
18145:
18146: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
18147: x_return_status := l_return_status;
18148: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
18149: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
18150: ' RETURN_STATUS = ' || x_return_status);
18164: p_line_amt => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.LINE_AMT(p_trx_line_index),
18165: x_assessable_value => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ASSESSABLE_VALUE(p_trx_line_index),
18166: x_return_status => l_return_status
18167: );
18168: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
18169: x_return_status := l_return_status;
18170: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
18171: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
18172: ' RETURN_STATUS = ' || x_return_status);
18188: p_default_code => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.PRODUCT_TYPE(p_trx_line_index),
18189: p_return_status => l_return_status
18190: );
18191:
18192: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
18193: x_return_status := l_return_status;
18194: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
18195: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
18196: ' RETURN_STATUS = ' || x_return_status);
18237: x_intended_use => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.LINE_INTENDED_USE(p_trx_line_index),
18238: x_return_status => l_return_status
18239: );
18240:
18241: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
18242: x_return_status := l_return_status;
18243: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
18244: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
18245: ' RETURN_STATUS = ' || x_return_status);
18261: p_default_code => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.PRODUCT_TYPE(p_trx_line_index),
18262: p_return_status => l_return_status
18263: );
18264:
18265: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
18266: x_return_status := l_return_status;
18267: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
18268: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
18269: ' RETURN_STATUS = ' || x_return_status);
18288: x_prod_fisc_class_code => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.PRODUCT_FISC_CLASSIFICATION(p_trx_line_index),
18289: x_return_status => l_return_status
18290: );
18291:
18292: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
18293: x_return_status := l_return_status;
18294: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
18295: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
18296: ' RETURN_STATUS = ' || x_return_status);
18317: p_line_amt => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.LINE_AMT(p_trx_line_index),
18318: x_assessable_value => ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ASSESSABLE_VALUE(p_trx_line_index),
18319: x_return_status => l_return_status
18320: );
18321: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
18322: x_return_status := l_return_status;
18323: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
18324: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
18325: ' RETURN_STATUS = ' || x_return_status);
18426: p_return_status => l_return_status,
18427: p_error_buffer => l_error_buffer
18428: );
18429:
18430: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
18431: x_return_status := l_return_status;
18432: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
18433: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,
18434: ' RETURN_STATUS = ' || x_return_status);
18454: END IF;
18455:
18456: EXCEPTION
18457: WHEN OTHERS THEN
18458: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
18459: IF ( G_LEVEL_EXCEPTION >= G_CURRENT_RUNTIME_LEVEL) THEN
18460: FND_LOG.STRING(G_LEVEL_EXCEPTION,G_MODULE_NAME||l_api_name,SQLERRM);
18461: END IF;
18462: END call_redefaulting_APIs;
18479: '.BEGIN',G_PKG_NAME||': '||l_api_name||'()+'||
18480: ', RETURN_STATUS = ' || x_return_status);
18481: END IF;
18482:
18483: x_return_status := FND_API.G_RET_STS_SUCCESS;
18484:
18485: IF zx_global_structures_pkg.trx_line_dist_tbl.source_event_class_code(p_trx_line_index)
18486: <> 'INTERCOMPANY_TRX'
18487: THEN
18518: END IF;
18519:
18520: EXCEPTION
18521: WHEN OTHERS THEN
18522: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
18523: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
18524: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,
18525: 'Unable to derive the source event calss info ' ||
18526: SQLERRM);
18541: '.BEGIN',G_PKG_NAME||': '||l_api_name||'()+'||
18542: ', RETURN_STATUS = ' || x_return_status);
18543: END IF;
18544:
18545: x_return_status := FND_API.G_RET_STS_SUCCESS;
18546:
18547: FOR i IN 1 .. ZX_API_PUB.errors_tbl.application_id.COUNT LOOP
18548: IF ZX_API_PUB.errors_tbl.application_id(i) IS NULL THEN
18549: ZX_API_PUB.errors_tbl.application_id(i) := p_event_class_rec.APPLICATION_ID;
18587: END IF;
18588:
18589: EXCEPTION
18590: WHEN OTHERS THEN
18591: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
18592: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
18593: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,
18594: 'Unable to populate error information ' ||
18595: SQLERRM);
18653: END IF;
18654:
18655: EXCEPTION
18656: WHEN OTHERS THEN
18657: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
18658: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
18659: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,
18660: 'Error occurred in ' || l_api_name || ' : ' ||SQLERRM);
18661: END IF;
18833: END IF;
18834:
18835: EXCEPTION
18836: WHEN OTHERS THEN
18837: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
18838: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
18839: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_api_name,
18840: 'Error occurred in ' || l_api_name || ' : ' ||SQLERRM);
18841: END IF;