156: l_inp_rec.calc_resptime_flag := 'N';
157:
158: -- If debug_level = 1 then dump the procedure name
159: IF (l_debug_level > 0) THEN
160: csi_gen_utility_pvt.put_line( 'getContracts');
161: END IF;
162:
163: -- If the debug level = 2 then dump all the parameters values.
164: IF (l_debug_level > 1) THEN
161: END IF;
162:
163: -- If the debug level = 2 then dump all the parameters values.
164: IF (l_debug_level > 1) THEN
165: csi_gen_utility_pvt.put_line( 'getContracts');
166: csi_gen_utility_pvt.put_line('Dumping the values passed to OKS_ENTITLEMENTS_PUB.GET_CONTRACTS:');
167: csi_gen_utility_pvt.put_line('Instance_id :'||l_inp_rec.product_id);
168: csi_gen_utility_pvt.put_line('validate_flag :'||l_inp_rec.validate_flag);
169: csi_gen_utility_pvt.put_line('calc_resptime_flag :'||l_inp_rec.calc_resptime_flag);
162:
163: -- If the debug level = 2 then dump all the parameters values.
164: IF (l_debug_level > 1) THEN
165: csi_gen_utility_pvt.put_line( 'getContracts');
166: csi_gen_utility_pvt.put_line('Dumping the values passed to OKS_ENTITLEMENTS_PUB.GET_CONTRACTS:');
167: csi_gen_utility_pvt.put_line('Instance_id :'||l_inp_rec.product_id);
168: csi_gen_utility_pvt.put_line('validate_flag :'||l_inp_rec.validate_flag);
169: csi_gen_utility_pvt.put_line('calc_resptime_flag :'||l_inp_rec.calc_resptime_flag);
170: END IF;
163: -- If the debug level = 2 then dump all the parameters values.
164: IF (l_debug_level > 1) THEN
165: csi_gen_utility_pvt.put_line( 'getContracts');
166: csi_gen_utility_pvt.put_line('Dumping the values passed to OKS_ENTITLEMENTS_PUB.GET_CONTRACTS:');
167: csi_gen_utility_pvt.put_line('Instance_id :'||l_inp_rec.product_id);
168: csi_gen_utility_pvt.put_line('validate_flag :'||l_inp_rec.validate_flag);
169: csi_gen_utility_pvt.put_line('calc_resptime_flag :'||l_inp_rec.calc_resptime_flag);
170: END IF;
171:
164: IF (l_debug_level > 1) THEN
165: csi_gen_utility_pvt.put_line( 'getContracts');
166: csi_gen_utility_pvt.put_line('Dumping the values passed to OKS_ENTITLEMENTS_PUB.GET_CONTRACTS:');
167: csi_gen_utility_pvt.put_line('Instance_id :'||l_inp_rec.product_id);
168: csi_gen_utility_pvt.put_line('validate_flag :'||l_inp_rec.validate_flag);
169: csi_gen_utility_pvt.put_line('calc_resptime_flag :'||l_inp_rec.calc_resptime_flag);
170: END IF;
171:
172: OKS_ENTITLEMENTS_PUB.GET_CONTRACTS( p_api_version => 1.0,
165: csi_gen_utility_pvt.put_line( 'getContracts');
166: csi_gen_utility_pvt.put_line('Dumping the values passed to OKS_ENTITLEMENTS_PUB.GET_CONTRACTS:');
167: csi_gen_utility_pvt.put_line('Instance_id :'||l_inp_rec.product_id);
168: csi_gen_utility_pvt.put_line('validate_flag :'||l_inp_rec.validate_flag);
169: csi_gen_utility_pvt.put_line('calc_resptime_flag :'||l_inp_rec.calc_resptime_flag);
170: END IF;
171:
172: OKS_ENTITLEMENTS_PUB.GET_CONTRACTS( p_api_version => 1.0,
173: p_init_msg_list => 'T',
585: l_inp_rec.validate_flag := l_flag;
586:
587: -- If debug_level = 1 then dump the procedure name
588: IF (l_debug_level > 0) THEN
589: csi_gen_utility_pvt.put_line( 'Get_Coverage_For_Prod_Sch');
590: END IF;
591:
592: /*-- Purging Temp Table before Further Operation bug 4736062-- */
593: OPEN c_search_oks_temp;
619: End IF;
620: */
621: -- If the debug level = 2 then dump all the output data.
622: IF (l_debug_level > 1) THEN
623: csi_gen_utility_pvt.put_line('OKS_ENTITLEMENTS_PUB.GET_CONTRACTS() call succeeds:');
624: csi_gen_utility_pvt.put_line('Dumping the values gotten from OKS_ENTITLEMENTS_PUB.GET_CONTRACTS():');
625: csi_gen_utility_pvt.put_line('l_ent_contracts.count :'||l_ent_contracts.count);
626: END IF;
627:
620: */
621: -- If the debug level = 2 then dump all the output data.
622: IF (l_debug_level > 1) THEN
623: csi_gen_utility_pvt.put_line('OKS_ENTITLEMENTS_PUB.GET_CONTRACTS() call succeeds:');
624: csi_gen_utility_pvt.put_line('Dumping the values gotten from OKS_ENTITLEMENTS_PUB.GET_CONTRACTS():');
625: csi_gen_utility_pvt.put_line('l_ent_contracts.count :'||l_ent_contracts.count);
626: END IF;
627:
628: l_rec_count := l_ent_contracts.FIRST;
621: -- If the debug level = 2 then dump all the output data.
622: IF (l_debug_level > 1) THEN
623: csi_gen_utility_pvt.put_line('OKS_ENTITLEMENTS_PUB.GET_CONTRACTS() call succeeds:');
624: csi_gen_utility_pvt.put_line('Dumping the values gotten from OKS_ENTITLEMENTS_PUB.GET_CONTRACTS():');
625: csi_gen_utility_pvt.put_line('l_ent_contracts.count :'||l_ent_contracts.count);
626: END IF;
627:
628: l_rec_count := l_ent_contracts.FIRST;
629:
767: l_inp_rec.validate_flag := l_flag;
768:
769: -- If debug_level = 1 then dump the procedure name
770: IF (l_debug_level > 0) THEN
771: csi_gen_utility_pvt.put_line( 'Get_Contract_Where_Clause');
772: END IF;
773:
774: -- If the debug level = 2 then dump all the parameters values.
775: IF (l_debug_level > 1) THEN
772: END IF;
773:
774: -- If the debug level = 2 then dump all the parameters values.
775: IF (l_debug_level > 1) THEN
776: csi_gen_utility_pvt.put_line( 'Get_Contract_Where_Clause');
777: csi_gen_utility_pvt.put_line('Dumping the values passed to OKS_ENTITLEMENTS_PUB.GET_CONTRACTS():');
778: csi_gen_utility_pvt.put_line('contract_number :'||l_inp_rec.contract_number);
779: csi_gen_utility_pvt.put_line('request_date :'||l_inp_rec.request_date);
780: csi_gen_utility_pvt.put_line('validate_flag :'||l_inp_rec.validate_flag);
773:
774: -- If the debug level = 2 then dump all the parameters values.
775: IF (l_debug_level > 1) THEN
776: csi_gen_utility_pvt.put_line( 'Get_Contract_Where_Clause');
777: csi_gen_utility_pvt.put_line('Dumping the values passed to OKS_ENTITLEMENTS_PUB.GET_CONTRACTS():');
778: csi_gen_utility_pvt.put_line('contract_number :'||l_inp_rec.contract_number);
779: csi_gen_utility_pvt.put_line('request_date :'||l_inp_rec.request_date);
780: csi_gen_utility_pvt.put_line('validate_flag :'||l_inp_rec.validate_flag);
781: END IF;
774: -- If the debug level = 2 then dump all the parameters values.
775: IF (l_debug_level > 1) THEN
776: csi_gen_utility_pvt.put_line( 'Get_Contract_Where_Clause');
777: csi_gen_utility_pvt.put_line('Dumping the values passed to OKS_ENTITLEMENTS_PUB.GET_CONTRACTS():');
778: csi_gen_utility_pvt.put_line('contract_number :'||l_inp_rec.contract_number);
779: csi_gen_utility_pvt.put_line('request_date :'||l_inp_rec.request_date);
780: csi_gen_utility_pvt.put_line('validate_flag :'||l_inp_rec.validate_flag);
781: END IF;
782:
775: IF (l_debug_level > 1) THEN
776: csi_gen_utility_pvt.put_line( 'Get_Contract_Where_Clause');
777: csi_gen_utility_pvt.put_line('Dumping the values passed to OKS_ENTITLEMENTS_PUB.GET_CONTRACTS():');
778: csi_gen_utility_pvt.put_line('contract_number :'||l_inp_rec.contract_number);
779: csi_gen_utility_pvt.put_line('request_date :'||l_inp_rec.request_date);
780: csi_gen_utility_pvt.put_line('validate_flag :'||l_inp_rec.validate_flag);
781: END IF;
782:
783:
776: csi_gen_utility_pvt.put_line( 'Get_Contract_Where_Clause');
777: csi_gen_utility_pvt.put_line('Dumping the values passed to OKS_ENTITLEMENTS_PUB.GET_CONTRACTS():');
778: csi_gen_utility_pvt.put_line('contract_number :'||l_inp_rec.contract_number);
779: csi_gen_utility_pvt.put_line('request_date :'||l_inp_rec.request_date);
780: csi_gen_utility_pvt.put_line('validate_flag :'||l_inp_rec.validate_flag);
781: END IF;
782:
783:
784: OKS_ENTITLEMENTS_PUB.GET_CONTRACTS( p_api_version => 1.0,
808: -- fnd_message.debug('l_rec_count = '||to_char(l_rec_count));
809:
810: -- If the debug level = 2 then dump all the output data.
811: IF (l_debug_level > 1) THEN
812: csi_gen_utility_pvt.put_line('OKS_ENTITLEMENTS_PUB.GET_CONTRACTS() call succeeds:');
813: csi_gen_utility_pvt.put_line('Dumping the values gotten from OKS_ENTITLEMENTS_PUB.GET_CONTRACTS():');
814: csi_gen_utility_pvt.put_line('l_ent_contracts.count :'||l_ent_contracts.count);
815: END IF;
816:
809:
810: -- If the debug level = 2 then dump all the output data.
811: IF (l_debug_level > 1) THEN
812: csi_gen_utility_pvt.put_line('OKS_ENTITLEMENTS_PUB.GET_CONTRACTS() call succeeds:');
813: csi_gen_utility_pvt.put_line('Dumping the values gotten from OKS_ENTITLEMENTS_PUB.GET_CONTRACTS():');
814: csi_gen_utility_pvt.put_line('l_ent_contracts.count :'||l_ent_contracts.count);
815: END IF;
816:
817: l_row_count := 1;
810: -- If the debug level = 2 then dump all the output data.
811: IF (l_debug_level > 1) THEN
812: csi_gen_utility_pvt.put_line('OKS_ENTITLEMENTS_PUB.GET_CONTRACTS() call succeeds:');
813: csi_gen_utility_pvt.put_line('Dumping the values gotten from OKS_ENTITLEMENTS_PUB.GET_CONTRACTS():');
814: csi_gen_utility_pvt.put_line('l_ent_contracts.count :'||l_ent_contracts.count);
815: END IF;
816:
817: l_row_count := 1;
818: l_rec_count := l_ent_contracts.FIRST;
828: l_coverage_level_id := l_ent_contracts(l_rec_count).coverage_level_id ;
829:
830: -- If the debug level = 2 then dump each output record.
831: IF (l_debug_level > 1) THEN
832: csi_gen_utility_pvt.put_line('---- Contract Record ' || l_rec_count || '----');
833: csi_gen_utility_pvt.put_line('l_covered_level_code :'||l_covered_level_code);
834: csi_gen_utility_pvt.put_line('l_coverage_level_id :'||to_char(l_coverage_level_id));
835: END IF;
836: -- fnd_message.debug('l_covered_level_code = '||l_ent_contracts(l_rec_count).coverage_level_code);
829:
830: -- If the debug level = 2 then dump each output record.
831: IF (l_debug_level > 1) THEN
832: csi_gen_utility_pvt.put_line('---- Contract Record ' || l_rec_count || '----');
833: csi_gen_utility_pvt.put_line('l_covered_level_code :'||l_covered_level_code);
834: csi_gen_utility_pvt.put_line('l_coverage_level_id :'||to_char(l_coverage_level_id));
835: END IF;
836: -- fnd_message.debug('l_covered_level_code = '||l_ent_contracts(l_rec_count).coverage_level_code);
837: -- fnd_message.debug('l_covered_level_id = '||l_ent_contracts(l_rec_count).coverage_level_id);
830: -- If the debug level = 2 then dump each output record.
831: IF (l_debug_level > 1) THEN
832: csi_gen_utility_pvt.put_line('---- Contract Record ' || l_rec_count || '----');
833: csi_gen_utility_pvt.put_line('l_covered_level_code :'||l_covered_level_code);
834: csi_gen_utility_pvt.put_line('l_coverage_level_id :'||to_char(l_coverage_level_id));
835: END IF;
836: -- fnd_message.debug('l_covered_level_code = '||l_ent_contracts(l_rec_count).coverage_level_code);
837: -- fnd_message.debug('l_covered_level_id = '||l_ent_contracts(l_rec_count).coverage_level_id);
838:
901: End LOOP;
902:
903: -- If the debug level = 2 then dump each output record.
904: IF (l_debug_level > 1) THEN
905: csi_gen_utility_pvt.put_line('l_covered_party_id :'||l_covered_party_id);
906: csi_gen_utility_pvt.put_line('l_covered_site_id :'||l_covered_site_id);
907: csi_gen_utility_pvt.put_line('l_covered_acct_id :'||l_covered_acct_id);
908: csi_gen_utility_pvt.put_line('l_covered_system_id :'||l_covered_system_id);
909: csi_gen_utility_pvt.put_line('l_covered_item_id :'||l_covered_item_id);
902:
903: -- If the debug level = 2 then dump each output record.
904: IF (l_debug_level > 1) THEN
905: csi_gen_utility_pvt.put_line('l_covered_party_id :'||l_covered_party_id);
906: csi_gen_utility_pvt.put_line('l_covered_site_id :'||l_covered_site_id);
907: csi_gen_utility_pvt.put_line('l_covered_acct_id :'||l_covered_acct_id);
908: csi_gen_utility_pvt.put_line('l_covered_system_id :'||l_covered_system_id);
909: csi_gen_utility_pvt.put_line('l_covered_item_id :'||l_covered_item_id);
910: END IF;
903: -- If the debug level = 2 then dump each output record.
904: IF (l_debug_level > 1) THEN
905: csi_gen_utility_pvt.put_line('l_covered_party_id :'||l_covered_party_id);
906: csi_gen_utility_pvt.put_line('l_covered_site_id :'||l_covered_site_id);
907: csi_gen_utility_pvt.put_line('l_covered_acct_id :'||l_covered_acct_id);
908: csi_gen_utility_pvt.put_line('l_covered_system_id :'||l_covered_system_id);
909: csi_gen_utility_pvt.put_line('l_covered_item_id :'||l_covered_item_id);
910: END IF;
911:
904: IF (l_debug_level > 1) THEN
905: csi_gen_utility_pvt.put_line('l_covered_party_id :'||l_covered_party_id);
906: csi_gen_utility_pvt.put_line('l_covered_site_id :'||l_covered_site_id);
907: csi_gen_utility_pvt.put_line('l_covered_acct_id :'||l_covered_acct_id);
908: csi_gen_utility_pvt.put_line('l_covered_system_id :'||l_covered_system_id);
909: csi_gen_utility_pvt.put_line('l_covered_item_id :'||l_covered_item_id);
910: END IF;
911:
912: l_instance_table_name := ' ' || instance_table_name;
905: csi_gen_utility_pvt.put_line('l_covered_party_id :'||l_covered_party_id);
906: csi_gen_utility_pvt.put_line('l_covered_site_id :'||l_covered_site_id);
907: csi_gen_utility_pvt.put_line('l_covered_acct_id :'||l_covered_acct_id);
908: csi_gen_utility_pvt.put_line('l_covered_system_id :'||l_covered_system_id);
909: csi_gen_utility_pvt.put_line('l_covered_item_id :'||l_covered_item_id);
910: END IF;
911:
912: l_instance_table_name := ' ' || instance_table_name;
913: IF (length(instance_table_name) > 0 ) THEN
1487: p_count => x_msg_count,
1488: p_data => x_msg_data
1489: );
1490: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1491: csi_gen_utility_pvt.put_line('ibe_cfg_config_pvt.Get_Config_Launch_Info: UNEXPECTED ERROR EXCEPTION ');
1492: ROLLBACK TO Get_Config_Launch_Info_Pvt;
1493: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1494: FND_MSG_PUB.Count_And_Get
1495: ( p_encoded => FND_API.G_FALSE,
1496: p_count => x_msg_count,
1497: p_data => x_msg_data
1498: );
1499: WHEN OTHERS THEN
1500: csi_gen_utility_pvt.put_line('ibe_cfg_config_pvt.Get_Config_Launch_Info: OTHER EXCEPTION ');
1501: ROLLBACK TO Get_Config_Launch_Info_Pvt;
1502: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1503: /*IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1504: THEN