[Home] [Help]
60: denom_raw_cost,
61: acct_raw_cost,
62: acct_burdened_cost,
63: receipt_currency_amount
64: from gms_distributions
65: where NVL(dist_status,'X') <> 'FABA'
66: and document_header_id = x_doc_header_id
67: and document_type = x_doc_type;
68:
112: BEGIN
113: IF p_document_type = 'ENC' THEN
114: DELETE from gms_distribution_details A
115: WHERE document_type = p_document_type
116: and exists ( select 'X' from gms_distributions B
117: where A.document_header_id = b.document_distribution_id
118: and B.document_header_id = p_header_id
119: and b.document_type = p_document_type ) ;
120: ELSE
122: WHERE document_header_id = p_header_id
123: AND document_type = p_document_type ;
124: END IF ;
125:
126: DELETE from gms_distributions
127: WHERE document_header_id = p_header_id
128: AND document_type = p_document_type ;
129:
130: IF p_document_type = 'REQ' THEN
127: WHERE document_header_id = p_header_id
128: AND document_type = p_document_type ;
129:
130: IF p_document_type = 'REQ' THEN
131: INSERT INTO gms_distributions ( document_header_id,
132: document_distribution_id,
133: document_type,
134: gl_date,
135: project_id,
172:
173: l_count_rec := SQL%ROWCOUNT ;
174: ELSIF p_document_type = 'PO' THEN
175:
176: INSERT INTO gms_distributions ( document_header_id,
177: document_distribution_id,
178: document_type,
179: gl_date,
180: project_id,
217:
218: l_count_rec := SQL%ROWCOUNT ;
219: ELSIF p_document_type = 'AP' THEN
220:
221: INSERT INTO gms_distributions ( document_header_id,
222: document_distribution_id,
223: document_type,
224: gl_date,
225: project_id,
233: dist_status,
234: creation_date
235: )
236: -- ==========================================
237: -- R12 AP Lines Uptake: Insert into gms_distributions
238: -- got changed from picking distribution_line_number
239: -- to invoice_distribution_id for document type AP.
240: -- ==========================================
241: SELECT dst.invoice_id,
258:
259: L_COUNT_REC := SQL%ROWCOUNT ;
260: ELSIF p_document_type = 'ENC' THEN
261:
262: INSERT INTO gms_distributions ( document_header_id,
263: document_distribution_id,
264: document_type,
265: gl_date,
266: project_id,
305: ---- ********************* Fix for bug number : 1939601 start ****************----------
306:
307: ELSIF p_document_type = 'EXP' THEN
308:
309: INSERT INTO gms_distributions ( document_header_id,
310: document_distribution_id,
311: document_type,
312: gl_date,
313: project_id,
1089: -- ==== Create Distributions ========
1090: IF l_check_funds and l_tab_index > 0 then
1091: populate_dist_details(l_tab_index, p_doc_type);
1092:
1093: update gms_distributions
1094: set dist_status = 'FABA'
1095: where rowid = recs.rowid ;
1096:
1097: l_processed := l_processed + 1 ;
1103: -- ERR01 ( POETA Failed. )
1104:
1105: IF l_pattern_id <= 0 THEN
1106:
1107: update gms_distributions
1108: set dist_status = DECODE(l_pattern_id, -1, 'ERR01', 'ERR02' )
1109: where rowid = recs.rowid
1110: and document_header_id = p_doc_header_id
1111: and document_type = p_doc_type ;
1112:
1113: ELSIF NOT ( l_check_funds ) THEN
1114:
1115: -- ERR03 ( Check funds failed. )
1116: update gms_distributions
1117: set dist_status = 'ERR03'
1118: where rowid = recs.rowid
1119: and document_header_id = p_doc_header_id
1120: and document_type = p_doc_type ;
1131: end if;
1132:
1133: p_recs_processed := l_processed ;
1134: p_recs_rejected := l_rejected ;
1135: delete from gms_distributions
1136: where creation_date <= ( TRUNC(sysdate) -1 ) ;
1137:
1138: delete from gms_distribution_details
1139: where creation_date <= ( TRUNC(sysdate) -1 ) ;
1466: DELETE from GMS_DISTRIBUTION_DETAILS
1467: where document_header_id = p_xface_id ;
1468:
1469: pa_cc_utils.log_message(' No of GMS_DISTRIBUTION_DETAILS records deleted :'||to_char(SQL%ROWCOUNT));
1470: DELETE from GMS_DISTRIBUTIONS
1471: where document_header_id = p_xface_id ;
1472: pa_cc_utils.log_message(' No of GMS_DISTRIBUTIONS records deleted :'||to_char(SQL%ROWCOUNT));
1473: pa_cc_utils.reset_curr_function;
1474: EXCEPTION
1468:
1469: pa_cc_utils.log_message(' No of GMS_DISTRIBUTION_DETAILS records deleted :'||to_char(SQL%ROWCOUNT));
1470: DELETE from GMS_DISTRIBUTIONS
1471: where document_header_id = p_xface_id ;
1472: pa_cc_utils.log_message(' No of GMS_DISTRIBUTIONS records deleted :'||to_char(SQL%ROWCOUNT));
1473: pa_cc_utils.reset_curr_function;
1474: EXCEPTION
1475: When others then
1476: pa_cc_utils.log_message(' ERROR :'||SQLERRM);
2238:
2239: -- ========================================================================
2240: -- BUG: 1963556 ( ORA-1400 WHEN RUNNING PAXTRTRX FOR AWARD RELATED LABOR
2241: -- TRANSACTIONS ).
2242: -- Expenditure_organization_id is not null column in gms_distributions.
2243: -- This is required only for funds Check. For expenditures we don't have
2244: -- Funds check and afford to have it ZERO.
2245: -- ========================================================================
2246: V_exp_org_id(count_rec) := NVL(x_dummy,0) ;
2247: V_quantity(count_rec) := TrxRec.quantity ;
2248: -- = =================================================================
2249: -- = BUG: 3228565
2250: -- = Transaction import process is erroring out in pre import step.
2251: -- = gms_distributions.amount column is not null. Null value in
2252: -- = TrxRec.raw_cost is raising a ORA exception when inserting into
2253: -- = gms_distributions table.
2254: -- = Error is fixed by using NVL(TrxRec.raw_cost,0)
2255: -- = =================================================================
2249: -- = BUG: 3228565
2250: -- = Transaction import process is erroring out in pre import step.
2251: -- = gms_distributions.amount column is not null. Null value in
2252: -- = TrxRec.raw_cost is raising a ORA exception when inserting into
2253: -- = gms_distributions table.
2254: -- = Error is fixed by using NVL(TrxRec.raw_cost,0)
2255: -- = =================================================================
2256: V_amount(count_rec) := NVL(TrxRec.raw_cost ,0);
2257: V_exp_type(count_rec) := TrxRec.Expenditure_type ;
2277: -- Insert Records into Distribution Table.
2278: -- PLSQL Bulk operation
2279: -- =================================================
2280: FORALL indx in 1..count_rec
2281: INSERT INTO gms_distributions ( document_header_id,
2282: document_distribution_id,
2283: document_type,
2284: gl_date,
2285: project_id,
2321: SYSDATE
2322: ) ;
2323: END LOOP ;
2324:
2325: pa_cc_utils.log_message('Insert record into gms_distributions :'||to_char(count_rec));
2326: -- =====================================
2327: -- There is nothing to distribute.
2328: -- =====================================
2329: IF x_record_found = 0 THEN
2417: transaction_status_code = 'PR'
2418: WHERE A.transaction_source = P_transaction_source
2419: --AND A.batch_name = p_batch
2420: AND A.TXN_INTERFACE_ID IN ( SELECT B.document_distribution_id
2421: FROM GMS_DISTRIBUTIONS B
2422: WHERE B.document_header_id = P_Xface_id
2423: and B.document_type = 'EXP'
2424: and NVL(B.dist_status,'X') <> 'FABA' ) ;
2425: