[Home] [Help]
3:
4: -------------------------------------------------------------------
5: -- for loading Locations Info into the Interface Table ( FOR CAFM )
6: -- ( Run AS a Conc Process )
7: -- ( PN_LOCATIONS --> PN_LOCATIONS_ITF )
8: -- 30-AUG-06 Shabda o As part of bug # 5449595, we now pas canonical dates
9: -- This method expects non canonical too, so we change it back to non canonical.
10: -------------------------------------------------------------------
11: PROCEDURE exp_to_cad_itf (
76:
77: -----------------------------------------------------------------------------
78: -- FOR loading Locations Info into the Interface Table ( FOR CAFM )
79: -- ( Run AS a Conc Process )
80: -- ( PN_LOCATIONS --> PN_LOCATIONS_ITF )
81: -- 15-JUL-05 hareesha o Bug 4284035 - Replaced pn_addresses with _ALL table.
82: -- 29-SEP-05 Hareesha o ATG mandated changes for SQL literals using dbms_sql.
83: -----------------------------------------------------------------------------
84: PROCEDURE exp_loc_to_cad_itf (
491:
492: BEGIN
493: SELECT 1
494: INTO exists_in_itf
495: FROM PN_LOCATIONS_ITF
496: WHERE location_id = v_location_id
497: AND active_start_date = v_active_start_date
498: AND active_END_date = v_active_end_date;
499: EXCEPTION
513:
514: IF (exists_in_itf = 0) THEN
515:
516:
517: -- Insert the fetched data into PN_LOCATIONS_ITF table.
518:
519: INSERT INTO PN_LOCATIONS_ITF (
520: BATCH_NAME,
521: ENTRY_TYPE,
515:
516:
517: -- Insert the fetched data into PN_LOCATIONS_ITF table.
518:
519: INSERT INTO PN_LOCATIONS_ITF (
520: BATCH_NAME,
521: ENTRY_TYPE,
522: LOCATION_ID,
523: LOCATION_CODE,
683: -- Update data IN ITF table
684:
685: IF (exists_in_itf = 1) THEN
686:
687: UPDATE PN_LOCATIONS_ITF SET
688: BATCH_NAME = p_batch_name,
689: ENTRY_TYPE = 'U',
690: LOCATION_ID = v_location_id,
691: LOCATION_CODE = v_LOCATION_CODE,