25: --| OKC_K_VERS_NUMBERS | X | | X | | | |
26: --+---------------------------------+---+---+---+---+---+----------------------+
27: --| FND_ATTACHED_DOCUMENTS | | | | | |X |
28: --+---------------------------------+---+---+---+---+---+----------------------+
29: --| okc_k_headers_all_b | X | | X | | | |
30: --+---------------------------------+---+---+---+---+---+----------------------+
31: --| JTF_NOTES_PUB | | | | | |X |
32: --+---------------------------------+---+---+---+---+---+----------------------+
33: --| JTF_NOTES_VL | X | | | | | |
1078:
1079: CURSOR l_chr_csr
1080: IS
1081: SELECT application_id
1082: FROM okc_k_headers_all_b
1083: WHERE ID = p_chr_id;
1084: BEGIN
1085: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
1086: THEN
1418:
1419: CURSOR l_chr_csr2
1420: IS
1421: SELECT 'x'
1422: FROM okc_k_headers_all_b
1423: WHERE contract_number = p_contract_number
1424: AND contract_number_modifier = p_contract_number_modifier;
1425:
1426: l_found BOOLEAN := FALSE;
1857: kh.contract_number contract_number,
1858: kh.contract_number_modifier,
1859: get_modifier(temp.contract_id),
1860: (SELECT okc_p_util.raw_to_number (SYS_GUID ())
1861: FROM okc_k_headers_all_b where id = contract_id ) oks_id,
1862: ks.price_uom
1863:
1864: FROM okc_k_headers_all_b kh,
1865: oks_k_headers_b ks,
1860: (SELECT okc_p_util.raw_to_number (SYS_GUID ())
1861: FROM okc_k_headers_all_b where id = contract_id ) oks_id,
1862: ks.price_uom
1863:
1864: FROM okc_k_headers_all_b kh,
1865: oks_k_headers_b ks,
1866: oks_instance_k_dtls_temp temp,
1867: okc_statuses_b st,
1868: okc_governances gov
3284: okc_k_lines_b kl,
3285: okc_k_items itm,
3286: oks_k_lines_v ks,
3287: okc_statuses_b st,
3288: okc_k_headers_all_b kh
3289: WHERE temp.topline_id = kl.ID
3290: AND temp.new_serviceline_id IS NOT NULL
3291: AND itm.cle_id = kl.ID
3292: AND itm.jtot_object1_code IN ('OKX_WARRANTY', 'OKX_SERVICE')
4511: ,Kh.qcl_id
4512: ,oKh.start_date
4513: ,ks.period_start
4514: From OKs_instance_k_dtls_temp temp
4515: , Okc_k_headers_all_b Kh
4516: , Okc_k_headers_all_b OKH
4517: , Okc_statuses_b St
4518: , Okc_statuses_b OSt
4519: , Okc_k_lines_b Kl
4512: ,oKh.start_date
4513: ,ks.period_start
4514: From OKs_instance_k_dtls_temp temp
4515: , Okc_k_headers_all_b Kh
4516: , Okc_k_headers_all_b OKH
4517: , Okc_statuses_b St
4518: , Okc_statuses_b OSt
4519: , Okc_k_lines_b Kl
4520: , Oks_k_headers_b Ks
5088: l_ste_code,
5089: l_sts_code
5090: );
5091:
5092: UPDATE okc_k_headers_all_b
5093: SET sts_code = l_sts_code,
5094: date_approved = NULL,
5095: date_signed = NULL
5096: WHERE ID = qa_contract_id ;
5920: , kh.inv_organization_id
5921: , St.ste_code
5922: , Kh.start_date
5923: From OKs_instance_k_dtls_temp temp
5924: , Okc_k_headers_all_b Kh
5925: , Okc_statuses_b St
5926: Where Kh.Id = temp.contract_id
5927: And St.code = Kh.sts_code;
5928: contract_id okc_datatypes.numbertabtyp;
6116: NVL(P_credit_option
6117: ,OKS_IB_UTIL_PVT.get_credit_option(party.object1_id1,kh.authoring_org_id,tmp.transaction_date)),
6118: Kh.inv_organization_id
6119: FROM okc_k_items ki,
6120: okc_k_headers_all_b kh,
6121: oks_k_headers_b ks,
6122: okc_k_lines_b kl,
6123: okc_statuses_b st,
6124: okc_statuses_b Hst,
6207: ,OKS_IB_UTIL_PVT.get_credit_option(party.object1_id1,kh.authoring_org_id,tmp.transaction_date)),
6208: Kh.inv_organization_id
6209:
6210: FROM okc_k_items ki,
6211: okc_k_headers_all_b kh,
6212: oks_k_headers_b ks,
6213: okc_k_lines_b sl,
6214: okc_k_lines_b Tl,
6215: oks_k_lines_b okl,
6287: NVL(P_credit_option
6288: ,OKS_IB_UTIL_PVT.get_credit_option(party.object1_id1,kh.authoring_org_id,tmp.transaction_date)),
6289: Kh.inv_organization_id
6290: FROM okc_k_items ki,
6291: okc_k_headers_all_b kh,
6292: okc_k_lines_b kl,
6293: okc_statuses_b st,
6294: oks_instance_temp tmp,
6295: okc_k_lines_b tl,
6351:
6352:
6353:
6354: FROM okc_k_items ki,
6355: okc_k_headers_all_b kh,
6356: okc_k_lines_b kl,
6357: okc_k_lines_b tl,
6358: okc_statuses_b st,
6359: csi_counter_associations ctrAsc,
6420:
6421:
6422:
6423: FROM okc_k_items ki,
6424: okc_k_headers_all_b kh,
6425: okc_k_lines_b kl,
6426: okc_statuses_b st,
6427: oks_instance_temp tmp,
6428: okc_k_lines_b tl,
6514: p_id NUMBER
6515: )
6516: IS
6517: SELECT qcl_id
6518: FROM okc_k_headers_all_b
6519: WHERE ID = p_id;
6520:
6521: CURSOR check_relation_csr
6522: IS
6558: )
6559: IS
6560: SELECT b.ID,
6561: (SELECT start_date
6562: FROM okc_k_headers_all_b
6563: WHERE ID = new_contract_id),
6564: (SELECT end_date
6565: FROM okc_k_headers_all_b
6566: WHERE ID = new_contract_id),
6561: (SELECT start_date
6562: FROM okc_k_headers_all_b
6563: WHERE ID = new_contract_id),
6564: (SELECT end_date
6565: FROM okc_k_headers_all_b
6566: WHERE ID = new_contract_id),
6567: (SELECT sts_code
6568: FROM okc_k_headers_all_b
6569: WHERE ID = new_contract_id),
6564: (SELECT end_date
6565: FROM okc_k_headers_all_b
6566: WHERE ID = new_contract_id),
6567: (SELECT sts_code
6568: FROM okc_k_headers_all_b
6569: WHERE ID = new_contract_id),
6570: (SELECT start_date
6571: FROM okc_k_lines_b
6572: WHERE ID = new_serviceline_id),
6641: , kh.authoring_org_id
6642: , kh.inv_organization_id
6643: , St.ste_code
6644: From OKs_instance_k_dtls_temp temp
6645: , Okc_k_headers_all_b Kh
6646: , Okc_statuses_b St
6647: Where Kh.Id = temp.contract_id
6648: And St.code = Kh.sts_code;
6649:
7280: lines_b.date_cancelled, --Date cancelled,
7281: 'TERM'
7282: from oks_instance_history ins_hist,
7283: Okc_k_lines_b lines_b,
7284: okc_k_headers_all_b hdr
7285: Where ins_hist.batch_id = p_batch_id
7286: and instance_id = custprod_id(i) and lines_b.id = subline_id (i)
7287: And hdr.id =contract_id (i) ) ;
7288:
7540: fnd_file.put_line(fnd_file.log,'(OKS) -> Topline amounts updated successfully');
7541:
7542: -- Update the contract amount
7543: FORALL i IN 1 .. new_contract_id.COUNT
7544: UPDATE okc_k_headers_all_b
7545: SET estimated_amount =
7546: (SELECT NVL (SUM (NVL (price_negotiated, 0)), 0)
7547: FROM okc_k_lines_b
7548: WHERE dnz_chr_id = new_contract_id (i)
7665: Where id = (select cle_id from okc_k_lines_b where id = l_object_line_id)
7666: And date_renewed Is Null;
7667:
7668: l_hdr_date_renewed := OKS_IB_UTIL_PVT.Check_renewed_lines(l_object_line_id);
7669: Update okc_k_headers_all_b set date_renewed = l_line_date_renewed
7670: Where id = (select dnz_chr_id from okc_k_lines_b where id = l_object_line_id)
7671: And date_renewed Is Null;
7672:
7673:
7799: SYSDATE,
7800: fnd_global.login_id,
7801: line.date_cancelled --Date cancelled
7802: from Oks_instance_history inshist, Okc_k_lines_b line
7803: ,okc_k_headers_all_b hdr
7804: Where inshist.instance_id = custprod_id(i)
7805: and batch_id = p_batch_id
7806: And line.id = subline_id(i)
7807: And hdr.id = contract_id(i)
7901: fnd_global.user_id,
7902: SYSDATE,
7903: fnd_global.login_id
7904: from Oks_instance_history inshist
7905: , okc_k_headers_all_b hdr
7906: , okc_k_lines_b line
7907: , okc_k_lines_b subline
7908: Where inshist.instance_id = custprod_id(i)
7909: and batch_id = p_batch_id
8077: Hdr_new_edate;
8078: Close l_Contract_csr;
8079:
8080: FORALL i IN 1 .. header_id.COUNT
8081: UPDATE okc_k_headers_all_b
8082: SET start_date = Hdr_new_Sdate(i),
8083: end_date = Hdr_new_edate(i),
8084: sts_code = get_status (Hdr_new_Sdate(i), Hdr_new_edate(i))
8085: WHERE ID = header_id(i);
8273: fnd_global.user_id,
8274: SYSDATE,
8275: fnd_global.login_id,
8276: null
8277: FROM oks_instance_history a, Okc_k_headers_all_b hdr
8278: , okc_k_lines_b line
8279: , okc_k_lines_b subline
8280: WHERE a.batch_id = p_batch_id
8281: AND a.transaction_type = 'IDC'
8607: fnd_global.login_id,
8608: line.date_cancelled
8609: FROM oks_instance_history a,
8610: Okc_k_lines_b line,
8611: Okc_k_headers_all_b hdr
8612: WHERE a.batch_id = p_batch_id
8613: AND a.transaction_type = 'TRM'
8614: AND a.instance_id = custprod_id(i)
8615: AND line.id = subline_id(i)