DBA Data[Home] [Help]

APPS.GMI_GLOBAL_GRP dependencies on IC_LOTS_MST

Line 117: --| This procedure is used to retrieve all details from ic_lots_mst |

113: --| USAGE |
114: --| Used to retrieve lot master details |
115: --| |
116: --| DESCRIPTION |
117: --| This procedure is used to retrieve all details from ic_lots_mst |
118: --| |
119: --| PARAMETERS |
120: --| p_item_id IN NUMBER - Item ID of lot to be retrieved |
121: --| p_lot_no IN VARCHAR2(32) - Lot number of lot to be retrieved |

Line 123: --| x_ic_lots_mst OUT RECORD - Record containing ic_lots_mst |

119: --| PARAMETERS |
120: --| p_item_id IN NUMBER - Item ID of lot to be retrieved |
121: --| p_lot_no IN VARCHAR2(32) - Lot number of lot to be retrieved |
122: --| p_sublot_no IN VARCHAR2(32) - Sublot number to be retrieved |
123: --| x_ic_lots_mst OUT RECORD - Record containing ic_lots_mst |
124: --| x_ic_lots_cpg OUT RECORD - Record containing ic_lots_cpg |
125: --| |
126: --| HISTORY |
127: --| 01-OCT-1998 M.Godfrey Created |

Line 130: ( p_item_id IN ic_lots_mst.item_id%TYPE

126: --| HISTORY |
127: --| 01-OCT-1998 M.Godfrey Created |
128: --+=========================================================================+
129: PROCEDURE Get_Lot
130: ( p_item_id IN ic_lots_mst.item_id%TYPE
131: , p_lot_no IN ic_lots_mst.lot_no%TYPE
132: , p_sublot_no IN ic_lots_mst.sublot_no%TYPE
133: , x_ic_lots_mst OUT NOCOPY ic_lots_mst%ROWTYPE
134: , x_ic_lots_cpg OUT NOCOPY ic_lots_cpg%ROWTYPE

Line 131: , p_lot_no IN ic_lots_mst.lot_no%TYPE

127: --| 01-OCT-1998 M.Godfrey Created |
128: --+=========================================================================+
129: PROCEDURE Get_Lot
130: ( p_item_id IN ic_lots_mst.item_id%TYPE
131: , p_lot_no IN ic_lots_mst.lot_no%TYPE
132: , p_sublot_no IN ic_lots_mst.sublot_no%TYPE
133: , x_ic_lots_mst OUT NOCOPY ic_lots_mst%ROWTYPE
134: , x_ic_lots_cpg OUT NOCOPY ic_lots_cpg%ROWTYPE
135: )

Line 132: , p_sublot_no IN ic_lots_mst.sublot_no%TYPE

128: --+=========================================================================+
129: PROCEDURE Get_Lot
130: ( p_item_id IN ic_lots_mst.item_id%TYPE
131: , p_lot_no IN ic_lots_mst.lot_no%TYPE
132: , p_sublot_no IN ic_lots_mst.sublot_no%TYPE
133: , x_ic_lots_mst OUT NOCOPY ic_lots_mst%ROWTYPE
134: , x_ic_lots_cpg OUT NOCOPY ic_lots_cpg%ROWTYPE
135: )
136: IS

Line 133: , x_ic_lots_mst OUT NOCOPY ic_lots_mst%ROWTYPE

129: PROCEDURE Get_Lot
130: ( p_item_id IN ic_lots_mst.item_id%TYPE
131: , p_lot_no IN ic_lots_mst.lot_no%TYPE
132: , p_sublot_no IN ic_lots_mst.sublot_no%TYPE
133: , x_ic_lots_mst OUT NOCOPY ic_lots_mst%ROWTYPE
134: , x_ic_lots_cpg OUT NOCOPY ic_lots_cpg%ROWTYPE
135: )
136: IS
137: CURSOR ic_lots_mst_c1 IS

Line 137: CURSOR ic_lots_mst_c1 IS

133: , x_ic_lots_mst OUT NOCOPY ic_lots_mst%ROWTYPE
134: , x_ic_lots_cpg OUT NOCOPY ic_lots_cpg%ROWTYPE
135: )
136: IS
137: CURSOR ic_lots_mst_c1 IS
138: SELECT
139: *
140: FROM
141: ic_lots_mst

Line 141: ic_lots_mst

137: CURSOR ic_lots_mst_c1 IS
138: SELECT
139: *
140: FROM
141: ic_lots_mst
142: WHERE
143: lot_no = p_lot_no
144: AND ( sublot_no = p_sublot_no OR
145: sublot_no is NULL)

Line 148: CURSOR ic_lots_cpg_c1(v_lot_id ic_lots_mst.lot_id%TYPE) IS

144: AND ( sublot_no = p_sublot_no OR
145: sublot_no is NULL)
146: AND item_id = p_item_id;
147:
148: CURSOR ic_lots_cpg_c1(v_lot_id ic_lots_mst.lot_id%TYPE) IS
149: SELECT
150: *
151: FROM
152: ic_lots_cpg

Line 156: l_ic_lots_mst ic_lots_mst%ROWTYPE;

152: ic_lots_cpg
153: WHERE
154: lot_id = v_lot_id;
155:
156: l_ic_lots_mst ic_lots_mst%ROWTYPE;
157:
158: BEGIN
159:
160:

Line 161: OPEN ic_lots_mst_c1;

157:
158: BEGIN
159:
160:
161: OPEN ic_lots_mst_c1;
162:
163: FETCH ic_lots_mst_c1 INTO l_ic_lots_mst;
164: IF (ic_lots_mst_c1%NOTFOUND)
165: THEN

Line 163: FETCH ic_lots_mst_c1 INTO l_ic_lots_mst;

159:
160:
161: OPEN ic_lots_mst_c1;
162:
163: FETCH ic_lots_mst_c1 INTO l_ic_lots_mst;
164: IF (ic_lots_mst_c1%NOTFOUND)
165: THEN
166: x_ic_lots_mst.lot_id := -1;
167: ELSE

Line 164: IF (ic_lots_mst_c1%NOTFOUND)

160:
161: OPEN ic_lots_mst_c1;
162:
163: FETCH ic_lots_mst_c1 INTO l_ic_lots_mst;
164: IF (ic_lots_mst_c1%NOTFOUND)
165: THEN
166: x_ic_lots_mst.lot_id := -1;
167: ELSE
168: x_ic_lots_mst := l_ic_lots_mst;

Line 166: x_ic_lots_mst.lot_id := -1;

162:
163: FETCH ic_lots_mst_c1 INTO l_ic_lots_mst;
164: IF (ic_lots_mst_c1%NOTFOUND)
165: THEN
166: x_ic_lots_mst.lot_id := -1;
167: ELSE
168: x_ic_lots_mst := l_ic_lots_mst;
169: --B965832(3) Get rid of this select
170: --OPEN ic_lots_cpg_c1(l_ic_lots_mst.lot_id);

Line 168: x_ic_lots_mst := l_ic_lots_mst;

164: IF (ic_lots_mst_c1%NOTFOUND)
165: THEN
166: x_ic_lots_mst.lot_id := -1;
167: ELSE
168: x_ic_lots_mst := l_ic_lots_mst;
169: --B965832(3) Get rid of this select
170: --OPEN ic_lots_cpg_c1(l_ic_lots_mst.lot_id);
171: --FETCH ic_lots_cpg_c1 INTO x_ic_lots_cpg;
172: --IF (ic_lots_cpg_c1%NOTFOUND)

Line 170: --OPEN ic_lots_cpg_c1(l_ic_lots_mst.lot_id);

166: x_ic_lots_mst.lot_id := -1;
167: ELSE
168: x_ic_lots_mst := l_ic_lots_mst;
169: --B965832(3) Get rid of this select
170: --OPEN ic_lots_cpg_c1(l_ic_lots_mst.lot_id);
171: --FETCH ic_lots_cpg_c1 INTO x_ic_lots_cpg;
172: --IF (ic_lots_cpg_c1%NOTFOUND)
173: --THEN
174: -- x_ic_lots_mst.lot_id := -1;

Line 174: -- x_ic_lots_mst.lot_id := -1;

170: --OPEN ic_lots_cpg_c1(l_ic_lots_mst.lot_id);
171: --FETCH ic_lots_cpg_c1 INTO x_ic_lots_cpg;
172: --IF (ic_lots_cpg_c1%NOTFOUND)
173: --THEN
174: -- x_ic_lots_mst.lot_id := -1;
175: -- END IF;
176: -- CLOSE ic_lots_cpg_c1;
177: --B965832(3) End
178: END IF;

Line 180: CLOSE ic_lots_mst_c1;

176: -- CLOSE ic_lots_cpg_c1;
177: --B965832(3) End
178: END IF;
179:
180: CLOSE ic_lots_mst_c1;
181:
182: EXCEPTION
183: WHEN OTHERS THEN
184: RAISE;