DBA Data[Home] [Help]

APPS.IGF_AP_SS_PKG dependencies on IGF_AP_ISIR_MATCHED

Line 5: p_isir_id IN IGF_AP_ISIR_MATCHED_ALL.ISIR_ID%TYPE,

1: PACKAGE BODY IGF_AP_SS_PKG AS
2: /* $Header: IGFAP30B.pls 120.4 2006/04/19 04:22:53 azmohamm ship $ */
3:
4: PROCEDURE set_internal_isir (
5: p_isir_id IN IGF_AP_ISIR_MATCHED_ALL.ISIR_ID%TYPE,
6: p_ret_isir_id IN OUT NOCOPY IGF_AP_ISIR_MATCHED_ALL.ISIR_ID%TYPE
7: )IS
8: /*
9: || Created By : cdcruz

Line 6: p_ret_isir_id IN OUT NOCOPY IGF_AP_ISIR_MATCHED_ALL.ISIR_ID%TYPE

2: /* $Header: IGFAP30B.pls 120.4 2006/04/19 04:22:53 azmohamm ship $ */
3:
4: PROCEDURE set_internal_isir (
5: p_isir_id IN IGF_AP_ISIR_MATCHED_ALL.ISIR_ID%TYPE,
6: p_ret_isir_id IN OUT NOCOPY IGF_AP_ISIR_MATCHED_ALL.ISIR_ID%TYPE
7: )IS
8: /*
9: || Created By : cdcruz
10: || Created On : 27-NOV-2002

Line 25: || modified signature of igf_ap_isir_matched_pkg

21: || internal record it will commit and also obtain
22: || lock on it so that no one else can update the same
23: || record.
24: || asbala 19-nov-2003 3026594: FA128 - ISIR Federal Updates 04- 05,
25: || modified signature of igf_ap_isir_matched_pkg
26: || (reverse chronological order - newest change first)
27: */
28:
29: CURSOR c_isir (l_isir_id igf_ap_isir_matched_all.isir_id%type)

Line 29: CURSOR c_isir (l_isir_id igf_ap_isir_matched_all.isir_id%type)

25: || modified signature of igf_ap_isir_matched_pkg
26: || (reverse chronological order - newest change first)
27: */
28:
29: CURSOR c_isir (l_isir_id igf_ap_isir_matched_all.isir_id%type)
30: IS
31: SELECT ISIR.*
32: FROM IGF_AP_ISIR_MATCHED ISIR
33: WHERE ISIR.ISIR_ID = l_isir_id ;

Line 32: FROM IGF_AP_ISIR_MATCHED ISIR

28:
29: CURSOR c_isir (l_isir_id igf_ap_isir_matched_all.isir_id%type)
30: IS
31: SELECT ISIR.*
32: FROM IGF_AP_ISIR_MATCHED ISIR
33: WHERE ISIR.ISIR_ID = l_isir_id ;
34:
35: lv_isir c_isir%rowtype ;
36:

Line 37: CURSOR chk_internal (l_base_id igf_ap_isir_matched_all.base_id%type)

33: WHERE ISIR.ISIR_ID = l_isir_id ;
34:
35: lv_isir c_isir%rowtype ;
36:
37: CURSOR chk_internal (l_base_id igf_ap_isir_matched_all.base_id%type)
38: IS
39: SELECT isir.rowid row_id,isir.isir_id FROM IGF_AP_ISIR_MATCHED_ALL ISIR
40: WHERE
41: ISIR.BASE_ID = l_base_id AND

Line 39: SELECT isir.rowid row_id,isir.isir_id FROM IGF_AP_ISIR_MATCHED_ALL ISIR

35: lv_isir c_isir%rowtype ;
36:
37: CURSOR chk_internal (l_base_id igf_ap_isir_matched_all.base_id%type)
38: IS
39: SELECT isir.rowid row_id,isir.isir_id FROM IGF_AP_ISIR_MATCHED_ALL ISIR
40: WHERE
41: ISIR.BASE_ID = l_base_id AND
42: NVL(ISIR.SYSTEM_RECORD_TYPE,'X') = 'INTERNAL'
43: FOR UPDATE NOWAIT;

Line 51: FROM IGF_AP_ISIR_MATCHED_ALL ISIR

47:
48: CURSOR chk_row_id
49: IS
50: SELECT isir.rowid row_id
51: FROM IGF_AP_ISIR_MATCHED_ALL ISIR
52: WHERE
53: ISIR.rowid = lv_rowid
54: FOR UPDATE NOWAIT;
55:

Line 76: pn_isir_id igf_ap_isir_matched_all.isir_id%type ;

72: AND NVL(verf.waive_flag,'N') = 'N'
73: AND ((verf.item_value IS NOT NULL) OR (verf.item_value IS NULL AND verf.use_blank_flag = 'Y'))
74: AND verf.base_id = pn_base_id ;
75:
76: pn_isir_id igf_ap_isir_matched_all.isir_id%type ;
77: pn_base_id igf_ap_isir_matched_all.base_id%type;
78:
79: l_get_ver_data_rec cur_get_ver_data%ROWTYPE;
80:

Line 77: pn_base_id igf_ap_isir_matched_all.base_id%type;

73: AND ((verf.item_value IS NOT NULL) OR (verf.item_value IS NULL AND verf.use_blank_flag = 'Y'))
74: AND verf.base_id = pn_base_id ;
75:
76: pn_isir_id igf_ap_isir_matched_all.isir_id%type ;
77: pn_base_id igf_ap_isir_matched_all.base_id%type;
78:
79: l_get_ver_data_rec cur_get_ver_data%ROWTYPE;
80:
81: BEGIN

Line 118: igf_ap_isir_matched_pkg.update_row(

114: IF chk_internal%FOUND THEN
115:
116: p_ret_isir_id := lv_chk_internal.isir_id ;
117:
118: igf_ap_isir_matched_pkg.update_row(
119: x_Mode => 'R',
120: x_rowid => lv_chk_internal.row_id,
121: x_isir_id => lv_chk_internal.isir_id,
122: x_base_id => lv_isir.base_id,

Line 428: igf_ap_isir_matched_pkg.insert_row(

424: ELSE
425: lv_rowid := null;
426: pn_isir_id := null;
427:
428: igf_ap_isir_matched_pkg.insert_row(
429: x_Mode => 'R',
430: x_rowid => lv_rowid,
431: x_isir_id => pn_isir_id,
432: x_base_id => lv_isir.base_id,

Line 794: p_isir_rec igf_ap_isir_matched%ROWTYPE,

790: END;
791:
792:
793: PROCEDURE update_isir(
794: p_isir_rec igf_ap_isir_matched%ROWTYPE,
795: p_isir_id igf_ap_isir_matched.ISIR_ID%TYPE,
796: p_rowid VARCHAR2
797: ) IS
798: ------------------------------------------------------------------

Line 795: p_isir_id igf_ap_isir_matched.ISIR_ID%TYPE,

791:
792:
793: PROCEDURE update_isir(
794: p_isir_rec igf_ap_isir_matched%ROWTYPE,
795: p_isir_id igf_ap_isir_matched.ISIR_ID%TYPE,
796: p_rowid VARCHAR2
797: ) IS
798: ------------------------------------------------------------------
799: --Created by : brajendr

Line 810: -- modified signature of igf_ap_isir_matched_pkg

806: --
807: --Change History:
808: --Who When What
809: --asbala 19-nov-2003 3026594: FA128 - ISIR Federal Updates 04- 05,
810: -- modified signature of igf_ap_isir_matched_pkg
811: -------------------------------------------------------------------
812:
813: BEGIN
814:

Line 816: igf_ap_isir_matched_pkg.update_row(

812:
813: BEGIN
814:
815: --The existing Correction ISIR is updated with the Simulated ISIR values
816: igf_ap_isir_matched_pkg.update_row(
817: x_rowid => p_rowid,
818: x_isir_id => p_isir_id,
819: x_base_id => p_isir_rec.base_id,
820: x_batch_year => p_isir_rec.batch_year,

Line 1125: p_org_isir_id IN igf_ap_isir_matched_all.isir_id%TYPE,

1121: END update_isir;
1122:
1123:
1124: PROCEDURE save_as_correction_isir(
1125: p_org_isir_id IN igf_ap_isir_matched_all.isir_id%TYPE,
1126: p_mod_isir_id IN igf_ap_isir_matched_all.isir_id%TYPE,
1127: p_cal_type IN igf_ap_fa_base_rec_all.ci_cal_type%TYPE,
1128: p_sequence_number IN igf_ap_fa_base_rec_all.ci_sequence_number%TYPE,
1129: p_corr_status IN VARCHAR2 ,

Line 1126: p_mod_isir_id IN igf_ap_isir_matched_all.isir_id%TYPE,

1122:
1123:
1124: PROCEDURE save_as_correction_isir(
1125: p_org_isir_id IN igf_ap_isir_matched_all.isir_id%TYPE,
1126: p_mod_isir_id IN igf_ap_isir_matched_all.isir_id%TYPE,
1127: p_cal_type IN igf_ap_fa_base_rec_all.ci_cal_type%TYPE,
1128: p_sequence_number IN igf_ap_fa_base_rec_all.ci_sequence_number%TYPE,
1129: p_corr_status IN VARCHAR2 ,
1130: x_msg_count OUT NOCOPY NUMBER,

Line 1151: p_isir_id igf_ap_isir_matched_all.isir_id%TYPE

1147: -------------------------------------------------------------------
1148:
1149: -- Get the details of ISIR Record from isir_matched table
1150: CURSOR c_isir_detials(
1151: p_isir_id igf_ap_isir_matched_all.isir_id%TYPE
1152: ) IS
1153: SELECT *
1154: FROM igf_ap_isir_matched
1155: WHERE isir_id = p_isir_id;

Line 1154: FROM igf_ap_isir_matched

1150: CURSOR c_isir_detials(
1151: p_isir_id igf_ap_isir_matched_all.isir_id%TYPE
1152: ) IS
1153: SELECT *
1154: FROM igf_ap_isir_matched
1155: WHERE isir_id = p_isir_id;
1156:
1157: -- Get the details of
1158: CURSOR c_get_pymt_isir(

Line 1162: FROM igf_ap_isir_matched

1158: CURSOR c_get_pymt_isir(
1159: c_base_id igf_ap_fa_base_rec_all.base_id%TYPE
1160: ) IS
1161: SELECT isir_id
1162: FROM igf_ap_isir_matched
1163: WHERE base_id = c_base_id
1164: AND system_record_type = 'ORIGINAL'
1165: AND payment_isir = 'Y' ;
1166:

Line 1172: FROM igf_ap_isir_matched

1168: CURSOR c_get_active_isir(
1169: c_base_id igf_ap_fa_base_rec_all.base_id%TYPE
1170: ) IS
1171: SELECT *
1172: FROM igf_ap_isir_matched
1173: WHERE base_id = c_base_id
1174: AND active_isir = 'Y';
1175:
1176:

Line 1177: isir_detials_rec igf_ap_isir_matched%ROWTYPE;

1173: WHERE base_id = c_base_id
1174: AND active_isir = 'Y';
1175:
1176:
1177: isir_detials_rec igf_ap_isir_matched%ROWTYPE;
1178: corr_detials_rec igf_ap_isir_matched%ROWTYPE;
1179: l_payment_isir_id igf_ap_isir_matched_all.isir_id%TYPE;
1180: isir_row_id ROWID;
1181: l_message VARCHAR2(50);

Line 1178: corr_detials_rec igf_ap_isir_matched%ROWTYPE;

1174: AND active_isir = 'Y';
1175:
1176:
1177: isir_detials_rec igf_ap_isir_matched%ROWTYPE;
1178: corr_detials_rec igf_ap_isir_matched%ROWTYPE;
1179: l_payment_isir_id igf_ap_isir_matched_all.isir_id%TYPE;
1180: isir_row_id ROWID;
1181: l_message VARCHAR2(50);
1182: l_old_active_isir_id igf_ap_isir_matched_all.isir_id%TYPE;

Line 1179: l_payment_isir_id igf_ap_isir_matched_all.isir_id%TYPE;

1175:
1176:
1177: isir_detials_rec igf_ap_isir_matched%ROWTYPE;
1178: corr_detials_rec igf_ap_isir_matched%ROWTYPE;
1179: l_payment_isir_id igf_ap_isir_matched_all.isir_id%TYPE;
1180: isir_row_id ROWID;
1181: l_message VARCHAR2(50);
1182: l_old_active_isir_id igf_ap_isir_matched_all.isir_id%TYPE;
1183: l_anticip_status VARCHAR2(30);

Line 1182: l_old_active_isir_id igf_ap_isir_matched_all.isir_id%TYPE;

1178: corr_detials_rec igf_ap_isir_matched%ROWTYPE;
1179: l_payment_isir_id igf_ap_isir_matched_all.isir_id%TYPE;
1180: isir_row_id ROWID;
1181: l_message VARCHAR2(50);
1182: l_old_active_isir_id igf_ap_isir_matched_all.isir_id%TYPE;
1183: l_anticip_status VARCHAR2(30);
1184: l_awd_prc_status VARCHAR2(30);
1185:
1186:

Line 1307: p_mod_isir_id IN igf_ap_isir_matched_all.isir_id%TYPE,

1303: END save_as_correction_isir;
1304:
1305:
1306: PROCEDURE create_simulation_isir(
1307: p_mod_isir_id IN igf_ap_isir_matched_all.isir_id%TYPE,
1308: x_msg_count OUT NOCOPY NUMBER,
1309: x_msg_data OUT NOCOPY VARCHAR2,
1310: x_return_status OUT NOCOPY VARCHAR2
1311: ) IS

Line 1327: p_isir_id igf_ap_isir_matched_all.isir_id%TYPE

1323: -------------------------------------------------------------------
1324:
1325: -- Get the details of ISIR Record from isir_matched table
1326: CURSOR c_isir_detials(
1327: p_isir_id igf_ap_isir_matched_all.isir_id%TYPE
1328: ) IS
1329: SELECT *
1330: FROM igf_ap_isir_matched
1331: WHERE isir_id = p_isir_id;

Line 1330: FROM igf_ap_isir_matched

1326: CURSOR c_isir_detials(
1327: p_isir_id igf_ap_isir_matched_all.isir_id%TYPE
1328: ) IS
1329: SELECT *
1330: FROM igf_ap_isir_matched
1331: WHERE isir_id = p_isir_id;
1332:
1333: --Cursor to get the Max Transaction Number from Prev SIMULATION ISIR Ids
1334: CURSOR cur_get_max_trans( c_base_id igf_ap_fa_base_rec_all.base_id%TYPE) IS

Line 1336: FROM igf_ap_isir_matched

1332:
1333: --Cursor to get the Max Transaction Number from Prev SIMULATION ISIR Ids
1334: CURSOR cur_get_max_trans( c_base_id igf_ap_fa_base_rec_all.base_id%TYPE) IS
1335: SELECT NVL(MAX(NVL(transaction_num,0)),0)+1
1336: FROM igf_ap_isir_matched
1337: WHERE system_record_type='SIMULATION'
1338: AND base_id = c_base_id;
1339:
1340: l_trans igf_ap_isir_matched.transaction_num%TYPE;

Line 1340: l_trans igf_ap_isir_matched.transaction_num%TYPE;

1336: FROM igf_ap_isir_matched
1337: WHERE system_record_type='SIMULATION'
1338: AND base_id = c_base_id;
1339:
1340: l_trans igf_ap_isir_matched.transaction_num%TYPE;
1341: isir_detials_rec igf_ap_isir_matched%ROWTYPE;
1342:
1343: BEGIN
1344:

Line 1341: isir_detials_rec igf_ap_isir_matched%ROWTYPE;

1337: WHERE system_record_type='SIMULATION'
1338: AND base_id = c_base_id;
1339:
1340: l_trans igf_ap_isir_matched.transaction_num%TYPE;
1341: isir_detials_rec igf_ap_isir_matched%ROWTYPE;
1342:
1343: BEGIN
1344:
1345: SAVEPOINT SP_ISIR;

Line 1399: p_isir_id IN igf_ap_isir_matched_all.isir_id%TYPE,

1395: END create_simulation_isir;
1396:
1397:
1398: PROCEDURE compute_efc(
1399: p_isir_id IN igf_ap_isir_matched_all.isir_id%TYPE,
1400: p_system_award_year IN VARCHAR2,
1401: p_ignore_warnings IN VARCHAR2,
1402: x_msg_count OUT NOCOPY NUMBER,
1403: x_msg_data OUT NOCOPY VARCHAR2,

Line 1418: CURSOR cur_isir_rec ( cp_isir_id igf_ap_isir_matched_all.isir_id%TYPE ) IS

1414: || Success ( "S" ) and Warning ( "W" )
1415: || (reverse chronological order - newest change first)
1416: */
1417:
1418: CURSOR cur_isir_rec ( cp_isir_id igf_ap_isir_matched_all.isir_id%TYPE ) IS
1419: SELECT isir.*
1420: FROM igf_ap_isir_matched isir
1421: WHERE isir_id = cp_isir_id ;
1422:

Line 1420: FROM igf_ap_isir_matched isir

1416: */
1417:
1418: CURSOR cur_isir_rec ( cp_isir_id igf_ap_isir_matched_all.isir_id%TYPE ) IS
1419: SELECT isir.*
1420: FROM igf_ap_isir_matched isir
1421: WHERE isir_id = cp_isir_id ;
1422:
1423: isir_rec cur_isir_rec%ROWTYPE ;
1424: l_msg_str VARCHAR2(20000) := '';

Line 1510: igf_ap_isir_matched_pkg.update_row(

1506: IF FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1507: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'igf.plsql.igf_ap_ss_pkg.compute_efc','Updating ISIR Rec since the return status is either W or S');
1508: END IF;
1509:
1510: igf_ap_isir_matched_pkg.update_row(
1511: x_rowid => isir_rec.row_id,
1512: x_isir_id => p_isir_id,
1513: x_base_id => isir_rec.base_id,
1514: x_batch_year => isir_rec.batch_year,

Line 1948: p_isir_id IN IGF_AP_ISIR_MATCHED_ALL.ISIR_ID%TYPE,

1944:
1945: END get_dynamic_dates;
1946:
1947: PROCEDURE get_internal_isir_id (
1948: p_isir_id IN IGF_AP_ISIR_MATCHED_ALL.ISIR_ID%TYPE,
1949: p_ret_isir_id IN OUT NOCOPY IGF_AP_ISIR_MATCHED_ALL.ISIR_ID%TYPE
1950: )IS
1951: /*
1952: || Created By : hkodali

Line 1949: p_ret_isir_id IN OUT NOCOPY IGF_AP_ISIR_MATCHED_ALL.ISIR_ID%TYPE

1945: END get_dynamic_dates;
1946:
1947: PROCEDURE get_internal_isir_id (
1948: p_isir_id IN IGF_AP_ISIR_MATCHED_ALL.ISIR_ID%TYPE,
1949: p_ret_isir_id IN OUT NOCOPY IGF_AP_ISIR_MATCHED_ALL.ISIR_ID%TYPE
1950: )IS
1951: /*
1952: || Created By : hkodali
1953: || Created On : 07-01-2005

Line 1964: CURSOR c_isir (l_isir_id igf_ap_isir_matched_all.isir_id%type)

1960: || Who When What
1961: || (reverse chronological order - newest change first)
1962: */
1963:
1964: CURSOR c_isir (l_isir_id igf_ap_isir_matched_all.isir_id%type)
1965: IS
1966: SELECT ISIR.rowid row_id,ISIR.*
1967: FROM IGF_AP_ISIR_MATCHED_ALL ISIR
1968: WHERE ISIR.ISIR_ID = l_isir_id ;

Line 1967: FROM IGF_AP_ISIR_MATCHED_ALL ISIR

1963:
1964: CURSOR c_isir (l_isir_id igf_ap_isir_matched_all.isir_id%type)
1965: IS
1966: SELECT ISIR.rowid row_id,ISIR.*
1967: FROM IGF_AP_ISIR_MATCHED_ALL ISIR
1968: WHERE ISIR.ISIR_ID = l_isir_id ;
1969:
1970: lv_isir c_isir%rowtype ;
1971:

Line 1972: CURSOR chk_internal (l_base_id igf_ap_isir_matched_all.base_id%type)

1968: WHERE ISIR.ISIR_ID = l_isir_id ;
1969:
1970: lv_isir c_isir%rowtype ;
1971:
1972: CURSOR chk_internal (l_base_id igf_ap_isir_matched_all.base_id%type)
1973: IS
1974: SELECT isir.rowid row_id,isir.isir_id FROM IGF_AP_ISIR_MATCHED_ALL ISIR
1975: WHERE
1976: ISIR.BASE_ID = l_base_id AND

Line 1974: SELECT isir.rowid row_id,isir.isir_id FROM IGF_AP_ISIR_MATCHED_ALL ISIR

1970: lv_isir c_isir%rowtype ;
1971:
1972: CURSOR chk_internal (l_base_id igf_ap_isir_matched_all.base_id%type)
1973: IS
1974: SELECT isir.rowid row_id,isir.isir_id FROM IGF_AP_ISIR_MATCHED_ALL ISIR
1975: WHERE
1976: ISIR.BASE_ID = l_base_id AND
1977: NVL(ISIR.SYSTEM_RECORD_TYPE,'X') = 'INTERNAL'
1978: FOR UPDATE NOWAIT;

Line 1982: pn_isir_id igf_ap_isir_matched_all.isir_id%type ;

1978: FOR UPDATE NOWAIT;
1979:
1980: lv_chk_internal chk_internal%rowtype ;
1981: lv_rowid VARCHAR2(30) ;
1982: pn_isir_id igf_ap_isir_matched_all.isir_id%type ;
1983:
1984: BEGIN
1985:
1986: OPEN c_isir(p_isir_id) ;

Line 2000: igf_ap_isir_matched_pkg.insert_row(

1996: CLOSE chk_internal ;
1997: lv_rowid := null;
1998: pn_isir_id := null;
1999:
2000: igf_ap_isir_matched_pkg.insert_row(
2001: x_Mode => 'R',
2002: x_rowid => lv_rowid,
2003: x_isir_id => pn_isir_id,
2004: x_base_id => lv_isir.base_id,