DBA Data[Home] [Help]

APPS.OKI_LOAD_ENR_PVT dependencies on OKI_LOAD_ENR_PVT

Line 1: PACKAGE BODY oki_load_enr_pvt as

1: PACKAGE BODY oki_load_enr_pvt as
2: /* $Header: OKIRENRB.pls 115.9 2003/11/24 08:24:31 kbajaj ship $ */
3:
4: --------------------------------------------------------------------------------
5: -- Modification History

Line 149: , oki_load_enr_pvt.g_request_id

145: , p_salesrep_name
146: , p_scs_code
147: , p_base_lost_amount
148: , p_contract_count
149: , oki_load_enr_pvt.g_request_id
150: , oki_load_enr_pvt.g_program_application_id
151: , oki_load_enr_pvt.g_program_id
152: , oki_load_enr_pvt.g_program_update_date ) ;
153:

Line 150: , oki_load_enr_pvt.g_program_application_id

146: , p_scs_code
147: , p_base_lost_amount
148: , p_contract_count
149: , oki_load_enr_pvt.g_request_id
150: , oki_load_enr_pvt.g_program_application_id
151: , oki_load_enr_pvt.g_program_id
152: , oki_load_enr_pvt.g_program_update_date ) ;
153:
154:

Line 151: , oki_load_enr_pvt.g_program_id

147: , p_base_lost_amount
148: , p_contract_count
149: , oki_load_enr_pvt.g_request_id
150: , oki_load_enr_pvt.g_program_application_id
151: , oki_load_enr_pvt.g_program_id
152: , oki_load_enr_pvt.g_program_update_date ) ;
153:
154:
155: EXCEPTION

Line 152: , oki_load_enr_pvt.g_program_update_date ) ;

148: , p_contract_count
149: , oki_load_enr_pvt.g_request_id
150: , oki_load_enr_pvt.g_program_application_id
151: , oki_load_enr_pvt.g_program_id
152: , oki_load_enr_pvt.g_program_update_date ) ;
153:
154:
155: EXCEPTION
156: WHEN OTHERS THEN

Line 202: , request_id = oki_load_enr_pvt.g_request_id

198:
199: UPDATE oki_exp_not_renewed SET
200: base_lost_amount = p_base_lost_amount
201: , contract_count = p_contract_count
202: , request_id = oki_load_enr_pvt.g_request_id
203: , program_application_id = oki_load_enr_pvt.g_program_application_id
204: , program_id = oki_load_enr_pvt.g_program_id
205: , program_update_date = oki_load_enr_pvt.g_program_update_date
206: WHERE ROWID = p_enr_rowid ;

Line 203: , program_application_id = oki_load_enr_pvt.g_program_application_id

199: UPDATE oki_exp_not_renewed SET
200: base_lost_amount = p_base_lost_amount
201: , contract_count = p_contract_count
202: , request_id = oki_load_enr_pvt.g_request_id
203: , program_application_id = oki_load_enr_pvt.g_program_application_id
204: , program_id = oki_load_enr_pvt.g_program_id
205: , program_update_date = oki_load_enr_pvt.g_program_update_date
206: WHERE ROWID = p_enr_rowid ;
207:

Line 204: , program_id = oki_load_enr_pvt.g_program_id

200: base_lost_amount = p_base_lost_amount
201: , contract_count = p_contract_count
202: , request_id = oki_load_enr_pvt.g_request_id
203: , program_application_id = oki_load_enr_pvt.g_program_application_id
204: , program_id = oki_load_enr_pvt.g_program_id
205: , program_update_date = oki_load_enr_pvt.g_program_update_date
206: WHERE ROWID = p_enr_rowid ;
207:
208: EXCEPTION

Line 205: , program_update_date = oki_load_enr_pvt.g_program_update_date

201: , contract_count = p_contract_count
202: , request_id = oki_load_enr_pvt.g_request_id
203: , program_application_id = oki_load_enr_pvt.g_program_application_id
204: , program_id = oki_load_enr_pvt.g_program_id
205: , program_update_date = oki_load_enr_pvt.g_program_update_date
206: WHERE ROWID = p_enr_rowid ;
207:
208: EXCEPTION
209: WHEN OTHERS THEN

Line 220: , value => 'OKI_LOAD_ENR_PVT.UPD_EXP_NOT_RNW');

216: fnd_message.set_name( application => 'OKI'
217: , name => 'OKI_UNEXPECTED_FAILURE');
218:
219: fnd_message.set_token( token => 'OBJECT_NAME'
220: , value => 'OKI_LOAD_ENR_PVT.UPD_EXP_NOT_RNW');
221:
222: fnd_file.put_line( which => fnd_file.log
223: , buff => fnd_message.get);
224:

Line 359: OPEN oki_load_enr_pvt.g_enr_csr( rec_g_glpr_csr.period_set_name,

355: CLOSE l_exp_not_rnw_csr ;
356:
357: l_loc := 'Opening cursor to determine if insert or update should occur.' ;
358: -- Determine if the record is a new one or an existing one
359: OPEN oki_load_enr_pvt.g_enr_csr( rec_g_glpr_csr.period_set_name,
360: rec_g_glpr_csr.period_name,
361: rec_l_cust_id_csr.authoring_org_id,
362: rec_l_cust_id_csr.customer_id, l_contact_id,
363: rec_l_cust_id_csr.scs_code ) ;

Line 364: FETCH oki_load_enr_pvt.g_enr_csr into rec_g_enr_csr ;

360: rec_g_glpr_csr.period_name,
361: rec_l_cust_id_csr.authoring_org_id,
362: rec_l_cust_id_csr.customer_id, l_contact_id,
363: rec_l_cust_id_csr.scs_code ) ;
364: FETCH oki_load_enr_pvt.g_enr_csr into rec_g_enr_csr ;
365: IF oki_load_enr_pvt.g_enr_csr%NOTFOUND THEN
366: l_loc := 'Insert the new record.' ;
367: -- Insert the current period data for the period
368: oki_load_enr_pvt.ins_exp_not_rnw(

Line 365: IF oki_load_enr_pvt.g_enr_csr%NOTFOUND THEN

361: rec_l_cust_id_csr.authoring_org_id,
362: rec_l_cust_id_csr.customer_id, l_contact_id,
363: rec_l_cust_id_csr.scs_code ) ;
364: FETCH oki_load_enr_pvt.g_enr_csr into rec_g_enr_csr ;
365: IF oki_load_enr_pvt.g_enr_csr%NOTFOUND THEN
366: l_loc := 'Insert the new record.' ;
367: -- Insert the current period data for the period
368: oki_load_enr_pvt.ins_exp_not_rnw(
369: p_period_name => rec_g_glpr_csr.period_name

Line 368: oki_load_enr_pvt.ins_exp_not_rnw(

364: FETCH oki_load_enr_pvt.g_enr_csr into rec_g_enr_csr ;
365: IF oki_load_enr_pvt.g_enr_csr%NOTFOUND THEN
366: l_loc := 'Insert the new record.' ;
367: -- Insert the current period data for the period
368: oki_load_enr_pvt.ins_exp_not_rnw(
369: p_period_name => rec_g_glpr_csr.period_name
370: , p_period_set_name => rec_g_glpr_csr.period_set_name
371: , p_period_type => rec_g_glpr_csr.period_type
372: , p_authoring_org_id => rec_l_cust_id_csr.authoring_org_id

Line 385: RAISE oki_load_enr_pvt.g_excp_exit_immediate ;

381: , x_retcode => l_retcode ) ;
382:
383: IF l_retcode = '2' THEN
384: -- Load failed, exit immediately.
385: RAISE oki_load_enr_pvt.g_excp_exit_immediate ;
386: EXIT ;
387: END IF ;
388:
389: ELSE

Line 392: oki_load_enr_pvt.upd_exp_not_rnw(

388:
389: ELSE
390: l_loc := 'Update the existing record.' ;
391: -- Record already exists, so perform an update
392: oki_load_enr_pvt.upd_exp_not_rnw(
393: p_base_lost_amount => l_base_price_negotiated_amount
394: , p_contract_count => l_contract_count
395: , p_enr_rowid => rec_g_enr_csr.rowid
396: , x_retcode => l_retcode ) ;

Line 400: RAISE oki_load_enr_pvt.g_excp_exit_immediate ;

396: , x_retcode => l_retcode ) ;
397:
398: IF l_retcode = '2' THEN
399: -- Load failed, exit immediately.
400: RAISE oki_load_enr_pvt.g_excp_exit_immediate ;
401: END IF ;
402: END IF ;
403:
404: CLOSE oki_load_enr_pvt.g_enr_csr ;

Line 404: CLOSE oki_load_enr_pvt.g_enr_csr ;

400: RAISE oki_load_enr_pvt.g_excp_exit_immediate ;
401: END IF ;
402: END IF ;
403:
404: CLOSE oki_load_enr_pvt.g_enr_csr ;
405:
406: END LOOP g_glpr_csr_loop ;
407: END LOOP l_cust_id_csr_loop ;
408:

Line 410: WHEN oki_load_enr_pvt.g_excp_exit_immediate THEN

406: END LOOP g_glpr_csr_loop ;
407: END LOOP l_cust_id_csr_loop ;
408:
409: EXCEPTION
410: WHEN oki_load_enr_pvt.g_excp_exit_immediate THEN
411: -- Do not log an error ; It has already been logged.
412: -- Set return code to error
413: x_retcode := '2' ;
414:

Line 426: , value => 'OKI_LOAD_ENR_PVT.calc_enr_dtl1');

422: fnd_message.set_name( application => 'OKI'
423: , name => 'OKI_UNEXPECTED_FAILURE');
424:
425: fnd_message.set_token( token => 'OBJECT_NAME'
426: , value => 'OKI_LOAD_ENR_PVT.calc_enr_dtl1');
427:
428: fnd_file.put_line( which => fnd_file.log
429: , buff => fnd_message.get);
430:

Line 572: OPEN oki_load_enr_pvt.g_enr_csr( rec_g_glpr_csr.period_set_name,

568: CLOSE l_exp_not_rnw_csr ;
569:
570: l_loc := 'Opening cursor to determine if insert or update should occur.' ;
571: -- Determine if the record is a new one or an existing one
572: OPEN oki_load_enr_pvt.g_enr_csr( rec_g_glpr_csr.period_set_name,
573: rec_g_glpr_csr.period_name, oki_load_enr_pvt.g_all_org_id,
574: rec_l_cust_id_csr.customer_id, l_contact_id,
575: rec_l_cust_id_csr.scs_code ) ;
576: FETCH oki_load_enr_pvt.g_enr_csr into rec_g_enr_csr ;

Line 573: rec_g_glpr_csr.period_name, oki_load_enr_pvt.g_all_org_id,

569:
570: l_loc := 'Opening cursor to determine if insert or update should occur.' ;
571: -- Determine if the record is a new one or an existing one
572: OPEN oki_load_enr_pvt.g_enr_csr( rec_g_glpr_csr.period_set_name,
573: rec_g_glpr_csr.period_name, oki_load_enr_pvt.g_all_org_id,
574: rec_l_cust_id_csr.customer_id, l_contact_id,
575: rec_l_cust_id_csr.scs_code ) ;
576: FETCH oki_load_enr_pvt.g_enr_csr into rec_g_enr_csr ;
577: IF oki_load_enr_pvt.g_enr_csr%NOTFOUND THEN

Line 576: FETCH oki_load_enr_pvt.g_enr_csr into rec_g_enr_csr ;

572: OPEN oki_load_enr_pvt.g_enr_csr( rec_g_glpr_csr.period_set_name,
573: rec_g_glpr_csr.period_name, oki_load_enr_pvt.g_all_org_id,
574: rec_l_cust_id_csr.customer_id, l_contact_id,
575: rec_l_cust_id_csr.scs_code ) ;
576: FETCH oki_load_enr_pvt.g_enr_csr into rec_g_enr_csr ;
577: IF oki_load_enr_pvt.g_enr_csr%NOTFOUND THEN
578: l_loc := 'Insert the new record.' ;
579: -- Insert the current period data for the period
580: oki_load_enr_pvt.ins_exp_not_rnw(

Line 577: IF oki_load_enr_pvt.g_enr_csr%NOTFOUND THEN

573: rec_g_glpr_csr.period_name, oki_load_enr_pvt.g_all_org_id,
574: rec_l_cust_id_csr.customer_id, l_contact_id,
575: rec_l_cust_id_csr.scs_code ) ;
576: FETCH oki_load_enr_pvt.g_enr_csr into rec_g_enr_csr ;
577: IF oki_load_enr_pvt.g_enr_csr%NOTFOUND THEN
578: l_loc := 'Insert the new record.' ;
579: -- Insert the current period data for the period
580: oki_load_enr_pvt.ins_exp_not_rnw(
581: p_period_name => rec_g_glpr_csr.period_name

Line 580: oki_load_enr_pvt.ins_exp_not_rnw(

576: FETCH oki_load_enr_pvt.g_enr_csr into rec_g_enr_csr ;
577: IF oki_load_enr_pvt.g_enr_csr%NOTFOUND THEN
578: l_loc := 'Insert the new record.' ;
579: -- Insert the current period data for the period
580: oki_load_enr_pvt.ins_exp_not_rnw(
581: p_period_name => rec_g_glpr_csr.period_name
582: , p_period_set_name => rec_g_glpr_csr.period_set_name
583: , p_period_type => rec_g_glpr_csr.period_type
584: , p_authoring_org_id => oki_load_enr_pvt.g_all_org_id

Line 584: , p_authoring_org_id => oki_load_enr_pvt.g_all_org_id

580: oki_load_enr_pvt.ins_exp_not_rnw(
581: p_period_name => rec_g_glpr_csr.period_name
582: , p_period_set_name => rec_g_glpr_csr.period_set_name
583: , p_period_type => rec_g_glpr_csr.period_type
584: , p_authoring_org_id => oki_load_enr_pvt.g_all_org_id
585: , p_authoring_org_name => oki_load_enr_pvt.g_all_org_name
586: , p_customer_party_id => rec_l_cust_id_csr.customer_id
587: , p_customer_name => rec_l_cust_id_csr.customer_name
588: , p_contact_id => l_contact_id

Line 585: , p_authoring_org_name => oki_load_enr_pvt.g_all_org_name

581: p_period_name => rec_g_glpr_csr.period_name
582: , p_period_set_name => rec_g_glpr_csr.period_set_name
583: , p_period_type => rec_g_glpr_csr.period_type
584: , p_authoring_org_id => oki_load_enr_pvt.g_all_org_id
585: , p_authoring_org_name => oki_load_enr_pvt.g_all_org_name
586: , p_customer_party_id => rec_l_cust_id_csr.customer_id
587: , p_customer_name => rec_l_cust_id_csr.customer_name
588: , p_contact_id => l_contact_id
589: , p_salesrep_name => l_salesrep_name

Line 597: RAISE oki_load_enr_pvt.g_excp_exit_immediate ;

593: , x_retcode => l_retcode ) ;
594:
595: IF l_retcode = '2' THEN
596: -- Load failed, exit immediately.
597: RAISE oki_load_enr_pvt.g_excp_exit_immediate ;
598: EXIT ;
599: END IF ;
600:
601: ELSE

Line 604: oki_load_enr_pvt.upd_exp_not_rnw(

600:
601: ELSE
602: l_loc := 'Update the existing record.' ;
603: -- Record already exists, so perform an update
604: oki_load_enr_pvt.upd_exp_not_rnw(
605: p_base_lost_amount => l_base_price_negotiated_amount
606: , p_contract_count => l_contract_count
607: , p_enr_rowid => rec_g_enr_csr.rowid
608: , x_retcode => l_retcode ) ;

Line 612: RAISE oki_load_enr_pvt.g_excp_exit_immediate ;

608: , x_retcode => l_retcode ) ;
609:
610: IF l_retcode = '2' THEN
611: -- Load failed, exit immediately.
612: RAISE oki_load_enr_pvt.g_excp_exit_immediate ;
613: END IF ;
614: END IF ;
615:
616: CLOSE oki_load_enr_pvt.g_enr_csr ;

Line 616: CLOSE oki_load_enr_pvt.g_enr_csr ;

612: RAISE oki_load_enr_pvt.g_excp_exit_immediate ;
613: END IF ;
614: END IF ;
615:
616: CLOSE oki_load_enr_pvt.g_enr_csr ;
617:
618: END LOOP g_glpr_csr_loop ;
619: END LOOP l_cust_id_csr_loop ;
620:

Line 622: WHEN oki_load_enr_pvt.g_excp_exit_immediate THEN

618: END LOOP g_glpr_csr_loop ;
619: END LOOP l_cust_id_csr_loop ;
620:
621: EXCEPTION
622: WHEN oki_load_enr_pvt.g_excp_exit_immediate THEN
623: -- Do not log an error ; It has already been logged.
624: -- Set return code to error
625: x_retcode := '2' ;
626:

Line 638: , value => 'OKI_LOAD_ENR_PVT.CALC_ENR_DTL2');

634: fnd_message.set_name( application => 'OKI'
635: , name => 'OKI_UNEXPECTED_FAILURE');
636:
637: fnd_message.set_token( token => 'OBJECT_NAME'
638: , value => 'OKI_LOAD_ENR_PVT.CALC_ENR_DTL2');
639:
640: fnd_file.put_line( which => fnd_file.log
641: , buff => fnd_message.get);
642:

Line 774: OPEN oki_load_enr_pvt.g_enr_csr( rec_g_glpr_csr.period_set_name,

770: CLOSE l_exp_not_rnw_csr ;
771:
772: l_loc := 'Opening cursor to determine if insert or update should occur.' ;
773: -- Determine if the record is a new one or an existing one
774: OPEN oki_load_enr_pvt.g_enr_csr( rec_g_glpr_csr.period_set_name,
775: rec_g_glpr_csr.period_name, oki_load_enr_pvt.g_all_org_id,
776: rec_l_cust_id_csr.customer_id,
777: oki_load_enr_pvt.g_all_contact_id,
778: oki_load_enr_pvt.g_all_scs_code ) ;

Line 775: rec_g_glpr_csr.period_name, oki_load_enr_pvt.g_all_org_id,

771:
772: l_loc := 'Opening cursor to determine if insert or update should occur.' ;
773: -- Determine if the record is a new one or an existing one
774: OPEN oki_load_enr_pvt.g_enr_csr( rec_g_glpr_csr.period_set_name,
775: rec_g_glpr_csr.period_name, oki_load_enr_pvt.g_all_org_id,
776: rec_l_cust_id_csr.customer_id,
777: oki_load_enr_pvt.g_all_contact_id,
778: oki_load_enr_pvt.g_all_scs_code ) ;
779: FETCH oki_load_enr_pvt.g_enr_csr into rec_g_enr_csr ;

Line 777: oki_load_enr_pvt.g_all_contact_id,

773: -- Determine if the record is a new one or an existing one
774: OPEN oki_load_enr_pvt.g_enr_csr( rec_g_glpr_csr.period_set_name,
775: rec_g_glpr_csr.period_name, oki_load_enr_pvt.g_all_org_id,
776: rec_l_cust_id_csr.customer_id,
777: oki_load_enr_pvt.g_all_contact_id,
778: oki_load_enr_pvt.g_all_scs_code ) ;
779: FETCH oki_load_enr_pvt.g_enr_csr into rec_g_enr_csr ;
780: IF oki_load_enr_pvt.g_enr_csr%NOTFOUND THEN
781: l_loc := 'Insert the new record.' ;

Line 778: oki_load_enr_pvt.g_all_scs_code ) ;

774: OPEN oki_load_enr_pvt.g_enr_csr( rec_g_glpr_csr.period_set_name,
775: rec_g_glpr_csr.period_name, oki_load_enr_pvt.g_all_org_id,
776: rec_l_cust_id_csr.customer_id,
777: oki_load_enr_pvt.g_all_contact_id,
778: oki_load_enr_pvt.g_all_scs_code ) ;
779: FETCH oki_load_enr_pvt.g_enr_csr into rec_g_enr_csr ;
780: IF oki_load_enr_pvt.g_enr_csr%NOTFOUND THEN
781: l_loc := 'Insert the new record.' ;
782: -- Insert the current period data for the period

Line 779: FETCH oki_load_enr_pvt.g_enr_csr into rec_g_enr_csr ;

775: rec_g_glpr_csr.period_name, oki_load_enr_pvt.g_all_org_id,
776: rec_l_cust_id_csr.customer_id,
777: oki_load_enr_pvt.g_all_contact_id,
778: oki_load_enr_pvt.g_all_scs_code ) ;
779: FETCH oki_load_enr_pvt.g_enr_csr into rec_g_enr_csr ;
780: IF oki_load_enr_pvt.g_enr_csr%NOTFOUND THEN
781: l_loc := 'Insert the new record.' ;
782: -- Insert the current period data for the period
783: oki_load_enr_pvt.ins_exp_not_rnw(

Line 780: IF oki_load_enr_pvt.g_enr_csr%NOTFOUND THEN

776: rec_l_cust_id_csr.customer_id,
777: oki_load_enr_pvt.g_all_contact_id,
778: oki_load_enr_pvt.g_all_scs_code ) ;
779: FETCH oki_load_enr_pvt.g_enr_csr into rec_g_enr_csr ;
780: IF oki_load_enr_pvt.g_enr_csr%NOTFOUND THEN
781: l_loc := 'Insert the new record.' ;
782: -- Insert the current period data for the period
783: oki_load_enr_pvt.ins_exp_not_rnw(
784: p_period_name => rec_g_glpr_csr.period_name

Line 783: oki_load_enr_pvt.ins_exp_not_rnw(

779: FETCH oki_load_enr_pvt.g_enr_csr into rec_g_enr_csr ;
780: IF oki_load_enr_pvt.g_enr_csr%NOTFOUND THEN
781: l_loc := 'Insert the new record.' ;
782: -- Insert the current period data for the period
783: oki_load_enr_pvt.ins_exp_not_rnw(
784: p_period_name => rec_g_glpr_csr.period_name
785: , p_period_set_name => rec_g_glpr_csr.period_set_name
786: , p_period_type => rec_g_glpr_csr.period_type
787: , p_authoring_org_id => oki_load_enr_pvt.g_all_org_id

Line 787: , p_authoring_org_id => oki_load_enr_pvt.g_all_org_id

783: oki_load_enr_pvt.ins_exp_not_rnw(
784: p_period_name => rec_g_glpr_csr.period_name
785: , p_period_set_name => rec_g_glpr_csr.period_set_name
786: , p_period_type => rec_g_glpr_csr.period_type
787: , p_authoring_org_id => oki_load_enr_pvt.g_all_org_id
788: , p_authoring_org_name => oki_load_enr_pvt.g_all_org_name
789: , p_customer_party_id => rec_l_cust_id_csr.customer_id
790: , p_customer_name => rec_l_cust_id_csr.customer_name
791: , p_contact_id => oki_load_enr_pvt.g_all_contact_id

Line 788: , p_authoring_org_name => oki_load_enr_pvt.g_all_org_name

784: p_period_name => rec_g_glpr_csr.period_name
785: , p_period_set_name => rec_g_glpr_csr.period_set_name
786: , p_period_type => rec_g_glpr_csr.period_type
787: , p_authoring_org_id => oki_load_enr_pvt.g_all_org_id
788: , p_authoring_org_name => oki_load_enr_pvt.g_all_org_name
789: , p_customer_party_id => rec_l_cust_id_csr.customer_id
790: , p_customer_name => rec_l_cust_id_csr.customer_name
791: , p_contact_id => oki_load_enr_pvt.g_all_contact_id
792: , p_salesrep_name => oki_load_enr_pvt.g_all_contact_name

Line 791: , p_contact_id => oki_load_enr_pvt.g_all_contact_id

787: , p_authoring_org_id => oki_load_enr_pvt.g_all_org_id
788: , p_authoring_org_name => oki_load_enr_pvt.g_all_org_name
789: , p_customer_party_id => rec_l_cust_id_csr.customer_id
790: , p_customer_name => rec_l_cust_id_csr.customer_name
791: , p_contact_id => oki_load_enr_pvt.g_all_contact_id
792: , p_salesrep_name => oki_load_enr_pvt.g_all_contact_name
793: , p_scs_code => oki_load_enr_pvt.g_all_scs_code
794: , p_base_lost_amount => l_base_price_negotiated_amount
795: , p_contract_count => l_contract_count

Line 792: , p_salesrep_name => oki_load_enr_pvt.g_all_contact_name

788: , p_authoring_org_name => oki_load_enr_pvt.g_all_org_name
789: , p_customer_party_id => rec_l_cust_id_csr.customer_id
790: , p_customer_name => rec_l_cust_id_csr.customer_name
791: , p_contact_id => oki_load_enr_pvt.g_all_contact_id
792: , p_salesrep_name => oki_load_enr_pvt.g_all_contact_name
793: , p_scs_code => oki_load_enr_pvt.g_all_scs_code
794: , p_base_lost_amount => l_base_price_negotiated_amount
795: , p_contract_count => l_contract_count
796: , x_retcode => l_retcode ) ;

Line 793: , p_scs_code => oki_load_enr_pvt.g_all_scs_code

789: , p_customer_party_id => rec_l_cust_id_csr.customer_id
790: , p_customer_name => rec_l_cust_id_csr.customer_name
791: , p_contact_id => oki_load_enr_pvt.g_all_contact_id
792: , p_salesrep_name => oki_load_enr_pvt.g_all_contact_name
793: , p_scs_code => oki_load_enr_pvt.g_all_scs_code
794: , p_base_lost_amount => l_base_price_negotiated_amount
795: , p_contract_count => l_contract_count
796: , x_retcode => l_retcode ) ;
797:

Line 800: RAISE oki_load_enr_pvt.g_excp_exit_immediate ;

796: , x_retcode => l_retcode ) ;
797:
798: IF l_retcode = '2' THEN
799: -- Load failed, exit immediately.
800: RAISE oki_load_enr_pvt.g_excp_exit_immediate ;
801: EXIT ;
802: END IF ;
803:
804: ELSE

Line 807: oki_load_enr_pvt.upd_exp_not_rnw(

803:
804: ELSE
805: l_loc := 'Update the existing record.' ;
806: -- Record already exists, so perform an update
807: oki_load_enr_pvt.upd_exp_not_rnw(
808: p_base_lost_amount => l_base_price_negotiated_amount
809: , p_contract_count => l_contract_count
810: , p_enr_rowid => rec_g_enr_csr.rowid
811: , x_retcode => l_retcode ) ;

Line 815: RAISE oki_load_enr_pvt.g_excp_exit_immediate ;

811: , x_retcode => l_retcode ) ;
812:
813: IF l_retcode = '2' THEN
814: -- Load failed, exit immediately.
815: RAISE oki_load_enr_pvt.g_excp_exit_immediate ;
816: END IF ;
817: END IF ;
818:
819: CLOSE oki_load_enr_pvt.g_enr_csr ;

Line 819: CLOSE oki_load_enr_pvt.g_enr_csr ;

815: RAISE oki_load_enr_pvt.g_excp_exit_immediate ;
816: END IF ;
817: END IF ;
818:
819: CLOSE oki_load_enr_pvt.g_enr_csr ;
820:
821: END LOOP g_glpr_csr_loop ;
822: END LOOP l_cust_id_csr_loop ;
823:

Line 825: WHEN oki_load_enr_pvt.g_excp_exit_immediate THEN

821: END LOOP g_glpr_csr_loop ;
822: END LOOP l_cust_id_csr_loop ;
823:
824: EXCEPTION
825: WHEN oki_load_enr_pvt.g_excp_exit_immediate THEN
826: -- Do not log an error ; It has already been logged.
827: -- Set return code to error
828: x_retcode := '2' ;
829:

Line 841: , value => 'OKI_LOAD_ENR_PVT.CALC_ENR_SUM');

837: fnd_message.set_name( application => 'OKI'
838: , name => 'OKI_UNEXPECTED_FAILURE');
839:
840: fnd_message.set_token( token => 'OBJECT_NAME'
841: , value => 'OKI_LOAD_ENR_PVT.CALC_ENR_SUM');
842:
843: fnd_file.put_line( which => fnd_file.log
844: , buff => fnd_message.get);
845:

Line 899: SAVEPOINT oki_load_enr_pvt_crt_exp_unrnw ;

895:
896:
897: BEGIN
898:
899: SAVEPOINT oki_load_enr_pvt_crt_exp_unrnw ;
900:
901: -- initialize return code to success
902: l_retcode := '0' ;
903: x_retcode := '0' ;

Line 906: oki_load_enr_pvt.calc_enr_dtl1(

902: l_retcode := '0' ;
903: x_retcode := '0' ;
904:
905: -- Procedure to calculate the counts and amounts for each dimension
906: oki_load_enr_pvt.calc_enr_dtl1(
907: p_period_set_name => p_period_set_name
908: , p_period_type => p_period_type
909: , p_summary_build_date => p_summary_build_date
910: , x_retcode => l_retcode ) ;

Line 914: RAISE oki_load_enr_pvt.g_excp_exit_immediate ;

910: , x_retcode => l_retcode ) ;
911:
912: IF l_retcode = '2' THEN
913: -- Load failed, exit immediately.
914: RAISE oki_load_enr_pvt.g_excp_exit_immediate ;
915: END IF ;
916:
917: -- Procedure to calculate the counts and amounts across organizations
918: oki_load_enr_pvt.calc_enr_dtl2(

Line 918: oki_load_enr_pvt.calc_enr_dtl2(

914: RAISE oki_load_enr_pvt.g_excp_exit_immediate ;
915: END IF ;
916:
917: -- Procedure to calculate the counts and amounts across organizations
918: oki_load_enr_pvt.calc_enr_dtl2(
919: p_period_set_name => p_period_set_name
920: , p_period_type => p_period_type
921: , p_summary_build_date => p_summary_build_date
922: , x_retcode => l_retcode ) ;

Line 926: RAISE oki_load_enr_pvt.g_excp_exit_immediate ;

922: , x_retcode => l_retcode ) ;
923:
924: IF l_retcode = '2' THEN
925: -- Load failed, exit immediately.
926: RAISE oki_load_enr_pvt.g_excp_exit_immediate ;
927: END IF ;
928:
929: -- Procedure to calculate the counts and amounts across organizations,
930: -- subclasses and sales reps

Line 931: oki_load_enr_pvt.calc_enr_sum(

927: END IF ;
928:
929: -- Procedure to calculate the counts and amounts across organizations,
930: -- subclasses and sales reps
931: oki_load_enr_pvt.calc_enr_sum(
932: p_period_set_name => p_period_set_name
933: , p_period_type => p_period_type
934: , p_summary_build_date => p_summary_build_date
935: , x_retcode => l_retcode ) ;

Line 939: RAISE oki_load_enr_pvt.g_excp_exit_immediate ;

935: , x_retcode => l_retcode ) ;
936:
937: IF l_retcode = '2' THEN
938: -- Load failed, exit immediately.
939: RAISE oki_load_enr_pvt.g_excp_exit_immediate ;
940: END IF ;
941:
942: COMMIT ;
943:

Line 944: SAVEPOINT oki_load_enr_pvt_upd_refresh ;

940: END IF ;
941:
942: COMMIT ;
943:
944: SAVEPOINT oki_load_enr_pvt_upd_refresh ;
945:
946: -- Table loaded successfully. Log message in concurrent manager
947: -- log indicating successful load.
948: fnd_message.set_name( application => 'OKI'

Line 973: ROLLBACK to oki_load_enr_pvt_upd_refresh ;

969: -- Do not log error; It has already been logged by the refreshs
970: -- program
971: x_retcode := l_retcode ;
972:
973: ROLLBACK to oki_load_enr_pvt_upd_refresh ;
974:
975: WHEN oki_load_enr_pvt.g_excp_exit_immediate THEN
976: -- Do not log an error ; It has already been logged.
977: -- Set return code to error

Line 975: WHEN oki_load_enr_pvt.g_excp_exit_immediate THEN

971: x_retcode := l_retcode ;
972:
973: ROLLBACK to oki_load_enr_pvt_upd_refresh ;
974:
975: WHEN oki_load_enr_pvt.g_excp_exit_immediate THEN
976: -- Do not log an error ; It has already been logged.
977: -- Set return code to error
978: x_retcode := '2' ;
979:

Line 980: ROLLBACK TO oki_load_enr_pvt_crt_exp_unrnw ;

976: -- Do not log an error ; It has already been logged.
977: -- Set return code to error
978: x_retcode := '2' ;
979:
980: ROLLBACK TO oki_load_enr_pvt_crt_exp_unrnw ;
981:
982: WHEN OTHERS THEN
983:
984: l_sqlcode := sqlcode ;

Line 991: ROLLBACK to oki_load_enr_pvt_crt_exp_unrnw ;

987: -- Set return code to error
988: x_retcode := '2' ;
989:
990: -- rollback all transactions
991: ROLLBACK to oki_load_enr_pvt_crt_exp_unrnw ;
992:
993:
994: fnd_message.set_name( application => 'OKI'
995: , name => 'OKI_UNEXPECTED_FAILURE');

Line 998: , value => 'OKI_LOAD_ENR_PVT.CRT_EXP_NOT_RNW');

994: fnd_message.set_name( application => 'OKI'
995: , name => 'OKI_UNEXPECTED_FAILURE');
996:
997: fnd_message.set_token( token => 'OBJECT_NAME'
998: , value => 'OKI_LOAD_ENR_PVT.CRT_EXP_NOT_RNW');
999:
1000: fnd_file.put_line( which => fnd_file.log
1001: , buff => fnd_message.get);
1002:

Line 1017: END oki_load_enr_pvt ;

1013: g_program_application_id := fnd_global.prog_appl_id ;
1014: g_program_id := fnd_global.conc_program_id ;
1015: g_program_update_date := SYSDATE ;
1016:
1017: END oki_load_enr_pvt ;