DBA Data[Home] [Help]

APPS.RCV_ROI_PREPROCESSOR dependencies on ASN_DEBUG

Line 4: g_asn_debug VARCHAR2(1) := NVL(fnd_profile.VALUE('RCV_DEBUG_MODE'), 'N');

1: PACKAGE BODY rcv_roi_preprocessor AS
2: /* $Header: RCVPREPB.pls 120.19.12010000.4 2009/01/22 12:54:23 smididud ship $*/
3: -- Read the profile option that enables/disables the debug log
4: g_asn_debug VARCHAR2(1) := NVL(fnd_profile.VALUE('RCV_DEBUG_MODE'), 'N');
5: x_interface_type VARCHAR2(25) := 'RCV-856';
6:
7: /* Shikyu Project This helping function is needed for cursor*/
8: FUNCTION get_oe_osa_flag(

Line 188: g_asn_debug := NVL(fnd_profile.VALUE('RCV_DEBUG_MODE'), 'N');

184: AND GROUP_ID = DECODE(x_group_id, 0, GROUP_ID, x_group_id); */
185:
186: BEGIN
187: <>
188: g_asn_debug := NVL(fnd_profile.VALUE('RCV_DEBUG_MODE'), 'N');
189:
190:
191: /* For online mode, we send request_id as null. Consider it as -999 if
192: * it is null.

Line 197: IF (g_asn_debug = 'Y') THEN

193: */
194: p_request_id := NVL(x_request_id, 0);
195: p_group_id := NVL(x_group_id, 0);
196:
197: IF (g_asn_debug = 'Y') THEN
198: asn_debug.put_line('Entering preprocessor. Request_id = ' || p_request_id || ',Group_id=' || p_group_id);
199: END IF;
200:
201: SAVEPOINT dcp_preprocessor_start;

Line 198: asn_debug.put_line('Entering preprocessor. Request_id = ' || p_request_id || ',Group_id=' || p_group_id);

194: p_request_id := NVL(x_request_id, 0);
195: p_group_id := NVL(x_group_id, 0);
196:
197: IF (g_asn_debug = 'Y') THEN
198: asn_debug.put_line('Entering preprocessor. Request_id = ' || p_request_id || ',Group_id=' || p_group_id);
199: END IF;
200:
201: SAVEPOINT dcp_preprocessor_start;
202: l_check_dcp := rcv_dcp_pvt.g_check_dcp;

Line 220: IF (g_asn_debug = 'Y') THEN

216: IF x_fail_all_lines = 'Y' THEN
217: x_fail_if_one_line_fails := TRUE;
218: END IF;
219:
220: IF (g_asn_debug = 'Y') THEN
221: asn_debug.put_line('RCV_FAIL_IF_LINE_FAILS profile option =' || x_fail_all_lines);
222: END IF;
223:
224: /* the garbage collector is no longer needed by essential character of the normalization package.

Line 221: asn_debug.put_line('RCV_FAIL_IF_LINE_FAILS profile option =' || x_fail_all_lines);

217: x_fail_if_one_line_fails := TRUE;
218: END IF;
219:
220: IF (g_asn_debug = 'Y') THEN
221: asn_debug.put_line('RCV_FAIL_IF_LINE_FAILS profile option =' || x_fail_all_lines);
222: END IF;
223:
224: /* the garbage collector is no longer needed by essential character of the normalization package.
225: if a row belongs to an org, run it, else fail it (or leave it pending).

Line 277: IF (g_asn_debug = 'Y') THEN

273: AND ( (transaction_type = 'DELIVER')
274: OR ( transaction_type = 'RECEIVE'
275: AND auto_transact_code = 'DELIVER'));
276:
277: IF (g_asn_debug = 'Y') THEN
278: asn_debug.put_line('Set transfer_lpn_id and transfer_license_plate_number to null for deliver transactions for the non-wms org ' || l_to_org_id);
279: END IF;
280: END IF;
281: END LOOP;

Line 278: asn_debug.put_line('Set transfer_lpn_id and transfer_license_plate_number to null for deliver transactions for the non-wms org ' || l_to_org_id);

274: OR ( transaction_type = 'RECEIVE'
275: AND auto_transact_code = 'DELIVER'));
276:
277: IF (g_asn_debug = 'Y') THEN
278: asn_debug.put_line('Set transfer_lpn_id and transfer_license_plate_number to null for deliver transactions for the non-wms org ' || l_to_org_id);
279: END IF;
280: END IF;
281: END LOOP;
282: CLOSE distinct_org_id;--Bug#6862487

Line 284: if (g_asn_debug = 'Y') then

280: END IF;
281: END LOOP;
282: CLOSE distinct_org_id;--Bug#6862487
283: else--Online mode transaction
284: if (g_asn_debug = 'Y') then
285: asn_debug.put_line('Skipped Set transfer_lpn_id and transfer_license_plate_number to null for ONLINE mode txn '||p_request_id);
286: end if;
287: end if;--Bug#6862487
288: /* End of 3434460. */

Line 285: asn_debug.put_line('Skipped Set transfer_lpn_id and transfer_license_plate_number to null for ONLINE mode txn '||p_request_id);

281: END LOOP;
282: CLOSE distinct_org_id;--Bug#6862487
283: else--Online mode transaction
284: if (g_asn_debug = 'Y') then
285: asn_debug.put_line('Skipped Set transfer_lpn_id and transfer_license_plate_number to null for ONLINE mode txn '||p_request_id);
286: end if;
287: end if;--Bug#6862487
288: /* End of 3434460. */
289: IF (g_asn_debug = 'Y') THEN

Line 289: IF (g_asn_debug = 'Y') THEN

285: asn_debug.put_line('Skipped Set transfer_lpn_id and transfer_license_plate_number to null for ONLINE mode txn '||p_request_id);
286: end if;
287: end if;--Bug#6862487
288: /* End of 3434460. */
289: IF (g_asn_debug = 'Y') THEN
290: asn_debug.put_line('After update to order_transaction_id');
291: END IF;
292:
293: /* this belongs before the transaction looping */

Line 290: asn_debug.put_line('After update to order_transaction_id');

286: end if;
287: end if;--Bug#6862487
288: /* End of 3434460. */
289: IF (g_asn_debug = 'Y') THEN
290: asn_debug.put_line('After update to order_transaction_id');
291: END IF;
292:
293: /* this belongs before the transaction looping */
294: FOR bad_shikyu IN get_bad_asbn_shikyu LOOP --Shikyu project

Line 321: IF (g_asn_debug = 'Y') THEN

317: END LOOP;
318:
319: OPEN rcv_roi_preprocessor.txns_cur(p_request_id, p_group_id);
320:
321: IF (g_asn_debug = 'Y') THEN
322: asn_debug.put_line('Opened transactions cursor.');
323: END IF;
324:
325: x_progress := '010';

Line 322: asn_debug.put_line('Opened transactions cursor.');

318:
319: OPEN rcv_roi_preprocessor.txns_cur(p_request_id, p_group_id);
320:
321: IF (g_asn_debug = 'Y') THEN
322: asn_debug.put_line('Opened transactions cursor.');
323: END IF;
324:
325: x_progress := '010';
326: n := 0;

Line 331: asn_debug.put_line('enter loop');

327: x_cascaded_table.DELETE;
328:
329: -- Loop through the entries in rcv_transactions_interface.
330: LOOP --{
331: asn_debug.put_line('enter loop');
332: n := n + 1;
333: FETCH rcv_roi_preprocessor.txns_cur INTO x_cascaded_table(n);
334: EXIT WHEN rcv_roi_preprocessor.txns_cur%NOTFOUND;
335: x_cascaded_table(n).error_status := 'S';

Line 344: IF (g_asn_debug = 'Y') THEN

340: x_cascaded_table(n).derive_index := 0;
341: l_proc_status_code := 'SUCCESS';
342: l_update_lpn_group := FALSE;
343:
344: IF (g_asn_debug = 'Y') THEN
345: asn_debug.put_line('Current counter is ' || TO_CHAR(n));
346: asn_debug.put_line('No of records in cascaded table ' || TO_CHAR(x_cascaded_table.COUNT));
347: asn_debug.put_line('header interface id is ' || TO_CHAR(x_cascaded_table(n).header_interface_id));
348: END IF;

Line 345: asn_debug.put_line('Current counter is ' || TO_CHAR(n));

341: l_proc_status_code := 'SUCCESS';
342: l_update_lpn_group := FALSE;
343:
344: IF (g_asn_debug = 'Y') THEN
345: asn_debug.put_line('Current counter is ' || TO_CHAR(n));
346: asn_debug.put_line('No of records in cascaded table ' || TO_CHAR(x_cascaded_table.COUNT));
347: asn_debug.put_line('header interface id is ' || TO_CHAR(x_cascaded_table(n).header_interface_id));
348: END IF;
349:

Line 346: asn_debug.put_line('No of records in cascaded table ' || TO_CHAR(x_cascaded_table.COUNT));

342: l_update_lpn_group := FALSE;
343:
344: IF (g_asn_debug = 'Y') THEN
345: asn_debug.put_line('Current counter is ' || TO_CHAR(n));
346: asn_debug.put_line('No of records in cascaded table ' || TO_CHAR(x_cascaded_table.COUNT));
347: asn_debug.put_line('header interface id is ' || TO_CHAR(x_cascaded_table(n).header_interface_id));
348: END IF;
349:
350: x_progress := '040';

Line 347: asn_debug.put_line('header interface id is ' || TO_CHAR(x_cascaded_table(n).header_interface_id));

343:
344: IF (g_asn_debug = 'Y') THEN
345: asn_debug.put_line('Current counter is ' || TO_CHAR(n));
346: asn_debug.put_line('No of records in cascaded table ' || TO_CHAR(x_cascaded_table.COUNT));
347: asn_debug.put_line('header interface id is ' || TO_CHAR(x_cascaded_table(n).header_interface_id));
348: END IF;
349:
350: x_progress := '040';
351: rcv_error_pkg.initialize(x_cascaded_table(n).GROUP_ID,

Line 375: IF (g_asn_debug = 'Y') THEN

371: AND ( x_cascaded_table(n).org_id is NOT NULL ) ) THEN
372:
373: MO_GLOBAL.set_policy_context('S',TO_NUMBER(x_cascaded_table(n).org_id));
374:
375: IF (g_asn_debug = 'Y') THEN
376: asn_debug.put_line('Setting Operating unit context to ' ||x_cascaded_table(n).org_id);
377: END IF;
378:
379: l_prev_org_id := x_cascaded_table(n).org_id;

Line 376: asn_debug.put_line('Setting Operating unit context to ' ||x_cascaded_table(n).org_id);

372:
373: MO_GLOBAL.set_policy_context('S',TO_NUMBER(x_cascaded_table(n).org_id));
374:
375: IF (g_asn_debug = 'Y') THEN
376: asn_debug.put_line('Setting Operating unit context to ' ||x_cascaded_table(n).org_id);
377: END IF;
378:
379: l_prev_org_id := x_cascaded_table(n).org_id;
380:

Line 445: IF (g_asn_debug = 'Y') THEN

441: x_cascaded_table(n).error_message := rcv_error_pkg.get_last_message;
442: x_cascaded_table(n).processing_status_code := 'ERROR';
443: END;
444:
445: IF (g_asn_debug = 'Y') THEN
446: asn_debug.put_line('l_proc_status_code ' || l_proc_status_code);
447: END IF;
448:
449: -- begin processing of the header

Line 446: asn_debug.put_line('l_proc_status_code ' || l_proc_status_code);

442: x_cascaded_table(n).processing_status_code := 'ERROR';
443: END;
444:
445: IF (g_asn_debug = 'Y') THEN
446: asn_debug.put_line('l_proc_status_code ' || l_proc_status_code);
447: END IF;
448:
449: -- begin processing of the header
450: -- does the row have a header

Line 472: IF (g_asn_debug = 'Y') THEN

468: x_error_record.error_status := 'S';
469: x_error_record.error_message := NULL;
470: END IF;
471:
472: IF (g_asn_debug = 'Y') THEN
473: asn_debug.put_line('x_error_record.error_status: '|| x_error_record.error_status);
474: asn_debug.put_line('transaction_type: '||x_cascaded_table(n).transaction_type);
475: asn_debug.put_line('header_record.header_id: '||x_header_record.header_record.header_interface_id);
476: asn_debug.put_line('x_cascaded_table(n).header_interface_id: '||x_cascaded_table(n).header_interface_id);

Line 473: asn_debug.put_line('x_error_record.error_status: '|| x_error_record.error_status);

469: x_error_record.error_message := NULL;
470: END IF;
471:
472: IF (g_asn_debug = 'Y') THEN
473: asn_debug.put_line('x_error_record.error_status: '|| x_error_record.error_status);
474: asn_debug.put_line('transaction_type: '||x_cascaded_table(n).transaction_type);
475: asn_debug.put_line('header_record.header_id: '||x_header_record.header_record.header_interface_id);
476: asn_debug.put_line('x_cascaded_table(n).header_interface_id: '||x_cascaded_table(n).header_interface_id);
477: END IF;

Line 474: asn_debug.put_line('transaction_type: '||x_cascaded_table(n).transaction_type);

470: END IF;
471:
472: IF (g_asn_debug = 'Y') THEN
473: asn_debug.put_line('x_error_record.error_status: '|| x_error_record.error_status);
474: asn_debug.put_line('transaction_type: '||x_cascaded_table(n).transaction_type);
475: asn_debug.put_line('header_record.header_id: '||x_header_record.header_record.header_interface_id);
476: asn_debug.put_line('x_cascaded_table(n).header_interface_id: '||x_cascaded_table(n).header_interface_id);
477: END IF;
478:

Line 475: asn_debug.put_line('header_record.header_id: '||x_header_record.header_record.header_interface_id);

471:
472: IF (g_asn_debug = 'Y') THEN
473: asn_debug.put_line('x_error_record.error_status: '|| x_error_record.error_status);
474: asn_debug.put_line('transaction_type: '||x_cascaded_table(n).transaction_type);
475: asn_debug.put_line('header_record.header_id: '||x_header_record.header_record.header_interface_id);
476: asn_debug.put_line('x_cascaded_table(n).header_interface_id: '||x_cascaded_table(n).header_interface_id);
477: END IF;
478:
479: /* If rhi is success and all the other processed rti rows

Line 476: asn_debug.put_line('x_cascaded_table(n).header_interface_id: '||x_cascaded_table(n).header_interface_id);

472: IF (g_asn_debug = 'Y') THEN
473: asn_debug.put_line('x_error_record.error_status: '|| x_error_record.error_status);
474: asn_debug.put_line('transaction_type: '||x_cascaded_table(n).transaction_type);
475: asn_debug.put_line('header_record.header_id: '||x_header_record.header_record.header_interface_id);
476: asn_debug.put_line('x_cascaded_table(n).header_interface_id: '||x_cascaded_table(n).header_interface_id);
477: END IF;
478:
479: /* If rhi is success and all the other processed rti rows
480: * in the same header id is also successful.

Line 487: IF (g_asn_debug = 'Y') THEN

483: IF (x_error_record.error_status IN('S', 'W')) THEN --{
484: IF x_cascaded_table(n).header_interface_id <>
485: nvl(x_header_record.header_record.header_interface_id, -1) THEN
486: --{ exclude the case where the current trxn shares header with the previous trxn.
487: IF (g_asn_debug = 'Y') THEN
488: asn_debug.put_line('Initialize header record for RTI id: '||
489: to_char(x_cascaded_table(n).interface_transaction_id));
490: END IF;
491: x_header_record := x_empty_header_record;

Line 488: asn_debug.put_line('Initialize header record for RTI id: '||

484: IF x_cascaded_table(n).header_interface_id <>
485: nvl(x_header_record.header_record.header_interface_id, -1) THEN
486: --{ exclude the case where the current trxn shares header with the previous trxn.
487: IF (g_asn_debug = 'Y') THEN
488: asn_debug.put_line('Initialize header record for RTI id: '||
489: to_char(x_cascaded_table(n).interface_transaction_id));
490: END IF;
491: x_header_record := x_empty_header_record;
492: -- initialize error_record

Line 499: IF (g_asn_debug = 'Y') THEN

495: OPEN rcv_roi_preprocessor.headers_cur(p_request_id,
496: p_group_id,
497: x_cascaded_table(n).header_interface_id
498: );
499: IF (g_asn_debug = 'Y') THEN
500: asn_debug.put_line('Before processing header');
501: END IF;
502:
503: FETCH rcv_roi_preprocessor.headers_cur INTO x_header_record.header_record;

Line 500: asn_debug.put_line('Before processing header');

496: p_group_id,
497: x_cascaded_table(n).header_interface_id
498: );
499: IF (g_asn_debug = 'Y') THEN
500: asn_debug.put_line('Before processing header');
501: END IF;
502:
503: FETCH rcv_roi_preprocessor.headers_cur INTO x_header_record.header_record;
504: -- there should be 1 header record for this transaction

Line 505: asn_debug.put_line('Processing header for interface txn id =' ||

501: END IF;
502:
503: FETCH rcv_roi_preprocessor.headers_cur INTO x_header_record.header_record;
504: -- there should be 1 header record for this transaction
505: asn_debug.put_line('Processing header for interface txn id =' ||
506: TO_CHAR(x_cascaded_table(n).interface_transaction_id));
507: -- header cursor found, header is not processed yet : process the header
508: IF RCV_ROI_PREPROCESSOR.headers_cur%FOUND THEN --{
509: IF x_header_record.header_record.processing_status_code = 'RUNNING' THEN --{

Line 539: IF (g_asn_debug = 'Y') THEN

535: rcv_roi_header.process_cancellation(x_header_record);
536:
537: IF (x_header_record.error_record.error_status NOT IN('S', 'W')) THEN --{
538: -- the cancellation failed
539: IF (g_asn_debug = 'Y') THEN
540: asn_debug.put_line('RCV_ASN_NOT_ACCEPT');
541: asn_debug.put_line('The header has failed ' || TO_CHAR(x_header_record.header_record.header_interface_id));
542: asn_debug.put_line('ASN could not be cancelled');
543: END IF;

Line 540: asn_debug.put_line('RCV_ASN_NOT_ACCEPT');

536:
537: IF (x_header_record.error_record.error_status NOT IN('S', 'W')) THEN --{
538: -- the cancellation failed
539: IF (g_asn_debug = 'Y') THEN
540: asn_debug.put_line('RCV_ASN_NOT_ACCEPT');
541: asn_debug.put_line('The header has failed ' || TO_CHAR(x_header_record.header_record.header_interface_id));
542: asn_debug.put_line('ASN could not be cancelled');
543: END IF;
544:

Line 541: asn_debug.put_line('The header has failed ' || TO_CHAR(x_header_record.header_record.header_interface_id));

537: IF (x_header_record.error_record.error_status NOT IN('S', 'W')) THEN --{
538: -- the cancellation failed
539: IF (g_asn_debug = 'Y') THEN
540: asn_debug.put_line('RCV_ASN_NOT_ACCEPT');
541: asn_debug.put_line('The header has failed ' || TO_CHAR(x_header_record.header_record.header_interface_id));
542: asn_debug.put_line('ASN could not be cancelled');
543: END IF;
544:
545: rcv_error_pkg.set_error_message('RCV_ASN_NOT_ACCEPT');

Line 542: asn_debug.put_line('ASN could not be cancelled');

538: -- the cancellation failed
539: IF (g_asn_debug = 'Y') THEN
540: asn_debug.put_line('RCV_ASN_NOT_ACCEPT');
541: asn_debug.put_line('The header has failed ' || TO_CHAR(x_header_record.header_record.header_interface_id));
542: asn_debug.put_line('ASN could not be cancelled');
543: END IF;
544:
545: rcv_error_pkg.set_error_message('RCV_ASN_NOT_ACCEPT');
546: rcv_error_pkg.set_token('SHIPMENT', x_header_record.header_record.shipment_num);

Line 565: IF (g_asn_debug = 'Y') THEN

561: END IF; --}
562: END IF; --} if processing_status_code is running
563: ELSE -- } { no header row is picked up by header cursor
564: -- header record is missing. need to error out this trxn.
565: IF (g_asn_debug = 'Y') THEN
566: asn_debug.put_line('Header missing for trxn '||
567: to_char(x_cascaded_table(n).interface_transaction_id) ||', set error_status to E');
568: END IF;
569: x_header_record.error_record.error_status := 'E';

Line 566: asn_debug.put_line('Header missing for trxn '||

562: END IF; --} if processing_status_code is running
563: ELSE -- } { no header row is picked up by header cursor
564: -- header record is missing. need to error out this trxn.
565: IF (g_asn_debug = 'Y') THEN
566: asn_debug.put_line('Header missing for trxn '||
567: to_char(x_cascaded_table(n).interface_transaction_id) ||', set error_status to E');
568: END IF;
569: x_header_record.error_record.error_status := 'E';
570: -- need to insert po_inerface_errors

Line 576: asn_debug.put_line('closing the header cursor for txn = ' || TO_CHAR(x_cascaded_table(n).interface_transaction_id));

572: rcv_error_pkg.set_token('TXN_TYPE', x_cascaded_table(n).transaction_type);
573: rcv_error_pkg.log_interface_error('HEADER_INTERFACE_ID', FALSE);
574: END IF; --} this is the check for whether header is processed
575:
576: asn_debug.put_line('closing the header cursor for txn = ' || TO_CHAR(x_cascaded_table(n).interface_transaction_id));
577: CLOSE rcv_roi_preprocessor.headers_cur;
578: END IF; --} matches excluding shared header.
579:
580: -- after processing header update rhi/rti

Line 598: IF (g_asn_debug = 'Y') THEN

594: /* Bug 4344351: Log a message indicating an error in RCV_HEADERS_INTERFACE table.*/
595: rcv_error_pkg.log_interface_error('RCV_HEADERS_INTERFACE','',FALSE);
596:
597: -- 2) update rti
598: IF (g_asn_debug = 'Y') THEN
599: asn_debug.put_line('update_rti_error after rhi error ');
600: END IF;
601:
602: update_rti_error(p_group_id => x_cascaded_table(n).GROUP_ID,

Line 599: asn_debug.put_line('update_rti_error after rhi error ');

595: rcv_error_pkg.log_interface_error('RCV_HEADERS_INTERFACE','',FALSE);
596:
597: -- 2) update rti
598: IF (g_asn_debug = 'Y') THEN
599: asn_debug.put_line('update_rti_error after rhi error ');
600: END IF;
601:
602: update_rti_error(p_group_id => x_cascaded_table(n).GROUP_ID,
603: p_interface_id => NULL,

Line 615: IF (g_asn_debug = 'Y') THEN

611: * we dont process the rti row which belongs to a
612: * different OU.
613: */
614: ELSIF (x_header_record.error_record.error_status = 'P') THEN --}{
615: IF (g_asn_debug = 'Y') THEN
616: asn_debug.put_line('Set x_cascaded_table.error_status to P');
617: END IF;
618:
619: x_cascaded_table(n).error_status := 'P';

Line 616: asn_debug.put_line('Set x_cascaded_table.error_status to P');

612: * different OU.
613: */
614: ELSIF (x_header_record.error_record.error_status = 'P') THEN --}{
615: IF (g_asn_debug = 'Y') THEN
616: asn_debug.put_line('Set x_cascaded_table.error_status to P');
617: END IF;
618:
619: x_cascaded_table(n).error_status := 'P';
620: x_cascaded_table(n).processing_status_code := 'PENDING';

Line 629: IF (g_asn_debug = 'Y') THEN

625: receipt_header_id = x_header_record.header_record.receipt_header_id
626: WHERE header_interface_id = x_header_record.header_record.header_interface_id
627: AND processing_status_code <> 'SUCCESS';
628:
629: IF (g_asn_debug = 'Y') THEN
630: asn_debug.put_line('RCV_ASN_ACCEPT_NO_ERR');
631: END IF;
632: END IF; --} header errored out
633: END IF; --} matches with x_error_record.error_record <> E

Line 630: asn_debug.put_line('RCV_ASN_ACCEPT_NO_ERR');

626: WHERE header_interface_id = x_header_record.header_record.header_interface_id
627: AND processing_status_code <> 'SUCCESS';
628:
629: IF (g_asn_debug = 'Y') THEN
630: asn_debug.put_line('RCV_ASN_ACCEPT_NO_ERR');
631: END IF;
632: END IF; --} header errored out
633: END IF; --} matches with x_error_record.error_record <> E
634: ELSE --}{

Line 635: IF (g_asn_debug = 'Y') THEN

631: END IF;
632: END IF; --} header errored out
633: END IF; --} matches with x_error_record.error_record <> E
634: ELSE --}{
635: IF (g_asn_debug = 'Y') THEN
636: asn_debug.put_line('reset header record to empty for headerless trxns or errored out trxns '||
637: to_char(x_cascaded_table(n).interface_transaction_id) );
638: END IF;
639: x_header_record := x_empty_header_record;

Line 636: asn_debug.put_line('reset header record to empty for headerless trxns or errored out trxns '||

632: END IF; --} header errored out
633: END IF; --} matches with x_error_record.error_record <> E
634: ELSE --}{
635: IF (g_asn_debug = 'Y') THEN
636: asn_debug.put_line('reset header record to empty for headerless trxns or errored out trxns '||
637: to_char(x_cascaded_table(n).interface_transaction_id) );
638: END IF;
639: x_header_record := x_empty_header_record;
640: END IF; --} matches with whether transaction has header

Line 649: IF (g_asn_debug = 'Y') THEN

645: IF x_cascaded_table(n).error_status IN('S', 'W') THEN
646: l_update_lpn_group := TRUE;
647: END IF;
648:
649: IF (g_asn_debug = 'Y') THEN
650: asn_debug.put_line('After processing header for this transaction:');
651: asn_debug.put_line('X_cascaded_table(n).header_interface_id=' || x_cascaded_table(n).header_interface_id);
652: asn_debug.put_line('X_header_record.error_record.error_status=' || x_header_record.error_record.error_status);
653: asn_debug.put_line('x_cascaded_table(n).error_status=' || x_cascaded_table(n).error_status);

Line 650: asn_debug.put_line('After processing header for this transaction:');

646: l_update_lpn_group := TRUE;
647: END IF;
648:
649: IF (g_asn_debug = 'Y') THEN
650: asn_debug.put_line('After processing header for this transaction:');
651: asn_debug.put_line('X_cascaded_table(n).header_interface_id=' || x_cascaded_table(n).header_interface_id);
652: asn_debug.put_line('X_header_record.error_record.error_status=' || x_header_record.error_record.error_status);
653: asn_debug.put_line('x_cascaded_table(n).error_status=' || x_cascaded_table(n).error_status);
654: asn_debug.put_line('x_cascaded_table(n).error_message=' || x_cascaded_table(n).error_message);

Line 651: asn_debug.put_line('X_cascaded_table(n).header_interface_id=' || x_cascaded_table(n).header_interface_id);

647: END IF;
648:
649: IF (g_asn_debug = 'Y') THEN
650: asn_debug.put_line('After processing header for this transaction:');
651: asn_debug.put_line('X_cascaded_table(n).header_interface_id=' || x_cascaded_table(n).header_interface_id);
652: asn_debug.put_line('X_header_record.error_record.error_status=' || x_header_record.error_record.error_status);
653: asn_debug.put_line('x_cascaded_table(n).error_status=' || x_cascaded_table(n).error_status);
654: asn_debug.put_line('x_cascaded_table(n).error_message=' || x_cascaded_table(n).error_message);
655: END IF;

Line 652: asn_debug.put_line('X_header_record.error_record.error_status=' || x_header_record.error_record.error_status);

648:
649: IF (g_asn_debug = 'Y') THEN
650: asn_debug.put_line('After processing header for this transaction:');
651: asn_debug.put_line('X_cascaded_table(n).header_interface_id=' || x_cascaded_table(n).header_interface_id);
652: asn_debug.put_line('X_header_record.error_record.error_status=' || x_header_record.error_record.error_status);
653: asn_debug.put_line('x_cascaded_table(n).error_status=' || x_cascaded_table(n).error_status);
654: asn_debug.put_line('x_cascaded_table(n).error_message=' || x_cascaded_table(n).error_message);
655: END IF;
656:

Line 653: asn_debug.put_line('x_cascaded_table(n).error_status=' || x_cascaded_table(n).error_status);

649: IF (g_asn_debug = 'Y') THEN
650: asn_debug.put_line('After processing header for this transaction:');
651: asn_debug.put_line('X_cascaded_table(n).header_interface_id=' || x_cascaded_table(n).header_interface_id);
652: asn_debug.put_line('X_header_record.error_record.error_status=' || x_header_record.error_record.error_status);
653: asn_debug.put_line('x_cascaded_table(n).error_status=' || x_cascaded_table(n).error_status);
654: asn_debug.put_line('x_cascaded_table(n).error_message=' || x_cascaded_table(n).error_message);
655: END IF;
656:
657: /* bug 4368726, for asn cancel's the call rcv_roi_header.process_cancellation(x_header_record)

Line 654: asn_debug.put_line('x_cascaded_table(n).error_message=' || x_cascaded_table(n).error_message);

650: asn_debug.put_line('After processing header for this transaction:');
651: asn_debug.put_line('X_cascaded_table(n).header_interface_id=' || x_cascaded_table(n).header_interface_id);
652: asn_debug.put_line('X_header_record.error_record.error_status=' || x_header_record.error_record.error_status);
653: asn_debug.put_line('x_cascaded_table(n).error_status=' || x_cascaded_table(n).error_status);
654: asn_debug.put_line('x_cascaded_table(n).error_message=' || x_cascaded_table(n).error_message);
655: END IF;
656:
657: /* bug 4368726, for asn cancel's the call rcv_roi_header.process_cancellation(x_header_record)
658: will delete all the pending RTI rows and insert new RTI rows ready for the processor.

Line 719: asn_debug.put_line('Freight and Special Charges is disabled, so charges are not processed');

715: AND x_cascaded_table(n).error_status IN('S', 'W')) THEN --{
716:
717: /* Bug 7830436: Code changes to Freight and Special Charges flow */
718: if nvl(l_fsc_enabled,'N') = 'N' then
719: asn_debug.put_line('Freight and Special Charges is disabled, so charges are not processed');
720: else
721: RCV_CHARGES_GRP.preprocess_charges
722: ( p_api_version => 1.0
723: , p_init_msg_list => 'Y'

Line 765: IF (g_asn_debug = 'Y') THEN

761: ** error_status is 'S' or 'W'
762: */
763: IF (x_cascaded_table(n).error_status NOT IN('S', 'W')) THEN
764:
765: IF (g_asn_debug = 'Y') THEN
766: asn_debug.put_line('Skipping call to handle_rcv_asn_txn ');
767: END IF;
768: x_cascaded_table(n).processing_status_code := 'ERROR';
769: l_proc_status_code := 'ERROR';

Line 766: asn_debug.put_line('Skipping call to handle_rcv_asn_txn ');

762: */
763: IF (x_cascaded_table(n).error_status NOT IN('S', 'W')) THEN
764:
765: IF (g_asn_debug = 'Y') THEN
766: asn_debug.put_line('Skipping call to handle_rcv_asn_txn ');
767: END IF;
768: x_cascaded_table(n).processing_status_code := 'ERROR';
769: l_proc_status_code := 'ERROR';
770: ELSE

Line 791: IF (g_asn_debug = 'Y') THEN

787: where header_interface_id =
788: x_cascaded_table(n).header_interface_id))
789: AND asn_status = 'NEW_SHIP';
790:
791: IF (g_asn_debug = 'Y') THEN
792: asn_debug.put_line(sql%rowcount || ' new_ship RSH updated');
793: asn_debug.put_line('Before handle_rcv_asn_txn ');
794: END IF;
795: rcv_roi_transaction.handle_rcv_asn_transactions(x_cascaded_table, x_header_record);

Line 792: asn_debug.put_line(sql%rowcount || ' new_ship RSH updated');

788: x_cascaded_table(n).header_interface_id))
789: AND asn_status = 'NEW_SHIP';
790:
791: IF (g_asn_debug = 'Y') THEN
792: asn_debug.put_line(sql%rowcount || ' new_ship RSH updated');
793: asn_debug.put_line('Before handle_rcv_asn_txn ');
794: END IF;
795: rcv_roi_transaction.handle_rcv_asn_transactions(x_cascaded_table, x_header_record);
796: END IF;

Line 793: asn_debug.put_line('Before handle_rcv_asn_txn ');

789: AND asn_status = 'NEW_SHIP';
790:
791: IF (g_asn_debug = 'Y') THEN
792: asn_debug.put_line(sql%rowcount || ' new_ship RSH updated');
793: asn_debug.put_line('Before handle_rcv_asn_txn ');
794: END IF;
795: rcv_roi_transaction.handle_rcv_asn_transactions(x_cascaded_table, x_header_record);
796: END IF;
797:

Line 812: IF (g_asn_debug = 'Y') THEN

808: IF ((x_header_record.header_record.asn_type in ('ASN','ASBN')) AND
809: (x_header_record.header_record.receipt_num is NULL) AND
810: (x_header_record.error_record.error_status IN('S', 'W'))
811: ) THEN --{
812: IF (g_asn_debug = 'Y') THEN
813: asn_debug.put_line('ASN or ASBN Transaction');
814: END IF;
815:
816: SELECT count(*)

Line 813: asn_debug.put_line('ASN or ASBN Transaction');

809: (x_header_record.header_record.receipt_num is NULL) AND
810: (x_header_record.error_record.error_status IN('S', 'W'))
811: ) THEN --{
812: IF (g_asn_debug = 'Y') THEN
813: asn_debug.put_line('ASN or ASBN Transaction');
814: END IF;
815:
816: SELECT count(*)
817: INTO l_drop_ship_exists

Line 824: IF (g_asn_debug = 'Y') THEN

820: WHERE rti.header_interface_id = x_header_record.header_record.header_interface_id
821: and rti.po_line_location_id = plla.line_location_id
822: and plla.drop_ship_flag = 'Y';
823:
824: IF (g_asn_debug = 'Y') THEN
825: asn_debug.put_line('Number of Drop Ship Lines:' || l_drop_ship_exists);
826: END IF;
827: IF l_drop_ship_exists > 0 THEN --{
828: FND_PROFILE.GET('PO_AUTO_DELIVER_DROPSHIP_ASN', l_auto_deliver);

Line 825: asn_debug.put_line('Number of Drop Ship Lines:' || l_drop_ship_exists);

821: and rti.po_line_location_id = plla.line_location_id
822: and plla.drop_ship_flag = 'Y';
823:
824: IF (g_asn_debug = 'Y') THEN
825: asn_debug.put_line('Number of Drop Ship Lines:' || l_drop_ship_exists);
826: END IF;
827: IF l_drop_ship_exists > 0 THEN --{
828: FND_PROFILE.GET('PO_AUTO_DELIVER_DROPSHIP_ASN', l_auto_deliver);
829: IF (g_asn_debug = 'Y') THEN

Line 829: IF (g_asn_debug = 'Y') THEN

825: asn_debug.put_line('Number of Drop Ship Lines:' || l_drop_ship_exists);
826: END IF;
827: IF l_drop_ship_exists > 0 THEN --{
828: FND_PROFILE.GET('PO_AUTO_DELIVER_DROPSHIP_ASN', l_auto_deliver);
829: IF (g_asn_debug = 'Y') THEN
830: asn_debug.put_line('Profile Option PO_AUTO_DELIVER_DROPSHIP_ASN:' || l_auto_deliver);
831: END IF;
832: IF l_auto_deliver = 'Y' THEN --{
833: IF (g_asn_debug = 'Y') THEN

Line 830: asn_debug.put_line('Profile Option PO_AUTO_DELIVER_DROPSHIP_ASN:' || l_auto_deliver);

826: END IF;
827: IF l_drop_ship_exists > 0 THEN --{
828: FND_PROFILE.GET('PO_AUTO_DELIVER_DROPSHIP_ASN', l_auto_deliver);
829: IF (g_asn_debug = 'Y') THEN
830: asn_debug.put_line('Profile Option PO_AUTO_DELIVER_DROPSHIP_ASN:' || l_auto_deliver);
831: END IF;
832: IF l_auto_deliver = 'Y' THEN --{
833: IF (g_asn_debug = 'Y') THEN
834: asn_debug.put_line('Generate Receipt Number');

Line 833: IF (g_asn_debug = 'Y') THEN

829: IF (g_asn_debug = 'Y') THEN
830: asn_debug.put_line('Profile Option PO_AUTO_DELIVER_DROPSHIP_ASN:' || l_auto_deliver);
831: END IF;
832: IF l_auto_deliver = 'Y' THEN --{
833: IF (g_asn_debug = 'Y') THEN
834: asn_debug.put_line('Generate Receipt Number');
835: END IF;
836:
837: RCV_ROI_HEADER_COMMON.default_receipt_info(x_header_record);

Line 834: asn_debug.put_line('Generate Receipt Number');

830: asn_debug.put_line('Profile Option PO_AUTO_DELIVER_DROPSHIP_ASN:' || l_auto_deliver);
831: END IF;
832: IF l_auto_deliver = 'Y' THEN --{
833: IF (g_asn_debug = 'Y') THEN
834: asn_debug.put_line('Generate Receipt Number');
835: END IF;
836:
837: RCV_ROI_HEADER_COMMON.default_receipt_info(x_header_record);
838:

Line 839: IF (g_asn_debug = 'Y') THEN

835: END IF;
836:
837: RCV_ROI_HEADER_COMMON.default_receipt_info(x_header_record);
838:
839: IF (g_asn_debug = 'Y') THEN
840: asn_debug.put_line('Generated Receipt Number:' || x_header_record.header_record.receipt_num);
841: END IF;
842:
843: UPDATE RCV_SHIPMENT_HEADERS

Line 840: asn_debug.put_line('Generated Receipt Number:' || x_header_record.header_record.receipt_num);

836:
837: RCV_ROI_HEADER_COMMON.default_receipt_info(x_header_record);
838:
839: IF (g_asn_debug = 'Y') THEN
840: asn_debug.put_line('Generated Receipt Number:' || x_header_record.header_record.receipt_num);
841: END IF;
842:
843: UPDATE RCV_SHIPMENT_HEADERS
844: SET RECEIPT_NUM = x_header_record.header_record.receipt_num

Line 860: IF (g_asn_debug = 'Y') THEN

856:
857: l_ship_header_id := nvl(x_cascaded_table(n).shipment_header_id,
858: x_header_record.header_record.receipt_header_id);
859:
860: IF (g_asn_debug = 'Y') THEN
861: asn_debug.put_line('Erroring out RHI/RTI');
862: asn_debug.put_line('shipment_header_id : '|| l_ship_header_id);
863: END IF;
864: /* Bug 4779020. A line is ASN/Non ASN is decided by transaction tye */

Line 861: asn_debug.put_line('Erroring out RHI/RTI');

857: l_ship_header_id := nvl(x_cascaded_table(n).shipment_header_id,
858: x_header_record.header_record.receipt_header_id);
859:
860: IF (g_asn_debug = 'Y') THEN
861: asn_debug.put_line('Erroring out RHI/RTI');
862: asn_debug.put_line('shipment_header_id : '|| l_ship_header_id);
863: END IF;
864: /* Bug 4779020. A line is ASN/Non ASN is decided by transaction tye */
865: /* need to check auto_transact_code as well to exclude inv shipments */

Line 862: asn_debug.put_line('shipment_header_id : '|| l_ship_header_id);

858: x_header_record.header_record.receipt_header_id);
859:
860: IF (g_asn_debug = 'Y') THEN
861: asn_debug.put_line('Erroring out RHI/RTI');
862: asn_debug.put_line('shipment_header_id : '|| l_ship_header_id);
863: END IF;
864: /* Bug 4779020. A line is ASN/Non ASN is decided by transaction tye */
865: /* need to check auto_transact_code as well to exclude inv shipments */
866: IF ( x_fail_if_one_line_fails

Line 873: IF (g_asn_debug = 'Y') THEN

869: -- delete rsh and rsl
870: DELETE FROM rcv_shipment_headers
871: WHERE shipment_header_id = l_ship_header_id;
872:
873: IF (g_asn_debug = 'Y') THEN
874: asn_debug.put_line(sql%rowcount || ' RSH record deleted');
875: END IF;
876:
877: DELETE FROM rcv_shipment_lines

Line 874: asn_debug.put_line(sql%rowcount || ' RSH record deleted');

870: DELETE FROM rcv_shipment_headers
871: WHERE shipment_header_id = l_ship_header_id;
872:
873: IF (g_asn_debug = 'Y') THEN
874: asn_debug.put_line(sql%rowcount || ' RSH record deleted');
875: END IF;
876:
877: DELETE FROM rcv_shipment_lines
878: WHERE shipment_header_id = l_ship_header_id;

Line 880: IF (g_asn_debug = 'Y') THEN

876:
877: DELETE FROM rcv_shipment_lines
878: WHERE shipment_header_id = l_ship_header_id;
879:
880: IF (g_asn_debug = 'Y') THEN
881: asn_debug.put_line(sql%rowcount || ' RSL record deleted');
882: END IF;
883:
884: -- update rti

Line 881: asn_debug.put_line(sql%rowcount || ' RSL record deleted');

877: DELETE FROM rcv_shipment_lines
878: WHERE shipment_header_id = l_ship_header_id;
879:
880: IF (g_asn_debug = 'Y') THEN
881: asn_debug.put_line(sql%rowcount || ' RSL record deleted');
882: END IF;
883:
884: -- update rti
885: IF (g_asn_debug = 'Y') THEN

Line 885: IF (g_asn_debug = 'Y') THEN

881: asn_debug.put_line(sql%rowcount || ' RSL record deleted');
882: END IF;
883:
884: -- update rti
885: IF (g_asn_debug = 'Y') THEN
886: asn_debug.put_line('update_rti_error for a fail all ASN transaction ');
887: END IF;
888:
889: update_rti_error(p_group_id => x_cascaded_table(n).group_id,

Line 886: asn_debug.put_line('update_rti_error for a fail all ASN transaction ');

882: END IF;
883:
884: -- update rti
885: IF (g_asn_debug = 'Y') THEN
886: asn_debug.put_line('update_rti_error for a fail all ASN transaction ');
887: END IF;
888:
889: update_rti_error(p_group_id => x_cascaded_table(n).group_id,
890: p_interface_id => NULL,

Line 896: IF (g_asn_debug = 'Y') THEN

892: p_lpn_group_id => NULL
893: );
894:
895: /* Bug 4779020 .Update the RHI to error.Exit the Loop to prevent processing the line */
896: IF (g_asn_debug = 'Y') THEN
897: asn_debug.put_line('error out rhi for a fail all ASN transaction ');
898: END IF;
899:
900: UPDATE rcv_headers_interface

Line 897: asn_debug.put_line('error out rhi for a fail all ASN transaction ');

893: );
894:
895: /* Bug 4779020 .Update the RHI to error.Exit the Loop to prevent processing the line */
896: IF (g_asn_debug = 'Y') THEN
897: asn_debug.put_line('error out rhi for a fail all ASN transaction ');
898: END IF;
899:
900: UPDATE rcv_headers_interface
901: SET processing_status_code = 'ERROR',

Line 910: IF (g_asn_debug = 'Y') THEN

906: x_header_record.error_record.error_status := 'E';
907:
908: /* Bug 4779020 End */
909: ELSE --}{ not an asn with fail all option turned on
910: IF (g_asn_debug = 'Y') THEN
911: asn_debug.put_line('update_rti_error for an non fail all ASN transaction ');
912: END IF;
913:
914: update_rti_error(p_group_id => x_cascaded_table(n).group_id,

Line 911: asn_debug.put_line('update_rti_error for an non fail all ASN transaction ');

907:
908: /* Bug 4779020 End */
909: ELSE --}{ not an asn with fail all option turned on
910: IF (g_asn_debug = 'Y') THEN
911: asn_debug.put_line('update_rti_error for an non fail all ASN transaction ');
912: END IF;
913:
914: update_rti_error(p_group_id => x_cascaded_table(n).group_id,
915: p_interface_id => x_cascaded_table(n).interface_transaction_id,

Line 921: IF (g_asn_debug = 'Y') THEN

917: p_lpn_group_id => x_cascaded_table(n).lpn_group_id
918: );
919:
920: -- update the rhi to error if all of its line processing failed
921: IF (g_asn_debug = 'Y') THEN
922: asn_debug.put_line('update rhi for non fail-all-ASN transaction ');
923: END IF;
924:
925: IF x_cascaded_table(n).header_interface_id IS NOT NULL THEN --{

Line 922: asn_debug.put_line('update rhi for non fail-all-ASN transaction ');

918: );
919:
920: -- update the rhi to error if all of its line processing failed
921: IF (g_asn_debug = 'Y') THEN
922: asn_debug.put_line('update rhi for non fail-all-ASN transaction ');
923: END IF;
924:
925: IF x_cascaded_table(n).header_interface_id IS NOT NULL THEN --{
926: UPDATE rcv_headers_interface rhi

Line 936: IF (g_asn_debug = 'Y') THEN

932: FROM rcv_transactions_interface rti
933: WHERE rhi.header_interface_id = rti.header_interface_id
934: AND rti.processing_status_code in ('RUNNING', 'PENDING'));
935:
936: IF (g_asn_debug = 'Y') THEN
937: asn_debug.put_line(sql%rowcount || ' RHI record updated to error. ');
938: END IF;
939:
940: END IF; --}

Line 937: asn_debug.put_line(sql%rowcount || ' RHI record updated to error. ');

933: WHERE rhi.header_interface_id = rti.header_interface_id
934: AND rti.processing_status_code in ('RUNNING', 'PENDING'));
935:
936: IF (g_asn_debug = 'Y') THEN
937: asn_debug.put_line(sql%rowcount || ' RHI record updated to error. ');
938: END IF;
939:
940: END IF; --}
941:

Line 960: IF (g_asn_debug = 'Y') THEN

956: WHERE rhi.header_interface_id = rti.header_interface_id
957: AND rti.processing_status_code in ('RUNNING', 'PENDING')
958: AND rhi.receipt_header_id = l_ship_header_id );
959:
960: IF (g_asn_debug = 'Y') THEN
961: asn_debug.put_line(sql%rowcount || ' rsh record deleted');
962: END IF;
963:
964: END IF; --} not asn and fail all case

Line 961: asn_debug.put_line(sql%rowcount || ' rsh record deleted');

957: AND rti.processing_status_code in ('RUNNING', 'PENDING')
958: AND rhi.receipt_header_id = l_ship_header_id );
959:
960: IF (g_asn_debug = 'Y') THEN
961: asn_debug.put_line(sql%rowcount || ' rsh record deleted');
962: END IF;
963:
964: END IF; --} not asn and fail all case
965:

Line 1058: asn_debug.put_line('after loop');

1054: /* End 4355172 */
1055:
1056:
1057: CLOSE rcv_roi_preprocessor.txns_cur;
1058: asn_debug.put_line('after loop');
1059:
1060: --DCP call
1061: BEGIN
1062: IF (g_asn_debug = 'Y') THEN

Line 1062: IF (g_asn_debug = 'Y') THEN

1058: asn_debug.put_line('after loop');
1059:
1060: --DCP call
1061: BEGIN
1062: IF (g_asn_debug = 'Y') THEN
1063: asn_debug.put_line('l_check_dcp ' || l_check_dcp);
1064: asn_debug.put_line('g_check_dcp ' || rcv_dcp_pvt.g_check_dcp);
1065: END IF;
1066:

Line 1063: asn_debug.put_line('l_check_dcp ' || l_check_dcp);

1059:
1060: --DCP call
1061: BEGIN
1062: IF (g_asn_debug = 'Y') THEN
1063: asn_debug.put_line('l_check_dcp ' || l_check_dcp);
1064: asn_debug.put_line('g_check_dcp ' || rcv_dcp_pvt.g_check_dcp);
1065: END IF;
1066:
1067: IF l_check_dcp > 0 THEN

Line 1064: asn_debug.put_line('g_check_dcp ' || rcv_dcp_pvt.g_check_dcp);

1060: --DCP call
1061: BEGIN
1062: IF (g_asn_debug = 'Y') THEN
1063: asn_debug.put_line('l_check_dcp ' || l_check_dcp);
1064: asn_debug.put_line('g_check_dcp ' || rcv_dcp_pvt.g_check_dcp);
1065: END IF;
1066:
1067: IF l_check_dcp > 0 THEN
1068: -- Moved the driving cursor to the DCP package itself

Line 1075: IF (g_asn_debug = 'Y') THEN

1071: --END LOOP;
1072: END IF;
1073: EXCEPTION
1074: WHEN rcv_dcp_pvt.data_inconsistency_exception THEN
1075: IF (g_asn_debug = 'Y') THEN
1076: asn_debug.put_line('Data Inconsistency Exception');
1077: END IF;
1078: IF distinct_org_id%ISOPEN THEN
1079: CLOSE distinct_org_id;

Line 1076: asn_debug.put_line('Data Inconsistency Exception');

1072: END IF;
1073: EXCEPTION
1074: WHEN rcv_dcp_pvt.data_inconsistency_exception THEN
1075: IF (g_asn_debug = 'Y') THEN
1076: asn_debug.put_line('Data Inconsistency Exception');
1077: END IF;
1078: IF distinct_org_id%ISOPEN THEN
1079: CLOSE distinct_org_id;
1080: END IF;

Line 1089: IF (g_asn_debug = 'Y') THEN

1085:
1086: ROLLBACK TO dcp_preprocessor_start;
1087: GOTO dcp_pre_processor_start;
1088: WHEN OTHERS THEN
1089: IF (g_asn_debug = 'Y') THEN
1090: asn_debug.put_line('When Others ' || SQLERRM);
1091: END IF;
1092: NULL;
1093: END;

Line 1090: asn_debug.put_line('When Others ' || SQLERRM);

1086: ROLLBACK TO dcp_preprocessor_start;
1087: GOTO dcp_pre_processor_start;
1088: WHEN OTHERS THEN
1089: IF (g_asn_debug = 'Y') THEN
1090: asn_debug.put_line('When Others ' || SQLERRM);
1091: END IF;
1092: NULL;
1093: END;
1094: --End DCP call

Line 1096: IF (g_asn_debug = 'Y') THEN

1092: NULL;
1093: END;
1094: --End DCP call
1095:
1096: IF (g_asn_debug = 'Y') THEN
1097: asn_debug.put_line('Exit preprocessor');
1098: END IF;
1099: EXCEPTION
1100: WHEN NO_DATA_FOUND THEN

Line 1097: asn_debug.put_line('Exit preprocessor');

1093: END;
1094: --End DCP call
1095:
1096: IF (g_asn_debug = 'Y') THEN
1097: asn_debug.put_line('Exit preprocessor');
1098: END IF;
1099: EXCEPTION
1100: WHEN NO_DATA_FOUND THEN
1101: rcv_error_pkg.set_sql_error_message('RCV_ROI_PREPROCESSOR.preprocessor','sqlcode');

Line 1113: asn_debug.put_line('uncaught e_fatal_error in rcv_roi_preprocess.preprocessor - abnormal execution');

1109: IF rcv_roi_preprocessor.headers_cur%ISOPEN THEN
1110: CLOSE rcv_roi_preprocessor.headers_cur;
1111: END IF;
1112: WHEN rcv_error_pkg.e_fatal_error THEN --we didn't catch an error that we should have caught
1113: asn_debug.put_line('uncaught e_fatal_error in rcv_roi_preprocess.preprocessor - abnormal execution');
1114: asn_debug.put_line('last error message = ' || rcv_error_pkg.get_last_message);
1115: WHEN OTHERS THEN
1116: IF (g_asn_debug = 'Y') THEN
1117: asn_debug.put_line('Exception in preprocessor:');

Line 1114: asn_debug.put_line('last error message = ' || rcv_error_pkg.get_last_message);

1110: CLOSE rcv_roi_preprocessor.headers_cur;
1111: END IF;
1112: WHEN rcv_error_pkg.e_fatal_error THEN --we didn't catch an error that we should have caught
1113: asn_debug.put_line('uncaught e_fatal_error in rcv_roi_preprocess.preprocessor - abnormal execution');
1114: asn_debug.put_line('last error message = ' || rcv_error_pkg.get_last_message);
1115: WHEN OTHERS THEN
1116: IF (g_asn_debug = 'Y') THEN
1117: asn_debug.put_line('Exception in preprocessor:');
1118: asn_debug.put_line('sqlerrm: ' || SQLERRM);

Line 1116: IF (g_asn_debug = 'Y') THEN

1112: WHEN rcv_error_pkg.e_fatal_error THEN --we didn't catch an error that we should have caught
1113: asn_debug.put_line('uncaught e_fatal_error in rcv_roi_preprocess.preprocessor - abnormal execution');
1114: asn_debug.put_line('last error message = ' || rcv_error_pkg.get_last_message);
1115: WHEN OTHERS THEN
1116: IF (g_asn_debug = 'Y') THEN
1117: asn_debug.put_line('Exception in preprocessor:');
1118: asn_debug.put_line('sqlerrm: ' || SQLERRM);
1119: asn_debug.put_line('l_msg_count: ' || l_msg_count);
1120: asn_debug.put_line('l_msg_data: ' || l_msg_data);

Line 1117: asn_debug.put_line('Exception in preprocessor:');

1113: asn_debug.put_line('uncaught e_fatal_error in rcv_roi_preprocess.preprocessor - abnormal execution');
1114: asn_debug.put_line('last error message = ' || rcv_error_pkg.get_last_message);
1115: WHEN OTHERS THEN
1116: IF (g_asn_debug = 'Y') THEN
1117: asn_debug.put_line('Exception in preprocessor:');
1118: asn_debug.put_line('sqlerrm: ' || SQLERRM);
1119: asn_debug.put_line('l_msg_count: ' || l_msg_count);
1120: asn_debug.put_line('l_msg_data: ' || l_msg_data);
1121: asn_debug.put_line('Set rti rows to error for this and call txn complete');

Line 1118: asn_debug.put_line('sqlerrm: ' || SQLERRM);

1114: asn_debug.put_line('last error message = ' || rcv_error_pkg.get_last_message);
1115: WHEN OTHERS THEN
1116: IF (g_asn_debug = 'Y') THEN
1117: asn_debug.put_line('Exception in preprocessor:');
1118: asn_debug.put_line('sqlerrm: ' || SQLERRM);
1119: asn_debug.put_line('l_msg_count: ' || l_msg_count);
1120: asn_debug.put_line('l_msg_data: ' || l_msg_data);
1121: asn_debug.put_line('Set rti rows to error for this and call txn complete');
1122: END IF;

Line 1119: asn_debug.put_line('l_msg_count: ' || l_msg_count);

1115: WHEN OTHERS THEN
1116: IF (g_asn_debug = 'Y') THEN
1117: asn_debug.put_line('Exception in preprocessor:');
1118: asn_debug.put_line('sqlerrm: ' || SQLERRM);
1119: asn_debug.put_line('l_msg_count: ' || l_msg_count);
1120: asn_debug.put_line('l_msg_data: ' || l_msg_data);
1121: asn_debug.put_line('Set rti rows to error for this and call txn complete');
1122: END IF;
1123:

Line 1120: asn_debug.put_line('l_msg_data: ' || l_msg_data);

1116: IF (g_asn_debug = 'Y') THEN
1117: asn_debug.put_line('Exception in preprocessor:');
1118: asn_debug.put_line('sqlerrm: ' || SQLERRM);
1119: asn_debug.put_line('l_msg_count: ' || l_msg_count);
1120: asn_debug.put_line('l_msg_data: ' || l_msg_data);
1121: asn_debug.put_line('Set rti rows to error for this and call txn complete');
1122: END IF;
1123:
1124: IF rcv_roi_preprocessor.txns_cur%ISOPEN THEN

Line 1121: asn_debug.put_line('Set rti rows to error for this and call txn complete');

1117: asn_debug.put_line('Exception in preprocessor:');
1118: asn_debug.put_line('sqlerrm: ' || SQLERRM);
1119: asn_debug.put_line('l_msg_count: ' || l_msg_count);
1120: asn_debug.put_line('l_msg_data: ' || l_msg_data);
1121: asn_debug.put_line('Set rti rows to error for this and call txn complete');
1122: END IF;
1123:
1124: IF rcv_roi_preprocessor.txns_cur%ISOPEN THEN
1125: CLOSE rcv_roi_preprocessor.txns_cur;

Line 1136: IF (g_asn_debug = 'Y') THEN

1132:
1133: /*We default p_group_id to 0 */
1134: IF ( p_group_id IS NOT NULL
1135: AND p_group_id <> 0) THEN
1136: IF (g_asn_debug = 'Y') THEN
1137: asn_debug.put_line('update_rti_error in exception with group_id ');
1138: END IF;
1139:
1140: update_rti_error(p_group_id => p_group_id,

Line 1137: asn_debug.put_line('update_rti_error in exception with group_id ');

1133: /*We default p_group_id to 0 */
1134: IF ( p_group_id IS NOT NULL
1135: AND p_group_id <> 0) THEN
1136: IF (g_asn_debug = 'Y') THEN
1137: asn_debug.put_line('update_rti_error in exception with group_id ');
1138: END IF;
1139:
1140: update_rti_error(p_group_id => p_group_id,
1141: p_interface_id => NULL,

Line 1153: IF (g_asn_debug = 'Y') THEN

1149: LOOP
1150: FETCH distinct_groups INTO l_exception_group_id(n);
1151: EXIT WHEN distinct_groups%NOTFOUND;
1152:
1153: IF (g_asn_debug = 'Y') THEN
1154: asn_debug.put_line('update_rti_error in exception with request_id ');
1155: END IF;
1156:
1157: update_rti_error(p_group_id => l_exception_group_id(n),

Line 1154: asn_debug.put_line('update_rti_error in exception with request_id ');

1150: FETCH distinct_groups INTO l_exception_group_id(n);
1151: EXIT WHEN distinct_groups%NOTFOUND;
1152:
1153: IF (g_asn_debug = 'Y') THEN
1154: asn_debug.put_line('update_rti_error in exception with request_id ');
1155: END IF;
1156:
1157: update_rti_error(p_group_id => l_exception_group_id(n),
1158: p_interface_id => NULL,

Line 1558: IF (g_asn_debug = 'Y') THEN

1554: l_msg_count NUMBER;
1555: l_msg_data fnd_new_messages.MESSAGE_TEXT%TYPE;
1556: l_to_org_id rcv_transactions_interface.to_organization_id%TYPE;
1557: BEGIN
1558: IF (g_asn_debug = 'Y') THEN
1559: asn_debug.put_line('Enter create shipment line');
1560: END IF;
1561:
1562: IF (g_asn_debug = 'Y') THEN

Line 1559: asn_debug.put_line('Enter create shipment line');

1555: l_msg_data fnd_new_messages.MESSAGE_TEXT%TYPE;
1556: l_to_org_id rcv_transactions_interface.to_organization_id%TYPE;
1557: BEGIN
1558: IF (g_asn_debug = 'Y') THEN
1559: asn_debug.put_line('Enter create shipment line');
1560: END IF;
1561:
1562: IF (g_asn_debug = 'Y') THEN
1563: asn_debug.put_line('Initialize the table structure used for storing the cascaded rows' || x_cascaded_table(n).transaction_type);

Line 1562: IF (g_asn_debug = 'Y') THEN

1558: IF (g_asn_debug = 'Y') THEN
1559: asn_debug.put_line('Enter create shipment line');
1560: END IF;
1561:
1562: IF (g_asn_debug = 'Y') THEN
1563: asn_debug.put_line('Initialize the table structure used for storing the cascaded rows' || x_cascaded_table(n).transaction_type);
1564: asn_debug.put_line('receipt source code' || x_cascaded_table(n).receipt_source_code);
1565: END IF;
1566:

Line 1563: asn_debug.put_line('Initialize the table structure used for storing the cascaded rows' || x_cascaded_table(n).transaction_type);

1559: asn_debug.put_line('Enter create shipment line');
1560: END IF;
1561:
1562: IF (g_asn_debug = 'Y') THEN
1563: asn_debug.put_line('Initialize the table structure used for storing the cascaded rows' || x_cascaded_table(n).transaction_type);
1564: asn_debug.put_line('receipt source code' || x_cascaded_table(n).receipt_source_code);
1565: END IF;
1566:
1567: -- delete all records from used_for_cascaded_rows

Line 1564: asn_debug.put_line('receipt source code' || x_cascaded_table(n).receipt_source_code);

1560: END IF;
1561:
1562: IF (g_asn_debug = 'Y') THEN
1563: asn_debug.put_line('Initialize the table structure used for storing the cascaded rows' || x_cascaded_table(n).transaction_type);
1564: asn_debug.put_line('receipt source code' || x_cascaded_table(n).receipt_source_code);
1565: END IF;
1566:
1567: -- delete all records from used_for_cascaded_rows
1568: used_for_cascaded_rows.DELETE;

Line 1585: asn_debug.put_line('calling derive routine for transaction ' || x_cascaded_table(n).transaction_type);

1581: used_for_cascaded_rows,
1582: v_header_record
1583: );
1584: ELSIF(x_cascaded_table(n).transaction_type IN('TRANSFER', 'ACCEPT', 'REJECT', 'DELIVER')) THEN
1585: asn_debug.put_line('calling derive routine for transaction ' || x_cascaded_table(n).transaction_type);
1586: rcv_roi_transaction.derive_vendor_trans_del(x_cascaded_table,
1587: n,
1588: used_for_cascaded_rows,
1589: v_header_record

Line 1592: asn_debug.put_line('calling derive routine for transaction ' || x_cascaded_table(n).transaction_type);

1588: used_for_cascaded_rows,
1589: v_header_record
1590: );
1591: ELSIF(x_cascaded_table(n).transaction_type =('CORRECT')) THEN
1592: asn_debug.put_line('calling derive routine for transaction ' || x_cascaded_table(n).transaction_type);
1593: rcv_roi_transaction.derive_correction_line(x_cascaded_table,
1594: n,
1595: used_for_cascaded_rows,
1596: v_header_record

Line 1599: asn_debug.put_line('calling derive routine for transaction ' || x_cascaded_table(n).transaction_type);

1595: used_for_cascaded_rows,
1596: v_header_record
1597: );
1598: ELSIF(x_cascaded_table(n).transaction_type = 'RETURN TO VENDOR') THEN
1599: asn_debug.put_line('calling derive routine for transaction ' || x_cascaded_table(n).transaction_type);
1600: rcv_roi_return.derive_return_line(x_cascaded_table,
1601: n,
1602: used_for_cascaded_rows,
1603: v_header_record

Line 1606: asn_debug.put_line('calling derive routine for transaction ' || x_cascaded_table(n).transaction_type);

1602: used_for_cascaded_rows,
1603: v_header_record
1604: );
1605: ELSIF(x_cascaded_table(n).transaction_type = 'RETURN TO RECEIVING') THEN
1606: asn_debug.put_line('calling derive routine for transaction ' || x_cascaded_table(n).transaction_type);
1607: rcv_roi_return.derive_return_line(x_cascaded_table,
1608: n,
1609: used_for_cascaded_rows,
1610: v_header_record

Line 1613: asn_debug.put_line('We do not support transaction type ' || x_cascaded_table(n).transaction_type);

1609: used_for_cascaded_rows,
1610: v_header_record
1611: );
1612: ELSE
1613: asn_debug.put_line('We do not support transaction type ' || x_cascaded_table(n).transaction_type);
1614: rcv_error_pkg.set_error_message('RCV_INVALID_TRANSACTION_TYPE');
1615: rcv_error_pkg.log_interface_error('TRANSACTION_TYPE');
1616: END IF;
1617: ELSIF(x_cascaded_table(n).receipt_source_code = 'INTERNAL ORDER') THEN

Line 1619: asn_debug.put_line('calling derive routine for transaction ' || x_cascaded_table(n).transaction_type);

1615: rcv_error_pkg.log_interface_error('TRANSACTION_TYPE');
1616: END IF;
1617: ELSIF(x_cascaded_table(n).receipt_source_code = 'INTERNAL ORDER') THEN
1618: IF (x_cascaded_table(n).transaction_type = 'RECEIVE') THEN
1619: asn_debug.put_line('calling derive routine for transaction ' || x_cascaded_table(n).transaction_type);
1620: rcv_int_order_pp_pvt.derive_io_receive_line(x_cascaded_table,
1621: n,
1622: used_for_cascaded_rows,
1623: v_header_record

Line 1626: asn_debug.put_line('calling derive routine for transaction ' || x_cascaded_table(n).transaction_type);

1622: used_for_cascaded_rows,
1623: v_header_record
1624: );
1625: ELSIF(x_cascaded_table(n).transaction_type IN('TRANSFER', 'ACCEPT', 'REJECT', 'DELIVER')) THEN
1626: asn_debug.put_line('calling derive routine for transaction ' || x_cascaded_table(n).transaction_type);
1627: rcv_int_order_pp_pvt.derive_io_trans_line(x_cascaded_table,
1628: n,
1629: used_for_cascaded_rows,
1630: v_header_record

Line 1633: asn_debug.put_line('calling derive routine for transaction ' || x_cascaded_table(n).transaction_type);

1629: used_for_cascaded_rows,
1630: v_header_record
1631: );
1632: ELSIF(x_cascaded_table(n).transaction_type =('CORRECT')) THEN
1633: asn_debug.put_line('calling derive routine for transaction ' || x_cascaded_table(n).transaction_type);
1634: rcv_int_order_pp_pvt.derive_io_correct_line(x_cascaded_table,
1635: n,
1636: used_for_cascaded_rows,
1637: v_header_record

Line 1640: asn_debug.put_line('We do not support transaction type ' || x_cascaded_table(n).transaction_type);

1636: used_for_cascaded_rows,
1637: v_header_record
1638: );
1639: ELSE
1640: asn_debug.put_line('We do not support transaction type ' || x_cascaded_table(n).transaction_type);
1641: rcv_error_pkg.set_error_message('RCV_INVALID_TRANSACTION_TYPE');
1642: rcv_error_pkg.log_interface_error('TRANSACTION_TYPE');
1643: END IF; -- IF INTERNAL ORDER
1644: ELSIF(x_cascaded_table(n).receipt_source_code = 'INVENTORY') THEN --} {

Line 1652: asn_debug.put_line('calling derive routine for transaction ' || x_cascaded_table(n).transaction_type);

1648: used_for_cascaded_rows,
1649: v_header_record
1650: );
1651: ELSIF(x_cascaded_table(n).transaction_type IN('TRANSFER', 'ACCEPT', 'REJECT', 'DELIVER')) THEN
1652: asn_debug.put_line('calling derive routine for transaction ' || x_cascaded_table(n).transaction_type);
1653: rcv_int_org_transfer.derive_int_org_trans_del(x_cascaded_table,
1654: n,
1655: used_for_cascaded_rows,
1656: v_header_record

Line 1659: asn_debug.put_line('calling derive routine for transaction ' || x_cascaded_table(n).transaction_type);

1655: used_for_cascaded_rows,
1656: v_header_record
1657: );
1658: ELSIF(x_cascaded_table(n).transaction_type =('CORRECT')) THEN
1659: asn_debug.put_line('calling derive routine for transaction ' || x_cascaded_table(n).transaction_type);
1660: rcv_int_org_transfer.derive_int_org_cor_line(x_cascaded_table,
1661: n,
1662: used_for_cascaded_rows,
1663: v_header_record

Line 1666: asn_debug.put_line('We do not support transaction type ' || x_cascaded_table(n).transaction_type);

1662: used_for_cascaded_rows,
1663: v_header_record
1664: );
1665: ELSE
1666: asn_debug.put_line('We do not support transaction type ' || x_cascaded_table(n).transaction_type);
1667: rcv_error_pkg.set_error_message('RCV_INVALID_TRANSACTION_TYPE');
1668: rcv_error_pkg.log_interface_error('TRANSACTION_TYPE');
1669: END IF;
1670: ELSIF(x_cascaded_table(n).receipt_source_code = 'CUSTOMER') THEN --} {

Line 1671: asn_debug.put_line('calling derive routine for RMA transaction ' || x_cascaded_table(n).transaction_type);

1667: rcv_error_pkg.set_error_message('RCV_INVALID_TRANSACTION_TYPE');
1668: rcv_error_pkg.log_interface_error('TRANSACTION_TYPE');
1669: END IF;
1670: ELSIF(x_cascaded_table(n).receipt_source_code = 'CUSTOMER') THEN --} {
1671: asn_debug.put_line('calling derive routine for RMA transaction ' || x_cascaded_table(n).transaction_type);
1672:
1673: IF (x_cascaded_table(n).transaction_type = 'RECEIVE') THEN --{
1674: rcv_rma_transactions.derive_rma_line(x_cascaded_table,
1675: n,

Line 1698: asn_debug.put_line('We do not support transaction type ' || x_cascaded_table(n).transaction_type);

1694: used_for_cascaded_rows,
1695: v_header_record
1696: );
1697: ELSE
1698: asn_debug.put_line('We do not support transaction type ' || x_cascaded_table(n).transaction_type);
1699: rcv_error_pkg.set_error_message('RCV_INVALID_TRANSACTION_TYPE');
1700: rcv_error_pkg.log_interface_error('TRANSACTION_TYPE');
1701: END IF; --}
1702: ELSE --}{

Line 1703: asn_debug.put_line('We do not support receipt_source_code ' || x_cascaded_table(n).receipt_source_code);

1699: rcv_error_pkg.set_error_message('RCV_INVALID_TRANSACTION_TYPE');
1700: rcv_error_pkg.log_interface_error('TRANSACTION_TYPE');
1701: END IF; --}
1702: ELSE --}{
1703: asn_debug.put_line('We do not support receipt_source_code ' || x_cascaded_table(n).receipt_source_code);
1704: rcv_error_pkg.set_error_message('RCV_INVALID_TRANSACTION_TYPE');
1705: rcv_error_pkg.log_interface_error('TRANSACTION_TYPE');
1706: END IF; --}
1707: END IF;

Line 1708: IF (g_asn_debug = 'Y') THEN

1704: rcv_error_pkg.set_error_message('RCV_INVALID_TRANSACTION_TYPE');
1705: rcv_error_pkg.log_interface_error('TRANSACTION_TYPE');
1706: END IF; --}
1707: END IF;
1708: IF (g_asn_debug = 'Y') THEN
1709: asn_debug.put_line('Back from derive routine with ' || TO_CHAR(used_for_cascaded_rows.COUNT) || ' rows');
1710: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
1711: asn_debug.put_line('Error Message ' || x_cascaded_table(n).error_message);
1712: END IF;

Line 1709: asn_debug.put_line('Back from derive routine with ' || TO_CHAR(used_for_cascaded_rows.COUNT) || ' rows');

1705: rcv_error_pkg.log_interface_error('TRANSACTION_TYPE');
1706: END IF; --}
1707: END IF;
1708: IF (g_asn_debug = 'Y') THEN
1709: asn_debug.put_line('Back from derive routine with ' || TO_CHAR(used_for_cascaded_rows.COUNT) || ' rows');
1710: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
1711: asn_debug.put_line('Error Message ' || x_cascaded_table(n).error_message);
1712: END IF;
1713:

Line 1710: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);

1706: END IF; --}
1707: END IF;
1708: IF (g_asn_debug = 'Y') THEN
1709: asn_debug.put_line('Back from derive routine with ' || TO_CHAR(used_for_cascaded_rows.COUNT) || ' rows');
1710: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
1711: asn_debug.put_line('Error Message ' || x_cascaded_table(n).error_message);
1712: END IF;
1713:
1714: x_progress := '010';

Line 1711: asn_debug.put_line('Error Message ' || x_cascaded_table(n).error_message);

1707: END IF;
1708: IF (g_asn_debug = 'Y') THEN
1709: asn_debug.put_line('Back from derive routine with ' || TO_CHAR(used_for_cascaded_rows.COUNT) || ' rows');
1710: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
1711: asn_debug.put_line('Error Message ' || x_cascaded_table(n).error_message);
1712: END IF;
1713:
1714: x_progress := '010';
1715:

Line 1719: IF (g_asn_debug = 'Y') THEN

1715:
1716: IF (x_cascaded_table(n).error_status IN('S', 'W'))
1717: AND used_for_cascaded_rows.COUNT > 0 THEN --{ we have returned with a cascaded table
1718: FOR i IN 1 .. used_for_cascaded_rows.COUNT LOOP --{
1719: IF (g_asn_debug = 'Y') THEN
1720: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1721: END IF;
1722:
1723: -- default shipment line information

Line 1720: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));

1716: IF (x_cascaded_table(n).error_status IN('S', 'W'))
1717: AND used_for_cascaded_rows.COUNT > 0 THEN --{ we have returned with a cascaded table
1718: FOR i IN 1 .. used_for_cascaded_rows.COUNT LOOP --{
1719: IF (g_asn_debug = 'Y') THEN
1720: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1721: END IF;
1722:
1723: -- default shipment line information
1724: IF (x_cascaded_table(n).receipt_source_code = 'VENDOR') THEN --{

Line 1732: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));

1728: x_header_id,
1729: v_header_record
1730: );
1731: ELSIF(x_cascaded_table(n).transaction_type IN('TRANSFER', 'ACCEPT', 'REJECT', 'DELIVER')) THEN --}{
1732: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1733: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);
1734: rcv_roi_transaction.default_vendor_trans_del(used_for_cascaded_rows, i);
1735: ELSIF(x_cascaded_table(n).transaction_type = 'CORRECT') THEN --}{
1736: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));

Line 1733: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);

1729: v_header_record
1730: );
1731: ELSIF(x_cascaded_table(n).transaction_type IN('TRANSFER', 'ACCEPT', 'REJECT', 'DELIVER')) THEN --}{
1732: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1733: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);
1734: rcv_roi_transaction.default_vendor_trans_del(used_for_cascaded_rows, i);
1735: ELSIF(x_cascaded_table(n).transaction_type = 'CORRECT') THEN --}{
1736: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1737: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);

Line 1736: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));

1732: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1733: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);
1734: rcv_roi_transaction.default_vendor_trans_del(used_for_cascaded_rows, i);
1735: ELSIF(x_cascaded_table(n).transaction_type = 'CORRECT') THEN --}{
1736: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1737: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);
1738: rcv_roi_transaction.default_vendor_correct(used_for_cascaded_rows, i);
1739: ELSIF(x_cascaded_table(n).transaction_type = 'RETURN TO VENDOR') THEN --}{
1740: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));

Line 1737: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);

1733: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);
1734: rcv_roi_transaction.default_vendor_trans_del(used_for_cascaded_rows, i);
1735: ELSIF(x_cascaded_table(n).transaction_type = 'CORRECT') THEN --}{
1736: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1737: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);
1738: rcv_roi_transaction.default_vendor_correct(used_for_cascaded_rows, i);
1739: ELSIF(x_cascaded_table(n).transaction_type = 'RETURN TO VENDOR') THEN --}{
1740: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1741: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);

Line 1740: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));

1736: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1737: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);
1738: rcv_roi_transaction.default_vendor_correct(used_for_cascaded_rows, i);
1739: ELSIF(x_cascaded_table(n).transaction_type = 'RETURN TO VENDOR') THEN --}{
1740: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1741: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);
1742: rcv_roi_return.default_return_line(used_for_cascaded_rows, i);
1743: ELSIF(x_cascaded_table(n).transaction_type = 'RETURN TO RECEIVING') THEN --}{
1744: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));

Line 1741: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);

1737: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);
1738: rcv_roi_transaction.default_vendor_correct(used_for_cascaded_rows, i);
1739: ELSIF(x_cascaded_table(n).transaction_type = 'RETURN TO VENDOR') THEN --}{
1740: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1741: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);
1742: rcv_roi_return.default_return_line(used_for_cascaded_rows, i);
1743: ELSIF(x_cascaded_table(n).transaction_type = 'RETURN TO RECEIVING') THEN --}{
1744: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1745: rcv_roi_return.default_return_line(used_for_cascaded_rows, i);

Line 1744: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));

1740: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1741: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);
1742: rcv_roi_return.default_return_line(used_for_cascaded_rows, i);
1743: ELSIF(x_cascaded_table(n).transaction_type = 'RETURN TO RECEIVING') THEN --}{
1744: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1745: rcv_roi_return.default_return_line(used_for_cascaded_rows, i);
1746: END IF; --}
1747: ELSIF(x_cascaded_table(n).receipt_source_code = 'INTERNAL ORDER') THEN
1748: IF (x_cascaded_table(n).transaction_type = 'RECEIVE') THEN

Line 1751: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i) || ' TYPE: ' || x_cascaded_table(n).transaction_type);

1747: ELSIF(x_cascaded_table(n).receipt_source_code = 'INTERNAL ORDER') THEN
1748: IF (x_cascaded_table(n).transaction_type = 'RECEIVE') THEN
1749: rcv_int_order_pp_pvt.default_io_receive_line(used_for_cascaded_rows, i);
1750: ELSIF(x_cascaded_table(n).transaction_type IN('TRANSFER', 'ACCEPT', 'REJECT', 'DELIVER')) THEN
1751: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i) || ' TYPE: ' || x_cascaded_table(n).transaction_type);
1752: rcv_int_order_pp_pvt.default_io_trans_line(used_for_cascaded_rows, i);
1753: ELSIF(x_cascaded_table(n).transaction_type = 'CORRECT') THEN
1754: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i) || ' TYPE: ' || x_cascaded_table(n).transaction_type);
1755: rcv_int_order_pp_pvt.default_io_correct_line(used_for_cascaded_rows, i);

Line 1754: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i) || ' TYPE: ' || x_cascaded_table(n).transaction_type);

1750: ELSIF(x_cascaded_table(n).transaction_type IN('TRANSFER', 'ACCEPT', 'REJECT', 'DELIVER')) THEN
1751: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i) || ' TYPE: ' || x_cascaded_table(n).transaction_type);
1752: rcv_int_order_pp_pvt.default_io_trans_line(used_for_cascaded_rows, i);
1753: ELSIF(x_cascaded_table(n).transaction_type = 'CORRECT') THEN
1754: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i) || ' TYPE: ' || x_cascaded_table(n).transaction_type);
1755: rcv_int_order_pp_pvt.default_io_correct_line(used_for_cascaded_rows, i);
1756: ELSIF(x_cascaded_table(n).transaction_type IN('RETURN TO VENDOR', 'RETURN TO RECEIVING')) THEN
1757: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i) || ' TYPE: ' || x_cascaded_table(n).transaction_type);
1758: rcv_roi_return.default_return_line(used_for_cascaded_rows, i);

Line 1757: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i) || ' TYPE: ' || x_cascaded_table(n).transaction_type);

1753: ELSIF(x_cascaded_table(n).transaction_type = 'CORRECT') THEN
1754: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i) || ' TYPE: ' || x_cascaded_table(n).transaction_type);
1755: rcv_int_order_pp_pvt.default_io_correct_line(used_for_cascaded_rows, i);
1756: ELSIF(x_cascaded_table(n).transaction_type IN('RETURN TO VENDOR', 'RETURN TO RECEIVING')) THEN
1757: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i) || ' TYPE: ' || x_cascaded_table(n).transaction_type);
1758: rcv_roi_return.default_return_line(used_for_cascaded_rows, i);
1759: END IF; -- FOR default INTERNAL ORDER
1760: ELSIF(x_cascaded_table(n).receipt_source_code = 'INVENTORY') THEN -- } {
1761: IF (x_cascaded_table(n).transaction_type = 'RECEIVE') THEN --{

Line 1764: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));

1760: ELSIF(x_cascaded_table(n).receipt_source_code = 'INVENTORY') THEN -- } {
1761: IF (x_cascaded_table(n).transaction_type = 'RECEIVE') THEN --{
1762: rcv_int_org_transfer.default_int_org_rcv_line(used_for_cascaded_rows, i);
1763: ELSIF(x_cascaded_table(n).transaction_type IN('TRANSFER', 'ACCEPT', 'REJECT', 'DELIVER')) THEN --}{
1764: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1765: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);
1766: rcv_int_org_transfer.default_int_org_trans_del(used_for_cascaded_rows, i);
1767: ELSIF(x_cascaded_table(n).transaction_type IN('CORRECT')) THEN --}{
1768: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));

Line 1765: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);

1761: IF (x_cascaded_table(n).transaction_type = 'RECEIVE') THEN --{
1762: rcv_int_org_transfer.default_int_org_rcv_line(used_for_cascaded_rows, i);
1763: ELSIF(x_cascaded_table(n).transaction_type IN('TRANSFER', 'ACCEPT', 'REJECT', 'DELIVER')) THEN --}{
1764: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1765: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);
1766: rcv_int_org_transfer.default_int_org_trans_del(used_for_cascaded_rows, i);
1767: ELSIF(x_cascaded_table(n).transaction_type IN('CORRECT')) THEN --}{
1768: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1769: rcv_int_org_transfer.default_int_org_cor_line(used_for_cascaded_rows, i);

Line 1768: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));

1764: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1765: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);
1766: rcv_int_org_transfer.default_int_org_trans_del(used_for_cascaded_rows, i);
1767: ELSIF(x_cascaded_table(n).transaction_type IN('CORRECT')) THEN --}{
1768: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1769: rcv_int_org_transfer.default_int_org_cor_line(used_for_cascaded_rows, i);
1770: ELSIF(x_cascaded_table(n).transaction_type = 'RETURN TO VENDOR') THEN --}{
1771: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1772: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);

Line 1771: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));

1767: ELSIF(x_cascaded_table(n).transaction_type IN('CORRECT')) THEN --}{
1768: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1769: rcv_int_org_transfer.default_int_org_cor_line(used_for_cascaded_rows, i);
1770: ELSIF(x_cascaded_table(n).transaction_type = 'RETURN TO VENDOR') THEN --}{
1771: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1772: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);
1773: rcv_roi_return.default_return_line(used_for_cascaded_rows, i);
1774: ELSIF(x_cascaded_table(n).transaction_type = 'RETURN TO RECEIVING') THEN --}{
1775: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));

Line 1772: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);

1768: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1769: rcv_int_org_transfer.default_int_org_cor_line(used_for_cascaded_rows, i);
1770: ELSIF(x_cascaded_table(n).transaction_type = 'RETURN TO VENDOR') THEN --}{
1771: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1772: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);
1773: rcv_roi_return.default_return_line(used_for_cascaded_rows, i);
1774: ELSIF(x_cascaded_table(n).transaction_type = 'RETURN TO RECEIVING') THEN --}{
1775: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1776: rcv_roi_return.default_return_line(used_for_cascaded_rows, i);

Line 1775: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));

1771: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1772: asn_debug.put_line('Defaulting for cascaded row ' || x_cascaded_table(n).transaction_type);
1773: rcv_roi_return.default_return_line(used_for_cascaded_rows, i);
1774: ELSIF(x_cascaded_table(n).transaction_type = 'RETURN TO RECEIVING') THEN --}{
1775: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1776: rcv_roi_return.default_return_line(used_for_cascaded_rows, i);
1777: END IF; --}
1778: ELSIF(x_cascaded_table(n).receipt_source_code = 'CUSTOMER') THEN -- } {
1779: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));

Line 1779: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));

1775: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1776: rcv_roi_return.default_return_line(used_for_cascaded_rows, i);
1777: END IF; --}
1778: ELSIF(x_cascaded_table(n).receipt_source_code = 'CUSTOMER') THEN -- } {
1779: asn_debug.put_line('Defaulting for cascaded row ' || TO_CHAR(i));
1780:
1781: IF (x_cascaded_table(n).transaction_type = 'RECEIVE') THEN --{
1782: rcv_rma_transactions.default_rma_line(used_for_cascaded_rows,
1783: i,

Line 1818: IF (g_asn_debug = 'Y') THEN

1814: AND l_return_status = fnd_api.g_ret_sts_success) THEN
1815: used_for_cascaded_rows(i).transfer_lpn_id := NULL;
1816: used_for_cascaded_rows(i).transfer_license_plate_number := NULL;
1817:
1818: IF (g_asn_debug = 'Y') THEN
1819: asn_debug.put_line('Set transfer_lpn_id and transfer_licese_plate_number to null for a deliver transaction in an non-WMS org for interface_trx_id ' || used_for_cascaded_rows(i).order_transaction_id);
1820: END IF;
1821: END IF;
1822: END IF;

Line 1819: asn_debug.put_line('Set transfer_lpn_id and transfer_licese_plate_number to null for a deliver transaction in an non-WMS org for interface_trx_id ' || used_for_cascaded_rows(i).order_transaction_id);

1815: used_for_cascaded_rows(i).transfer_lpn_id := NULL;
1816: used_for_cascaded_rows(i).transfer_license_plate_number := NULL;
1817:
1818: IF (g_asn_debug = 'Y') THEN
1819: asn_debug.put_line('Set transfer_lpn_id and transfer_licese_plate_number to null for a deliver transaction in an non-WMS org for interface_trx_id ' || used_for_cascaded_rows(i).order_transaction_id);
1820: END IF;
1821: END IF;
1822: END IF;
1823:

Line 1863: IF (g_asn_debug = 'Y') THEN

1859: x_cascaded_table(n).processing_status_code := 'ERROR';
1860: x_cascaded_table(n).error_status := used_for_cascaded_rows(i).error_status;
1861: x_cascaded_table(n).error_message := used_for_cascaded_rows(i).error_message;
1862:
1863: IF (g_asn_debug = 'Y') THEN
1864: asn_debug.put_line('Have hit error condition in validation');
1865: asn_debug.put_line('Mark needed flags and error message');
1866: asn_debug.put_line('Delete the cascaded rows');
1867: END IF;

Line 1864: asn_debug.put_line('Have hit error condition in validation');

1860: x_cascaded_table(n).error_status := used_for_cascaded_rows(i).error_status;
1861: x_cascaded_table(n).error_message := used_for_cascaded_rows(i).error_message;
1862:
1863: IF (g_asn_debug = 'Y') THEN
1864: asn_debug.put_line('Have hit error condition in validation');
1865: asn_debug.put_line('Mark needed flags and error message');
1866: asn_debug.put_line('Delete the cascaded rows');
1867: END IF;
1868:

Line 1865: asn_debug.put_line('Mark needed flags and error message');

1861: x_cascaded_table(n).error_message := used_for_cascaded_rows(i).error_message;
1862:
1863: IF (g_asn_debug = 'Y') THEN
1864: asn_debug.put_line('Have hit error condition in validation');
1865: asn_debug.put_line('Mark needed flags and error message');
1866: asn_debug.put_line('Delete the cascaded rows');
1867: END IF;
1868:
1869: used_for_cascaded_rows.DELETE;

Line 1866: asn_debug.put_line('Delete the cascaded rows');

1862:
1863: IF (g_asn_debug = 'Y') THEN
1864: asn_debug.put_line('Have hit error condition in validation');
1865: asn_debug.put_line('Mark needed flags and error message');
1866: asn_debug.put_line('Delete the cascaded rows');
1867: END IF;
1868:
1869: used_for_cascaded_rows.DELETE;
1870: EXIT;

Line 1877: asn_debug.put_line('calling update interface amt ');

1873: * this column to get the available qty if the current row
1874: * is a child of another row in rti.
1875: */
1876: IF used_for_cascaded_rows(i).matching_basis = 'AMOUNT' THEN
1877: asn_debug.put_line('calling update interface amt ');
1878: rcv_roi_transaction.update_interface_available_amt(used_for_cascaded_rows, i);
1879: ELSE
1880: asn_debug.put_line('calling update interface qty ');
1881: rcv_roi_transaction.update_interface_available_qty(used_for_cascaded_rows, i);

Line 1880: asn_debug.put_line('calling update interface qty ');

1876: IF used_for_cascaded_rows(i).matching_basis = 'AMOUNT' THEN
1877: asn_debug.put_line('calling update interface amt ');
1878: rcv_roi_transaction.update_interface_available_amt(used_for_cascaded_rows, i);
1879: ELSE
1880: asn_debug.put_line('calling update interface qty ');
1881: rcv_roi_transaction.update_interface_available_qty(used_for_cascaded_rows, i);
1882: END IF;
1883: END IF; --}
1884: END LOOP; --}

Line 1887: IF (g_asn_debug = 'Y') THEN

1883: END IF; --}
1884: END LOOP; --}
1885:
1886: IF x_cascaded_table(n).processing_status_code = 'ERROR' THEN --{
1887: IF (g_asn_debug = 'Y') THEN
1888: asn_debug.put_line('Have hit error condition in validation');
1889: asn_debug.put_line('Mark needed flags and error message');
1890: asn_debug.put_line('Delete the cascaded rows');
1891: END IF;

Line 1888: asn_debug.put_line('Have hit error condition in validation');

1884: END LOOP; --}
1885:
1886: IF x_cascaded_table(n).processing_status_code = 'ERROR' THEN --{
1887: IF (g_asn_debug = 'Y') THEN
1888: asn_debug.put_line('Have hit error condition in validation');
1889: asn_debug.put_line('Mark needed flags and error message');
1890: asn_debug.put_line('Delete the cascaded rows');
1891: END IF;
1892:

Line 1889: asn_debug.put_line('Mark needed flags and error message');

1885:
1886: IF x_cascaded_table(n).processing_status_code = 'ERROR' THEN --{
1887: IF (g_asn_debug = 'Y') THEN
1888: asn_debug.put_line('Have hit error condition in validation');
1889: asn_debug.put_line('Mark needed flags and error message');
1890: asn_debug.put_line('Delete the cascaded rows');
1891: END IF;
1892:
1893: used_for_cascaded_rows.DELETE;

Line 1890: asn_debug.put_line('Delete the cascaded rows');

1886: IF x_cascaded_table(n).processing_status_code = 'ERROR' THEN --{
1887: IF (g_asn_debug = 'Y') THEN
1888: asn_debug.put_line('Have hit error condition in validation');
1889: asn_debug.put_line('Mark needed flags and error message');
1890: asn_debug.put_line('Delete the cascaded rows');
1891: END IF;
1892:
1893: used_for_cascaded_rows.DELETE;
1894: ELSE --} {

Line 1895: IF (g_asn_debug = 'Y') THEN

1891: END IF;
1892:
1893: used_for_cascaded_rows.DELETE;
1894: ELSE --} {
1895: IF (g_asn_debug = 'Y') THEN
1896: asn_debug.put_line('Have finished default and validation');
1897: asn_debug.put_line('Process has encountered no fatal errors');
1898: asn_debug.put_line('Will write the cascaded rows into actual table');
1899: asn_debug.put_line('Count of cascaded rows ' || TO_CHAR(used_for_cascaded_rows.COUNT));

Line 1896: asn_debug.put_line('Have finished default and validation');

1892:
1893: used_for_cascaded_rows.DELETE;
1894: ELSE --} {
1895: IF (g_asn_debug = 'Y') THEN
1896: asn_debug.put_line('Have finished default and validation');
1897: asn_debug.put_line('Process has encountered no fatal errors');
1898: asn_debug.put_line('Will write the cascaded rows into actual table');
1899: asn_debug.put_line('Count of cascaded rows ' || TO_CHAR(used_for_cascaded_rows.COUNT));
1900: END IF;

Line 1897: asn_debug.put_line('Process has encountered no fatal errors');

1893: used_for_cascaded_rows.DELETE;
1894: ELSE --} {
1895: IF (g_asn_debug = 'Y') THEN
1896: asn_debug.put_line('Have finished default and validation');
1897: asn_debug.put_line('Process has encountered no fatal errors');
1898: asn_debug.put_line('Will write the cascaded rows into actual table');
1899: asn_debug.put_line('Count of cascaded rows ' || TO_CHAR(used_for_cascaded_rows.COUNT));
1900: END IF;
1901:

Line 1898: asn_debug.put_line('Will write the cascaded rows into actual table');

1894: ELSE --} {
1895: IF (g_asn_debug = 'Y') THEN
1896: asn_debug.put_line('Have finished default and validation');
1897: asn_debug.put_line('Process has encountered no fatal errors');
1898: asn_debug.put_line('Will write the cascaded rows into actual table');
1899: asn_debug.put_line('Count of cascaded rows ' || TO_CHAR(used_for_cascaded_rows.COUNT));
1900: END IF;
1901:
1902: FOR j IN 1 .. used_for_cascaded_rows.COUNT LOOP --{

Line 1899: asn_debug.put_line('Count of cascaded rows ' || TO_CHAR(used_for_cascaded_rows.COUNT));

1895: IF (g_asn_debug = 'Y') THEN
1896: asn_debug.put_line('Have finished default and validation');
1897: asn_debug.put_line('Process has encountered no fatal errors');
1898: asn_debug.put_line('Will write the cascaded rows into actual table');
1899: asn_debug.put_line('Count of cascaded rows ' || TO_CHAR(used_for_cascaded_rows.COUNT));
1900: END IF;
1901:
1902: FOR j IN 1 .. used_for_cascaded_rows.COUNT LOOP --{
1903: IF (g_asn_debug = 'Y') THEN

Line 1903: IF (g_asn_debug = 'Y') THEN

1899: asn_debug.put_line('Count of cascaded rows ' || TO_CHAR(used_for_cascaded_rows.COUNT));
1900: END IF;
1901:
1902: FOR j IN 1 .. used_for_cascaded_rows.COUNT LOOP --{
1903: IF (g_asn_debug = 'Y') THEN
1904: asn_debug.put_line('Current counter in actual table is at ' || TO_CHAR(n));
1905: END IF;
1906:
1907: x_cascaded_table(n) := used_for_cascaded_rows(j);

Line 1904: asn_debug.put_line('Current counter in actual table is at ' || TO_CHAR(n));

1900: END IF;
1901:
1902: FOR j IN 1 .. used_for_cascaded_rows.COUNT LOOP --{
1903: IF (g_asn_debug = 'Y') THEN
1904: asn_debug.put_line('Current counter in actual table is at ' || TO_CHAR(n));
1905: END IF;
1906:
1907: x_cascaded_table(n) := used_for_cascaded_rows(j);
1908: used_for_cascaded_rows.DELETE(j);

Line 1912: IF (g_asn_debug = 'Y') THEN

1908: used_for_cascaded_rows.DELETE(j);
1909: n := n + 1;
1910: END LOOP; --}
1911:
1912: IF (g_asn_debug = 'Y') THEN
1913: asn_debug.put_line('Current counter before decrementing in actual table is at ' || TO_CHAR(n));
1914: END IF;
1915:
1916: n := n - 1; -- Get the counter in sync

Line 1913: asn_debug.put_line('Current counter before decrementing in actual table is at ' || TO_CHAR(n));

1909: n := n + 1;
1910: END LOOP; --}
1911:
1912: IF (g_asn_debug = 'Y') THEN
1913: asn_debug.put_line('Current counter before decrementing in actual table is at ' || TO_CHAR(n));
1914: END IF;
1915:
1916: n := n - 1; -- Get the counter in sync
1917:

Line 1918: IF (g_asn_debug = 'Y') THEN

1914: END IF;
1915:
1916: n := n - 1; -- Get the counter in sync
1917:
1918: IF (g_asn_debug = 'Y') THEN
1919: asn_debug.put_line('Current counter in actual table is at ' || TO_CHAR(n));
1920: END IF;
1921: END IF; --}
1922: ELSE --} {

Line 1919: asn_debug.put_line('Current counter in actual table is at ' || TO_CHAR(n));

1915:
1916: n := n - 1; -- Get the counter in sync
1917:
1918: IF (g_asn_debug = 'Y') THEN
1919: asn_debug.put_line('Current counter in actual table is at ' || TO_CHAR(n));
1920: END IF;
1921: END IF; --}
1922: ELSE --} {
1923: x_cascaded_table(n).processing_status_code := 'ERROR'; -- changed (i) -> (n)

Line 1927: IF (g_asn_debug = 'Y') THEN

1923: x_cascaded_table(n).processing_status_code := 'ERROR'; -- changed (i) -> (n)
1924: RETURN;
1925: END IF; --}
1926:
1927: IF (g_asn_debug = 'Y') THEN
1928: asn_debug.put_line('Exit create shipment line');
1929: END IF;
1930: EXCEPTION
1931: WHEN rcv_error_pkg.e_fatal_error THEN

Line 1928: asn_debug.put_line('Exit create shipment line');

1924: RETURN;
1925: END IF; --}
1926:
1927: IF (g_asn_debug = 'Y') THEN
1928: asn_debug.put_line('Exit create shipment line');
1929: END IF;
1930: EXCEPTION
1931: WHEN rcv_error_pkg.e_fatal_error THEN
1932: x_cascaded_table(n).error_status := 'E';

Line 1935: IF (g_asn_debug = 'Y') THEN

1931: WHEN rcv_error_pkg.e_fatal_error THEN
1932: x_cascaded_table(n).error_status := 'E';
1933: x_cascaded_table(n).error_message := rcv_error_pkg.get_last_message;
1934: WHEN OTHERS THEN
1935: IF (g_asn_debug = 'Y') THEN
1936: asn_debug.put_line('Exception in process_line');
1937: END IF;
1938: END process_line;
1939:

Line 1936: asn_debug.put_line('Exception in process_line');

1932: x_cascaded_table(n).error_status := 'E';
1933: x_cascaded_table(n).error_message := rcv_error_pkg.get_last_message;
1934: WHEN OTHERS THEN
1935: IF (g_asn_debug = 'Y') THEN
1936: asn_debug.put_line('Exception in process_line');
1937: END IF;
1938: END process_line;
1939:
1940: PROCEDURE explode_lpn_failed(

Line 1946: IF (g_asn_debug = 'Y') THEN

1942: x_group_id NUMBER,
1943: x_lpn_group_id NUMBER
1944: ) IS
1945: BEGIN
1946: IF (g_asn_debug = 'Y') THEN
1947: asn_debug.put_line('update_rti_error in explode_lpn_failed ');
1948: END IF;
1949:
1950: update_rti_error(p_group_id => x_group_id,

Line 1947: asn_debug.put_line('update_rti_error in explode_lpn_failed ');

1943: x_lpn_group_id NUMBER
1944: ) IS
1945: BEGIN
1946: IF (g_asn_debug = 'Y') THEN
1947: asn_debug.put_line('update_rti_error in explode_lpn_failed ');
1948: END IF;
1949:
1950: update_rti_error(p_group_id => x_group_id,
1951: p_interface_id => x_interface_txn_id,

Line 1960: IF (g_asn_debug = 'Y') THEN

1956: rcv_error_pkg.set_token('LPN_GROUP_ID', x_lpn_group_id);
1957: rcv_error_pkg.log_interface_warning('LPN_GROUP_ID');
1958: EXCEPTION
1959: WHEN OTHERS THEN
1960: IF (g_asn_debug = 'Y') THEN
1961: asn_debug.put_line('Exception in explode_lpn_failed');
1962: END IF;
1963: END explode_lpn_failed;
1964:

Line 1961: asn_debug.put_line('Exception in explode_lpn_failed');

1957: rcv_error_pkg.log_interface_warning('LPN_GROUP_ID');
1958: EXCEPTION
1959: WHEN OTHERS THEN
1960: IF (g_asn_debug = 'Y') THEN
1961: asn_debug.put_line('Exception in explode_lpn_failed');
1962: END IF;
1963: END explode_lpn_failed;
1964:
1965: PROCEDURE update_rti_error(

Line 1978: IF (g_asn_debug = 'Y') THEN

1974: l_inventory_id NUMBER;
1975: l_txn_mode VARCHAR2(25);
1976: l_processing_mode_code rcv_transactions_interface.processing_mode_code%TYPE;
1977: BEGIN
1978: IF (g_asn_debug = 'Y') THEN
1979: asn_debug.put_line('Set rti row to error');
1980: asn_debug.put_line('p_group_id ' || p_group_id);
1981: asn_debug.put_line('p_interface_id ' || p_interface_id);
1982: asn_debug.put_line('p_header_interface_id ' || p_header_interface_id);

Line 1979: asn_debug.put_line('Set rti row to error');

1975: l_txn_mode VARCHAR2(25);
1976: l_processing_mode_code rcv_transactions_interface.processing_mode_code%TYPE;
1977: BEGIN
1978: IF (g_asn_debug = 'Y') THEN
1979: asn_debug.put_line('Set rti row to error');
1980: asn_debug.put_line('p_group_id ' || p_group_id);
1981: asn_debug.put_line('p_interface_id ' || p_interface_id);
1982: asn_debug.put_line('p_header_interface_id ' || p_header_interface_id);
1983: asn_debug.put_line('p_lpn_group_id ' || p_lpn_group_id);

Line 1980: asn_debug.put_line('p_group_id ' || p_group_id);

1976: l_processing_mode_code rcv_transactions_interface.processing_mode_code%TYPE;
1977: BEGIN
1978: IF (g_asn_debug = 'Y') THEN
1979: asn_debug.put_line('Set rti row to error');
1980: asn_debug.put_line('p_group_id ' || p_group_id);
1981: asn_debug.put_line('p_interface_id ' || p_interface_id);
1982: asn_debug.put_line('p_header_interface_id ' || p_header_interface_id);
1983: asn_debug.put_line('p_lpn_group_id ' || p_lpn_group_id);
1984: END IF;

Line 1981: asn_debug.put_line('p_interface_id ' || p_interface_id);

1977: BEGIN
1978: IF (g_asn_debug = 'Y') THEN
1979: asn_debug.put_line('Set rti row to error');
1980: asn_debug.put_line('p_group_id ' || p_group_id);
1981: asn_debug.put_line('p_interface_id ' || p_interface_id);
1982: asn_debug.put_line('p_header_interface_id ' || p_header_interface_id);
1983: asn_debug.put_line('p_lpn_group_id ' || p_lpn_group_id);
1984: END IF;
1985:

Line 1982: asn_debug.put_line('p_header_interface_id ' || p_header_interface_id);

1978: IF (g_asn_debug = 'Y') THEN
1979: asn_debug.put_line('Set rti row to error');
1980: asn_debug.put_line('p_group_id ' || p_group_id);
1981: asn_debug.put_line('p_interface_id ' || p_interface_id);
1982: asn_debug.put_line('p_header_interface_id ' || p_header_interface_id);
1983: asn_debug.put_line('p_lpn_group_id ' || p_lpn_group_id);
1984: END IF;
1985:
1986: -- bug 3676436, if there is a pending error message than we log it

Line 1983: asn_debug.put_line('p_lpn_group_id ' || p_lpn_group_id);

1979: asn_debug.put_line('Set rti row to error');
1980: asn_debug.put_line('p_group_id ' || p_group_id);
1981: asn_debug.put_line('p_interface_id ' || p_interface_id);
1982: asn_debug.put_line('p_header_interface_id ' || p_header_interface_id);
1983: asn_debug.put_line('p_lpn_group_id ' || p_lpn_group_id);
1984: END IF;
1985:
1986: -- bug 3676436, if there is a pending error message than we log it
1987: rcv_error_pkg.log_interface_error('INTERFACE_TRANSACTION_ID',FALSE);

Line 2012: IF (g_asn_debug = 'Y') THEN

2008: FROM rcv_transactions_interface
2009: WHERE GROUP_ID = p_group_id;
2010: END IF;
2011:
2012: IF (g_asn_debug = 'Y') THEN
2013: asn_debug.put_line('Processing_mode_code ' || l_processing_mode_code);
2014: END IF;
2015:
2016: IF (l_processing_mode_code = 'ONLINE') THEN

Line 2013: asn_debug.put_line('Processing_mode_code ' || l_processing_mode_code);

2009: WHERE GROUP_ID = p_group_id;
2010: END IF;
2011:
2012: IF (g_asn_debug = 'Y') THEN
2013: asn_debug.put_line('Processing_mode_code ' || l_processing_mode_code);
2014: END IF;
2015:
2016: IF (l_processing_mode_code = 'ONLINE') THEN
2017: IF (g_asn_debug = 'Y') THEN

Line 2017: IF (g_asn_debug = 'Y') THEN

2013: asn_debug.put_line('Processing_mode_code ' || l_processing_mode_code);
2014: END IF;
2015:
2016: IF (l_processing_mode_code = 'ONLINE') THEN
2017: IF (g_asn_debug = 'Y') THEN
2018: asn_debug.put_line('online error ');
2019: END IF;
2020:
2021: UPDATE rcv_transactions_interface

Line 2018: asn_debug.put_line('online error ');

2014: END IF;
2015:
2016: IF (l_processing_mode_code = 'ONLINE') THEN
2017: IF (g_asn_debug = 'Y') THEN
2018: asn_debug.put_line('online error ');
2019: END IF;
2020:
2021: UPDATE rcv_transactions_interface
2022: SET processing_status_code = 'ERROR'

Line 2034: IF (g_asn_debug = 'Y') THEN

2030: x_msg_count => l_msg_count
2031: );
2032: ELSE /* For Batch and immediate */
2033: IF (p_header_interface_id IS NOT NULL) THEN
2034: IF (g_asn_debug = 'Y') THEN
2035: asn_debug.put_line('header_interface_id not null ');
2036: END IF;
2037:
2038: UPDATE rcv_transactions_interface

Line 2035: asn_debug.put_line('header_interface_id not null ');

2031: );
2032: ELSE /* For Batch and immediate */
2033: IF (p_header_interface_id IS NOT NULL) THEN
2034: IF (g_asn_debug = 'Y') THEN
2035: asn_debug.put_line('header_interface_id not null ');
2036: END IF;
2037:
2038: UPDATE rcv_transactions_interface
2039: SET processing_status_code = 'ERROR'

Line 2045: IF (g_asn_debug = 'Y') THEN

2041:
2042: l_inventory_id := p_header_interface_id;
2043: l_txn_mode := 'HEADER';
2044: ELSIF(p_lpn_group_id IS NOT NULL) THEN
2045: IF (g_asn_debug = 'Y') THEN
2046: asn_debug.put_line('lpn_group_id not null ');
2047: END IF;
2048:
2049: UPDATE rcv_transactions_interface

Line 2046: asn_debug.put_line('lpn_group_id not null ');

2042: l_inventory_id := p_header_interface_id;
2043: l_txn_mode := 'HEADER';
2044: ELSIF(p_lpn_group_id IS NOT NULL) THEN
2045: IF (g_asn_debug = 'Y') THEN
2046: asn_debug.put_line('lpn_group_id not null ');
2047: END IF;
2048:
2049: UPDATE rcv_transactions_interface
2050: SET processing_status_code = 'ERROR'

Line 2056: IF (g_asn_debug = 'Y') THEN

2052:
2053: l_inventory_id := p_lpn_group_id;
2054: l_txn_mode := 'LPN_GROUP';
2055: ELSIF(p_interface_id IS NOT NULL) THEN
2056: IF (g_asn_debug = 'Y') THEN
2057: asn_debug.put_line('interface_id not null ');
2058: END IF;
2059:
2060: UPDATE rcv_transactions_interface

Line 2057: asn_debug.put_line('interface_id not null ');

2053: l_inventory_id := p_lpn_group_id;
2054: l_txn_mode := 'LPN_GROUP';
2055: ELSIF(p_interface_id IS NOT NULL) THEN
2056: IF (g_asn_debug = 'Y') THEN
2057: asn_debug.put_line('interface_id not null ');
2058: END IF;
2059:
2060: UPDATE rcv_transactions_interface
2061: SET processing_status_code = 'ERROR'

Line 2076: IF (g_asn_debug = 'Y') THEN

2072: * WMS assumes that when we call them with
2073: * ONLINE/BATCH/IMMEDIATE then we call them with
2074: * only group_id.
2075: */
2076: IF (g_asn_debug = 'Y') THEN
2077: asn_debug.put_line('update all rti rows to error');
2078: END IF;
2079:
2080: UPDATE rcv_headers_interface

Line 2077: asn_debug.put_line('update all rti rows to error');

2073: * ONLINE/BATCH/IMMEDIATE then we call them with
2074: * only group_id.
2075: */
2076: IF (g_asn_debug = 'Y') THEN
2077: asn_debug.put_line('update all rti rows to error');
2078: END IF;
2079:
2080: UPDATE rcv_headers_interface
2081: SET processing_status_code = 'ERROR'

Line 2092: IF (g_asn_debug = 'Y') THEN

2088: l_inventory_id := p_group_id;
2089: l_txn_mode := l_processing_mode_code;
2090: END IF;
2091:
2092: IF (g_asn_debug = 'Y') THEN
2093: asn_debug.put_line('Before call to txn_complete');
2094: END IF;
2095:
2096: inv_receiving_transaction.txn_complete(p_group_id => l_inventory_id,

Line 2093: asn_debug.put_line('Before call to txn_complete');

2089: l_txn_mode := l_processing_mode_code;
2090: END IF;
2091:
2092: IF (g_asn_debug = 'Y') THEN
2093: asn_debug.put_line('Before call to txn_complete');
2094: END IF;
2095:
2096: inv_receiving_transaction.txn_complete(p_group_id => l_inventory_id,
2097: p_txn_status => 'FALSE',

Line 2104: IF (g_asn_debug = 'Y') THEN

2100: x_msg_data => l_msg_data,
2101: x_msg_count => l_msg_count
2102: );
2103:
2104: IF (g_asn_debug = 'Y') THEN
2105: asn_debug.put_line('After call to txn_complete');
2106: END IF;
2107: END IF;
2108: EXCEPTION

Line 2105: asn_debug.put_line('After call to txn_complete');

2101: x_msg_count => l_msg_count
2102: );
2103:
2104: IF (g_asn_debug = 'Y') THEN
2105: asn_debug.put_line('After call to txn_complete');
2106: END IF;
2107: END IF;
2108: EXCEPTION
2109: WHEN OTHERS THEN

Line 2110: IF (g_asn_debug = 'Y') THEN

2106: END IF;
2107: END IF;
2108: EXCEPTION
2109: WHEN OTHERS THEN
2110: IF (g_asn_debug = 'Y') THEN
2111: asn_debug.put_line('Exception in update_rti_error');
2112: END IF;
2113: END update_rti_error;
2114: END rcv_roi_preprocessor;

Line 2111: asn_debug.put_line('Exception in update_rti_error');

2107: END IF;
2108: EXCEPTION
2109: WHEN OTHERS THEN
2110: IF (g_asn_debug = 'Y') THEN
2111: asn_debug.put_line('Exception in update_rti_error');
2112: END IF;
2113: END update_rti_error;
2114: END rcv_roi_preprocessor;