The following lines contain the word 'select', 'insert', 'update' or 'delete':
| Global variables updated |
| |
| HISTORY |
| Joe DiIorio 10/23/2001 11.5.1H BUG#1989860 - Removed Intrastat |
| profile retrieval. |
| Jalaj Srivastava Bug 2649596 |
| Modified the check for default user id. Earlier we were |
| checking for the error condition default user id is 0 but |
| 0 is a valid user id for user sysadmin. |
| Tony Cataldo Bug 2343411 |
| Added def lot desc profile option |
| Joe DiIorio Bug#2643440 11.5.1J - added nocopy. |
+=========================================================================+
*/
FUNCTION Setup (p_user_name IN VARCHAR2) RETURN BOOLEAN
IS
BEGIN
DEFAULT_USER := NVL(p_user_name,'OPM');
| p_item_no IN ic_item_mst.item_no%TYPE - the key to select upon |
| x_ic_item_mst OUT RECORD - Record containing ic_item_mst |
| x_ic_item_cpg OUT RECORD - Record containing ic_item_cpg |
| |
| HISTORY |
+=========================================================================+
*/
PROCEDURE Get_Item
( p_item_no IN ic_item_mst.item_no%TYPE
, x_ic_item_mst_row OUT NOCOPY ic_item_mst%ROWTYPE
, x_ic_item_cpg_row OUT NOCOPY ic_item_cpg%ROWTYPE
)
IS
BEGIN
x_ic_item_mst_row.item_no := p_item_no;
IF GMIVDBL.ic_item_mst_select(x_ic_item_mst_row, x_ic_item_mst_row)
THEN
-- Jatinder - B3158806 Removed the CPG install check.
x_ic_item_cpg_row.item_id := x_ic_item_mst_row.item_id;
IF GMIVDBL.ic_item_cpg_select(x_ic_item_cpg_row, x_ic_item_cpg_row) THEN
RETURN;
IF GMIVDBL.ic_lots_mst_select(x_ic_lots_mst_row, x_ic_lots_mst_row)
THEN
/* Jalaj Srivastava - Bug 3158806. Remove CPG_INSTALL check. */
x_ic_lots_cpg_row.item_id := x_ic_lots_mst_row.item_id;
IF GMIVDBL.ic_lots_cpg_select(x_ic_lots_cpg_row, x_ic_lots_cpg_row)
THEN
RETURN;
IF GMIVDBL.ic_whse_mst_select(x_ic_whse_mst_row, x_ic_whse_mst_row)
THEN
RETURN;
IF GMIVDBL.ic_loct_inv_select(x_ic_loct_inv_row, x_ic_loct_inv_row)
THEN
RETURN;
IF GMIVDBL.sy_uoms_mst_select(x_sy_uoms_mst_row, x_sy_uoms_mst_row)
THEN
x_sy_uoms_typ_row.um_type := x_sy_uoms_mst_row.um_type;
IF GMIVDBL.sy_uoms_typ_select (x_sy_uoms_typ_row, x_sy_uoms_typ_row)
THEN
RETURN;
IF GMIVDBL.qc_actn_mst_select(x_qc_actn_mst_row, x_qc_actn_mst_row)
THEN
IF x_qc_actn_mst_row.delete_mark = 0
THEN
RETURN TRUE;
IF GMIVDBL.qc_grad_mst_select(x_qc_grad_mst_row, x_qc_grad_mst_row)
THEN
IF x_qc_grad_mst_row.delete_mark = 0
THEN
RETURN TRUE;
IF GMIVDBL.sy_reas_cds_select(x_sy_reas_cds_row, x_sy_reas_cds_row)
THEN
IF x_sy_reas_cds_row.delete_mark = 0
THEN
RETURN TRUE;
IF GMIVDBL.po_vend_mst_select(x_po_vend_mst_row, x_po_vend_mst_row)
THEN
IF x_po_vend_mst_row.delete_mark = 0
THEN
RETURN TRUE;
IF GMIVDBL.ic_lots_sts_select(x_ic_lots_sts_row, x_ic_lots_sts_row)
THEN
IF x_ic_lots_sts_row.delete_mark = 0
THEN
RETURN TRUE;
IF GMIVDBL.ic_xfer_mst_select(x_ic_xfer_mst_row, x_ic_xfer_mst_row)
THEN
RETURN;