DBA Data[Home] [Help]

APPS.OKL_PRB_UPGRADE_PVT dependencies on OKL_PARALLEL_PROCESSES

Line 146: FROM okl_parallel_processes opp

142: IS
143: SELECT opp.khr_id khr_id
144: ,opp.object_value contract_number
145: ,opp.volume no_of_assets
146: FROM okl_parallel_processes opp
147: WHERE opp.object_type = G_ESG_PRB_KHR_UPG_OBJ_TYPE -- 'ESG_PRB_UPGRADE_CONTRACT'
148: AND opp.process_status = 'ASSIGNED' -- Dont fetch any unallocated contracts for processing
149: AND opp.assigned_process = p_worker_id; -- Fetch only this worker related contracts
150: TYPE esg_upg_cntrcts_tbl_type IS TABLE OF get_esg_upgw_contracts_csr%ROWTYPE

Line 289: DELETE OKL_PARALLEL_PROCESSES opp

285: CLOSE get_esg_upgw_contracts_csr; -- Close the Cursor
286: -- Now Delete all the processed records from parallel process table
287: log_msg(FND_FILE.LOG, 'Deletion of Processed Records - Start: ' || TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS') );
288: FORALL khr_index IN l_khr_id_tbl.FIRST .. l_khr_id_tbl.LAST
289: DELETE OKL_PARALLEL_PROCESSES opp
290: WHERE khr_id = l_khr_id_tbl(khr_index)
291: AND opp.object_type = G_ESG_PRB_KHR_UPG_OBJ_TYPE -- 'ESG_PRB_UPGRADE_CONTRACT'
292: AND opp.assigned_process = p_worker_id; -- Fetch only this worker related contracts;
293: log_msg(FND_FILE.LOG, 'Deletion of Processed Records - End : ' || TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS') );

Line 414: FROM OKL_PARALLEL_PROCESSES opp

410: ,object_value contract_number
411: ,volume no_of_assets
412: ,process_status status
413: ,'Pending Assignment' status_meaning
414: FROM OKL_PARALLEL_PROCESSES opp
415: WHERE opp.object_type = G_ESG_PRB_KHR_UPG_OBJ_TYPE -- 'ESG_PRB_UPGRADE_CONTRACT'
416: AND opp.process_status = 'PENDING_ASSIGNMENT'
417: AND opp.assigned_process = p_process_sequence
418: UNION ALL

Line 424: FROM OKL_PARALLEL_PROCESSES opp

420: ,object_value contract_number
421: ,volume no_of_assets
422: ,process_status status
423: ,'Revision in Progress' status_meaning
424: FROM OKL_PARALLEL_PROCESSES opp
425: --,fnd_lookups lkup
426: WHERE opp.object_type = G_ESG_PRB_KHR_UPG_OBJ_TYPE -- 'ESG_PRB_UPGRADE_CONTRACT'
427: AND opp.process_status <> 'PENDING_ASSIGNMENT'
428: AND opp.assigned_process = p_process_sequence;

Line 644: -- Fetch all Contracts eligible for Upgrade and Store them in OKL_PARALLEL_PROCESSES

640: SELECT okl_opp_seq.NEXTVAL
641: INTO l_seq_next
642: FROM DUAL;
643: log_msg(FND_FILE.LOG, 'Process Sequence ID: ' || l_seq_next );
644: -- Fetch all Contracts eligible for Upgrade and Store them in OKL_PARALLEL_PROCESSES
645: log_msg(FND_FILE.LOG, 'Before calling the Bulk Insert into the OKL_PARALLEL_PROCESSES' );
646: l_query_string :=
647: 'INSERT INTO OKL_PARALLEL_PROCESSES(OBJECT_TYPE,OBJECT_VALUE,ASSIGNED_PROCESS' ||
648: ',PROCESS_STATUS,CREATION_DATE,KHR_ID,VOLUME) ' ||

Line 645: log_msg(FND_FILE.LOG, 'Before calling the Bulk Insert into the OKL_PARALLEL_PROCESSES' );

641: INTO l_seq_next
642: FROM DUAL;
643: log_msg(FND_FILE.LOG, 'Process Sequence ID: ' || l_seq_next );
644: -- Fetch all Contracts eligible for Upgrade and Store them in OKL_PARALLEL_PROCESSES
645: log_msg(FND_FILE.LOG, 'Before calling the Bulk Insert into the OKL_PARALLEL_PROCESSES' );
646: l_query_string :=
647: 'INSERT INTO OKL_PARALLEL_PROCESSES(OBJECT_TYPE,OBJECT_VALUE,ASSIGNED_PROCESS' ||
648: ',PROCESS_STATUS,CREATION_DATE,KHR_ID,VOLUME) ' ||
649: 'SELECT ''' || G_ESG_PRB_KHR_UPG_OBJ_TYPE || ''' ' || -- OBJECT_TYPE

Line 647: 'INSERT INTO OKL_PARALLEL_PROCESSES(OBJECT_TYPE,OBJECT_VALUE,ASSIGNED_PROCESS' ||

643: log_msg(FND_FILE.LOG, 'Process Sequence ID: ' || l_seq_next );
644: -- Fetch all Contracts eligible for Upgrade and Store them in OKL_PARALLEL_PROCESSES
645: log_msg(FND_FILE.LOG, 'Before calling the Bulk Insert into the OKL_PARALLEL_PROCESSES' );
646: l_query_string :=
647: 'INSERT INTO OKL_PARALLEL_PROCESSES(OBJECT_TYPE,OBJECT_VALUE,ASSIGNED_PROCESS' ||
648: ',PROCESS_STATUS,CREATION_DATE,KHR_ID,VOLUME) ' ||
649: 'SELECT ''' || G_ESG_PRB_KHR_UPG_OBJ_TYPE || ''' ' || -- OBJECT_TYPE
650: ' ,chr.contract_number' || -- OBJECT_VALUE
651: ' ,TO_CHAR( ''' || l_seq_next || ''' ) ' || -- ASSIGNED_PROCESS

Line 783: log_msg(FND_FILE.LOG, 'Committed the Insertion of the OKL_PARALLEL_PROCESSES Records' || TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS') );

779: EXECUTE IMMEDIATE l_query_string;
780: log_msg(FND_FILE.LOG, 'Executing the Formulated Query - End: ' || TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS') );
781: -- Commit the Records
782: COMMIT;
783: log_msg(FND_FILE.LOG, 'Committed the Insertion of the OKL_PARALLEL_PROCESSES Records' || TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS') );
784:
785:
786: -- For Reamort Upgrade, perform the following checks
787: IF p_criteria_set IN ( 'REAMORT' )

Line 792: UPDATE OKL_PARALLEL_PROCESSES opp

788: THEN
789: -- Case 1: Contract status should be Booked/Complete/Approved
790: log_msg(FND_FILE.LOG, 'Checking: Contract status should be Booked/Complete/Approved - Start: '
791: || TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS') );
792: UPDATE OKL_PARALLEL_PROCESSES opp
793: SET process_status = 'OKL_STATUS_INAPPROPRIATE'
794: WHERE opp.object_type = G_ESG_PRB_KHR_UPG_OBJ_TYPE
795: AND opp.process_status = 'PENDING_ASSIGNMENT'
796: AND opp.assigned_process = TO_CHAR(l_seq_next)

Line 809: UPDATE OKL_PARALLEL_PROCESSES opp

805:
806: -- Case 2: Contract do not have a transaction state (CLOB) already associated to it
807: log_msg(FND_FILE.LOG, 'Checking: Contract do not have a transaction state (CLOB) already associated to it - Start: '
808: || TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS') );
809: UPDATE OKL_PARALLEL_PROCESSES opp
810: SET process_status = 'OKL_CLOB_EXISTS'
811: WHERE opp.object_type = G_ESG_PRB_KHR_UPG_OBJ_TYPE
812: AND opp.process_status = 'PENDING_ASSIGNMENT'
813: AND opp.assigned_process = TO_CHAR(l_seq_next)

Line 838: UPDATE OKL_PARALLEL_PROCESSES opp

834:
835: -- Case 3: Online Mass Rebook Not Processed
836: log_msg(FND_FILE.LOG, 'Checking: Online Mass Rebook Not Processed - Start: '
837: || TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS') );
838: UPDATE OKL_PARALLEL_PROCESSES opp
839: SET process_status = 'OKL_MRBK_NOT_PROCESSED'
840: WHERE opp.object_type = G_ESG_PRB_KHR_UPG_OBJ_TYPE
841: AND opp.process_status = 'PENDING_ASSIGNMENT'
842: AND opp.assigned_process = TO_CHAR(l_seq_next)

Line 857: UPDATE OKL_PARALLEL_PROCESSES opp

853:
854: -- Case 4: Online Rebook not Activated
855: log_msg(FND_FILE.LOG, 'Checking: Online Rebook not Activated - Start: '
856: || TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS') );
857: UPDATE OKL_PARALLEL_PROCESSES opp
858: SET process_status = 'OKL_ONLINE_RBK_NOT_PROCESSED'
859: WHERE opp.object_type = G_ESG_PRB_KHR_UPG_OBJ_TYPE
860: AND opp.process_status = 'PENDING_ASSIGNMENT'
861: AND opp.assigned_process = TO_CHAR(l_seq_next)

Line 878: UPDATE OKL_PARALLEL_PROCESSES opp

874:
875: -- Case 5: Residual Value Writedown not Processed
876: log_msg(FND_FILE.LOG, 'Checking: Residual Value Writedown not Processed - Start: '
877: || TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS') );
878: UPDATE OKL_PARALLEL_PROCESSES opp
879: SET process_status = 'OKL_RVWD_NOT_PROCESSED'
880: WHERE opp.object_type = G_ESG_PRB_KHR_UPG_OBJ_TYPE
881: AND opp.process_status = 'PENDING_ASSIGNMENT'
882: AND opp.assigned_process = TO_CHAR(l_seq_next)

Line 898: UPDATE OKL_PARALLEL_PROCESSES opp

894:
895: -- Case 6: Termination Quote Not Accepted
896: log_msg(FND_FILE.LOG, 'Checking: Termination Quote Not Accepted - Start: '
897: || TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS') );
898: UPDATE OKL_PARALLEL_PROCESSES opp
899: SET process_status = 'OKL_TQ_NOT_ACCEPTED'
900: WHERE opp.object_type = G_ESG_PRB_KHR_UPG_OBJ_TYPE
901: AND opp.process_status = 'PENDING_ASSIGNMENT'
902: AND opp.assigned_process = TO_CHAR(l_seq_next)

Line 924: UPDATE OKL_PARALLEL_PROCESSES opp

920: THEN
921: -- Case 1: TQ accepted and before it raised the termination transaction the quote failed
922: log_msg(FND_FILE.LOG, 'Checking: TQ accepted and fails before trx created - Start: '
923: || TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS') );
924: UPDATE OKL_PARALLEL_PROCESSES opp
925: SET process_status = 'OKL_REVISION_IN_PROGRESS'
926: WHERE opp.object_type = G_ESG_PRB_KHR_UPG_OBJ_TYPE
927: AND opp.process_status = 'PENDING_ASSIGNMENT'
928: AND opp.assigned_process = TO_CHAR(l_seq_next)

Line 946: UPDATE OKL_PARALLEL_PROCESSES opp

942:
943: -- Case 2: Termination transaction has been raised but the termination transaction phase has errored out
944: log_msg(FND_FILE.LOG, 'Checking: TQ accepted and termination trx phase fails - Start: ' || TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS') );
945:
946: UPDATE OKL_PARALLEL_PROCESSES opp
947: SET process_status = 'OKL_REVISION_IN_PROGRESS'
948: WHERE opp.object_type = G_ESG_PRB_KHR_UPG_OBJ_TYPE
949: AND opp.process_status = 'PENDING_ASSIGNMENT'
950: AND opp.assigned_process = TO_CHAR(l_seq_next)

Line 969: UPDATE OKL_PARALLEL_PROCESSES opp

965:
966: -- Case 3: Mass Rebook in progress
967: log_msg(FND_FILE.LOG, 'Checking: Mass Rebook in progress - Start: ' || TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS') );
968:
969: UPDATE OKL_PARALLEL_PROCESSES opp
970: SET process_status = 'OKL_REVISION_IN_PROGRESS'
971: WHERE opp.object_type = G_ESG_PRB_KHR_UPG_OBJ_TYPE
972: AND opp.process_status = 'PENDING_ASSIGNMENT'
973: AND opp.assigned_process = TO_CHAR(l_seq_next)

Line 1244: log_msg(FND_FILE.LOG, 'Updated the Records in OKL_PARALLEL_PROCESSES with the Assigned Process - Start: '

1240: -- END LOOP;
1241:
1242: -- Now Bulk Update the Contract Numbers in Parallel Processes with the
1243: -- Assigned Worker Number
1244: log_msg(FND_FILE.LOG, 'Updated the Records in OKL_PARALLEL_PROCESSES with the Assigned Process - Start: '
1245: || TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS') );
1246: FORALL upg_index in l_upg_contracts_tbl.FIRST .. l_upg_contracts_tbl.LAST
1247: UPDATE OKL_PARALLEL_PROCESSES
1248: SET assigned_process = l_seq_next || '-' || l_assigned_process_tbl(upg_index)

Line 1247: UPDATE OKL_PARALLEL_PROCESSES

1243: -- Assigned Worker Number
1244: log_msg(FND_FILE.LOG, 'Updated the Records in OKL_PARALLEL_PROCESSES with the Assigned Process - Start: '
1245: || TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS') );
1246: FORALL upg_index in l_upg_contracts_tbl.FIRST .. l_upg_contracts_tbl.LAST
1247: UPDATE OKL_PARALLEL_PROCESSES
1248: SET assigned_process = l_seq_next || '-' || l_assigned_process_tbl(upg_index)
1249: ,process_status = 'ASSIGNED'
1250: WHERE object_type = G_ESG_PRB_KHR_UPG_OBJ_TYPE
1251: AND object_value = l_object_value_tbl(upg_index)

Line 1254: log_msg(FND_FILE.LOG, 'Updated the Records in OKL_PARALLEL_PROCESSES with the Assigned Process - End : '

1250: WHERE object_type = G_ESG_PRB_KHR_UPG_OBJ_TYPE
1251: AND object_value = l_object_value_tbl(upg_index)
1252: AND process_status = 'PENDING_ASSIGNMENT'
1253: AND khr_id = l_khr_id_tbl(upg_index);
1254: log_msg(FND_FILE.LOG, 'Updated the Records in OKL_PARALLEL_PROCESSES with the Assigned Process - End : '
1255: || TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS') );
1256: -- COMMIT the Updation;
1257: COMMIT;
1258: log_msg(FND_FILE.LOG, 'Committed the Updation Changes: ' || TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS') );

Line 1311: DELETE OKL_PARALLEL_PROCESSES opp

1307: THEN
1308: -- Delete the records populated here finally
1309: log_msg(FND_FILE.LOG, 'Review Mode: Deletion of Records - Start: ' || TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS') );
1310:
1311: DELETE OKL_PARALLEL_PROCESSES opp
1312: WHERE opp.object_type = G_ESG_PRB_KHR_UPG_OBJ_TYPE -- 'ESG_PRB_UPGRADE_CONTRACT'
1313: AND opp.assigned_process = TO_CHAR(l_seq_next);
1314:
1315: log_msg(FND_FILE.LOG, 'Review Mode: Deletion of Records - End : ' || TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS') );