[Home] [Help]
185: (p_orgn_code IN op_ordr_hdr.orgn_code%TYPE,
186: p_cust_id IN op_cust_mst.cust_id%TYPE,
187: p_item_id IN ic_item_mst.item_id%TYPE,
188: p_whse_code IN ic_whse_mst.whse_code%TYPE,
189: p_lot_id IN ic_lots_mst.lot_id%TYPE,
190: p_qc_spec_id IN gmd_specifications_b.spec_id%TYPE,
191: p_assay_code IN gmd_qc_tests_b.test_code%TYPE,
192: p_specification IN gmd_spec_tests.target_value_char%TYPE,
193: p_UOM IN gmd_qc_tests_b.test_unit%TYPE,
853: /* BEGIN BUG#1810652 James Bernard */
854: /* Added 'c_item_id is NULL or' in the where clause */
855: CURSOR get_cust_rslt_info (c_orgn_code gmd_samples.orgn_code%TYPE,
856: c_item_id ic_item_mst.item_id%TYPE,
857: c_lot_id ic_lots_mst.lot_id%TYPE,
858: c_cust_id op_cust_mst.cust_id%TYPE) IS
859: select gr.result_id qc_result_id,
860: gst.spec_id qc_spec_id,
861: gt.test_code assay_code,
905: /* BEGIN BUG#1810652 James Bernard */
906: /* Added 'c_item_id is NULL or' and 'c_lot_id is NULL or' in the where clause */
907: CURSOR get_item_rslt_info (c_orgn_code gmd_samples.orgn_code%TYPE,
908: c_item_id ic_item_mst.item_id%TYPE,
909: c_lot_id ic_lots_mst.lot_id%TYPE) IS
910: select gr.result_id qc_result_id,
911: gst.spec_id qc_spec_id,
912: gt.test_code assay_code,
913: gr.result_date result_date,
1439: AND itp.line_id = c_line_id
1440: and itp.delete_mark = 0
1441: ;
1442:
1443: CURSOR get_lot_info (c_lot_id ic_lots_mst.lot_id%TYPE) IS
1444: SELECT ilm.lot_no,
1445: ilm.lot_desc,
1446: ilm.sublot_no
1447: FROM
1444: SELECT ilm.lot_no,
1445: ilm.lot_desc,
1446: ilm.sublot_no
1447: FROM
1448: ic_lots_mst ilm
1449: WHERE
1450: ilm.lot_id = c_lot_id
1451: and ilm.delete_mark = 0
1452: ;
1811: /* end getting warehouse info from ic_whse_mst */
1812: END IF;
1813: /* end checking if whse has a value */
1814:
1815: /* get lot no, sublot no and lot desc from ic_lots_mst */
1816: /* if pkg called from report, lot id must have value */
1817: /* else if called from opm portal, lot may be null */
1818: IF tbl_hdr(loop_counter).lot_id is not NULL THEN
1819: FOR lot_cur_rec IN get_lot_info (tbl_hdr(loop_counter).lot_id) LOOP