[Home] [Help]
2220: l_api_version CONSTANT NUMBER := 1.0;
2221: l_init_msg_list CONSTANT VARCHAR2(1) := 'F';
2222:
2223: Cursor l_contract_update_date(p_chr_id IN NUMBER) is
2224: SELECT last_update_date from okc_k_headers_b
2225: WHERE id = p_chr_id;
2226:
2227:
2228: BEGIN
2333: FROM
2334: OKC_K_PARTY_ROLES_B okp
2335: ,OKC_K_LINES_B line
2336: ,OKS_K_LINES_B rline
2337: ,OKC_K_HEADERS_B Hdr
2338: ,OKS_K_HEADERS_B rul
2339: WHERE Hdr.id = p_hdr_id
2340: AND line.id = p_line_id
2341: AND rline.cle_id = line.id
2392: AND object1_id1 = to_char(p_chr_id);
2393:
2394:
2395: Cursor l_contract_update_date(p_chr_id IN NUMBER) is
2396: SELECT last_update_date from okc_k_headers_b
2397: WHERE id = p_chr_id;
2398:
2399:
2400:
3125: from okc_assents a
3126: where a.opn_code = 'INVOICE'
3127: and a.allowed_yn = 'Y'
3128: ) as1,
3129: okc_k_headers_b hdr,
3130: (
3131: Select /*+ FULL (osb) no_merge */ distinct code
3132: from okc_statuses_b osb
3133: where osb.ste_code <> 'HOLD'
3168: from okc_assents a
3169: where a.opn_code = 'INVOICE'
3170: and a.allowed_yn = 'Y'
3171: ) as1,
3172: okc_k_headers_b hdr,
3173: (
3174: Select /*+ FULL (osb) no_merge */ distinct code
3175: from okc_statuses_b osb
3176: where osb.ste_code <> 'HOLD'
3195:
3196: INSERT into oks_process_billing (chr_id,cle_id,line_no,currency_code)
3197:
3198: SELECT hdr.id hdr_id,line.id line_id,rownum,hdr.currency_code
3199: from okc_k_headers_b hdr, okc_k_lines_b line
3200: WHERE Hdr.id = line.dnz_chr_id
3201: AND Hdr.scs_code in ('SERVICE','WARRANTY','SUBSCRIPTION')
3202: AND Hdr.Template_yn = 'N'
3203: AND Hdr.id = p_contract_hdr_id
3241: from okc_assents a
3242: where a.opn_code = 'INVOICE'
3243: and a.allowed_yn = 'Y'
3244: ) as1,
3245: okc_k_headers_b hdr,
3246: (
3247: Select /*+ FULL (osb) no_merge */ distinct code
3248: from okc_statuses_b osb
3249: where osb.ste_code <> 'HOLD'
3274:
3275: INSERT into oks_process_billing (chr_id,cle_id,line_no,currency_code)
3276:
3277: SELECT hdr.id hdr_id,line.id line_id,rownum,hdr.currency_code
3278: from okc_k_headers_b hdr, okc_k_lines_b line
3279: WHERE Hdr.id = line.dnz_chr_id
3280: AND Hdr.scs_code in ('SERVICE','WARRANTY','SUBSCRIPTION')
3281: AND Hdr.Template_yn = 'N'
3282: AND Hdr.Authoring_Org_Id = nvl(l_org_id, hdr.authoring_org_id)
3492: SELECT bcl.cle_id bcl_cle_id,
3493: bsl.cle_id bsl_cle_id,
3494: abs(bsl.amount) bsl_amount,
3495: line.lse_id bcl_lse_id
3496: FROM okc_k_headers_b hdr,
3497: oks_bill_sub_lines bsl,
3498: oks_bill_cont_lines bcl,
3499: okc_k_lines_b line
3500: WHERE line.id = bcl.cle_id
3518: SELECT bcl.cle_id bcl_cle_id,
3519: bsl.cle_id bsl_cle_id,
3520: abs(bsl.amount) bsl_amount,
3521: line.lse_id bcl_lse_id
3522: FROM okc_k_headers_b hdr,
3523: oks_bill_sub_lines bsl,
3524: oks_bill_cont_lines bcl,
3525: okc_k_lines_b line
3526: WHERE line.id = bcl.cle_id
3542: SELECT bcl.cle_id bcl_cle_id,
3543: bsl.cle_id bsl_cle_id,
3544: abs(bsl.amount) bsl_amount,
3545: line.lse_id bcl_lse_id
3546: FROM okc_k_headers_b hdr,
3547: oks_bill_sub_lines bsl,
3548: oks_bill_cont_lines bcl,
3549: okc_k_lines_b line
3550: WHERE line.id = bcl.cle_id
3613: SET bcl.btn_id = NULL
3614: WHERE bcl.btn_id = -44
3615: AND bcl.bill_Action = 'TR'
3616: AND EXISTS
3617: (SELECT 1 from okc_k_headers_b hdr,
3618: okc_k_lines_b line
3619: WHERE line.id = bcl.cle_id
3620: AND hdr.id = line.dnz_chr_id
3621: AND hdr.id = p_contract_hdr_id
3656: SET bcl.btn_id = NULL
3657: WHERE bcl.btn_id = -44
3658: AND bcl.bill_Action = 'TR'
3659: AND EXISTS
3660: (SELECT 1 from okc_k_headers_b hdr,
3661: okc_k_lines_b line
3662: WHERE line.id = bcl.cle_id
3663: AND hdr.id = line.dnz_chr_id
3664: AND hdr.scs_code = nvl(p_category,hdr.scs_code)
3680: SET bcl.btn_id = NULL
3681: WHERE bcl.btn_id = -44
3682: AND bcl.bill_Action = 'TR'
3683: AND EXISTS
3684: (SELECT 1 from okc_k_headers_b hdr,
3685: okc_k_lines_b line
3686: WHERE line.id = bcl.cle_id
3687: AND hdr.id = line.dnz_chr_id
3688: AND hdr.id = nvl(p_contract_hdr_id,hdr.id)