DBA Data[Home] [Help]

APPS.JAI_PO_RLA_TRIGGER_PKG dependencies on UTL_FILE

Line 1033: v_utl_file_name VARCHAR2(50);--File.Sql.35 Cbabu := 'ja_in_po_dflt_taxes.log';

1029: -- v_tax_currency VARCHAR2(15);
1030: v_curr_conv_rate NUMBER;
1031:
1032: v_debug BOOLEAN; --File.Sql.35 Cbabu := false;
1033: v_utl_file_name VARCHAR2(50);--File.Sql.35 Cbabu := 'ja_in_po_dflt_taxes.log';
1034: v_utl_location VARCHAR2(512);
1035: v_myfilehandle UTL_FILE.FILE_TYPE; -- This is for File handling
1036:
1037: -- Bug 4513549. Added by LGOPALSA

Line 1035: v_myfilehandle UTL_FILE.FILE_TYPE; -- This is for File handling

1031:
1032: v_debug BOOLEAN; --File.Sql.35 Cbabu := false;
1033: v_utl_file_name VARCHAR2(50);--File.Sql.35 Cbabu := 'ja_in_po_dflt_taxes.log';
1034: v_utl_location VARCHAR2(512);
1035: v_myfilehandle UTL_FILE.FILE_TYPE; -- This is for File handling
1036:
1037: -- Bug 4513549. Added by LGOPALSA
1038: lv_tax_cnt NUMBER := 0;
1039: lv_tax_from_reqn_flag varchar2(1) := 'N';

Line 1192: v_utl_file_name := 'ja_in_po_dflt_taxes.log';

1188: v_req_conv_date := pr_new.Rate_Date;
1189: DUMMY := 1;
1190: v_loc_count := 0; --new variable for loc chk on 17-aug-00
1191: v_debug := true;
1192: v_utl_file_name := 'ja_in_po_dflt_taxes.log';
1193: -- Bug 5243532. Added by Lakshmi Gopalsami
1194: v_requisition_header_id := pr_new.requisition_header_id;
1195:
1196: IF v_debug THEN

Line 1202: WHERE name = 'utl_file_dir';

1198: pv_return_code := jai_constants.successful ;
1199: SELECT DECODE(SUBSTR (value,1,INSTR(value,',') -1),NULL, Value,SUBSTR (value,1,INSTR(value,',') -1))
1200: INTO v_utl_location
1201: FROM v$parameter
1202: WHERE name = 'utl_file_dir';
1203:
1204: v_myfilehandle := UTL_FILE.FOPEN(v_utl_location, v_utl_file_name ,'A');
1205:
1206: EXCEPTION

Line 1204: v_myfilehandle := UTL_FILE.FOPEN(v_utl_location, v_utl_file_name ,'A');

1200: INTO v_utl_location
1201: FROM v$parameter
1202: WHERE name = 'utl_file_dir';
1203:
1204: v_myfilehandle := UTL_FILE.FOPEN(v_utl_location, v_utl_file_name ,'A');
1205:
1206: EXCEPTION
1207: WHEN OTHERS THEN
1208: v_debug := false;

Line 1216: UTL_FILE.PUT_LINE(v_myfilehandle,'********* Start Debug, TimeStamp -> '||TO_CHAR(SYSDATE,'DD/MM/RRRR HH24:MI:SS'));

1212:
1213:
1214:
1215: IF v_debug THEN
1216: UTL_FILE.PUT_LINE(v_myfilehandle,'********* Start Debug, TimeStamp -> '||TO_CHAR(SYSDATE,'DD/MM/RRRR HH24:MI:SS'));
1217: UTL_FILE.PUT_LINE(v_myfilehandle, 'reqn_line_id -> '||pr_new.Requisition_Line_Id
1218: ||', line_loc_id -> '||pr_new.line_location_Id
1219: ||', dest_org_id -> '||pr_new.Destination_Organization_Id
1220: );

Line 1217: UTL_FILE.PUT_LINE(v_myfilehandle, 'reqn_line_id -> '||pr_new.Requisition_Line_Id

1213:
1214:
1215: IF v_debug THEN
1216: UTL_FILE.PUT_LINE(v_myfilehandle,'********* Start Debug, TimeStamp -> '||TO_CHAR(SYSDATE,'DD/MM/RRRR HH24:MI:SS'));
1217: UTL_FILE.PUT_LINE(v_myfilehandle, 'reqn_line_id -> '||pr_new.Requisition_Line_Id
1218: ||', line_loc_id -> '||pr_new.line_location_Id
1219: ||', dest_org_id -> '||pr_new.Destination_Organization_Id
1220: );
1221: END IF;

Line 1239: utl_file.fclose(v_myfilehandle);

1235:
1236: /*IF pr_new.org_id IS NOT NULL THEN
1237: IF v_currency_code <> 'INR' THEN
1238: IF v_debug THEN
1239: utl_file.fclose(v_myfilehandle);
1240: END IF;
1241: RETURN;
1242: END IF;
1243: END IF;*/

Line 1302: utl_file.fclose(v_myfilehandle);

1298: CLOSE tax_override_flag_cur;
1299:
1300: IF NVL(v_override_flag,'N') = 'Y' AND v_shipment_type <> 'BLANKET' THEN
1301: IF v_debug THEN
1302: utl_file.fclose(v_myfilehandle);
1303: END IF;
1304: RETURN;
1305: END IF;
1306:

Line 1313: utl_file.fclose(v_myfilehandle);

1309:
1310: IF v_shipment_type <> 'BLANKET' THEN
1311: IF NVL(v_loc_count,0) = 0 THEN
1312: IF v_debug THEN
1313: utl_file.fclose(v_myfilehandle);
1314: END IF;
1315: RETURN;
1316: END IF;
1317:

Line 1339: utl_file.fclose(v_myfilehandle);

1335:
1336: IF pr_new.org_id IS NOT NULL THEN
1337: IF v_currency_code <> 'INR' THEN
1338: IF v_debug THEN
1339: utl_file.fclose(v_myfilehandle);
1340: END IF;
1341: RETURN;
1342: END IF;
1343:

Line 1349: UTL_FILE.PUT_LINE(v_myfilehandle,'777 jai_po_cmn_pkg.process_release_shipment ('''||'BLANKET'||''''

1345: */
1346: -- End of addition by Gsri on 07-MAR-2001
1347:
1348: if v_debug THEN
1349: UTL_FILE.PUT_LINE(v_myfilehandle,'777 jai_po_cmn_pkg.process_release_shipment ('''||'BLANKET'||''''
1350: ||','||v_src_ship_id || v_line_loc_id||',' ||v_po_line_id||',' ||v_po_hdr_id
1351: ||','||v_quantity||',' ||v_po_rel_id
1352: ||',' ||''''||TO_CHAR(v_cre_dt,'DD/MM/RRRR HH24:MI:SS')||''''||',' ||v_cre_by
1353: ||',' ||''''||TO_CHAR(v_last_upd_dt,'DD/MM/RRRR HH24:MI:SS')||''''||',' ||v_last_upd_by

Line 1381: utl_file.fclose(v_myfilehandle);

1377: v_last_upd_login );
1378:
1379: */
1380: IF v_debug THEN
1381: utl_file.fclose(v_myfilehandle);
1382: END IF;
1383:
1384: --This Return is commented by Nagaraj.s on 09/05/2002
1385: --As this is stopping insertion of Taxes into Ja_IN_Po_line_location_taxes_trg(Bug#2364148)

Line 1403: UTL_FILE.PUT_LINE(v_myfilehandle, 'pr_new.line_location_id '|| pr_new.line_location_id);

1399: select count(1) into v_line_loc_cnt from JAI_PO_LINE_LOCATIONS
1400: where line_location_id = pr_new.line_location_id;
1401:
1402: IF v_debug THEN -- bug 7218695. Added by Lakshmi Gopalsami
1403: UTL_FILE.PUT_LINE(v_myfilehandle, 'pr_new.line_location_id '|| pr_new.line_location_id);
1404: UTL_FILE.PUT_LINE(v_myfilehandle, 'v_line_loc_cnt '|| v_line_loc_cnt);
1405: END IF;
1406:
1407: -- this means multiple requisition lines are merged into a single PO Shipment line

Line 1404: UTL_FILE.PUT_LINE(v_myfilehandle, 'v_line_loc_cnt '|| v_line_loc_cnt);

1400: where line_location_id = pr_new.line_location_id;
1401:
1402: IF v_debug THEN -- bug 7218695. Added by Lakshmi Gopalsami
1403: UTL_FILE.PUT_LINE(v_myfilehandle, 'pr_new.line_location_id '|| pr_new.line_location_id);
1404: UTL_FILE.PUT_LINE(v_myfilehandle, 'v_line_loc_cnt '|| v_line_loc_cnt);
1405: END IF;
1406:
1407: -- this means multiple requisition lines are merged into a single PO Shipment line
1408: -- so the taxes should get defaulted from SET UP's rather than carrying the reqn taxes to PO Shipment

Line 1415: UTL_FILE.PUT_LINE(v_myfilehandle, 'Into the IF Condition');

1411:
1412: IF v_line_loc_cnt > 0 THEN
1413:
1414: IF v_debug THEN -- bug 7218695. Added by Lakshmi Gopalsami
1415: UTL_FILE.PUT_LINE(v_myfilehandle, 'Into the IF Condition');
1416: END IF;
1417:
1418: --START, added, Bgowrava for Bug#6084636
1419: OPEN c_get_tax_modified_flag ;

Line 1431: UTL_FILE.PUT_LINE(v_myfilehandle, 'Deleted Taxes');

1427: WHERE line_location_id = pr_new.line_location_id;
1428:
1429: IF v_debug THEN -- bug 7218695. Added by Lakshmi Gopalsami
1430:
1431: UTL_FILE.PUT_LINE(v_myfilehandle, 'Deleted Taxes');
1432: END IF;
1433:
1434: OPEN c_inventory_org_id( v_ship_to_location_id );
1435: FETCH c_inventory_org_id INTO v_inventory_org_id;

Line 1463: UTL_FILE.PUT_LINE(v_myfilehandle, 'Reqn Lines Merge returning Successfully' );

1459: );
1460:
1461:
1462: IF v_debug THEN
1463: UTL_FILE.PUT_LINE(v_myfilehandle, 'Reqn Lines Merge returning Successfully' );
1464: utl_file.fclose(v_myfilehandle);
1465: END IF;
1466: END IF ;
1467: return;

Line 1464: utl_file.fclose(v_myfilehandle);

1460:
1461:
1462: IF v_debug THEN
1463: UTL_FILE.PUT_LINE(v_myfilehandle, 'Reqn Lines Merge returning Successfully' );
1464: utl_file.fclose(v_myfilehandle);
1465: END IF;
1466: END IF ;
1467: return;
1468: END IF;

Line 1489: UTL_FILE.PUT_LINE(v_myfilehandle, 'line focus id '|| v_line_focus_id);

1485: v_last_upd_login,
1486: 'I' );
1487:
1488: IF v_debug THEN
1489: UTL_FILE.PUT_LINE(v_myfilehandle, 'line focus id '|| v_line_focus_id);
1490: END IF;
1491:
1492:
1493:

Line 1504: UTL_FILE.PUT_LINE(v_myfilehandle, 'line focus id '|| v_line_focus_id);

1500: Fetch Fetch_Focus_Id_Cur_for_req INTO v_line_focus_id;
1501: Close Fetch_Focus_Id_Cur_for_req;
1502:
1503: IF v_debug THEN
1504: UTL_FILE.PUT_LINE(v_myfilehandle, 'line focus id '|| v_line_focus_id);
1505: END IF;
1506:
1507: IF v_debug THEN
1508: UTL_FILE.PUT_LINE(v_myfilehandle, '2-1 v_line_loc_cnt -> '||v_line_loc_cnt

Line 1508: UTL_FILE.PUT_LINE(v_myfilehandle, '2-1 v_line_loc_cnt -> '||v_line_loc_cnt

1504: UTL_FILE.PUT_LINE(v_myfilehandle, 'line focus id '|| v_line_focus_id);
1505: END IF;
1506:
1507: IF v_debug THEN
1508: UTL_FILE.PUT_LINE(v_myfilehandle, '2-1 v_line_loc_cnt -> '||v_line_loc_cnt
1509: );
1510: END IF;
1511:
1512:

Line 1530: UTL_FILE.PUT_LINE(v_myfilehandle, '2 tax_id -> '||v_taxid

1526: , v_adhoc_flag; -- Vijay Shankar for Bug# 2782356
1527: CLOSE Fetch_Mod_Cr_Cur;
1528:
1529: IF v_debug THEN
1530: UTL_FILE.PUT_LINE(v_myfilehandle, '2 tax_id -> '||v_taxid
1531: ||', v_t_curr -> '||v_t_curr
1532: ||', v_tax_amt -> '||v_tax_amt
1533: );
1534: END IF;

Line 1541: UTL_FILE.PUT_LINE(v_myfilehandle, '3 jai_cmn_utils_pkg.currency_conversion('||v_set_of_book_id

1537: IF nvl(v_adhoc_flag, 'N') = 'Y' THEN
1538: IF v_t_curr <> v_po_curr THEN
1539: -- Vijay Shankar for Bug# 2782356
1540: IF v_debug THEN
1541: UTL_FILE.PUT_LINE(v_myfilehandle, '3 jai_cmn_utils_pkg.currency_conversion('||v_set_of_book_id
1542: ||', '''||v_po_curr
1543: ||''', to_date('||v_po_conv_date
1544: ||','''||'''DD/MM/YYYY''||''), '''||v_po_conv_type
1545: ||''', '||v_po_conv_rate ||');'

Line 1550: UTL_FILE.PUT_LINE(v_myfilehandle, '5 v_curr_conv_rate -> '||v_curr_conv_rate );

1546: );
1547: END IF;
1548:
1549: IF v_debug THEN
1550: UTL_FILE.PUT_LINE(v_myfilehandle, '5 v_curr_conv_rate -> '||v_curr_conv_rate );
1551: END IF;
1552:
1553: -- as tax_currency is same as functional currency and v_curr_conv_rate contains conversion from v_po_curr to func_curr
1554: IF v_t_curr = v_currency_code THEN

Line 1559: UTL_FILE.PUT_LINE(v_myfilehandle, '5.1 multiply ');

1555: v_curr_conv_rate := jai_cmn_utils_pkg.currency_conversion( v_set_of_book_id , v_po_curr , v_po_conv_date , v_po_conv_type, v_po_conv_rate );
1556:
1557: v_tax_amount := v_tax_amt / v_curr_conv_rate;
1558: IF v_debug THEN
1559: UTL_FILE.PUT_LINE(v_myfilehandle, '5.1 multiply ');
1560: END IF;
1561:
1562: ELSE -- now tax_currency is not equal to functional currency, so division is fine
1563: v_curr_conv_rate := jai_cmn_utils_pkg.currency_conversion( v_set_of_book_id , v_t_curr , v_po_conv_date , v_po_conv_type, v_po_conv_rate );

Line 1566: UTL_FILE.PUT_LINE(v_myfilehandle, '5.2 divide' );

1562: ELSE -- now tax_currency is not equal to functional currency, so division is fine
1563: v_curr_conv_rate := jai_cmn_utils_pkg.currency_conversion( v_set_of_book_id , v_t_curr , v_po_conv_date , v_po_conv_type, v_po_conv_rate );
1564: v_tax_amount := v_tax_amt * v_curr_conv_rate;
1565: IF v_debug THEN
1566: UTL_FILE.PUT_LINE(v_myfilehandle, '5.2 divide' );
1567: END IF;
1568:
1569: END IF;
1570:

Line 1716: UTL_FILE.PUT_LINE(v_myfilehandle, '*******End*******');

1712: AND Line_Location_Id = v_line_Loc_id;
1713:
1714:
1715: IF v_debug THEN
1716: UTL_FILE.PUT_LINE(v_myfilehandle, '*******End*******');
1717: utl_file.fclose(v_myfilehandle);
1718: END IF;
1719:
1720: exception

Line 1717: utl_file.fclose(v_myfilehandle);

1713:
1714:
1715: IF v_debug THEN
1716: UTL_FILE.PUT_LINE(v_myfilehandle, '*******End*******');
1717: utl_file.fclose(v_myfilehandle);
1718: END IF;
1719:
1720: exception
1721: when others then

Line 1723: UTL_FILE.PUT_LINE(v_myfilehandle, '4 Error in procedure, errm -> '||SQLERRM

1719:
1720: exception
1721: when others then
1722: IF v_debug THEN
1723: UTL_FILE.PUT_LINE(v_myfilehandle, '4 Error in procedure, errm -> '||SQLERRM
1724: );
1725: utl_file.fclose(v_myfilehandle);
1726: END IF;
1727: RAISE;

Line 1725: utl_file.fclose(v_myfilehandle);

1721: when others then
1722: IF v_debug THEN
1723: UTL_FILE.PUT_LINE(v_myfilehandle, '4 Error in procedure, errm -> '||SQLERRM
1724: );
1725: utl_file.fclose(v_myfilehandle);
1726: END IF;
1727: RAISE;
1728: END ARU_T1 ;
1729: