[Home] [Help]
14: g_po_line_ids po_tbl_number;
15: g_line_location_ids po_tbl_number;
16: g_distribution_ids po_tbl_number;
17: g_qtys po_tbl_number;
18: g_promise_dates po_tbl_date;
19: g_uoms po_tbl_varchar30;
20: g_operating_units po_tbl_number;
21: g_current_rec NUMBER := 1;
22: g_current_org_id NUMBER := NULL;
62: debug_message(p_msg || p_tbl(i));
63: END LOOP;
64: END debug_number_tbl;
65:
66: PROCEDURE debug_date_tbl( p_msg IN VARCHAR2, p_tbl IN po_tbl_date ) IS
67: i NUMBER;
68: BEGIN
69: debug_message(p_msg || ' number of changes: ' || p_tbl.COUNT() );
70: FOR i IN 1..p_tbl.COUNT() LOOP
268: g_po_header_ids := po_tbl_number();
269: g_line_location_ids := po_tbl_number();
270: g_distribution_ids := po_tbl_number();
271: g_qtys := po_tbl_number();
272: g_promise_dates := po_tbl_date();
273: g_uoms := po_tbl_varchar30();
274: g_operating_units := po_tbl_number();
275:
276: IF( l_dblink IS NOT NULL ) THEN
395: x_po_line_ids OUT nocopy po_tbl_number,
396: x_line_location_ids OUT nocopy po_tbl_number,
397: x_distribution_ids OUT nocopy po_tbl_number,
398: x_qtys OUT nocopy po_tbl_number,
399: x_promise_dates OUT nocopy po_tbl_date,
400: x_uoms OUT nocopy po_tbl_varchar30
401: ) RETURN BOOLEAN IS
402: /*
403: CURSOR c_po_header (p_po_number VARCHAR2) IS
447: x_po_line_ids := po_tbl_number();
448: x_line_location_ids := po_tbl_number();
449: x_distribution_ids := po_tbl_number();
450: x_qtys := po_tbl_number();
451: x_promise_dates := po_tbl_date();
452: x_uoms := po_tbl_varchar30();
453:
454: IF( g_distribution_ids(l_starting_rec) IS NOT NULL ) THEN
455: l_record_lvl := DISTRIBUTION_LVL;
823: l_po_line_ids po_tbl_number;
824: l_line_location_ids po_tbl_number;
825: l_distribution_ids po_tbl_number;
826: l_qtys po_tbl_number;
827: l_promise_dates po_tbl_date;
828: l_uoms po_tbl_varchar30;
829:
830: l_po_line_changes po_lines_rec_type;
831: l_shipment_changes PO_SHIPMENTS_REC_TYPE;