1734: GMIGUTL.DB_ERRMSG:= SQLERRM;
1735: RETURN FALSE;
1736: END ic_whse_mst_select;
1737:
1738: FUNCTION ic_loct_inv_select
1739: (p_ic_loct_inv_row IN ic_loct_inv%ROWTYPE, x_ic_loct_inv_row IN OUT NOCOPY ic_loct_inv%ROWTYPE)
1740: RETURN BOOLEAN
1741: IS
1742: BEGIN
1735: RETURN FALSE;
1736: END ic_whse_mst_select;
1737:
1738: FUNCTION ic_loct_inv_select
1739: (p_ic_loct_inv_row IN ic_loct_inv%ROWTYPE, x_ic_loct_inv_row IN OUT NOCOPY ic_loct_inv%ROWTYPE)
1740: RETURN BOOLEAN
1741: IS
1742: BEGIN
1743: SELECT * INTO x_ic_loct_inv_row FROM ic_loct_inv
1739: (p_ic_loct_inv_row IN ic_loct_inv%ROWTYPE, x_ic_loct_inv_row IN OUT NOCOPY ic_loct_inv%ROWTYPE)
1740: RETURN BOOLEAN
1741: IS
1742: BEGIN
1743: SELECT * INTO x_ic_loct_inv_row FROM ic_loct_inv
1744: WHERE whse_code = NVL(p_ic_loct_inv_row.whse_code, whse_code) AND
1745: item_id = p_ic_loct_inv_row.item_id AND
1746: lot_id = p_ic_loct_inv_row.lot_id AND
1747: location = NVL(p_ic_loct_inv_row.location, location) AND
1740: RETURN BOOLEAN
1741: IS
1742: BEGIN
1743: SELECT * INTO x_ic_loct_inv_row FROM ic_loct_inv
1744: WHERE whse_code = NVL(p_ic_loct_inv_row.whse_code, whse_code) AND
1745: item_id = p_ic_loct_inv_row.item_id AND
1746: lot_id = p_ic_loct_inv_row.lot_id AND
1747: location = NVL(p_ic_loct_inv_row.location, location) AND
1748: ROWNUM = 1
1741: IS
1742: BEGIN
1743: SELECT * INTO x_ic_loct_inv_row FROM ic_loct_inv
1744: WHERE whse_code = NVL(p_ic_loct_inv_row.whse_code, whse_code) AND
1745: item_id = p_ic_loct_inv_row.item_id AND
1746: lot_id = p_ic_loct_inv_row.lot_id AND
1747: location = NVL(p_ic_loct_inv_row.location, location) AND
1748: ROWNUM = 1
1749: AND delete_mark=0;
1742: BEGIN
1743: SELECT * INTO x_ic_loct_inv_row FROM ic_loct_inv
1744: WHERE whse_code = NVL(p_ic_loct_inv_row.whse_code, whse_code) AND
1745: item_id = p_ic_loct_inv_row.item_id AND
1746: lot_id = p_ic_loct_inv_row.lot_id AND
1747: location = NVL(p_ic_loct_inv_row.location, location) AND
1748: ROWNUM = 1
1749: AND delete_mark=0;
1750:
1743: SELECT * INTO x_ic_loct_inv_row FROM ic_loct_inv
1744: WHERE whse_code = NVL(p_ic_loct_inv_row.whse_code, whse_code) AND
1745: item_id = p_ic_loct_inv_row.item_id AND
1746: lot_id = p_ic_loct_inv_row.lot_id AND
1747: location = NVL(p_ic_loct_inv_row.location, location) AND
1748: ROWNUM = 1
1749: AND delete_mark=0;
1750:
1751: GMIGUTL.DB_ERRNUM := NULL;
1753:
1754: EXCEPTION
1755: WHEN NO_DATA_FOUND
1756: THEN
1757: x_ic_loct_inv_row.loct_onhand:= NULL;
1758: GMIGUTL.DB_ERRNUM := SQLCODE;
1759: GMIGUTL.DB_ERRMSG:= SQLERRM;
1760: RETURN FALSE;
1761:
1768:
1769: GMIGUTL.DB_ERRNUM := SQLCODE;
1770: GMIGUTL.DB_ERRMSG:= SQLERRM;
1771: RETURN FALSE;
1772: END ic_loct_inv_select;
1773:
1774: FUNCTION qc_grad_mst_select
1775: (p_qc_grad_mst_row IN qc_grad_mst%ROWTYPE, x_qc_grad_mst_row IN OUT NOCOPY qc_grad_mst%ROWTYPE)
1776: RETURN BOOLEAN