[Home] [Help]
425: or not.
426: Cause for the issue:
427: Validate_transaction procedure :
428: if r_taxes.excise_cnt = 0 or r_receipt_cenvat_dtl.cenvat_amount = 0 then
429: lv_codepath := jai_general_pkg.plot_codepath(18, lv_codepath);
430: p_cenvat_rg_flag := 'X';
431: p_cenvat_rg_message := 'Excise Taxes do not exist';
432: goto end_of_cenvat_flag_validation;
433: end if;
867:
868:
869: FND_FILE.put_line(FND_FILE.log, '^Trx Post Processor');
870:
871: p_codepath := jai_general_pkg.plot_codepath(1, p_codepath, 'receipt_transactions_pkg.trx_post_proc', 'START');
872:
873: OPEN c_trx(p_transaction_id);
874: FETCH c_trx INTO r_trx;
875: CLOSE c_trx;
877: FND_FILE.put_line(FND_FILE.log, '1. Inside ^Trx Post Processor');
878:
879: IF r_trx.transaction_type IN ('RECEIVE','MATCH') THEN
880:
881: p_codepath := jai_general_pkg.plot_codepath(2, p_codepath);
882: -- Cenvat Claim is not required for the transaction if the following if condition is satisfied
883: IF r_trx.cenvat_rg_status NOT IN ('Y', 'P', 'E') THEN
884:
885: p_codepath := jai_general_pkg.plot_codepath(3, p_codepath);
881: p_codepath := jai_general_pkg.plot_codepath(2, p_codepath);
882: -- Cenvat Claim is not required for the transaction if the following if condition is satisfied
883: IF r_trx.cenvat_rg_status NOT IN ('Y', 'P', 'E') THEN
884:
885: p_codepath := jai_general_pkg.plot_codepath(3, p_codepath);
886: IF r_trx.item_class IN ('FGIN', 'FGEX') THEN
887: p_codepath := jai_general_pkg.plot_codepath(4, p_codepath);
888: ln_cenvat_amount := 0;
889: ln_cenvat_claimed_ptg := 0;
883: IF r_trx.cenvat_rg_status NOT IN ('Y', 'P', 'E') THEN
884:
885: p_codepath := jai_general_pkg.plot_codepath(3, p_codepath);
886: IF r_trx.item_class IN ('FGIN', 'FGEX') THEN
887: p_codepath := jai_general_pkg.plot_codepath(4, p_codepath);
888: ln_cenvat_amount := 0;
889: ln_cenvat_claimed_ptg := 0;
890: END IF;
891:
957: p_process_status => p_process_status,
958: p_process_message => p_process_message
959: );
960: */
961: p_codepath := jai_general_pkg.plot_codepath(9, p_codepath, 'receipt_transactions_pkg.trx_post_proc', 'END');
962:
963: /* Added by Ramananda for bug#4407165 */
964: EXCEPTION
965: WHEN OTHERS THEN
1114: lv_process_message := r_trx.process_message;
1115: lv_cenvat_rg_flag := r_trx.cenvat_rg_status;
1116: lv_cenvat_rg_message := r_trx.cenvat_rg_message;
1117:
1118: lv_codepath := jai_general_pkg.plot_codepath(1, lv_codepath, 'receipt_transactions_pkg.process_deferred_cenvat_claim', 'START');
1119:
1120: SAVEPOINT start_deferred_claim;
1121:
1122: IF lb_debug THEN
1128: OPEN c_receipt_cenvat_dtl(r_trx.tax_transaction_id);
1129: FETCH c_receipt_cenvat_dtl INTO r_receipt_cenvat_dtl;
1130: CLOSE c_receipt_cenvat_dtl;
1131:
1132: lv_codepath := jai_general_pkg.plot_codepath(2, lv_codepath);
1133:
1134: IF r_trx.item_class IN ('CGIN','CGEX') THEN
1135:
1136: lv_codepath := jai_general_pkg.plot_codepath(3, lv_codepath);
1132: lv_codepath := jai_general_pkg.plot_codepath(2, lv_codepath);
1133:
1134: IF r_trx.item_class IN ('CGIN','CGEX') THEN
1135:
1136: lv_codepath := jai_general_pkg.plot_codepath(3, lv_codepath);
1137: IF r_trx.transaction_type IN ('RECEIVE','MATCH') THEN
1138:
1139: IF r_receipt_cenvat_dtl.cenvat_claimed_ptg = 0 THEN
1140: lv_codepath := jai_general_pkg.plot_codepath(4, lv_codepath);
1136: lv_codepath := jai_general_pkg.plot_codepath(3, lv_codepath);
1137: IF r_trx.transaction_type IN ('RECEIVE','MATCH') THEN
1138:
1139: IF r_receipt_cenvat_dtl.cenvat_claimed_ptg = 0 THEN
1140: lv_codepath := jai_general_pkg.plot_codepath(4, lv_codepath);
1141: lv_2nd_claim_flag := 'N';
1142:
1143: ELSIF r_receipt_cenvat_dtl.cenvat_claimed_ptg = 100 THEN
1144: lv_codepath := jai_general_pkg.plot_codepath(5, lv_codepath);
1140: lv_codepath := jai_general_pkg.plot_codepath(4, lv_codepath);
1141: lv_2nd_claim_flag := 'N';
1142:
1143: ELSIF r_receipt_cenvat_dtl.cenvat_claimed_ptg = 100 THEN
1144: lv_codepath := jai_general_pkg.plot_codepath(5, lv_codepath);
1145: -- Already 100% is Claimed, some problem in code and thats why execution came till here. so process next record
1146: GOTO next_record;
1147:
1148: -- second claim case
1147:
1148: -- second claim case
1149: ELSIF r_receipt_cenvat_dtl.cenvat_claimed_ptg < 100 THEN
1150:
1151: lv_codepath := jai_general_pkg.plot_codepath(6, lv_codepath);
1152: -- 2nd Claim should be done only to the tune of JAI_RCV_CENVAT_CLAIMS.
1153: lv_2nd_claim_flag := 'Y';
1154:
1155: ELSE
1152: -- 2nd Claim should be done only to the tune of JAI_RCV_CENVAT_CLAIMS.
1153: lv_2nd_claim_flag := 'Y';
1154:
1155: ELSE
1156: lv_codepath := jai_general_pkg.plot_codepath(7, lv_codepath);
1157: GOTO next_record;
1158: END IF;
1159:
1160: ELSE
1158: END IF;
1159:
1160: ELSE
1161:
1162: lv_codepath := jai_general_pkg.plot_codepath(8, lv_codepath);
1163: IF r_trx.cenvat_claimed_ptg = 0 THEN
1164: lv_2nd_claim_flag := 'N';
1165: ELSE
1166: lv_codepath := jai_general_pkg.plot_codepath(8.1, lv_codepath);
1162: lv_codepath := jai_general_pkg.plot_codepath(8, lv_codepath);
1163: IF r_trx.cenvat_claimed_ptg = 0 THEN
1164: lv_2nd_claim_flag := 'N';
1165: ELSE
1166: lv_codepath := jai_general_pkg.plot_codepath(8.1, lv_codepath);
1167: -- transactions other than RECEIVE should not be processed for 2nd Claim
1168: GOTO next_record;
1169: END IF;
1170:
1170:
1171: END IF;
1172:
1173: ELSE
1174: lv_codepath := jai_general_pkg.plot_codepath(9, lv_codepath);
1175: lv_2nd_claim_flag := 'N';
1176: END IF;
1177:
1178: IF lv_2nd_claim_flag = 'Y' THEN
1195: p_excise_processing_reqd => jai_constants.yes, --File.Sql.35 Cbabu
1196: p_vat_processing_reqd => jai_constants.yes --File.Sql.35 Cbabu
1197: );
1198:
1199: lv_codepath := jai_general_pkg.plot_codepath(10, lv_codepath);
1200:
1201: -- flag value 'X' is removed from the following ELSIF conditions because it is not an ERROR Status. MYXZ
1202: IF lv_common_err_mesg IS NOT NULL THEN
1203: -- A common error occured. So, Whole Processing for Transaction should be stopped
1204: ROLLBACK TO start_deferred_claim;
1205: FND_FILE.put_line(FND_FILE.log, '*** Common Error for Transaction_id:'||r_trx.transaction_id
1206: ||fnd_global.local_chr(10)||fnd_global.local_chr(9)||'- Error:'||lv_common_err_mesg
1207: );
1208: lv_codepath := jai_general_pkg.plot_codepath(11, lv_codepath);
1209:
1210: ELSIF lv_process_flag IN ('E') AND lv_cenvat_rg_flag IN ('E') THEN
1211: lv_codepath := jai_general_pkg.plot_codepath(12, lv_codepath);
1212: FND_FILE.put_line(FND_FILE.log, '*** FLAGS ERROR *** Transaction_id:'||r_trx.transaction_id
1207: );
1208: lv_codepath := jai_general_pkg.plot_codepath(11, lv_codepath);
1209:
1210: ELSIF lv_process_flag IN ('E') AND lv_cenvat_rg_flag IN ('E') THEN
1211: lv_codepath := jai_general_pkg.plot_codepath(12, lv_codepath);
1212: FND_FILE.put_line(FND_FILE.log, '*** FLAGS ERROR *** Transaction_id:'||r_trx.transaction_id
1213: ||fnd_global.local_chr(10)||fnd_global.local_chr(9)||'- ProcessErr:'||lv_process_message
1214: ||fnd_global.local_chr(10)||fnd_global.local_chr(9)||'- CenvatErr:'||lv_cenvat_rg_message
1215: );
1217: ||fnd_global.local_chr(10)||fnd_global.local_chr(9)||'- ProcessErr:'||lv_process_message
1218: ||fnd_global.local_chr(10)||fnd_global.local_chr(9)||'- CenvatErr:'||lv_cenvat_rg_message );
1219: */
1220: ELSIF lv_process_flag IN ('E') THEN
1221: lv_codepath := jai_general_pkg.plot_codepath(13, lv_codepath);
1222: FND_FILE.put_line(FND_FILE.log, '*** PROCESS ERROR *** Transaction_id:'||r_trx.transaction_id
1223: ||fnd_global.local_chr(10)||fnd_global.local_chr(9)||'- ErrorMessage:'||lv_process_message
1224: );
1225: /*dbms_output.put_line('*** PROCESS ERROR *** Transaction_id:'||r_trx.transaction_id
1225: /*dbms_output.put_line('*** PROCESS ERROR *** Transaction_id:'||r_trx.transaction_id
1226: ||fnd_global.local_chr(10)||fnd_global.local_chr(9)||'- ErrorMessage:'||lv_process_message );
1227: */
1228: ELSIF lv_cenvat_rg_flag IN ('E') THEN
1229: lv_codepath := jai_general_pkg.plot_codepath(14, lv_codepath);
1230: FND_FILE.put_line(FND_FILE.log, '*** CENVAT ERROR *** Transaction_id:'||r_trx.transaction_id
1231: ||fnd_global.local_chr(10)||fnd_global.local_chr(9)||'- ErrorMessage:'||lv_cenvat_rg_message
1232: );
1233: /*dbms_output.put_line('*** CENVAT ERROR *** Transaction_id:'||r_trx.transaction_id
1235: );*/
1236: END IF;
1237:
1238: IF lv_process_flag IN ('X') AND lv_cenvat_rg_flag IN ('X') THEN
1239: lv_codepath := jai_general_pkg.plot_codepath(15, lv_codepath);
1240: FND_FILE.put_line(FND_FILE.log, ' Transaction Cant be processed for trx:'||r_trx.transaction_id
1241: ||fnd_global.local_chr(10)||fnd_global.local_chr(9)||'- ProcessMessage(X):'||lv_process_message
1242: ||fnd_global.local_chr(10)||fnd_global.local_chr(9)||'- CenvatMessgae(X):'||lv_cenvat_rg_message
1243: );
1245: ||fnd_global.local_chr(10)||fnd_global.local_chr(9)||'- ProcessMessage(X):'||lv_process_message
1246: ||fnd_global.local_chr(10)||fnd_global.local_chr(9)||'- CenvatMessgae(X):'||lv_cenvat_rg_message);
1247: */
1248: ELSIF lv_process_flag IN ('X') THEN
1249: lv_codepath := jai_general_pkg.plot_codepath(16, lv_codepath);
1250: FND_FILE.put_line(FND_FILE.log, 'Process Message(X):'||lv_process_message);
1251: /*dbms_output.put_line('M: Err4:'||lv_process_message);*/
1252: ELSIF lv_cenvat_rg_flag IN ('X') THEN
1253: lv_codepath := jai_general_pkg.plot_codepath(17, lv_codepath);
1249: lv_codepath := jai_general_pkg.plot_codepath(16, lv_codepath);
1250: FND_FILE.put_line(FND_FILE.log, 'Process Message(X):'||lv_process_message);
1251: /*dbms_output.put_line('M: Err4:'||lv_process_message);*/
1252: ELSIF lv_cenvat_rg_flag IN ('X') THEN
1253: lv_codepath := jai_general_pkg.plot_codepath(17, lv_codepath);
1254: FND_FILE.put_line(FND_FILE.log, 'Cenvat Messgae(X):'||lv_cenvat_rg_message);
1255: /*dbms_output.put_line('M: Err3:'||lv_cenvat_rg_message);*/
1256: END IF;
1257:
1255: /*dbms_output.put_line('M: Err3:'||lv_cenvat_rg_message);*/
1256: END IF;
1257:
1258: IF lv_process_flag = 'E' OR lv_cenvat_rg_flag = 'E' THEN
1259: lv_codepath := jai_general_pkg.plot_codepath(18, lv_codepath);
1260: p_process_flag := lv_cenvat_rg_flag;
1261: p_process_message := lv_cenvat_rg_message;
1262: fnd_file.put_line(fnd_file.log, 'M: Err5:'||p_process_message);
1263: END IF;
1265: -- UNCLAIM PROCESSING
1266: -- following Unclaim Processing will not happen for
1267: ELSIf temp_rec.process_flag = 'U' AND r_trx.transaction_type IN ('RECEIVE', 'MATCH') THEN
1268:
1269: lv_codepath := jai_general_pkg.plot_codepath(19, lv_codepath);
1270: SAVEPOINT start_unclaim;
1271:
1272: -- Costing(Average and Standard)/Expense Logic for Excise Amount
1273:
1280: IF r_trx.organization_type = 'T' THEN
1281: lv_breakup_type := 'RG23D';
1282: END IF;
1283:
1284: lv_codepath := jai_general_pkg.plot_codepath(21, lv_codepath);
1285: jai_rcv_excise_processing_pkg.get_tax_amount_breakup(
1286: p_shipment_line_id => loop_trx.shipment_line_id,
1287: p_transaction_id => loop_trx.transaction_id,
1288: p_curr_conv_rate => r_trx.currency_conversion_rate,
1378: IF ln_process_special_amount = 0 THEN
1379: GOTO skip_unclaim_record;
1380: END IF;
1381:
1382: lv_codepath := jai_general_pkg.plot_codepath(22, lv_codepath);
1383: --lv_codepath := '';
1384: jai_rcv_deliver_rtr_pkg.process_transaction (
1385: p_transaction_id => loop_trx.transaction_id,
1386: p_simulate => p_simulate_flag,
1391: p_process_special_amount => ln_process_special_amount
1392: );
1393:
1394: IF p_process_flag IN ('E', 'X') THEN
1395: lv_codepath := jai_general_pkg.plot_codepath(23, lv_codepath);
1396: FND_FILE.put_line(FND_FILE.log, 'Unclaim PRC_FLG_Error: RollingBack to process_trxn_flag');
1397: /*dbms_output.put_line('Unclaim PRC_FLG_Error: RollingBack to process_trxn_flag');*/
1398: --p_codepath := jai_general_pkg.plot_codepath(6, p_codepath);
1399: ROLLBACK TO start_unclaim;
1394: IF p_process_flag IN ('E', 'X') THEN
1395: lv_codepath := jai_general_pkg.plot_codepath(23, lv_codepath);
1396: FND_FILE.put_line(FND_FILE.log, 'Unclaim PRC_FLG_Error: RollingBack to process_trxn_flag');
1397: /*dbms_output.put_line('Unclaim PRC_FLG_Error: RollingBack to process_trxn_flag');*/
1398: --p_codepath := jai_general_pkg.plot_codepath(6, p_codepath);
1399: ROLLBACK TO start_unclaim;
1400: -- following is to take care that if one transaction of RECEIVE childs fail, then loop should not
1401: -- be executed as the loop is related to CHILDs of RECEIVE Transaction
1402: EXIT;
1400: -- following is to take care that if one transaction of RECEIVE childs fail, then loop should not
1401: -- be executed as the loop is related to CHILDs of RECEIVE Transaction
1402: EXIT;
1403: ElSIF p_process_flag = 'Y' THEN
1404: --p_codepath := jai_general_pkg.plot_codepath(7, p_codepath);
1405: p_process_message := 'Successful';
1406: ELSE
1407: FND_FILE.put_line(FND_FILE.log, 'Unclaim#PRC_FLG#'||p_process_flag);
1408: --p_codepath := jai_general_pkg.plot_codepath(8, p_codepath);
1404: --p_codepath := jai_general_pkg.plot_codepath(7, p_codepath);
1405: p_process_message := 'Successful';
1406: ELSE
1407: FND_FILE.put_line(FND_FILE.log, 'Unclaim#PRC_FLG#'||p_process_flag);
1408: --p_codepath := jai_general_pkg.plot_codepath(8, p_codepath);
1409: /*dbms_output.put_line('Unclaim#PRC_FLG#'||p_process_flag);*/
1410: END IF;
1411:
1412: UPDATE JAI_RCV_TRANSACTIONS
1418: NULL;
1419:
1420: END LOOP;
1421:
1422: lv_codepath := jai_general_pkg.plot_codepath(27, lv_codepath);
1423:
1424: UPDATE JAI_RCV_TRANSACTIONS
1425: SET CENVAT_RG_STATUS = 'X',
1426: cenvat_rg_message = 'Cenvat Unclaimed'
1511: jai_constants.tax_type_cvd_edu_cess, jai_constants.tax_type_sh_exc_edu_cess,
1512: jai_constants.tax_type_sh_cvd_edu_cess) -- By kunkumar for bug 5989740
1513: AND modvat_flag ='Y';
1514:
1515: lv_codepath := jai_general_pkg.plot_codepath(27.1, lv_codepath);
1516:
1517: END IF;
1518:
1519: << next_record >>
1521: If lv_common_err_mesg IS NOT NULL
1522: OR lv_cenvat_rg_flag IN ('E', jai_constants.unexpected_error, jai_constants.expected_error)
1523: THEN
1524:
1525: lv_codepath := jai_general_pkg.plot_codepath(28, lv_codepath);
1526: ROLLBACK TO start_deferred_claim;
1527: p_process_flag := lv_cenvat_rg_flag;
1528: p_process_message := lv_cenvat_rg_message;
1529: ln_errored_cnt := ln_errored_cnt + 1;
1535: WHERE CURRENT OF c_trxs_to_be_claimed;
1536:
1537: ELSE
1538:
1539: lv_codepath := jai_general_pkg.plot_codepath(29, lv_codepath);
1540: -- Finally after the processing is completed, we need to delete the record from temp table
1541: DELETE FROM JAI_RCV_CENVAT_CLAIM_T
1542: WHERE CURRENT OF c_trxs_to_be_claimed;
1543:
1542: WHERE CURRENT OF c_trxs_to_be_claimed;
1543:
1544: END IF;
1545:
1546: lv_codepath := jai_general_pkg.plot_codepath(30, lv_codepath);
1547: fnd_file.put_line(fnd_file.log, 'Trx_id:'||temp_rec.transaction_id||'. Codepath:'||lv_codepath);
1548: /*dbms_output.put_line('Trx_id:'||temp_rec.transaction_id||'. Codepath:'||lv_codepath);*/
1549:
1550: END LOOP;
2322: ||', cenvat_rg_status:'||trx.cenvat_rg_flag
2323: ||', cenvat_claimed_ptg:'||trx.cenvat_claimed_ptg
2324: );
2325:
2326: -- lv_codepath := jai_general_pkg.plot_codepath(1, lv_codepath, 'process_batch', 'start'); /* 1 */
2327:
2328: SAVEPOINT process_trxn;
2329:
2330: lv_process_flag := trx.process_flag;
2703: p_organization_id => ln_organization_id,
2704: p_location_id => ln_location_id,
2705: p_called_from => 'P', -- Required for excise invoice generation for RTV
2706: p_order_invoice_type_id => NULL,
2707: p_fin_year => jai_general_pkg.get_fin_year(ln_organization_id),
2708: p_excise_inv_no => lv_gen_excise_invoice_no,
2709: p_errbuf => lv_errbuf
2710: );
2711:
3150: FND_FILE.put_line(FND_FILE.log, '^Start of Trx:'||p_transaction_id||'. Time:'||to_char(SYSDATE,'dd/mm/yyyy hh24:mi:ss')
3151: ||', PrcSpecialReason:'||p_process_special_reason||', PrcSplQty:'||p_process_special_qty
3152: );
3153:
3154: p_codepath := jai_general_pkg.plot_codepath(1, p_codepath, 'receipt_transactions_pkg.process_transaction', 'START');
3155:
3156: lv_statement_id := '1';
3157:
3158: --added the cursor and 2 assignments here by Ramananda for bug#4519697
3186: p_simulate_flag => p_simulate_flag,
3187: p_codepath => p_codepath
3188: );
3189:
3190: p_codepath := jai_general_pkg.plot_codepath(2, p_codepath);
3191:
3192: -- ERROR occured in Validate transaction. So proceed with next transaction
3193: -- We should not check for 'X' here. Because Cenvat can be 'N' which should be processed
3194: -- process_flag = 'E' means somehow an error occured in Validate transaction
3212: FND_FILE.put_line(FND_FILE.log, lv_object_code||'Localization doesnot support this transaction type');
3213: RETURN;
3214: END IF;
3215:
3216: p_codepath := jai_general_pkg.plot_codepath(3, p_codepath);
3217:
3218: ------------ Start of PROCESS_FLAG Execution ----------
3219: -- IF p_process_flag IN ('N','E') THEN
3220: IF p_simulate_flag = 'Y'
3228: lv_destination_type_code := r_trx.destination_type_code;--Added by nprashar for bug # 10221291
3229:
3230: IF lv_transaction_type IN ( 'RECEIVE', 'RETURN TO VENDOR') THEN
3231: lv_statement_id := '4';
3232: p_codepath := jai_general_pkg.plot_codepath(4, p_codepath);
3233:
3234: jai_rcv_rcv_rtv_pkg.process_transaction(
3235: p_transaction_id => p_transaction_id,
3236: p_simulation => p_simulate_flag,
3243: ELSIF lv_transaction_type IN ('DELIVER', 'RETURN TO RECEIVING') AND nvl(lv_destination_type_code,'xyz') <> 'SHOP FLOOR' AND nvl( parent_trx_rec.destination_type_code,'xyz') <> 'SHOP FLOOR' THEN /*Added by nprahsar for bug # 10221291 */
3244:
3245:
3246: lv_statement_id := '5';
3247: p_codepath := jai_general_pkg.plot_codepath(5, p_codepath);
3248:
3249: jai_rcv_deliver_rtr_pkg.process_transaction (
3250: p_transaction_id => p_transaction_id,
3251: p_simulate => p_simulate_flag,
3262:
3263: lv_statement_id := '6';
3264: IF p_process_flag IN ('E', 'X') THEN
3265: FND_FILE.put_line(FND_FILE.log, 'PRC_FLG_Error: RollingBack to process_trxn_flag');
3266: p_codepath := jai_general_pkg.plot_codepath(6, p_codepath);
3267: ROLLBACK TO process_trxn_flag;
3268: ElSIF p_process_flag = 'Y' THEN
3269: p_codepath := jai_general_pkg.plot_codepath(7, p_codepath);
3270: p_process_message := 'Successful';
3265: FND_FILE.put_line(FND_FILE.log, 'PRC_FLG_Error: RollingBack to process_trxn_flag');
3266: p_codepath := jai_general_pkg.plot_codepath(6, p_codepath);
3267: ROLLBACK TO process_trxn_flag;
3268: ElSIF p_process_flag = 'Y' THEN
3269: p_codepath := jai_general_pkg.plot_codepath(7, p_codepath);
3270: p_process_message := 'Successful';
3271: ELSE
3272: FND_FILE.put_line(FND_FILE.log, '1#PRC_FLG#'||p_process_flag);
3273: p_codepath := jai_general_pkg.plot_codepath(8, p_codepath);
3269: p_codepath := jai_general_pkg.plot_codepath(7, p_codepath);
3270: p_process_message := 'Successful';
3271: ELSE
3272: FND_FILE.put_line(FND_FILE.log, '1#PRC_FLG#'||p_process_flag);
3273: p_codepath := jai_general_pkg.plot_codepath(8, p_codepath);
3274: END IF;
3275:
3276: END IF;
3277:
3325: FND_FILE.put_line(FND_FILE.log, 'ln_part_i_register_id:'||ln_part_i_register_id);
3326:
3327: ELSIF r_trx.item_class IN ('RMIN', 'RMEX', 'CCIN', 'CCEX', 'CGIN', 'CGEX') THEN
3328:
3329: lv_register_type := jai_general_pkg.get_rg_register_type( p_item_class => r_trx.item_class);
3330:
3331: FND_FILE.put_line(FND_FILE.log, 'Register Type:'||lv_register_type);
3332:
3333: -- to determine the way in which CGIN Items are Processed
3410: /* Commented for bug #13362352 */
3411: THEN
3412: -- this call passes the cenvat related accounting and register entries based on transaction type
3413: lv_statement_id := '8';
3414: p_codepath := jai_general_pkg.plot_codepath(9, p_codepath);
3415:
3416: jai_rcv_excise_processing_pkg.process_transaction(
3417: p_transaction_id => p_transaction_id,
3418: p_process_status => p_cenvat_rg_flag,
3433:
3434: lv_statement_id := '9';
3435: IF p_cenvat_rg_flag IN ('E', 'X') THEN
3436: FND_FILE.put_line(FND_FILE.log, 'CEN_FLG_Error: RollingBack to process_cenvat_rg_flag');
3437: p_codepath := jai_general_pkg.plot_codepath(10, p_codepath);
3438: ROLLBACK TO process_cenvat_rg_flag;
3439: ElSIF p_cenvat_rg_flag = 'Y' THEN
3440: p_cenvat_rg_message := 'Successful';
3441: p_codepath := jai_general_pkg.plot_codepath(11, p_codepath);
3437: p_codepath := jai_general_pkg.plot_codepath(10, p_codepath);
3438: ROLLBACK TO process_cenvat_rg_flag;
3439: ElSIF p_cenvat_rg_flag = 'Y' THEN
3440: p_cenvat_rg_message := 'Successful';
3441: p_codepath := jai_general_pkg.plot_codepath(11, p_codepath);
3442: ELSE
3443: FND_FILE.put_line(FND_FILE.log, '1#CENVAT_FLG#'||p_cenvat_rg_flag);
3444: p_codepath := jai_general_pkg.plot_codepath(12, p_codepath);
3445: END IF;
3440: p_cenvat_rg_message := 'Successful';
3441: p_codepath := jai_general_pkg.plot_codepath(11, p_codepath);
3442: ELSE
3443: FND_FILE.put_line(FND_FILE.log, '1#CENVAT_FLG#'||p_cenvat_rg_flag);
3444: p_codepath := jai_general_pkg.plot_codepath(12, p_codepath);
3445: END IF;
3446:
3447: END IF;
3448:
3449: FND_FILE.put_line(FND_FILE.log, '2#CENVAT_FLG#'||p_cenvat_rg_flag);
3450: /* End of CENVAT_RG_FLAG Execution */
3451:
3452: lv_statement_id := '10';
3453: p_codepath := jai_general_pkg.plot_codepath(13, p_codepath);
3454:
3455: /* Start of VAT Execution. Vijay Shankar for Bug#4250236(4245089) */
3456: IF p_simulate_flag = 'N'
3457: AND -- Vijay Shankar for Bug#4346453. RCV DFF Elim. Enh. lv_process_vat_flag IN ('N', 'E')
3469:
3470: IF lv_transaction_type IN ( 'RECEIVE', 'RETURN TO VENDOR') THEN
3471: -- this call passes the cenvat related accounting and register entries based on transaction type
3472: lv_statement_id := '11';
3473: p_codepath := jai_general_pkg.plot_codepath(14, p_codepath);
3474:
3475: jai_rcv_rgm_claims_pkg.process_vat(
3476: p_transaction_id => p_transaction_id,
3477: p_process_status => lv_process_vat_flag,
3486:
3487: lv_statement_id := '12';
3488: IF lv_process_vat_flag = jai_constants.successful THEN
3489: lv_process_vat_message := 'Successful';
3490: p_codepath := jai_general_pkg.plot_codepath(16, p_codepath);
3491: ELSIF lv_process_vat_flag <> jai_constants.successful THEN
3492: FND_FILE.put_line(FND_FILE.log, 'PrcVatFlg Err: RollingBack to process_vat_flag. Mesg:'||lv_process_vat_message);
3493: p_codepath := jai_general_pkg.plot_codepath(15, p_codepath);
3494: ROLLBACK TO process_vat_flag;
3489: lv_process_vat_message := 'Successful';
3490: p_codepath := jai_general_pkg.plot_codepath(16, p_codepath);
3491: ELSIF lv_process_vat_flag <> jai_constants.successful THEN
3492: FND_FILE.put_line(FND_FILE.log, 'PrcVatFlg Err: RollingBack to process_vat_flag. Mesg:'||lv_process_vat_message);
3493: p_codepath := jai_general_pkg.plot_codepath(15, p_codepath);
3494: ROLLBACK TO process_vat_flag;
3495: ELSE
3496: FND_FILE.put_line(FND_FILE.log, '1#PrcVatFlg#'||lv_process_vat_flag);
3497: p_codepath := jai_general_pkg.plot_codepath(17, p_codepath);
3493: p_codepath := jai_general_pkg.plot_codepath(15, p_codepath);
3494: ROLLBACK TO process_vat_flag;
3495: ELSE
3496: FND_FILE.put_line(FND_FILE.log, '1#PrcVatFlg#'||lv_process_vat_flag);
3497: p_codepath := jai_general_pkg.plot_codepath(17, p_codepath);
3498: END IF;
3499:
3500: END IF;
3501:
3502: FND_FILE.put_line(FND_FILE.log, '2#PrcVatFlg#'||lv_process_vat_flag);
3503: /* End of VAT Execution */
3504:
3505: lv_statement_id := '14';
3506: p_codepath := jai_general_pkg.plot_codepath(18, p_codepath);
3507:
3508: IF p_simulate_flag = 'N' THEN
3509:
3510: jai_rcv_transactions_pkg.update_process_flags(
3525: <
3526:
3527: FND_FILE.put_line(FND_FILE.log, '$End of Trx:'||p_transaction_id||'. Time:'||to_char(SYSDATE,'dd/mm/yyyy hh24:mi:ss'));
3528:
3529: p_codepath := jai_general_pkg.plot_codepath(99, p_codepath, null, 'END');
3530:
3531: EXCEPTION
3532: WHEN OTHERS THEN
3533: p_common_err_mesg := 'RECEIPT_TRANSACTIONS_PKG.process_transaction(StmtId:'||lv_statement_id||'). Error:'||SQLERRM;
3541: ELSE
3542: -- dont update any of the fields of JAI_RCV_TRANSACTIONS table
3543: NULL;
3544: END IF;
3545: p_codepath := jai_general_pkg.plot_codepath(999, p_codepath, null, 'END');
3546:
3547: END process_transaction;
3548:
3549: /* ~~~~~~~~~~~~~~~~~~~~ POPULATION of DETAILS Procedure ~~~~~~~~~~~~~~~~~~~~~~~~*/
3687: IF lb_debug THEN
3688: FND_FILE.put_line(FND_FILE.log, '^ POPULATE_DETAILS');
3689: END IF;
3690:
3691: p_codepath := jai_general_pkg.plot_codepath(1, p_codepath, 'populate_details', 'START');
3692:
3693: OPEN c_base_trx(p_transaction_id);
3694: FETCH c_base_trx INTO r_base_trx;
3695: CLOSE c_base_trx;
3699: FETCH c_trx INTO r_trx;
3700: CLOSE c_trx;
3701:
3702: IF r_base_trx.parent_transaction_id > 0 THEN
3703: p_codepath := jai_general_pkg.plot_codepath(2, p_codepath);
3704: OPEN c_base_trx(r_base_trx.parent_transaction_id);
3705: FETCH c_base_trx INTO r_parent_base_trx;
3706: CLOSE c_base_trx;
3707: END IF;
3738: CLOSE c_excise_invoice_no;
3739: end if;
3740:
3741: IF r_base_trx.transaction_type = 'CORRECT' THEN
3742: p_codepath := jai_general_pkg.plot_codepath(3, p_codepath);
3743: lv_transaction_type := r_parent_base_trx.transaction_type;
3744: ELSE
3745: p_codepath := jai_general_pkg.plot_codepath(4, p_codepath);
3746: lv_transaction_type := r_base_trx.transaction_type;
3741: IF r_base_trx.transaction_type = 'CORRECT' THEN
3742: p_codepath := jai_general_pkg.plot_codepath(3, p_codepath);
3743: lv_transaction_type := r_parent_base_trx.transaction_type;
3744: ELSE
3745: p_codepath := jai_general_pkg.plot_codepath(4, p_codepath);
3746: lv_transaction_type := r_base_trx.transaction_type;
3747: END IF;
3748:
3749: -- Vijay Shankar for Bug#3940588. RECEIPTS DEPLUG
3773:
3774: -- if both location and subinventory are NULL then goto the parent type i.e RTV to RECEIVE and RTR to DELIVER
3775: ELSIF nvl(r_base_trx.location_id, 0) = 0 AND nvl(r_base_trx.subinventory, '-XX') = '-XX' THEN
3776:
3777: p_codepath := jai_general_pkg.plot_codepath(5, p_codepath);
3778: -- following condition added by Vijay Shankar for Bug#4038024. Incase of CORRECT transactions, if location and subinventory
3779: -- are not present, then we need to look at parent transaction for location. this will mostly happen for DIRECT DELIVERY case
3780: IF lv_transaction_type IN ('RETURN TO RECEIVING', 'RETURN TO VENDOR')
3781: OR (r_base_trx.transaction_type = 'CORRECT' AND r_parent_base_trx.transaction_type IN ('RECEIVE', 'DELIVER')) -- BUG#3949502. (3927371)
3780: IF lv_transaction_type IN ('RETURN TO RECEIVING', 'RETURN TO VENDOR')
3781: OR (r_base_trx.transaction_type = 'CORRECT' AND r_parent_base_trx.transaction_type IN ('RECEIVE', 'DELIVER')) -- BUG#3949502. (3927371)
3782: THEN
3783:
3784: p_codepath := jai_general_pkg.plot_codepath(6, p_codepath);
3785: OPEN c_trx(r_base_trx.parent_transaction_id);
3786: FETCH c_trx INTO r_parent_trx;
3787: CLOSE c_trx;
3788:
3791: -- following IF condition added as part of porting from Bug#3949109 (3927371)
3792: -- Incase of Direct Delivery RECEIVE transaction may not have both the location and subinventory. In this case we need to fetch the
3793: -- subinventory from DELIVER transaction
3794: ELSIF lv_transaction_type = 'RECEIVE' AND r_base_trx.routing_header_id = 3 THEN -- this will not execute for correct transactions
3795: p_codepath := jai_general_pkg.plot_codepath(7, p_codepath);
3796: OPEN c_dlry_subinventory(r_base_trx.shipment_line_id, p_transaction_id, 'DELIVER');
3797: FETCH c_dlry_subinventory INTO lv_subinventory;
3798: CLOSE c_dlry_subinventory;
3799:
3802: IF (lv_transaction_type in ('RETURN TO RECEIVING', 'DELIVER') AND nvl(lv_subinventory,'-XX')='-XX')
3803: OR (lv_transaction_type in ('RETURN TO VENDOR', 'RECEIVE') AND nvl(ln_location_id,0)=0 AND nvl(lv_subinventory,'-XX')='-XX' )
3804: THEN
3805:
3806: p_codepath := jai_general_pkg.plot_codepath(8, p_codepath);
3807: IF lv_transaction_type IN ('DELIVER', 'RETURN TO RECEIVING') THEN
3808: lv_required_trx_type := 'DELIVER';
3809: ELSIF lv_transaction_type IN ('RECEIVE', 'RETURN TO VENDOR') THEN
3810: lv_required_trx_type := 'RECEIVE';
3815: p_shipment_line_id => r_base_trx.shipment_line_id,
3816: p_required_trx_type => lv_required_trx_type
3817: );
3818:
3819: p_codepath := jai_general_pkg.plot_codepath(9, p_codepath);
3820: IF ln_ancestor_trxn_id IS NOT NULL THEN
3821: p_codepath := jai_general_pkg.plot_codepath(10, p_codepath);
3822: OPEN c_base_trx(ln_ancestor_trxn_id);
3823: FETCH c_base_trx INTO r_ancestor_dtls;
3817: );
3818:
3819: p_codepath := jai_general_pkg.plot_codepath(9, p_codepath);
3820: IF ln_ancestor_trxn_id IS NOT NULL THEN
3821: p_codepath := jai_general_pkg.plot_codepath(10, p_codepath);
3822: OPEN c_base_trx(ln_ancestor_trxn_id);
3823: FETCH c_base_trx INTO r_ancestor_dtls;
3824: CLOSE c_base_trx;
3825:
3829:
3830: END IF;
3831:
3832: ELSE
3833: p_codepath := jai_general_pkg.plot_codepath(11, p_codepath);
3834: ln_location_id := r_base_trx.location_id;
3835: lv_subinventory := r_base_trx.subinventory;
3836: END IF;
3837:
3849: END IF ;
3850:
3851:
3852: IF lv_subinventory IS NOT NULL THEN
3853: p_codepath := jai_general_pkg.plot_codepath(12, p_codepath);
3854: OPEN c_loc_linked_to_org_subinv(r_base_trx.organization_id, lv_subinventory);
3855: FETCH c_loc_linked_to_org_subinv INTO r_subinv_dtls;
3856: CLOSE c_loc_linked_to_org_subinv;
3857:
3865: Commented the following condition.
3866: OR (r_base_trx.source_document_code = 'REQ' and */
3867: OR nvl(r_subinv_dtls.location_id, 0) <> 0 )
3868: THEN
3869: p_codepath := jai_general_pkg.plot_codepath(13, p_codepath);
3870: ln_location_id := r_subinv_dtls.location_id;
3871: END IF;
3872:
3873: lv_loc_subinv_type := r_subinv_dtls.loc_subinventory_type;
3876: END IF;
3877:
3878: -- IF nvl(ln_location_id, 0) = 0 THEN
3879: IF nvl(ln_location_id, 0) <> 0 THEN
3880: p_codepath := jai_general_pkg.plot_codepath(14, p_codepath);
3881: -- OPEN c_inv_org_linked_to_location(r_base_trx.organization_id);
3882: OPEN c_inv_org_linked_to_location(ln_location_id);
3883: FETCH c_inv_org_linked_to_location INTO ln_organization_id;
3884: CLOSE c_inv_org_linked_to_location;
3883: FETCH c_inv_org_linked_to_location INTO ln_organization_id;
3884: CLOSE c_inv_org_linked_to_location;
3885:
3886: IF r_base_trx.organization_id <> ln_organization_id THEN
3887: p_codepath := jai_general_pkg.plot_codepath(15, p_codepath);
3888: ln_location_id := 0;
3889: END IF;
3890: END IF;
3891:
3897: ln_location_id := r_base_trx.location_id;
3898: END IF;
3899:
3900: /*Added by nprashar for bug # 10155836*/
3901: If r_base_trx.currency_code = jai_general_pkg.INDIAN_CURRENCY
3902: and (r_base_trx.currency_conversion_rate is NULL or r_base_trx.currency_conversion_rate = 0)
3903: Then
3904: r_base_trx.currency_conversion_rate := 1;
3905: --Bug 12543504 - Get Currency Conversion Rate from GL based on Conversion Type and Receipt Transaction Date for Foreign Currency
3903: Then
3904: r_base_trx.currency_conversion_rate := 1;
3905: --Bug 12543504 - Get Currency Conversion Rate from GL based on Conversion Type and Receipt Transaction Date for Foreign Currency
3906: --Added ELSIF conditions as this GL API call is resulting in -ve currency conversion rate # 13823908
3907: ELSIF r_base_trx.currency_code <> jai_general_pkg.INDIAN_CURRENCY --13823908
3908: and (r_base_trx.currency_conversion_rate is NULL or r_base_trx.currency_conversion_rate = 0)
3909: Then
3910:
3911: r_base_trx.currency_conversion_rate := gl_currency_api.get_rate_sql (
3915: x_conversion_type => r_base_trx.currency_conversion_type );
3916: /*Bug 12543504 - End*/
3917: End If;
3918:
3919: p_codepath := jai_general_pkg.plot_codepath(16, p_codepath);
3920: ln_tax_amount := get_trxn_tax_amount(
3921: p_transaction_id => p_transaction_id,
3922: p_shipment_line_id => r_base_trx.shipment_line_id,
3923: p_curr_conv_rate => r_base_trx.currency_conversion_rate,
3958: IF lb_debug THEN
3959: FND_FILE.put_line(FND_FILE.log, '... RecNum:'||r_shp_hdr_dtls.receipt_num ||',p_cenvat_amount:'||ln_cenvat_amount );
3960: END IF;
3961:
3962: p_codepath := jai_general_pkg.plot_codepath(17, p_codepath);
3963: jai_rcv_transactions_pkg.update_row(
3964: p_transaction_id => p_transaction_id,
3965: p_parent_transaction_type => r_parent_base_trx.transaction_type,
3966: p_receipt_num => r_shp_hdr_dtls.receipt_num,
3988: p_assessable_value => NULL -- This needs to be populated during Tax Calculation itself
3989: );
3990:
3991:
3992: p_codepath := jai_general_pkg.plot_codepath(18, p_codepath);
3993:
3994: --Start Added by Sanjikum for Bug#4495135
3995: ln_tax_apportion_factor := get_apportion_factor(p_transaction_id);
3996:
3993:
3994: --Start Added by Sanjikum for Bug#4495135
3995: ln_tax_apportion_factor := get_apportion_factor(p_transaction_id);
3996:
3997: p_codepath := jai_general_pkg.plot_codepath(19, p_codepath);
3998: --This update can't be merged with the above, as get_apportion_factor uses the column tax_transaction_id
3999: --which is updated only in the above update
4000:
4001: jai_rcv_transactions_pkg.update_row(
4003: p_tax_apportion_factor => ln_tax_apportion_factor
4004: );
4005: --End Added by Sanjikum for Bug#4495135
4006:
4007: p_codepath := jai_general_pkg.plot_codepath(20, p_codepath, 'populate_details', 'END');
4008:
4009: IF lb_debug THEN
4010: FND_FILE.put_line(FND_FILE.log, '$ POPULATE_DETAILS');
4011: END IF;
4253: ln_rg_count := 0;
4254: ln_rtv_cnt := 0;
4255: lv_codepath := '';
4256:
4257: lv_codepath := jai_general_pkg.plot_codepath(1, lv_codepath, 'cenvat_rg_pkg.validate_trx', 'START');
4258: IF lb_debug THEN
4259: FND_FILE.put_line(FND_FILE.log, '^VALIDATE_TRANSACTION. Prc_Flag->'||p_process_flag||', Cen_Flag->'||p_cenvat_rg_flag);
4260: END IF;
4261:
4342: IF p_called_from = CALLED_FROM_OPM
4343: --OR r_trx.attribute_category in (OPM_RECEIPT, OPM_RETURNS) 13364465
4344: OR r_trx.trx_information in (OPM_RECEIPT, OPM_RETURNS)
4345: THEN
4346: lv_codepath := jai_general_pkg.plot_codepath(3, lv_codepath);
4347: p_process_flag := 'X';
4348: p_process_message := 'This Processing not required for OPM Transaction';
4349: p_cenvat_rg_flag := 'X';
4350: p_cenvat_rg_message := 'This Processing not required for OPM Transaction';
4384: OPEN c_taxes(r_trx.shipment_line_id);
4385: FETCH c_taxes into r_taxes;
4386: CLOSE c_taxes;
4387:
4388: lv_codepath := jai_general_pkg.plot_codepath(2, lv_codepath);
4389: lb_process_iso := process_iso_transaction(
4390: p_transaction_id => r_trx.transaction_id,
4391: p_shipment_line_id => r_trx.shipment_line_id
4392: );
4395: /* Process Flag is set to 'O' when some columns which are required are null or some specific scenarios */
4396:
4397: -- values other than 'Y' are added by Vijay Shankar for Bug#3940588. RECEIPTS DEPLUG
4398: IF p_process_flag IN ('Y', 'X', 'O', 'XT') THEN
4399: lv_codepath := jai_general_pkg.plot_codepath(3, lv_codepath);
4400: goto end_of_process_flag_validation;
4401: END IF;
4402:
4403:
4459:
4460: /* 1PROCESS_FLAG. START of PROCESS_FLAG BASIC VALIDATIONS */
4461: lv_statement_id := '6';
4462: if r_trx.organization_id is null then
4463: lv_codepath := jai_general_pkg.plot_codepath(3, lv_codepath);
4464: p_process_flag := 'O';
4465: p_process_message := jai_rcv_trx_processing_pkg.get_message('NO-ORG');
4466: goto end_of_process_flag_validation;
4467: end if;
4471: -- Common Checks between process_flag and cenvat_rg_flag
4472: if lv_transaction_type = 'RETURN TO VENDOR'
4473: AND (r_base_trx.source_document_code='PO' AND r_base_trx.po_header_id IS NULL)
4474: then
4475: lv_codepath := jai_general_pkg.plot_codepath(4, lv_codepath);
4476: p_process_flag := 'X';
4477: p_process_message := 'RTV against Unordered Receipt will not be processed';
4478: goto end_of_process_flag_validation;
4479: end if;
4482: /* 2PROCESS_FLAG. START of TRANSACTION VALIDATIONS To SEE WHETHER IT IS QUALIFIED w.r.t NON CENVAT TAXES(PROCESS_FLAG)*/
4483:
4484: lv_statement_id := '10';
4485: if r_taxes.total_cnt = 0 then
4486: lv_codepath := jai_general_pkg.plot_codepath(5, lv_codepath);
4487: p_process_flag := 'X';
4488: p_process_message := jai_rcv_trx_processing_pkg.get_message('NO-TAXES');
4489: goto end_of_process_flag_validation;
4490: end if;
4491:
4492: lv_statement_id := '11';
4493: -- Vijay Shankar for Bug#4346453. RCV DFF Elim. Enh. IF r_base_trx.attr_cat = 'India RMA Receipt' THEN
4494: if r_base_trx.source_document_code = source_rma then
4495: lv_codepath := jai_general_pkg.plot_codepath(6, lv_codepath);
4496: IF ( lv_transaction_type IN ('RECEIVE', 'RETURN TO VENDOR')
4497: -- Vijay Shankar for Bug#4346453. RCV DFF Elim. Enh. AND UPPER(r_base_trx.rma_type) NOT IN ('SCRAP')
4498: AND r_receipt_line.rma_type NOT IN ('SCRAP')
4499: )
4498: AND r_receipt_line.rma_type NOT IN ('SCRAP')
4499: )
4500: OR lv_transaction_type IN ('DELIVER', 'RETURN TO RECEIVING')
4501: THEN
4502: lv_codepath := jai_general_pkg.plot_codepath(7, lv_codepath);
4503: --Added the below by rchandan for Bug#6030615
4504: OPEN c_trx(p_transaction_id);
4505: FETCH c_trx into r_trx;
4506: CLOSE c_trx;
4512: -- Vijay Shankar for Bug#4346453. RCV DFF Elim. Enh. AND UPPER(r_base_trx.rma_type) IN ('SCRAP')
4513: AND r_receipt_line.rma_type IN ('SCRAP')
4514: AND r_taxes.excise_cnt = 0
4515: THEN
4516: lv_codepath := jai_general_pkg.plot_codepath(8, lv_codepath);
4517: p_process_flag := 'X';
4518: p_process_message := 'Excise Taxes donot exist in this RMA transaction';
4519: goto end_of_process_flag_validation;
4520: END IF;
4522: END IF;
4523:
4524: lv_statement_id := '12';
4525: IF NOT lb_process_iso THEN
4526: lv_codepath := jai_general_pkg.plot_codepath(9, lv_codepath);
4527: p_process_flag := 'X';
4528: p_process_message := 'ISO Processing Not Required';
4529: goto end_of_process_flag_validation;
4530: END IF;
4534: lv_statement_id := '13';
4535: --Ensures that if the Parent lines Accounting is not done, then the Accounting for this Line
4536: --would also be deferred.
4537: if r_trx.transaction_type = 'CORRECT' AND r_trx.parent_transaction_type in ('DELIVER','RETURN TO RECEIVING') then
4538: lv_codepath := jai_general_pkg.plot_codepath(10, lv_codepath);
4539: /* Fetch the Accounting of the parent transaction line */
4540: OPEN c_acct_count(r_trx.parent_transaction_id, r_trx.parent_transaction_type);
4541: FETCH c_acct_count into ln_account_count;
4542: CLOSE c_acct_count;
4547: CLOSE c_check_non_recover_taxes;
4548:
4549: If nvl(ln_check_non_recover_tax,0) = 1 Then /*Added by nprashar for bug # 9767315*/
4550: if ln_account_count = 0 then
4551: lv_codepath := jai_general_pkg.plot_codepath(11, lv_codepath);
4552: p_process_flag := 'P';
4553: p_process_message := jai_rcv_trx_processing_pkg.get_message('NO-BASE-ACCT');
4554: goto end_of_process_flag_validation;
4555: end if;
4566:
4567: lv_statement_id := '14';
4568: -- values other than 'Y' are added by Vijay Shankar for Bug#3940588. RECEIPTS DEPLUG
4569: IF p_cenvat_rg_flag IN ('Y', 'X', 'O', 'XT') THEN
4570: lv_codepath := jai_general_pkg.plot_codepath(12, lv_codepath);
4571: goto end_of_cenvat_flag_validation;
4572: END IF;
4573:
4574: -- following condition is false if the call to this procedure happened from JAINMVAT (i.e deferred Claim Scree)
4578:
4579: lv_statement_id := '15';
4580: /* 1CENVAT_RG_FLAG. START of CENVAT_RG_FLAG BASIC VALIDATIONS */
4581: if r_trx.organization_id is null then
4582: lv_codepath := jai_general_pkg.plot_codepath(13, lv_codepath);
4583: p_cenvat_rg_flag := 'O';
4584: p_cenvat_rg_message := jai_rcv_trx_processing_pkg.get_message('NO-ORG');
4585:
4586: goto end_of_cenvat_flag_validation;
4587: end if;
4588:
4589: lv_statement_id := '16';
4590: if r_trx.location_id = 0 then
4591: lv_codepath := jai_general_pkg.plot_codepath(14, lv_codepath);
4592: p_cenvat_rg_flag := 'O';
4593: p_process_flag :='E' ; /*Added by nprashar for bug # 9864327*/
4594: p_cenvat_rg_message := jai_rcv_trx_processing_pkg.get_message('NO-LOC-ORG-SETUP');
4595: goto end_of_cenvat_flag_validation;
4600: lv_statement_id := '17';
4601: if lv_transaction_type = 'RETURN TO VENDOR'
4602: AND (r_base_trx.source_document_code='PO' AND r_base_trx.po_header_id IS NULL)
4603: then
4604: lv_codepath := jai_general_pkg.plot_codepath(15, lv_codepath);
4605: p_cenvat_rg_flag := 'X';
4606: p_cenvat_rg_message := 'RTV against Unordered Receipt will not be processed';
4607: goto end_of_cenvat_flag_validation;
4608: end if;
4608: end if;
4609:
4610: lv_statement_id := '18';
4611: if r_taxes.total_cnt = 0 then
4612: lv_codepath := jai_general_pkg.plot_codepath(16, lv_codepath);
4613: p_cenvat_rg_flag := 'X';
4614: p_cenvat_rg_message := jai_rcv_trx_processing_pkg.get_message('NO-TAXES');
4615: goto end_of_cenvat_flag_validation;
4616: end if;
4618: lv_statement_id := '19';
4619: if r_trx.transaction_type NOT IN ('RECEIVE', 'MATCH')
4620: AND r_receipt_cenvat_dtl.unclaim_cenvat_flag = 'Y'
4621: then
4622: lv_codepath := jai_general_pkg.plot_codepath(17, lv_codepath);
4623: p_cenvat_rg_flag := 'X';
4624: p_cenvat_rg_message := 'Parent is not eligible for Cenvat Claim';
4625: goto end_of_cenvat_flag_validation;
4626: end if;
4630: * excise tax lines being present, then the amount register is updated with zero
4631: * amount during deliver. This behavior is wrong, as per inputs from PM*/
4632: --added r_trx.organization_type='M' for bug#7595016
4633: if r_taxes.excise_cnt = 0 or (r_trx.organization_type='M' and r_receipt_cenvat_dtl.cenvat_amount = 0 ) then
4634: lv_codepath := jai_general_pkg.plot_codepath(18, lv_codepath);
4635: p_cenvat_rg_flag := 'X';
4636: p_cenvat_rg_message := 'Excise Taxes do not exist';
4637: goto end_of_cenvat_flag_validation;
4638: end if;
4645: lv_statement_id := '21';
4646: --added the organization_type for Trading in the IF clause for bug#9019561
4647: --Reverted back the changes done for bug #9019561 for fixing bug #14503581
4648: if r_trx.organization_type in ('M') AND ln_excise_tax_count = 0 then
4649: lv_codepath := jai_general_pkg.plot_codepath(19, lv_codepath);
4650: p_cenvat_rg_flag := 'X';
4651: p_cenvat_rg_message := jai_rcv_trx_processing_pkg.get_message('NO-EXCISE-TAXES');
4652: goto end_of_cenvat_flag_validation;
4653: end if;
4652: goto end_of_cenvat_flag_validation;
4653: end if;
4654:
4655: if r_trx.organization_type = 'T' AND lv_transaction_type IN ('DELIVER', 'RETURN TO RECEIVING') then
4656: lv_codepath := jai_general_pkg.plot_codepath(20, lv_codepath);
4657: p_cenvat_rg_flag := 'X';
4658: p_cenvat_rg_message := 'No Cenvat/RG Entries are passed for '||lv_transaction_type;
4659: goto end_of_cenvat_flag_validation;
4660: end if;
4661:
4662: lv_statement_id := '22';
4663: if lv_transaction_type = 'RETURN TO VENDOR' then
4664:
4665: lv_codepath := jai_general_pkg.plot_codepath(21, lv_codepath);
4666: if r_trx.transaction_type = 'CORRECT' THEN
4667: lv_statement_id := '23';
4668: SELECT count(1) INTO ln_rtv_cnt
4669: FROM JAI_RCV_RTV_DTLS
4670: WHERE transaction_id = r_trx.parent_transaction_id;
4671:
4672: lv_statement_id := '24';
4673: if ln_rtv_cnt = 0 THEN
4674: lv_codepath := jai_general_pkg.plot_codepath(22, lv_codepath);
4675: p_cenvat_rg_flag := 'X';
4676: p_cenvat_rg_message := 'Parent RTV Transaction doesnt have Excise Invoice';
4677: goto end_of_cenvat_flag_validation;
4678: end if;
4693: /*
4694: || The above if was added by ssumaith for Iprocurement Bug#4281841.
4695: */
4696: --pramasub FP end IProc
4697: lv_codepath := jai_general_pkg.plot_codepath(23, lv_codepath);
4698: -- lv_excise_inv_gen_action := r_trx.attribute1; -- Vijay Shankar for Bug#4346453. RCV DFF Elim. Enh. 13364465
4699: lv_excise_inv_gen_action := r_trx.excise_inv_gen_status;
4700: p_cenvat_rg_flag := 'X';
4701: -- Vijay Shankar for Bug#4346453. RCV DFF Elim. Enh. p_cenvat_rg_message := 'DFF Value for Generate Excise Invoice is not given as ''Y''';
4734:
4735: lv_statement_id := '25';
4736: if r_trx.organization_type = 'T' then
4737: if r_trx.item_trading_flag <> 'Y' then
4738: lv_codepath := jai_general_pkg.plot_codepath(24, lv_codepath);
4739: p_cenvat_rg_flag := 'O';
4740: p_cenvat_rg_message := jai_rcv_trx_processing_pkg.get_message('ITEM-TRADING-NO');
4741: goto end_of_cenvat_flag_validation;
4742: elsif r_trx.item_excisable <> 'Y' then
4739: p_cenvat_rg_flag := 'O';
4740: p_cenvat_rg_message := jai_rcv_trx_processing_pkg.get_message('ITEM-TRADING-NO');
4741: goto end_of_cenvat_flag_validation;
4742: elsif r_trx.item_excisable <> 'Y' then
4743: lv_codepath := jai_general_pkg.plot_codepath(25, lv_codepath);
4744: p_cenvat_rg_flag := 'O';
4745: p_cenvat_rg_message := 'Trading Item is not Excisable';
4746: goto end_of_cenvat_flag_validation;
4747: end if;
4748: end if;
4749:
4750: lv_statement_id := '26';
4751: if r_trx.item_class in ('OTIN','OTEX') then
4752: lv_codepath := jai_general_pkg.plot_codepath(26, lv_codepath);
4753: p_cenvat_rg_flag := 'O';
4754: p_cenvat_rg_message := jai_rcv_trx_processing_pkg.get_message('ITEM-CLASS-OTIN');
4755: goto end_of_cenvat_flag_validation;
4756: elsif r_trx.item_class NOT IN ('RMIN', 'RMEX', 'CGIN', 'CGEX', 'CCIN', 'CCEX', 'FGIN', 'FGEX') then
4753: p_cenvat_rg_flag := 'O';
4754: p_cenvat_rg_message := jai_rcv_trx_processing_pkg.get_message('ITEM-CLASS-OTIN');
4755: goto end_of_cenvat_flag_validation;
4756: elsif r_trx.item_class NOT IN ('RMIN', 'RMEX', 'CGIN', 'CGEX', 'CCIN', 'CCEX', 'FGIN', 'FGEX') then
4757: lv_codepath := jai_general_pkg.plot_codepath(27, lv_codepath);
4758: p_cenvat_rg_flag := 'O';
4759: p_cenvat_rg_message := jai_rcv_trx_processing_pkg.get_message('ITEM-CLASS-NULL');
4760: goto end_of_cenvat_flag_validation;
4761: end if;
4767: --commented the above and added the below by rchandan for Bug#6030615
4768: if r_base_trx.source_document_code NOT IN ('RMA','INVENTORY','REQ') and r_trx.item_class in ('FGIN', 'FGEX') --added 'REQ' for bug #13514510
4769: and r_trx.organization_type = 'M' -- Changed by Vijay Shanker for Bug #4172424
4770: then
4771: p_codepath := jai_general_pkg.plot_codepath(28, p_codepath);
4772: p_cenvat_rg_flag := 'X';
4773: p_cenvat_rg_message := 'Cenvat Accounting not supported for FGIN Items';
4774: goto end_of_cenvat_flag_validation;
4775: end if;
4775: end if;
4776:
4777: lv_statement_id := '28';
4778: if r_trx.organization_type ='M' and r_trx.item_cenvatable = 'N' then
4779: lv_codepath := jai_general_pkg.plot_codepath(29, lv_codepath);
4780: p_cenvat_rg_flag := 'O';
4781: p_cenvat_rg_message := jai_rcv_trx_processing_pkg.get_message('ITEM-CENVATABLE-NO');
4782: goto end_of_cenvat_flag_validation;
4783: end if;
4791: IF r_base_trx.source_document_code = SOURCE_RMA
4792: AND r_receipt_line.rma_type NOT IN ('PRODUCTION INPUT', 'GOODS RETURN')
4793: THEN
4794: /* ENd of bug 5378630 */
4795: lv_codepath := jai_general_pkg.plot_codepath(30, lv_codepath);
4796: p_cenvat_rg_flag := 'X';
4797: p_cenvat_rg_message := 'RMA Processing Not Required';
4798: goto end_of_cenvat_flag_validation;
4799: END IF;
4801: /* Fetch whether RG has been hit */
4802: if r_trx.transaction_type = 'CORRECT' then
4803:
4804: lv_statement_id := '30';
4805: lv_codepath := jai_general_pkg.plot_codepath(31, lv_codepath);
4806: if r_trx.parent_transaction_type in ('RECEIVE', 'RETURN TO VENDOR') then
4807:
4808: lv_codepath := jai_general_pkg.plot_codepath(32, lv_codepath);
4809: if r_trx.organization_type = 'M' then
4804: lv_statement_id := '30';
4805: lv_codepath := jai_general_pkg.plot_codepath(31, lv_codepath);
4806: if r_trx.parent_transaction_type in ('RECEIVE', 'RETURN TO VENDOR') then
4807:
4808: lv_codepath := jai_general_pkg.plot_codepath(32, lv_codepath);
4809: if r_trx.organization_type = 'M' then
4810: lv_statement_id := '32';
4811: open c_rg_count(r_trx.parent_transaction_id, r_trx.organization_id);
4812: -- fetch c_rg_count into ln_rg_count;
4820: end if;
4821:
4822: --Commented for bug #15907740
4823: /* if to_char(ld_parent_rg_entry_date, 'YYYYMM') <> to_char(SYSDATE, 'YYYYMM') THEN
4824: lv_codepath := jai_general_pkg.plot_codepath(33, lv_codepath);
4825: p_cenvat_rg_flag := 'XT';
4826: p_cenvat_rg_message := jai_rcv_trx_processing_pkg.get_message('BASE-MONTH-DIFFERENT');
4827: goto end_of_cenvat_flag_validation;
4828: end if; */
4829:
4830: else
4831:
4832: lv_statement_id := '35';
4833: lv_codepath := jai_general_pkg.plot_codepath(34, lv_codepath);
4834: OPEN c_trx(r_trx.parent_transaction_id);
4835: FETCH c_trx into r_parent_trx;
4836: CLOSE c_trx;
4837:
4836: CLOSE c_trx;
4837:
4838: --Commented for bug #15907740
4839: /* if to_char(r_trx.transaction_date, 'YYYYMM') <> to_char(r_parent_trx.transaction_date, 'YYYYMM') THEN
4840: lv_codepath := jai_general_pkg.plot_codepath(35, lv_codepath);
4841: p_cenvat_rg_flag := 'XT';
4842: p_cenvat_rg_message := jai_rcv_trx_processing_pkg.get_message('BASE-MONTH-DIFFERENT');
4843: goto end_of_cenvat_flag_validation;
4844: end if; */
4847:
4848: -- we dont do validation for ISO in case of trading because RG23D Entry should be passed even if accounting is not required
4849: lv_statement_id := '36';
4850: IF NOT lb_process_iso AND r_trx.organization_type = 'M' THEN
4851: lv_codepath := jai_general_pkg.plot_codepath(36, lv_codepath);
4852: p_cenvat_rg_flag := 'X';
4853: p_cenvat_rg_message := 'ISO Processing Not Required';
4854: goto end_of_cenvat_flag_validation;
4855: END IF;
4855: END IF;
4856:
4857: IF lv_transaction_type IN ('DELIVER', 'RETURN TO RECEIVING') THEN
4858:
4859: lv_codepath := jai_general_pkg.plot_codepath(37, lv_codepath);
4860: lv_statement_id := '37';
4861:
4862: -- this call is specific to DELIVER and RTR transactions
4863: lv_include_cenvat_in_cost := jai_rcv_deliver_rtr_pkg.include_cenvat_in_costing(
4873: *added an ELSIF part to handle this case.*/
4874:
4875: IF lv_include_cenvat_in_cost = 'N' AND lv_dest_code <> 'EXPENSE' AND r_trx.transaction_type <> 'CORRECT' AND lv_excise_flag = 'Y' AND r_taxes.excise_cnt > 0 --Added for bug #14852106
4876: THEN
4877: lv_codepath := jaI_general_pkg.plot_codepath(38, lv_codepath);
4878: p_cenvat_rg_flag := 'X';
4879: p_cenvat_rg_message := 'Cenvat Entries not Applicable for transaction type';
4880: goto end_of_cenvat_flag_validation;
4881: ELSIF lv_include_cenvat_in_cost = 'N' AND lv_dest_code = 'EXPENSE' THEN
4892: /* 3CENVAT_RG_FLAG. START of TRANSACTION VALIDATIONS To SEE WHETHER IT IS PENDING FOR SOMETHING INSPITE OF BEING QUALIFIED for PROCESSING*/
4893: lv_statement_id := '39';
4894: if r_trx.transaction_type = 'CORRECT' AND r_trx.parent_transaction_type in ('RECEIVE', 'RETURN TO VENDOR') then
4895: if ld_parent_rg_entry_date IS NULL then
4896: lv_codepath := jai_general_pkg.plot_codepath(39, lv_codepath);
4897: p_cenvat_rg_flag := 'P';
4898: p_cenvat_rg_message := jai_rcv_trx_processing_pkg.get_message('NO-BASE-RG');
4899: goto end_of_cenvat_flag_validation;
4900: end if;
4909: AND p_called_from<>'JAINMVAT'
4910: )
4911: )
4912: THEN
4913: lv_codepath := jai_general_pkg.plot_codepath(40, lv_codepath);
4914: p_cenvat_rg_flag := 'P';
4915: p_cenvat_rg_message := 'Pending for Claim';
4916: goto end_of_cenvat_flag_validation;
4917: END IF;
4922: IF r_trx.transaction_type NOT IN ('RECEIVE', 'MATCH')
4923: AND nvl(r_receipt_cenvat_dtl.cenvat_claimed_amt,0) = 0 AND nvl(r_receipt_cenvat_dtl.cenvat_amount,0) <> 0
4924: AND nvl(r_receipt_cenvat_dtl.online_claim_flag,'N') = 'N' /*This condition added by nprashar for bug #8644480*/
4925: THEN
4926: lv_codepath := jai_general_pkg.plot_codepath(41, lv_codepath);
4927: p_cenvat_rg_flag := 'P';
4928: p_cenvat_rg_message := 'Pending for Receipt Line Claim'; -- - '||lv_transaction_type;
4929: goto end_of_cenvat_flag_validation;
4930: END IF;
4942: -- Updation of excise invoice number for all transactions other than RTV
4943: if lv_transaction_type <> 'RETURN TO VENDOR' and r_trx.excise_invoice_no is null then
4944:
4945: lv_statement_id := '42';
4946: lv_codepath := jai_general_pkg.plot_codepath(42, lv_codepath);
4947: OPEN c_excise_invoice_no(r_trx.shipment_line_id);
4948: FETCH c_excise_invoice_no INTO r_exc_inv_no;
4949: CLOSE c_excise_invoice_no;
4950:
4969: end if;
4970:
4971: /* following condition added as part of DFF elimination. Vijay Shankar for Bug#4346453. RCV DFF Elim. Enh. */
4972: if r_trx.process_vat_status in (jai_constants.yes, 'X', 'O') then
4973: lv_codepath := jai_general_pkg.plot_codepath(42.0, lv_codepath);
4974: goto end_of_vat_validation;
4975: end if;
4976:
4977: if r_trx.location_id = 0 then
4974: goto end_of_vat_validation;
4975: end if;
4976:
4977: if r_trx.location_id = 0 then
4978: lv_codepath := jai_general_pkg.plot_codepath(42.1, lv_codepath);
4979: p_process_vat_flag := 'O';
4980: p_process_vat_message := jai_rcv_trx_processing_pkg.get_message('NO-LOC-ORG-SETUP');
4981: goto end_of_vat_validation;
4982: end if;
4982: end if;
4983:
4984: IF lv_transaction_type NOT IN ( 'RECEIVE', 'RETURN TO VENDOR') THEN
4985: lv_statement_id := '42.1';
4986: lv_codepath := jai_general_pkg.plot_codepath(42.2, lv_codepath);
4987: p_process_vat_flag := 'X';
4988: p_process_vat_message := 'VAT Processing not required for this Transaction Type';
4989: GOTO end_of_vat_validation;
4990: END IF;
4994: CLOSE c_recoverable_vat_tax_cnt;
4995:
4996: IF ln_recoverable_vat_tax_cnt = 0 THEN
4997: lv_statement_id := '42.2';
4998: lv_codepath := jai_general_pkg.plot_codepath(42.3, lv_codepath);
4999: p_process_vat_flag := 'X';
5000: p_process_vat_message := 'No VAT Taxes exist for receipt line';
5001: GOTO end_of_vat_validation;
5002: END IF;
5025: --if p_called_from in (CALLED_FROM_RCV_TRIGGER, CALLED_FROM_FND_REQUEST) then
5026: -- if lv_excise_inv_gen_action is null and r_trx.attribute1 is null then -- and r_trx.attribute3 is null then 13364465
5027: if lv_excise_inv_gen_action is null and r_trx.excise_inv_gen_status is null then
5028: lv_statement_id := '60';
5029: lv_codepath := jai_general_pkg.plot_codepath(60, lv_codepath);
5030: /* Flag is set to 'P' only if validations that set the flag as 'X' are done */
5031: if p_cenvat_rg_flag in ('N', 'P') or ( p_cenvat_rg_flag ='X' and r_trx.organization_type = 'M' and
5032: r_trx.item_class not in ('FGIN', 'FGEX') and r_trx.item_excisable = 'Y' and r_receipt_cenvat_dtl.cenvat_amount = 0 ) then -- Added flag 'X' with other conditions for bug # 12651453
5033:
5037: end if;
5038:
5039: elsif p_called_from = CALLED_FROM_JAITIGRTV and r_trx.attribute1 = INV_GEN_STATUS_INV_NA then
5040: lv_statement_id := '61';
5041: lv_codepath := jai_general_pkg.plot_codepath(61, lv_codepath);
5042: p_cenvat_rg_flag := 'X';
5043: p_cenvat_rg_message := 'Excise Invoice is not applicable';
5044: end if;
5045:
5046: /* VAT */
5047: -- if lv_vat_inv_gen_action is null and r_trx.attribute2 is null then -- and r_trx.attribute4 is null then 13364465
5048: if lv_vat_inv_gen_action is null and r_trx.vat_inv_gen_status is null then
5049: lv_statement_id := '62';
5050: lv_codepath := jai_general_pkg.plot_codepath(62, lv_codepath);
5051: if p_process_vat_flag in ('N') then
5052: lv_vat_inv_gen_action := INV_GEN_STATUS_PENDING;
5053: elsif p_process_vat_flag in ('O','X') then
5054: lv_vat_inv_gen_action := INV_GEN_STATUS_NA;
5056: end if;
5057: end if;
5058:
5059: IF p_simulate_flag = 'N' THEN
5060: lv_codepath := jai_general_pkg.plot_codepath(43, lv_codepath);
5061: lv_statement_id := '43';
5062: /* Call to update the Flag values as the validation is completed */
5063: jai_rcv_transactions_pkg.update_process_flags(
5064: p_transaction_id => p_transaction_id,
5103: END IF;
5104:
5105: -- this is the final place where we assign the value to p_codepath from local codepath
5106: lv_statement_id := '49';
5107: p_codepath := jai_general_pkg.plot_codepath(lv_codepath||',49', p_codepath, 'cenvat_rg_pkg.validate_trx', 'END');
5108: -- p_codepath := substr(p_codepath||lv_codepath, 1, 2000);
5109:
5110: FND_FILE.put_line( fnd_file.log, '$ VALIDATE_TRANSACTION PrcFlg:'||p_process_flag||', Msg:'||p_process_message
5111: ||', CenvatRgFlg:'||p_cenvat_rg_flag ||', Msg:'||p_cenvat_rg_message
5117: when others then
5118: p_process_flag := 'E';
5119: p_process_message := 'RECEIPT_TRANSACTION_PKG.Validate_transaction:'||SQLERRM||', Statement_id:'||lv_statement_id;
5120: FND_FILE.put_line( fnd_file.log, 'Error in '||p_process_message||'. localErrorPath:'||lv_codepath );
5121: p_codepath := jai_general_pkg.plot_codepath(lv_codepath||',-999', p_codepath, 'cenvat_rg_pkg.validate_trx', 'END');
5122:
5123: END validate_transaction;
5124:
5125:
5290: -- This cursor gives tax_amount in FOREIGN Currency
5291: CURSOR c_tax_amount(cp_shipment_line_id IN NUMBER, cp_curr_conv_rate IN NUMBER) IS
5292: SELECT
5293: sum(
5294: nvl(tax_amount, 0) / decode(currency, jai_general_pkg.INDIAN_CURRENCY, cp_curr_conv_rate, 1)
5295: ) non_inr_tax_amount,
5296: sum(
5297: nvl(tax_amount, 0) * decode(currency, jai_general_pkg.INDIAN_CURRENCY, 1, cp_curr_conv_rate)
5298: ) inr_tax_amount
5293: sum(
5294: nvl(tax_amount, 0) / decode(currency, jai_general_pkg.INDIAN_CURRENCY, cp_curr_conv_rate, 1)
5295: ) non_inr_tax_amount,
5296: sum(
5297: nvl(tax_amount, 0) * decode(currency, jai_general_pkg.INDIAN_CURRENCY, 1, cp_curr_conv_rate)
5298: ) inr_tax_amount
5299: FROM JAI_RCV_LINE_TAXES
5300: WHERE shipment_line_id = cp_shipment_line_id
5301: AND tax_type NOT IN ('TDS', 'Modvat Recovery');
5338: CURSOR c_tax_amount(cp_shipment_line_id IN NUMBER, cp_curr_conv_rate IN NUMBER, cp_organization_type IN VARCHAR2) IS
5339: SELECT
5340: sum(
5341: nvl(a.tax_amount, 0) * (b.mod_cr_percentage/100)
5342: * decode(a.currency, jai_general_pkg.INDIAN_CURRENCY, 1, cp_curr_conv_rate)
5343: ) manufacturing_cenvat,
5344: sum(
5345: nvl(a.tax_amount, 0) * decode(a.currency, jai_general_pkg.INDIAN_CURRENCY, 1, cp_curr_conv_rate)
5346: ) trading_cenvat
5341: nvl(a.tax_amount, 0) * (b.mod_cr_percentage/100)
5342: * decode(a.currency, jai_general_pkg.INDIAN_CURRENCY, 1, cp_curr_conv_rate)
5343: ) manufacturing_cenvat,
5344: sum(
5345: nvl(a.tax_amount, 0) * decode(a.currency, jai_general_pkg.INDIAN_CURRENCY, 1, cp_curr_conv_rate)
5346: ) trading_cenvat
5347: FROM JAI_RCV_LINE_TAXES a, JAI_CMN_TAXES_ALL b
5348: WHERE shipment_line_id = cp_shipment_line_id
5349: AND a.tax_id = b.tax_id
5434: CLOSE c_base_trx;
5435:
5436: lv_trxn_uom_code := r_trx.uom_code;
5437: lv_tax_uom_code := nvl(r_tax_trx.uom_code,
5438: jai_general_pkg.get_uom_code( p_uom => r_tax_trx.unit_of_measure)
5439: );
5440:
5441: IF lv_trxn_uom_code = lv_tax_uom_code THEN
5442: ln_uom_conv_rate := 1;
5440:
5441: IF lv_trxn_uom_code = lv_tax_uom_code THEN
5442: ln_uom_conv_rate := 1;
5443: ELSE
5444: ln_uom_conv_rate := jai_general_pkg.trxn_to_primary_conv_rate(
5445: p_transaction_uom_code => lv_trxn_uom_code,
5446: p_primary_uom_code => lv_tax_uom_code,
5447: p_inventory_item_id => r_trx.inventory_item_id
5448: );
5512: CLOSE c_base_trx;
5513:
5514: lv_trxn_uom_code := r_trx.uom_code;
5515: lv_tax_uom_code := nvl(r_tax_trx.uom_code,
5516: jai_general_pkg.get_uom_code( p_uom => r_tax_trx.unit_of_measure)
5517: );
5518:
5519: IF lv_trxn_uom_code = lv_tax_uom_code THEN
5520: ln_uom_conv_rate := 1;
5518:
5519: IF lv_trxn_uom_code = lv_tax_uom_code THEN
5520: ln_uom_conv_rate := 1;
5521: ELSE
5522: ln_uom_conv_rate := jai_general_pkg.trxn_to_primary_conv_rate(
5523: p_transaction_uom_code => lv_trxn_uom_code,
5524: p_primary_uom_code => lv_tax_uom_code,
5525: p_inventory_item_id => r_trx.inventory_item_id
5526: );