[Home] [Help]
9669: /******************************************************************
9670: Created By : smaddali
9671: Date Created By : 11-Jun-03
9672: Purpose : loads each record in the hercules view ivstarz1 into the interface table
9673: igs_uc_istarz1_ints with record status N
9674: Known limitations,enhancements,remarks:
9675: Change History
9676: Who When What
9677: jbaber 15-Sep-05 Force 2-digit entry year for bug 4589994
9707: p_old_timestamp igs_uc_hrc_timstmps.timestamp%TYPE ;
9708: l_new_max_timestamp igs_uc_ivstarz1_2003_v.timestamp%TYPE ;
9709: l_count NUMBER ;
9710:
9711: l_appno igs_uc_istarz1_ints.appno%TYPE;
9712: l_checkdigit NUMBER;
9713:
9714: BEGIN
9715: -- set syncronization required to false
9732: -- Determine actual appno
9733: get_appno(c_ivstarz1_rec.appno, NULL, l_appno, l_checkdigit);
9734:
9735: -- Obsolete matching records in interface table with status N
9736: UPDATE igs_uc_istarz1_ints SET record_status = 'O'
9737: WHERE record_status = 'N' AND appno = l_appno ;
9738:
9739: -- copy hercules record into interface table with record status N
9740: INSERT INTO igs_uc_istarz1_ints ( appno,
9736: UPDATE igs_uc_istarz1_ints SET record_status = 'O'
9737: WHERE record_status = 'N' AND appno = l_appno ;
9738:
9739: -- copy hercules record into interface table with record status N
9740: INSERT INTO igs_uc_istarz1_ints ( appno,
9741: datecefsent,
9742: cefno,
9743: centralclearing,
9744: inst,
9806: /******************************************************************
9807: Created By : jbaber
9808: Date Created By : 16-Aug-05
9809: Purpose : loads each record in the hercules view ivnstarz1 into the interface table
9810: igs_uc_istarz1_ints with record status N
9811: Known limitations,enhancements,remarks:
9812: Change History
9813: Who When What
9814: jbaber 29-Sep-05 Force 2-digit entry year for bug 4638126
9839: p_old_timestamp igs_uc_hrc_timstmps.timestamp%TYPE ;
9840: l_new_max_timestamp igs_uc_ivnstarz1_2006_v.timestamp%TYPE ;
9841: l_count NUMBER ;
9842:
9843: l_appno igs_uc_istarz1_ints.appno%TYPE;
9844: l_checkdigit NUMBER;
9845:
9846: BEGIN
9847: -- set syncronization required to false
9864: -- Determine actual appno
9865: get_appno(c_ivnstarz1_rec.appno, NULL, l_appno, l_checkdigit);
9866:
9867: -- Obsolete matching records in interface table with status N
9868: UPDATE igs_uc_istarz1_ints SET record_status = 'O'
9869: WHERE record_status = 'N' AND appno = l_appno ;
9870:
9871: -- copy hercules record into interface table with record status N
9872: INSERT INTO igs_uc_istarz1_ints ( appno,
9868: UPDATE igs_uc_istarz1_ints SET record_status = 'O'
9869: WHERE record_status = 'N' AND appno = l_appno ;
9870:
9871: -- copy hercules record into interface table with record status N
9872: INSERT INTO igs_uc_istarz1_ints ( appno,
9873: cefno,
9874: inst,
9875: course,
9876: campus,