[Home] [Help]
498: Fnd_File.put_line(Fnd_File.LOG, ' Invoice is Cancelled - not processing' );
499: end if;
500:
501:
502: delete JAI_CMN_ST_FORM_DTLS a
503: where invoice_id = c_invoices.invoice_id
504: and issue_receipt_flag = 'I'
505: and not exists (select '1'
506: from JAI_CMN_ST_MATCH_DTLS
542: Fnd_File.put_line(Fnd_File.LOG, ' Invoice is not validated - not processing' );
543: end if;
544:
545:
546: delete JAI_CMN_ST_FORM_DTLS a
547: where invoice_id = c_invoices.invoice_id
548: and issue_receipt_flag = 'I'
549: and not exists (select '1'
550: from JAI_CMN_ST_MATCH_DTLS
571: -- program should re - process all invoices as per the given input.
572: -- if invoice has already been processed then flush the st form records
573: -- for the invoice where no matching has been done.
574:
575: delete JAI_CMN_ST_FORM_DTLS a
576: where invoice_id = c_invoices.invoice_id
577: and issue_receipt_flag = 'I'
578: and not exists (select '1'
579: from JAI_CMN_ST_MATCH_DTLS
609: /* and nvl(reversal_flag, 'N') <> 'Y' */
610: and po_distribution_id is not null
611: and not exists
612: (select '1'
613: from JAI_CMN_ST_FORM_DTLS
614: where invoice_id = b.invoice_id
615: and invoice_line_number = b.line_number
616: --where invoice_distribution_id = b.invoice_distribution_id
617: and issue_receipt_flag = 'I'
794: end if;
795:
796: end if;
797: -- End 5763527
798: /* select JAI_CMN_ST_FORM_DTLS_S.nextval into v_st_dtl_id from dual; */
799:
800: v_rcv_transaction_id := null;
801:
802:
808: v_rcv_transaction_id := c_inv_distributions.rcv_transaction_id;
809: end if;
810:
811:
812: insert into JAI_CMN_ST_FORM_DTLS
813: (
814: st_hdr_id,
815: st_dtl_id,
816: issue_receipt_flag,
836: values
837: (
838: v_st_hdr_id,
839: --v_st_dtl_id,
840: JAI_CMN_ST_FORM_DTLS_S.nextval,
841: 'I',
842: v_po_header_id,
843: v_po_line_id,
844: v_tax_line_no,
1189: cursor c_check_duplicate(p_delivery_id Number)
1190: is
1191: select 1
1192: from JAI_CMN_STFORM_HDRS_ALL hdr ,
1193: JAI_CMN_ST_FORM_DTLS dtl
1194: where hdr.st_hdr_id = dtl.st_hdr_id
1195: and dtl.invoice_id = p_delivery_id
1196: and hdr.party_type_flag = 'C';
1197:
1227: AND jtc.stform_type IS NOT NULL
1228: )
1229: AND NOT EXISTS
1230: (SELECT 1
1231: FROM JAI_CMN_ST_FORM_DTLS jstd
1232: WHERE jstd.header_id = oeh.header_id
1233: AND jstd.invoice_id = wnd.delivery_id
1234: AND jstd.line_id = jspl.order_line_id
1235: AND jstd.order_flag = 'O'
1366: when processed for ISO orders post shipment.
1367: This procedure will be called from the wrapper program - jai_cmn_st_forms_pkg.generate_forms
1368: when party_type parameter = 'C'
1369:
1370: Doc_Type field in the JAI_CMN_ST_FORM_DTLS is set to 'ISO'
1371:
1372: Grouping in the form will be done based on excise invoice number, where excise invoice number is
1373: generated for the iso order. Delivery id in is used for this grouping, in case excise invoice
1374: number is not generated.
1402: If the control comes here , it is assumed that the delivery which is being looped has st forms
1403: related taxes no check done here again.
1404: need to insert records into the st forms hdr and st forms detail tables.
1405: JAI_CMN_STFORM_HDRS_ALL
1406: JAI_CMN_ST_FORM_DTLS
1407: */
1408: fnd_file.put_line(FND_FILE.LOG,'1.1 Delivery : ' || st_forms_rec.delivery_id || ' not present in St form tables, hence processing.' );
1409:
1410: FOR tax_rec IN c_get_taxes(st_forms_rec.delivery_id)
1493: END IF;
1494:
1495:
1496:
1497: INSERT INTO JAI_CMN_ST_FORM_DTLS(
1498: ST_HDR_ID ,
1499: ST_DTL_ID ,
1500: HEADER_ID , -- order header id
1501: LINE_ID , -- order line id
1518: LAST_UPDATED_BY ,
1519: LAST_UPDATE_LOGIN
1520: ) values (
1521: v_st_hdr_id ,
1522: JAI_CMN_ST_FORM_DTLS_S.nextval ,
1523: v_order_hdr_id ,
1524: v_order_line_id ,
1525: tax_rec.tax_id ,
1526: tax_rec.tax_line_no ,
1542: fnd_global.user_id ,
1543: fnd_global.login_id
1544:
1545: ) RETURNING st_dtl_id INTO v_st_line_id;
1546: fnd_file.put_line(FND_FILE.LOG,' inserting into JAI_CMN_ST_FORM_DTLS table with detail id :' ||v_st_line_id );
1547: v_base_tax_amt :=NULL;
1548:
1549: EXCEPTION
1550: WHEN OTHERS THEN
1636: cursor c_check_duplicate(p_invoice_id Number)
1637: is
1638: select 1
1639: from JAI_CMN_STFORM_HDRS_ALL hdr ,
1640: JAI_CMN_ST_FORM_DTLS dtl
1641: where hdr.st_hdr_id = dtl.st_hdr_id
1642: and dtl.invoice_id = p_invoice_id
1643: and hdr.party_type_flag = 'C';
1644:
1660: trx.ship_to_site_use_id = nvl(p_party_site_id,trx.ship_to_site_use_id)) AND
1661: trx.org_id = nvl(p_org_id,trx.org_id) AND
1662: NOT EXISTS
1663: (SELECT 1
1664: FROM JAI_CMN_ST_FORM_DTLS a ,
1665: JAI_CMN_STFORM_HDRS_ALL b
1666: WHERE b.party_id = nvl(p_party_id,b.party_id) AND
1667: b.party_site_id = nvl(p_party_site_id,b.party_site_id) AND
1668: b.party_type_flag = 'C' AND
1889: If the control comes here , it is assumed that the invoice which is being looped has st forms related taxes
1890: no check done here again.
1891: need to insert records into the st forms hdr and st forms detail tables.
1892: JAI_CMN_STFORM_HDRS_ALL
1893: JAI_CMN_ST_FORM_DTLS
1894: */
1895: fnd_file.put_line(FND_FILE.LOG,'1.1 Invoice : '||st_forms_rec.document_type||':' || st_forms_rec.customer_trx_id || ' not present in St form tables, hence processing.' );
1896:
1897: FOR tax_rec IN c_get_taxes(st_forms_rec.customer_trx_id)
2004: fetch c_orgn_locn into v_orgn_id , v_locn_id;
2005: close c_orgn_locn;
2006: end if;
2007:
2008: fnd_file.put_line(FND_FILE.LOG,'before inserting into JAI_CMN_ST_FORM_DTLS table');
2009:
2010: INSERT INTO JAI_CMN_ST_FORM_DTLS(
2011: ST_HDR_ID ,
2012: ST_DTL_ID ,
2006: end if;
2007:
2008: fnd_file.put_line(FND_FILE.LOG,'before inserting into JAI_CMN_ST_FORM_DTLS table');
2009:
2010: INSERT INTO JAI_CMN_ST_FORM_DTLS(
2011: ST_HDR_ID ,
2012: ST_DTL_ID ,
2013: HEADER_ID , -- order header id
2014: LINE_ID , -- order line id
2030: LAST_UPDATED_BY ,
2031: LAST_UPDATE_LOGIN
2032: ) values (
2033: v_st_hdr_id ,
2034: JAI_CMN_ST_FORM_DTLS_S.nextval ,
2035: v_order_hdr_id ,
2036: v_order_line_id ,
2037: tax_rec.tax_id ,
2038: tax_rec.tax_line_no ,