71: l_disposition VARCHAR2(3);
72: l_progress VARCHAR2(3);
73:
74: BEGIN
75: gmd_debug.log_initialize('OPM Receiving Inspection');
76: gmd_debug.put_line('entering get_disposition ');
77: gmd_debug.put_line('p_po_num : '|| p_po_num );
78: gmd_debug.put_line('p_po_line_num : '|| p_po_line_num );
79: gmd_debug.put_line('p_shipment_num : '|| p_shipment_num );
72: l_progress VARCHAR2(3);
73:
74: BEGIN
75: gmd_debug.log_initialize('OPM Receiving Inspection');
76: gmd_debug.put_line('entering get_disposition ');
77: gmd_debug.put_line('p_po_num : '|| p_po_num );
78: gmd_debug.put_line('p_po_line_num : '|| p_po_line_num );
79: gmd_debug.put_line('p_shipment_num : '|| p_shipment_num );
80: gmd_debug.put_line('p_receipt_num : '|| p_receipt_num );
73:
74: BEGIN
75: gmd_debug.log_initialize('OPM Receiving Inspection');
76: gmd_debug.put_line('entering get_disposition ');
77: gmd_debug.put_line('p_po_num : '|| p_po_num );
78: gmd_debug.put_line('p_po_line_num : '|| p_po_line_num );
79: gmd_debug.put_line('p_shipment_num : '|| p_shipment_num );
80: gmd_debug.put_line('p_receipt_num : '|| p_receipt_num );
81: gmd_debug.put_line('p_shipment_line_id : '|| p_shipment_line_id );
74: BEGIN
75: gmd_debug.log_initialize('OPM Receiving Inspection');
76: gmd_debug.put_line('entering get_disposition ');
77: gmd_debug.put_line('p_po_num : '|| p_po_num );
78: gmd_debug.put_line('p_po_line_num : '|| p_po_line_num );
79: gmd_debug.put_line('p_shipment_num : '|| p_shipment_num );
80: gmd_debug.put_line('p_receipt_num : '|| p_receipt_num );
81: gmd_debug.put_line('p_shipment_line_id : '|| p_shipment_line_id );
82:
75: gmd_debug.log_initialize('OPM Receiving Inspection');
76: gmd_debug.put_line('entering get_disposition ');
77: gmd_debug.put_line('p_po_num : '|| p_po_num );
78: gmd_debug.put_line('p_po_line_num : '|| p_po_line_num );
79: gmd_debug.put_line('p_shipment_num : '|| p_shipment_num );
80: gmd_debug.put_line('p_receipt_num : '|| p_receipt_num );
81: gmd_debug.put_line('p_shipment_line_id : '|| p_shipment_line_id );
82:
83:
76: gmd_debug.put_line('entering get_disposition ');
77: gmd_debug.put_line('p_po_num : '|| p_po_num );
78: gmd_debug.put_line('p_po_line_num : '|| p_po_line_num );
79: gmd_debug.put_line('p_shipment_num : '|| p_shipment_num );
80: gmd_debug.put_line('p_receipt_num : '|| p_receipt_num );
81: gmd_debug.put_line('p_shipment_line_id : '|| p_shipment_line_id );
82:
83:
84: IF (p_po_num IS NOT NULL) THEN
77: gmd_debug.put_line('p_po_num : '|| p_po_num );
78: gmd_debug.put_line('p_po_line_num : '|| p_po_line_num );
79: gmd_debug.put_line('p_shipment_num : '|| p_shipment_num );
80: gmd_debug.put_line('p_receipt_num : '|| p_receipt_num );
81: gmd_debug.put_line('p_shipment_line_id : '|| p_shipment_line_id );
82:
83:
84: IF (p_po_num IS NOT NULL) THEN
85: OPEN cur_get_disposition;
90: IF cur_get_disposition%ISOPEN THEN
91: CLOSE cur_get_disposition;
92: END IF;
93: l_progress := '030';
94: gmd_debug.put_line('progress = ', l_progress);
95: RETURN l_disposition;
96: ELSE
97: l_progress := '040';
98: IF cur_get_disposition%ISOPEN THEN
97: l_progress := '040';
98: IF cur_get_disposition%ISOPEN THEN
99: CLOSE cur_get_disposition;
100: END IF;
101: gmd_debug.put_line('progress = ', l_progress);
102: RETURN NULL;
103: END IF;
104: ELSE
105: l_progress := '050';
102: RETURN NULL;
103: END IF;
104: ELSE
105: l_progress := '050';
106: gmd_debug.put_line('progress = ', l_progress);
107: RETURN NULL;
108: END IF;
109: exception
110: when others then
189: l_progress VARCHAR2(3);
190:
191: BEGIN
192:
193: gmd_debug.put_line('entering get_quantity');
194: gmd_debug.put_line('p_po_num : '|| p_po_num );
195: gmd_debug.put_line('p_po_line_num : '|| p_po_line_num );
196: gmd_debug.put_line('p_shipment_num : '|| p_shipment_num );
197: gmd_debug.put_line('p_receipt_num : '|| p_receipt_num );
190:
191: BEGIN
192:
193: gmd_debug.put_line('entering get_quantity');
194: gmd_debug.put_line('p_po_num : '|| p_po_num );
195: gmd_debug.put_line('p_po_line_num : '|| p_po_line_num );
196: gmd_debug.put_line('p_shipment_num : '|| p_shipment_num );
197: gmd_debug.put_line('p_receipt_num : '|| p_receipt_num );
198: gmd_debug.put_line('p_shipment_line_id : '|| p_shipment_line_id );
191: BEGIN
192:
193: gmd_debug.put_line('entering get_quantity');
194: gmd_debug.put_line('p_po_num : '|| p_po_num );
195: gmd_debug.put_line('p_po_line_num : '|| p_po_line_num );
196: gmd_debug.put_line('p_shipment_num : '|| p_shipment_num );
197: gmd_debug.put_line('p_receipt_num : '|| p_receipt_num );
198: gmd_debug.put_line('p_shipment_line_id : '|| p_shipment_line_id );
199:
192:
193: gmd_debug.put_line('entering get_quantity');
194: gmd_debug.put_line('p_po_num : '|| p_po_num );
195: gmd_debug.put_line('p_po_line_num : '|| p_po_line_num );
196: gmd_debug.put_line('p_shipment_num : '|| p_shipment_num );
197: gmd_debug.put_line('p_receipt_num : '|| p_receipt_num );
198: gmd_debug.put_line('p_shipment_line_id : '|| p_shipment_line_id );
199:
200:
193: gmd_debug.put_line('entering get_quantity');
194: gmd_debug.put_line('p_po_num : '|| p_po_num );
195: gmd_debug.put_line('p_po_line_num : '|| p_po_line_num );
196: gmd_debug.put_line('p_shipment_num : '|| p_shipment_num );
197: gmd_debug.put_line('p_receipt_num : '|| p_receipt_num );
198: gmd_debug.put_line('p_shipment_line_id : '|| p_shipment_line_id );
199:
200:
201: IF (p_po_num IS NOT NULL) THEN
194: gmd_debug.put_line('p_po_num : '|| p_po_num );
195: gmd_debug.put_line('p_po_line_num : '|| p_po_line_num );
196: gmd_debug.put_line('p_shipment_num : '|| p_shipment_num );
197: gmd_debug.put_line('p_receipt_num : '|| p_receipt_num );
198: gmd_debug.put_line('p_shipment_line_id : '|| p_shipment_line_id );
199:
200:
201: IF (p_po_num IS NOT NULL) THEN
202: OPEN cur_get_quantity;
207: IF cur_get_quantity%ISOPEN THEN
208: CLOSE cur_get_quantity;
209: END IF;
210: l_progress := '030';
211: gmd_debug.put_line('progress = ', l_progress);
212: RETURN l_quantity;
213: ELSE
214: IF cur_get_quantity%ISOPEN THEN
215: CLOSE cur_get_quantity;
214: IF cur_get_quantity%ISOPEN THEN
215: CLOSE cur_get_quantity;
216: END IF;
217: l_progress := '040';
218: gmd_debug.put_line('progress = ', l_progress);
219: RETURN 0;
220: END IF;
221: ELSE
222: l_progress := '050';
219: RETURN 0;
220: END IF;
221: ELSE
222: l_progress := '050';
223: gmd_debug.put_line('progress = ', l_progress);
224: RETURN 0;
225: END IF;
226: exception
227: when others then
317: l_progress VARCHAR2(3);
318:
319: BEGIN
320:
321: gmd_debug.put_line('entering get_inspection_result');
322: gmd_debug.put_line('p_po_num : '|| p_po_num );
323: gmd_debug.put_line('p_po_line_num : '|| p_po_line_num );
324: gmd_debug.put_line('p_shipment_num : '|| p_shipment_num );
325: gmd_debug.put_line('p_receipt_num : '|| p_receipt_num );
318:
319: BEGIN
320:
321: gmd_debug.put_line('entering get_inspection_result');
322: gmd_debug.put_line('p_po_num : '|| p_po_num );
323: gmd_debug.put_line('p_po_line_num : '|| p_po_line_num );
324: gmd_debug.put_line('p_shipment_num : '|| p_shipment_num );
325: gmd_debug.put_line('p_receipt_num : '|| p_receipt_num );
326: gmd_debug.put_line('p_shipment_line_id : '|| p_shipment_line_id );
319: BEGIN
320:
321: gmd_debug.put_line('entering get_inspection_result');
322: gmd_debug.put_line('p_po_num : '|| p_po_num );
323: gmd_debug.put_line('p_po_line_num : '|| p_po_line_num );
324: gmd_debug.put_line('p_shipment_num : '|| p_shipment_num );
325: gmd_debug.put_line('p_receipt_num : '|| p_receipt_num );
326: gmd_debug.put_line('p_shipment_line_id : '|| p_shipment_line_id );
327:
320:
321: gmd_debug.put_line('entering get_inspection_result');
322: gmd_debug.put_line('p_po_num : '|| p_po_num );
323: gmd_debug.put_line('p_po_line_num : '|| p_po_line_num );
324: gmd_debug.put_line('p_shipment_num : '|| p_shipment_num );
325: gmd_debug.put_line('p_receipt_num : '|| p_receipt_num );
326: gmd_debug.put_line('p_shipment_line_id : '|| p_shipment_line_id );
327:
328:
321: gmd_debug.put_line('entering get_inspection_result');
322: gmd_debug.put_line('p_po_num : '|| p_po_num );
323: gmd_debug.put_line('p_po_line_num : '|| p_po_line_num );
324: gmd_debug.put_line('p_shipment_num : '|| p_shipment_num );
325: gmd_debug.put_line('p_receipt_num : '|| p_receipt_num );
326: gmd_debug.put_line('p_shipment_line_id : '|| p_shipment_line_id );
327:
328:
329: IF (p_po_num IS NOT NULL) THEN
322: gmd_debug.put_line('p_po_num : '|| p_po_num );
323: gmd_debug.put_line('p_po_line_num : '|| p_po_line_num );
324: gmd_debug.put_line('p_shipment_num : '|| p_shipment_num );
325: gmd_debug.put_line('p_receipt_num : '|| p_receipt_num );
326: gmd_debug.put_line('p_shipment_line_id : '|| p_shipment_line_id );
327:
328:
329: IF (p_po_num IS NOT NULL) THEN
330:
355: CLOSE cur_lkup;
356: END IF;
357:
358: l_progress := '060';
359: gmd_debug.put_line('progress = ', l_progress);
360: RETURN l_inspection_result;
361: ELSE
362: IF cur_lkup%ISOPEN THEN
363: CLOSE cur_lkup;
363: CLOSE cur_lkup;
364: END IF;
365:
366: l_progress := '070';
367: gmd_debug.put_line('progress = ', l_progress);
368: RETURN null;
369: END IF;
370: ELSE
371: IF cur_get_inspection_result%ISOPEN THEN
371: IF cur_get_inspection_result%ISOPEN THEN
372: CLOSE cur_get_inspection_result;
373: END IF;
374: l_progress := '080';
375: gmd_debug.put_line('progress = ', l_progress);
376: RETURN null;
377: END IF; -- IF (cur_get_inspection_result%FOUND) THEN
378: ELSE
379: l_progress := '090';
376: RETURN null;
377: END IF; -- IF (cur_get_inspection_result%FOUND) THEN
378: ELSE
379: l_progress := '090';
380: gmd_debug.put_line('progress = ', l_progress);
381: RETURN null;
382: END IF; -- IF (p_po_num IS NOT NULL) THEN
383: exception
384: when others then
444: l_plan_id NUMBER;
445:
446:
447: BEGIN
448: gmd_debug.log_initialize('PLOWE');
449: gmd_debug.put_line('entering store_collection_details ');
450: --gmd_api_pub.log_message('GMD 1','entering store_collection_details ');
451: --gmd_api_pub.log_message('GMD 1','PO_NUM = ',p_po_num,'ERROR', SUBSTR(SQLERRM,1,100),'POSITION',l_progress);
452:
445:
446:
447: BEGIN
448: gmd_debug.log_initialize('PLOWE');
449: gmd_debug.put_line('entering store_collection_details ');
450: --gmd_api_pub.log_message('GMD 1','entering store_collection_details ');
451: --gmd_api_pub.log_message('GMD 1','PO_NUM = ',p_po_num,'ERROR', SUBSTR(SQLERRM,1,100),'POSITION',l_progress);
452:
453: IF (p_po_num IS NOT NULL) THEN
518: END IF;
519: IF cur_get_id%ISOPEN THEN
520: CLOSE cur_get_id;
521: END IF;
522: gmd_debug.put_line('progress = ', l_progress);
523: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_QA_RCV_PUB.STORE_COLLECTION_DETAILS','ERROR', SUBSTR(SQLERRM,1,100),'POSITION',l_progress);
524: rollback;
525:
526: END store_collection_details ;