[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: ------------------------------------------------------------------------------------
979: mo_global.get_current_org_id() INTO l_tapv_rec.REQUEST_ID,
980: l_tapv_rec.PROGRAM_APPLICATION_ID,
981: l_tapv_rec.PROGRAM_ID,
982: l_tapv_rec.PROGRAM_UPDATE_DATE,
983: l_tapv_rec.ORG_ID FROM dual;
984: l_tapv_rec.legal_entity_id := OKL_LEGAL_ENTITY_UTIL.get_khr_le_id(p_khr_id => p_khr_id);
985:
986: --------------
987:
1005: mo_global.get_current_org_id() INTO l_tplv_rec.REQUEST_ID,
1006: l_tplv_rec.PROGRAM_APPLICATION_ID,
1007: l_tplv_rec.PROGRAM_ID,
1008: l_tplv_rec.PROGRAM_UPDATE_DATE,
1009: l_tplv_rec.ORG_ID FROM dual;
1010:
1011:
1012: ------------------------------------------------------------------------------------
1013: /* 22-JAN-2007 ANSETHUR BUILD: R12 B DISBURSEMENT Start changes */
2852: IF(( l_total_num_months_paid IS NULL) OR (l_total_num_months_paid = OKC_API.G_MISS_NUM )) THEN --[1]
2853: l_total_num_months_paid := 0 ;
2854: END IF ;
2855: -- check to see if the cancellation date is between the start and end date of the policy
2856: --SELECT 'X' INTO l_vld_cncl_dt FROM DUAL
2857: --WHERE l_ipyv_rec.cancellation_date BETWEEN l_ipyv_rec.date_from AND l_ipyv_rec.date_to;
2858: --Check rebook date between start and end date of policy
2859: --IF l_vld_cncl_dt = 'X' THEN --[1.2]
2860: -- gboomina Bug 4994786 Changed - start
3057: l_total_lessor_premium := l_lessor_premium / 12;
3058: END IF;
3059:
3060: -- Check if the cancellation date is in between start and end date
3061: --SELECT 'X' INTO l_vld_cncl_dt FROM DUAL
3062: --WHERE l_ipyv_rec.cancellation_date BETWEEN l_ipyv_rec.date_from AND l_ipyv_rec.date_to;
3063: --IF l_vld_cncl_dt = 'X' THEN --[3]
3064: -- gboomina Bug 4994786 Changed - start
3065: -- Instead of implicit cusor, used IF condition check
3384: l_salesP_rec salesP_csr%ROWTYPE;
3385:
3386: Cursor fnd_pro_csr IS
3387: select mo_global.get_current_org_id() l_fnd_profile
3388: from dual;
3389: fnd_pro_rec fnd_pro_csr%ROWTYPE;
3390: counter NUMBER;
3391:
3392: -- bug 9191475 .. start
3993: l_salesP_rec salesP_csr%ROWTYPE;
3994:
3995: Cursor fnd_pro_csr IS
3996: select mo_global.get_current_org_id() l_fnd_profile
3997: from dual;
3998: fnd_pro_rec fnd_pro_csr%ROWTYPE;
3999: counter NUMBER;
4000: --smoduga..Bug 4493213 fix..08-aug-2005..end
4001:
5500: END IF;
5501: --+++++ EFF DATED TERM END+++++++++------
5502: --** SAVE quote **--
5503: -- check to see if the cancellation date is between the start and end date of the policy -- Bug 4056603
5504: --SELECT 'X' INTO l_vld_cncl_dt FROM DUAL
5505: --WHERE p_cancellation_date BETWEEN lx_ipyv_rec.date_from AND lx_ipyv_rec.date_to;
5506: --IF l_vld_cncl_dt = 'X' then
5507: -- gboomina Bug 4994786 Changed - start
5508: -- Instead of implicit cusor, used IF condition check
6023: l_salesP_rec salesP_csr%ROWTYPE;
6024:
6025: Cursor fnd_pro_csr IS
6026: select mo_global.get_current_org_id() l_fnd_profile
6027: from dual;
6028: fnd_pro_rec fnd_pro_csr%ROWTYPE;
6029:
6030: -- smoduga added for 3845998
6031: -- Cursor to get the maximum billed date for insurance recievables