174: |Sep 22nd,2005 Kiran Konada
175: | Created new local procedure Get_opm_charge_account
176: | calling SLA OPM api to get charge and accrual account id
177: | Dependency: aru#4610085(pack spec and stubbed out pkg body)
178: | GMF_transaction_accounts_PUB.get_accounts
179: | Calling MRP_SOURCING_API_PK.mrp_sourcing to get sourcing
180: | vendor and vendor site id. This API has been there from 11.5.10
181: | Talked to Usha, we dont require a dependent aru for this.
182: |
5542: END IF;
5543: END IF;
5544:
5545: --updating the global record structure variable
5546: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).organization_id := p_destination_org_id;
5547: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).inventory_item_id := p_item_id;
5548: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).ato_flag := 'Y';
5549: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).operating_unit := p_operating_unit;
5550: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).vendor_id := l_vendor_id;
5543: END IF;
5544:
5545: --updating the global record structure variable
5546: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).organization_id := p_destination_org_id;
5547: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).inventory_item_id := p_item_id;
5548: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).ato_flag := 'Y';
5549: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).operating_unit := p_operating_unit;
5550: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).vendor_id := l_vendor_id;
5551: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).vendor_site_id := l_vendor_site_id;
5544:
5545: --updating the global record structure variable
5546: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).organization_id := p_destination_org_id;
5547: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).inventory_item_id := p_item_id;
5548: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).ato_flag := 'Y';
5549: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).operating_unit := p_operating_unit;
5550: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).vendor_id := l_vendor_id;
5551: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).vendor_site_id := l_vendor_site_id;
5552: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).customer_id := l_cust_id;
5545: --updating the global record structure variable
5546: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).organization_id := p_destination_org_id;
5547: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).inventory_item_id := p_item_id;
5548: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).ato_flag := 'Y';
5549: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).operating_unit := p_operating_unit;
5550: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).vendor_id := l_vendor_id;
5551: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).vendor_site_id := l_vendor_site_id;
5552: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).customer_id := l_cust_id;
5553: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).customer_site_id := l_cust_site_id;
5546: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).organization_id := p_destination_org_id;
5547: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).inventory_item_id := p_item_id;
5548: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).ato_flag := 'Y';
5549: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).operating_unit := p_operating_unit;
5550: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).vendor_id := l_vendor_id;
5551: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).vendor_site_id := l_vendor_site_id;
5552: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).customer_id := l_cust_id;
5553: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).customer_site_id := l_cust_site_id;
5554: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).account_type_code := GMF_transaction_accounts_PUB.G_CHARGE_INV_ACCT;
5547: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).inventory_item_id := p_item_id;
5548: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).ato_flag := 'Y';
5549: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).operating_unit := p_operating_unit;
5550: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).vendor_id := l_vendor_id;
5551: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).vendor_site_id := l_vendor_site_id;
5552: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).customer_id := l_cust_id;
5553: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).customer_site_id := l_cust_site_id;
5554: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).account_type_code := GMF_transaction_accounts_PUB.G_CHARGE_INV_ACCT;
5555:
5548: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).ato_flag := 'Y';
5549: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).operating_unit := p_operating_unit;
5550: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).vendor_id := l_vendor_id;
5551: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).vendor_site_id := l_vendor_site_id;
5552: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).customer_id := l_cust_id;
5553: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).customer_site_id := l_cust_site_id;
5554: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).account_type_code := GMF_transaction_accounts_PUB.G_CHARGE_INV_ACCT;
5555:
5556: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).organization_id := p_destination_org_id;
5549: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).operating_unit := p_operating_unit;
5550: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).vendor_id := l_vendor_id;
5551: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).vendor_site_id := l_vendor_site_id;
5552: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).customer_id := l_cust_id;
5553: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).customer_site_id := l_cust_site_id;
5554: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).account_type_code := GMF_transaction_accounts_PUB.G_CHARGE_INV_ACCT;
5555:
5556: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).organization_id := p_destination_org_id;
5557: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).inventory_item_id := p_item_id;
5550: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).vendor_id := l_vendor_id;
5551: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).vendor_site_id := l_vendor_site_id;
5552: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).customer_id := l_cust_id;
5553: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).customer_site_id := l_cust_site_id;
5554: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).account_type_code := GMF_transaction_accounts_PUB.G_CHARGE_INV_ACCT;
5555:
5556: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).organization_id := p_destination_org_id;
5557: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).inventory_item_id := p_item_id;
5558: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).ato_flag := 'Y';
5552: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).customer_id := l_cust_id;
5553: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).customer_site_id := l_cust_site_id;
5554: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).account_type_code := GMF_transaction_accounts_PUB.G_CHARGE_INV_ACCT;
5555:
5556: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).organization_id := p_destination_org_id;
5557: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).inventory_item_id := p_item_id;
5558: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).ato_flag := 'Y';
5559: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).operating_unit := p_operating_unit;
5560: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).vendor_id := l_vendor_id;
5553: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).customer_site_id := l_cust_site_id;
5554: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).account_type_code := GMF_transaction_accounts_PUB.G_CHARGE_INV_ACCT;
5555:
5556: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).organization_id := p_destination_org_id;
5557: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).inventory_item_id := p_item_id;
5558: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).ato_flag := 'Y';
5559: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).operating_unit := p_operating_unit;
5560: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).vendor_id := l_vendor_id;
5561: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).vendor_site_id := l_vendor_site_id;
5554: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).account_type_code := GMF_transaction_accounts_PUB.G_CHARGE_INV_ACCT;
5555:
5556: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).organization_id := p_destination_org_id;
5557: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).inventory_item_id := p_item_id;
5558: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).ato_flag := 'Y';
5559: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).operating_unit := p_operating_unit;
5560: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).vendor_id := l_vendor_id;
5561: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).vendor_site_id := l_vendor_site_id;
5562: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).customer_id := l_cust_id;
5555:
5556: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).organization_id := p_destination_org_id;
5557: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).inventory_item_id := p_item_id;
5558: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).ato_flag := 'Y';
5559: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).operating_unit := p_operating_unit;
5560: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).vendor_id := l_vendor_id;
5561: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).vendor_site_id := l_vendor_site_id;
5562: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).customer_id := l_cust_id;
5563: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).customer_site_id := l_cust_site_id;
5556: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).organization_id := p_destination_org_id;
5557: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).inventory_item_id := p_item_id;
5558: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).ato_flag := 'Y';
5559: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).operating_unit := p_operating_unit;
5560: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).vendor_id := l_vendor_id;
5561: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).vendor_site_id := l_vendor_site_id;
5562: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).customer_id := l_cust_id;
5563: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).customer_site_id := l_cust_site_id;
5564: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).account_type_code := GMF_transaction_accounts_PUB.G_ACCRUAL_ACCT;
5557: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).inventory_item_id := p_item_id;
5558: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).ato_flag := 'Y';
5559: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).operating_unit := p_operating_unit;
5560: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).vendor_id := l_vendor_id;
5561: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).vendor_site_id := l_vendor_site_id;
5562: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).customer_id := l_cust_id;
5563: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).customer_site_id := l_cust_site_id;
5564: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).account_type_code := GMF_transaction_accounts_PUB.G_ACCRUAL_ACCT;
5565:
5558: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).ato_flag := 'Y';
5559: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).operating_unit := p_operating_unit;
5560: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).vendor_id := l_vendor_id;
5561: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).vendor_site_id := l_vendor_site_id;
5562: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).customer_id := l_cust_id;
5563: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).customer_site_id := l_cust_site_id;
5564: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).account_type_code := GMF_transaction_accounts_PUB.G_ACCRUAL_ACCT;
5565:
5566:
5559: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).operating_unit := p_operating_unit;
5560: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).vendor_id := l_vendor_id;
5561: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).vendor_site_id := l_vendor_site_id;
5562: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).customer_id := l_cust_id;
5563: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).customer_site_id := l_cust_site_id;
5564: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).account_type_code := GMF_transaction_accounts_PUB.G_ACCRUAL_ACCT;
5565:
5566:
5567:
5560: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).vendor_id := l_vendor_id;
5561: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).vendor_site_id := l_vendor_site_id;
5562: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).customer_id := l_cust_id;
5563: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).customer_site_id := l_cust_site_id;
5564: GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).account_type_code := GMF_transaction_accounts_PUB.G_ACCRUAL_ACCT;
5565:
5566:
5567:
5568: l_stmt_num := 40;
5566:
5567:
5568: l_stmt_num := 40;
5569: IF PG_DEBUG <> 0 THEN
5570: oe_debug_pub.add('Get_opm_charge_account: ' || 'calling GMF_transaction_accounts_PUB.get_accounts',5);
5571:
5572: END IF;
5573: --SLA api to get charge and accrual account
5574: --Reference aru#4610085
5571:
5572: END IF;
5573: --SLA api to get charge and accrual account
5574: --Reference aru#4610085
5575: GMF_transaction_accounts_PUB.get_accounts
5576: (
5577: p_api_version => 1.0
5578: , p_init_msg_list => null
5579: , p_source => 'CTO'
5584: );
5585:
5586: IF l_return_status = FND_API.G_RET_STS_SUCCESS then
5587: --i.e.charge account id is
5588: x_charge_account_id := GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(1).target_ccid;
5589:
5590: IF x_charge_account_id IS NULL THEN
5591: IF PG_DEBUG <> 0 THEN
5592: oe_debug_pub.add('Get_opm_charge_account: ' || 'charge account id is NULL in opm org',1);
5595:
5596:
5597: END IF;
5598:
5599: x_accrual_account_id := GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).target_ccid;
5600:
5601: IF PG_DEBUG <> 0 THEN
5602: oe_debug_pub.add('Get_opm_charge_account: ' || 'success from GMF_transaction_accounts_PUB.get_accounts',3);
5603: oe_debug_pub.add('Get_opm_charge_account: ' || 'opm sla charge acct : '||to_char(x_charge_account_id),1);
5598:
5599: x_accrual_account_id := GMF_transaction_accounts_PUB.g_gmf_accts_tab_CTO(2).target_ccid;
5600:
5601: IF PG_DEBUG <> 0 THEN
5602: oe_debug_pub.add('Get_opm_charge_account: ' || 'success from GMF_transaction_accounts_PUB.get_accounts',3);
5603: oe_debug_pub.add('Get_opm_charge_account: ' || 'opm sla charge acct : '||to_char(x_charge_account_id),1);
5604: oe_debug_pub.add('Get_opm_charge_account: ' || 'opm sla accrual acct : '||to_char(x_accrual_account_id),1);
5605: END IF;
5606: