DBA Data[Home] [Help]

APPS.RCV_SHIPMENT_OBJECT_SV dependencies on RCV_SHIPMENT_OBJECT_SV

Line 1: PACKAGE BODY rcv_shipment_object_sv AS

1: PACKAGE BODY rcv_shipment_object_sv AS
2: /* $Header: RCVCHTIB.pls 120.1 2005/06/29 00:52:00 pjiang noship $ */
3:
4: -- Read the profile option that enables/disables the debug log
5: g_asn_debug VARCHAR2(1) := NVL(fnd_profile.VALUE('RCV_DEBUG_MODE'), 'N');

Line 19: x_error_record rcv_shipment_object_sv.errorrectype;

15: x_group_id NUMBER
16: ) IS
17: x_progress VARCHAR2(3) := NULL;
18: x_all_lines_fatal BOOLEAN := TRUE;
19: x_error_record rcv_shipment_object_sv.errorrectype;
20: x_header_record rcv_shipment_header_sv.headerrectype;
21: x_transaction_record rcv_shipment_line_sv.transaction_record_type;
22: x_cascaded_table rcv_shipment_object_sv.cascaded_trans_tab_type;
23: document_num_record rcv_shipment_line_sv.document_num_record_type;

Line 22: x_cascaded_table rcv_shipment_object_sv.cascaded_trans_tab_type;

18: x_all_lines_fatal BOOLEAN := TRUE;
19: x_error_record rcv_shipment_object_sv.errorrectype;
20: x_header_record rcv_shipment_header_sv.headerrectype;
21: x_transaction_record rcv_shipment_line_sv.transaction_record_type;
22: x_cascaded_table rcv_shipment_object_sv.cascaded_trans_tab_type;
23: document_num_record rcv_shipment_line_sv.document_num_record_type;
24: x_first_doc_num rcv_transactions_interface.document_num%TYPE;
25: x_first_record BOOLEAN := TRUE;
26: x_any_line_error_flag BOOLEAN := FALSE;

Line 75: OPEN rcv_shipment_object_sv.c1(x_request_id, x_group_id);

71: g_is_edi_installed := po_core_s.get_product_install_status('EC');
72: END IF;
73:
74: --ksareddy - 2506961 support for parallel processing - group_id based
75: OPEN rcv_shipment_object_sv.c1(x_request_id, x_group_id);
76: x_progress := '010';
77:
78: LOOP
79: FETCH rcv_shipment_object_sv.c1 INTO x_header_record.header_record;

Line 79: FETCH rcv_shipment_object_sv.c1 INTO x_header_record.header_record;

75: OPEN rcv_shipment_object_sv.c1(x_request_id, x_group_id);
76: x_progress := '010';
77:
78: LOOP
79: FETCH rcv_shipment_object_sv.c1 INTO x_header_record.header_record;
80:
81: IF (g_asn_debug = 'Y') THEN
82: asn_debug.put_line(TO_CHAR(rcv_shipment_object_sv.c1%ROWCOUNT));
83: END IF;

Line 82: asn_debug.put_line(TO_CHAR(rcv_shipment_object_sv.c1%ROWCOUNT));

78: LOOP
79: FETCH rcv_shipment_object_sv.c1 INTO x_header_record.header_record;
80:
81: IF (g_asn_debug = 'Y') THEN
82: asn_debug.put_line(TO_CHAR(rcv_shipment_object_sv.c1%ROWCOUNT));
83: END IF;
84:
85: EXIT WHEN rcv_shipment_object_sv.c1%NOTFOUND;
86: x_progress := '020';

Line 85: EXIT WHEN rcv_shipment_object_sv.c1%NOTFOUND;

81: IF (g_asn_debug = 'Y') THEN
82: asn_debug.put_line(TO_CHAR(rcv_shipment_object_sv.c1%ROWCOUNT));
83: END IF;
84:
85: EXIT WHEN rcv_shipment_object_sv.c1%NOTFOUND;
86: x_progress := '020';
87: x_error_record.error_status := 'S';
88: x_error_record.error_message := NULL;
89: x_header_record.error_record := x_error_record;

Line 165: OPEN rcv_shipment_object_sv.c2(x_header_record.header_record.header_interface_id);

161: asn_debug.put_line('In lines');
162: asn_debug.put_line(TO_CHAR(x_header_record.header_record.header_interface_id));
163: END IF;
164:
165: OPEN rcv_shipment_object_sv.c2(x_header_record.header_record.header_interface_id);
166: n := 0;
167: x_first_record := TRUE;
168: x_cascaded_table.DELETE;
169: x_current_line_status := 'S'; -- Bug 610233, resetting to 'S' for a new ASN

Line 179: FETCH rcv_shipment_object_sv.c2 INTO x_cascaded_table(n);

175: asn_debug.put_line('Current counter is ' || TO_CHAR(n));
176: asn_debug.put_line('No of records in cascaded table ' || TO_CHAR(x_cascaded_table.COUNT));
177: END IF;
178:
179: FETCH rcv_shipment_object_sv.c2 INTO x_cascaded_table(n);
180: EXIT WHEN( rcv_shipment_object_sv.c2%NOTFOUND
181: OR x_cascaded_table(n).error_status NOT IN('S', 'W'));
182: x_progress := '040';
183: x_cascaded_table(n).error_status := x_current_line_status;

Line 180: EXIT WHEN( rcv_shipment_object_sv.c2%NOTFOUND

176: asn_debug.put_line('No of records in cascaded table ' || TO_CHAR(x_cascaded_table.COUNT));
177: END IF;
178:
179: FETCH rcv_shipment_object_sv.c2 INTO x_cascaded_table(n);
180: EXIT WHEN( rcv_shipment_object_sv.c2%NOTFOUND
181: OR x_cascaded_table(n).error_status NOT IN('S', 'W'));
182: x_progress := '040';
183: x_cascaded_table(n).error_status := x_current_line_status;
184: x_cascaded_table(n).error_message := NULL;

Line 374: CLOSE rcv_shipment_object_sv.c2;

370: WHERE header_interface_id = x_header_record.header_record.header_interface_id;
371: END IF;
372: END IF;
373:
374: CLOSE rcv_shipment_object_sv.c2;
375: ELSE
376: -- the header failed
377: -- error status for the header is either 'E' or 'U'
378:

Line 422: CLOSE rcv_shipment_object_sv.c1;

418: END IF;
419: END IF;
420: END LOOP;
421:
422: CLOSE rcv_shipment_object_sv.c1;
423:
424: IF (g_asn_debug = 'Y') THEN
425: asn_debug.put_line('Exit shipment object create');
426: END IF;

Line 428: END rcv_shipment_object_sv;

424: IF (g_asn_debug = 'Y') THEN
425: asn_debug.put_line('Exit shipment object create');
426: END IF;
427: END create_object;
428: END rcv_shipment_object_sv;