[Home] [Help]
632: mo_global.get_current_org_id() INTO l_tapv_rec.REQUEST_ID,
633: l_tapv_rec.PROGRAM_APPLICATION_ID,
634: l_tapv_rec.PROGRAM_ID,
635: l_tapv_rec.PROGRAM_UPDATE_DATE,
636: l_tapv_rec.ORG_ID FROM dual;
637: l_tapv_rec.legal_entity_id := OKL_LEGAL_ENTITY_UTIL.get_khr_le_id(p_khr_id => p_khr_id);
638:
639:
640:
661: mo_global.get_current_org_id() INTO l_tplv_rec.REQUEST_ID,
662: l_tplv_rec.PROGRAM_APPLICATION_ID,
663: l_tplv_rec.PROGRAM_ID,
664: l_tplv_rec.PROGRAM_UPDATE_DATE,
665: l_tplv_rec.ORG_ID FROM dual;
666:
667:
668:
669: ------------------------------------------------------------------------------------
960: mo_global.get_current_org_id() INTO l_tapv_rec.REQUEST_ID,
961: l_tapv_rec.PROGRAM_APPLICATION_ID,
962: l_tapv_rec.PROGRAM_ID,
963: l_tapv_rec.PROGRAM_UPDATE_DATE,
964: l_tapv_rec.ORG_ID FROM dual;
965: l_tapv_rec.legal_entity_id := OKL_LEGAL_ENTITY_UTIL.get_khr_le_id(p_khr_id => p_khr_id);
966:
967: --------------
968:
986: mo_global.get_current_org_id() INTO l_tplv_rec.REQUEST_ID,
987: l_tplv_rec.PROGRAM_APPLICATION_ID,
988: l_tplv_rec.PROGRAM_ID,
989: l_tplv_rec.PROGRAM_UPDATE_DATE,
990: l_tplv_rec.ORG_ID FROM dual;
991:
992:
993: ------------------------------------------------------------------------------------
994: /* 22-JAN-2007 ANSETHUR BUILD: R12 B DISBURSEMENT Start changes */
2833: IF(( l_total_num_months_paid IS NULL) OR (l_total_num_months_paid = OKC_API.G_MISS_NUM )) THEN --[1]
2834: l_total_num_months_paid := 0 ;
2835: END IF ;
2836: -- check to see if the cancellation date is between the start and end date of the policy
2837: --SELECT 'X' INTO l_vld_cncl_dt FROM DUAL
2838: --WHERE l_ipyv_rec.cancellation_date BETWEEN l_ipyv_rec.date_from AND l_ipyv_rec.date_to;
2839: --Check rebook date between start and end date of policy
2840: --IF l_vld_cncl_dt = 'X' THEN --[1.2]
2841: -- gboomina Bug 4994786 Changed - start
3038: l_total_lessor_premium := l_lessor_premium / 12;
3039: END IF;
3040:
3041: -- Check if the cancellation date is in between start and end date
3042: --SELECT 'X' INTO l_vld_cncl_dt FROM DUAL
3043: --WHERE l_ipyv_rec.cancellation_date BETWEEN l_ipyv_rec.date_from AND l_ipyv_rec.date_to;
3044: --IF l_vld_cncl_dt = 'X' THEN --[3]
3045: -- gboomina Bug 4994786 Changed - start
3046: -- Instead of implicit cusor, used IF condition check
3365: l_salesP_rec salesP_csr%ROWTYPE;
3366:
3367: Cursor fnd_pro_csr IS
3368: select mo_global.get_current_org_id() l_fnd_profile
3369: from dual;
3370: fnd_pro_rec fnd_pro_csr%ROWTYPE;
3371: counter NUMBER;
3372:
3373:
3968: l_salesP_rec salesP_csr%ROWTYPE;
3969:
3970: Cursor fnd_pro_csr IS
3971: select mo_global.get_current_org_id() l_fnd_profile
3972: from dual;
3973: fnd_pro_rec fnd_pro_csr%ROWTYPE;
3974: counter NUMBER;
3975: --smoduga..Bug 4493213 fix..08-aug-2005..end
3976:
5507: END IF;
5508: --+++++ EFF DATED TERM END+++++++++------
5509: --** SAVE quote **--
5510: -- check to see if the cancellation date is between the start and end date of the policy -- Bug 4056603
5511: --SELECT 'X' INTO l_vld_cncl_dt FROM DUAL
5512: --WHERE p_cancellation_date BETWEEN lx_ipyv_rec.date_from AND lx_ipyv_rec.date_to;
5513: --IF l_vld_cncl_dt = 'X' then
5514: -- gboomina Bug 4994786 Changed - start
5515: -- Instead of implicit cusor, used IF condition check
6030: l_salesP_rec salesP_csr%ROWTYPE;
6031:
6032: Cursor fnd_pro_csr IS
6033: select mo_global.get_current_org_id() l_fnd_profile
6034: from dual;
6035: fnd_pro_rec fnd_pro_csr%ROWTYPE;
6036:
6037: -- smoduga added for 3845998
6038: -- Cursor to get the maximum billed date for insurance recievables