45: --| |
46: --| PARAMETERS |
47: --| p_item_no IN VARCHAR2(32) - Item number to be retrieved |
48: --| x_ic_item_mst OUT RECORD - Record containing ic_item_mst |
49: --| x_ic_item_cpg OUT RECORD - Record containing ic_item_cpg |
50: --| |
51: --| HISTORY |
52: --| 01-OCT-1998 M.Godfrey Created |
53: --+=========================================================================+
54: -- Proc end of comments
55: PROCEDURE Get_Item
56: ( p_item_no IN ic_item_mst.item_no%TYPE
57: , x_ic_item_mst OUT NOCOPY ic_item_mst%ROWTYPE
58: , x_ic_item_cpg OUT NOCOPY ic_item_cpg%ROWTYPE
59: )
60: IS
61: CURSOR ic_item_mst_c1 IS
62: SELECT
65: ic_item_mst
66: WHERE
67: item_no = p_item_no;
68:
69: CURSOR ic_item_cpg_c1(v_item_id ic_item_mst.item_id%TYPE) IS
70: SELECT
71: *
72: FROM
73: ic_item_cpg
69: CURSOR ic_item_cpg_c1(v_item_id ic_item_mst.item_id%TYPE) IS
70: SELECT
71: *
72: FROM
73: ic_item_cpg
74: WHERE
75: item_id = v_item_id;
76:
77: l_ic_item_mst ic_item_mst%ROWTYPE;
86: THEN
87: x_ic_item_mst.item_id := 0;
88: ELSE
89: x_ic_item_mst := l_ic_item_mst;
90: OPEN ic_item_cpg_c1(l_ic_item_mst.item_id);
91: FETCH ic_item_cpg_c1 INTO x_ic_item_cpg;
92:
93: IF (ic_item_cpg_c1%NOTFOUND)
94: THEN
87: x_ic_item_mst.item_id := 0;
88: ELSE
89: x_ic_item_mst := l_ic_item_mst;
90: OPEN ic_item_cpg_c1(l_ic_item_mst.item_id);
91: FETCH ic_item_cpg_c1 INTO x_ic_item_cpg;
92:
93: IF (ic_item_cpg_c1%NOTFOUND)
94: THEN
95: x_ic_item_cpg.ic_matr_days := 0;
89: x_ic_item_mst := l_ic_item_mst;
90: OPEN ic_item_cpg_c1(l_ic_item_mst.item_id);
91: FETCH ic_item_cpg_c1 INTO x_ic_item_cpg;
92:
93: IF (ic_item_cpg_c1%NOTFOUND)
94: THEN
95: x_ic_item_cpg.ic_matr_days := 0;
96: x_ic_item_cpg.ic_hold_days := 0;
97: END IF;
91: FETCH ic_item_cpg_c1 INTO x_ic_item_cpg;
92:
93: IF (ic_item_cpg_c1%NOTFOUND)
94: THEN
95: x_ic_item_cpg.ic_matr_days := 0;
96: x_ic_item_cpg.ic_hold_days := 0;
97: END IF;
98: CLOSE ic_item_cpg_c1;
99: END IF;
92:
93: IF (ic_item_cpg_c1%NOTFOUND)
94: THEN
95: x_ic_item_cpg.ic_matr_days := 0;
96: x_ic_item_cpg.ic_hold_days := 0;
97: END IF;
98: CLOSE ic_item_cpg_c1;
99: END IF;
100:
94: THEN
95: x_ic_item_cpg.ic_matr_days := 0;
96: x_ic_item_cpg.ic_hold_days := 0;
97: END IF;
98: CLOSE ic_item_cpg_c1;
99: END IF;
100:
101: CLOSE ic_item_mst_c1;
102: