[Home] [Help]
447: THEN
448: FOR i IN p_contract_parties_tbl.FIRST .. p_contract_parties_tbl.LAST
449: LOOP
450:
451: INSERT INTO okc_rep_imp_parties_t(imp_contract_id,
452: imp_party_id,
453: party_index,
454: signed_by_txt,
455: signed_date,
457: party_role_txt,
458: run_id)
459:
460: VALUES(p_imp_contract_id,
461: OKC_REP_IMP_PARTIES_T_S.NEXTVAL,
462: p_contract_parties_tbl(i).party_index,
463: p_contract_parties_tbl(i).signed_by_txt,
464: p_contract_parties_tbl(i).signed_date,
465: p_contract_parties_tbl(i).party_name_txt,
509: FOR i IN p_party_contacts_tbl.FIRST .. p_party_contacts_tbl.LAST
510: LOOP
511: BEGIN
512: SELECT imp_party_id INTO l_party_id
513: FROM okc_rep_imp_parties_t
514: WHERE imp_contract_id = p_imp_contract_id
515: AND party_role_txt = p_party_contacts_tbl(i).party_role_txt
516: AND party_name_txt = p_party_contacts_tbl(i).party_name_txt;
517: EXCEPTION
851:
852: --update child tables run_id for all the records with imp_contract_id = imp_contract_id
853: --from OKC_REP_IMP_CONTRACTS_T with the run_id generated
854:
855: --update okc_rep_imp_parties_t
856: UPDATE okc_rep_imp_parties_t
857: SET run_id = l_run_id,
858: request_id = l_request_id
859: WHERE imp_contract_id IN (SELECT imp_contract_id
852: --update child tables run_id for all the records with imp_contract_id = imp_contract_id
853: --from OKC_REP_IMP_CONTRACTS_T with the run_id generated
854:
855: --update okc_rep_imp_parties_t
856: UPDATE okc_rep_imp_parties_t
857: SET run_id = l_run_id,
858: request_id = l_request_id
859: WHERE imp_contract_id IN (SELECT imp_contract_id
860: FROM OKC_REP_IMP_CONTRACTS_T
860: FROM OKC_REP_IMP_CONTRACTS_T
861: WHERE run_id = l_run_id);
862:
863: IF (l_debug = 'Y') THEN
864: okc_debug.log('700: After UPDATE okc_rep_imp_parties_t ', 1);
865: END IF;
866:
867: --update okc_rep_imp_contacts_t
868: UPDATE okc_rep_imp_contacts_t