245: /************************************/
246: FUNCTION get_org_id_from_inv_org_id(
247: p_organization_id IN mtl_parameters.organization_id%TYPE
248: )
249: RETURN rcv_headers_interface.org_id%TYPE IS
250: x_org_id rcv_headers_interface.org_id%TYPE;
251: BEGIN
252: IF (p_organization_id IS NULL) THEN
253: RETURN NULL;
246: FUNCTION get_org_id_from_inv_org_id(
247: p_organization_id IN mtl_parameters.organization_id%TYPE
248: )
249: RETURN rcv_headers_interface.org_id%TYPE IS
250: x_org_id rcv_headers_interface.org_id%TYPE;
251: BEGIN
252: IF (p_organization_id IS NULL) THEN
253: RETURN NULL;
254: END IF;
276: RETURN NULL;
277: END get_org_id_from_inv_org_id;
278:
279: FUNCTION get_org_id_from_ou(
280: p_ou IN rcv_headers_interface.operating_unit%TYPE,
281: p_column IN VARCHAR2,
282: p_marker IN OUT NOCOPY BOOLEAN
283: )
284: RETURN rcv_headers_interface.org_id%TYPE IS
280: p_ou IN rcv_headers_interface.operating_unit%TYPE,
281: p_column IN VARCHAR2,
282: p_marker IN OUT NOCOPY BOOLEAN
283: )
284: RETURN rcv_headers_interface.org_id%TYPE IS
285: x_org_id rcv_headers_interface.org_id%TYPE;
286: BEGIN
287: p_marker := FALSE;
288:
281: p_column IN VARCHAR2,
282: p_marker IN OUT NOCOPY BOOLEAN
283: )
284: RETURN rcv_headers_interface.org_id%TYPE IS
285: x_org_id rcv_headers_interface.org_id%TYPE;
286: BEGIN
287: p_marker := FALSE;
288:
289: IF (p_ou IS NULL) THEN
304: RETURN NULL;
305: END get_org_id_from_ou;
306:
307: FUNCTION get_ou_from_org_id(
308: p_org_id IN rcv_headers_interface.org_id%TYPE,
309: p_column IN VARCHAR2,
310: p_marker IN OUT NOCOPY BOOLEAN
311: )
312: RETURN rcv_headers_interface.operating_unit%TYPE IS
308: p_org_id IN rcv_headers_interface.org_id%TYPE,
309: p_column IN VARCHAR2,
310: p_marker IN OUT NOCOPY BOOLEAN
311: )
312: RETURN rcv_headers_interface.operating_unit%TYPE IS
313: x_ou rcv_headers_interface.operating_unit%TYPE;
314: BEGIN
315: p_marker := FALSE;
316:
309: p_column IN VARCHAR2,
310: p_marker IN OUT NOCOPY BOOLEAN
311: )
312: RETURN rcv_headers_interface.operating_unit%TYPE IS
313: x_ou rcv_headers_interface.operating_unit%TYPE;
314: BEGIN
315: p_marker := FALSE;
316:
317: IF (p_org_id IS NULL) THEN
332: RETURN NULL;
333: END get_ou_from_org_id;
334:
335: FUNCTION get_customer_id_from_name_num(
336: p_customer_party_name IN rcv_headers_interface.customer_party_name%TYPE,
337: p_customer_account_number IN rcv_headers_interface.customer_account_number%TYPE,
338: p_column_name IN VARCHAR2,
339: p_column_num IN VARCHAR2,
340: p_marker_name IN OUT NOCOPY BOOLEAN,
333: END get_ou_from_org_id;
334:
335: FUNCTION get_customer_id_from_name_num(
336: p_customer_party_name IN rcv_headers_interface.customer_party_name%TYPE,
337: p_customer_account_number IN rcv_headers_interface.customer_account_number%TYPE,
338: p_column_name IN VARCHAR2,
339: p_column_num IN VARCHAR2,
340: p_marker_name IN OUT NOCOPY BOOLEAN,
341: p_marker_num IN OUT NOCOPY BOOLEAN
339: p_column_num IN VARCHAR2,
340: p_marker_name IN OUT NOCOPY BOOLEAN,
341: p_marker_num IN OUT NOCOPY BOOLEAN
342: )
343: RETURN rcv_headers_interface.customer_id%TYPE IS
344: x_customer_id rcv_headers_interface.customer_id%TYPE;
345: BEGIN
346: p_marker_name := FALSE;
347: p_marker_num := FALSE;
340: p_marker_name IN OUT NOCOPY BOOLEAN,
341: p_marker_num IN OUT NOCOPY BOOLEAN
342: )
343: RETURN rcv_headers_interface.customer_id%TYPE IS
344: x_customer_id rcv_headers_interface.customer_id%TYPE;
345: BEGIN
346: p_marker_name := FALSE;
347: p_marker_num := FALSE;
348:
377: RETURN NULL;
378: END get_customer_id_from_name_num;
379:
380: FUNCTION get_customer_name_from_id(
381: p_customer_id IN rcv_headers_interface.customer_id%TYPE,
382: p_column IN VARCHAR2,
383: p_marker IN OUT NOCOPY BOOLEAN
384: )
385: RETURN rcv_headers_interface.customer_party_name%TYPE IS
381: p_customer_id IN rcv_headers_interface.customer_id%TYPE,
382: p_column IN VARCHAR2,
383: p_marker IN OUT NOCOPY BOOLEAN
384: )
385: RETURN rcv_headers_interface.customer_party_name%TYPE IS
386: x_customer_party_name rcv_headers_interface.customer_party_name%TYPE;
387: BEGIN
388: p_marker := FALSE;
389:
382: p_column IN VARCHAR2,
383: p_marker IN OUT NOCOPY BOOLEAN
384: )
385: RETURN rcv_headers_interface.customer_party_name%TYPE IS
386: x_customer_party_name rcv_headers_interface.customer_party_name%TYPE;
387: BEGIN
388: p_marker := FALSE;
389:
390: IF (p_customer_id IS NULL) THEN
407: RETURN NULL;
408: END get_customer_name_from_id;
409:
410: FUNCTION get_customer_num_from_id(
411: p_customer_id IN rcv_headers_interface.customer_id%TYPE,
412: p_column IN VARCHAR2,
413: p_marker IN OUT NOCOPY BOOLEAN
414: )
415: RETURN rcv_headers_interface.customer_account_number%TYPE IS
411: p_customer_id IN rcv_headers_interface.customer_id%TYPE,
412: p_column IN VARCHAR2,
413: p_marker IN OUT NOCOPY BOOLEAN
414: )
415: RETURN rcv_headers_interface.customer_account_number%TYPE IS
416: x_customer_account_number rcv_headers_interface.customer_account_number%TYPE;
417: BEGIN
418: p_marker := FALSE;
419:
412: p_column IN VARCHAR2,
413: p_marker IN OUT NOCOPY BOOLEAN
414: )
415: RETURN rcv_headers_interface.customer_account_number%TYPE IS
416: x_customer_account_number rcv_headers_interface.customer_account_number%TYPE;
417: BEGIN
418: p_marker := FALSE;
419:
420: IF (p_customer_id IS NULL) THEN
435: RETURN NULL;
436: END get_customer_num_from_id;
437:
438: FUNCTION get_employee_id_from_name(
439: p_employee_name IN rcv_headers_interface.employee_name%TYPE,
440: p_column IN VARCHAR2,
441: p_marker IN OUT NOCOPY BOOLEAN
442: )
443: RETURN rcv_headers_interface.employee_id%TYPE IS
439: p_employee_name IN rcv_headers_interface.employee_name%TYPE,
440: p_column IN VARCHAR2,
441: p_marker IN OUT NOCOPY BOOLEAN
442: )
443: RETURN rcv_headers_interface.employee_id%TYPE IS
444: x_employee_id rcv_headers_interface.employee_id%TYPE;
445: BEGIN
446: p_marker := FALSE;
447:
440: p_column IN VARCHAR2,
441: p_marker IN OUT NOCOPY BOOLEAN
442: )
443: RETURN rcv_headers_interface.employee_id%TYPE IS
444: x_employee_id rcv_headers_interface.employee_id%TYPE;
445: BEGIN
446: p_marker := FALSE;
447:
448: IF (p_employee_name IS NULL) THEN
463: RETURN NULL;
464: END get_employee_id_from_name;
465:
466: FUNCTION get_employee_name_from_id(
467: p_employee_id IN rcv_headers_interface.employee_id%TYPE,
468: p_column IN VARCHAR2,
469: p_marker IN OUT NOCOPY BOOLEAN
470: )
471: RETURN rcv_headers_interface.employee_name%TYPE IS
467: p_employee_id IN rcv_headers_interface.employee_id%TYPE,
468: p_column IN VARCHAR2,
469: p_marker IN OUT NOCOPY BOOLEAN
470: )
471: RETURN rcv_headers_interface.employee_name%TYPE IS
472: x_employee_name rcv_headers_interface.employee_name%TYPE;
473: BEGIN
474: p_marker := FALSE;
475:
468: p_column IN VARCHAR2,
469: p_marker IN OUT NOCOPY BOOLEAN
470: )
471: RETURN rcv_headers_interface.employee_name%TYPE IS
472: x_employee_name rcv_headers_interface.employee_name%TYPE;
473: BEGIN
474: p_marker := FALSE;
475:
476: IF (p_employee_id IS NULL) THEN
491: RETURN NULL;
492: END get_employee_name_from_id;
493:
494: FUNCTION get_org_id_from_code(
495: p_org_code IN rcv_headers_interface.from_organization_code%TYPE,
496: p_column IN VARCHAR2,
497: p_marker IN OUT NOCOPY BOOLEAN
498: )
499: RETURN rcv_headers_interface.from_organization_id%TYPE IS
495: p_org_code IN rcv_headers_interface.from_organization_code%TYPE,
496: p_column IN VARCHAR2,
497: p_marker IN OUT NOCOPY BOOLEAN
498: )
499: RETURN rcv_headers_interface.from_organization_id%TYPE IS
500: x_org_id rcv_headers_interface.from_organization_id%TYPE;
501: BEGIN
502: p_marker := FALSE;
503:
496: p_column IN VARCHAR2,
497: p_marker IN OUT NOCOPY BOOLEAN
498: )
499: RETURN rcv_headers_interface.from_organization_id%TYPE IS
500: x_org_id rcv_headers_interface.from_organization_id%TYPE;
501: BEGIN
502: p_marker := FALSE;
503:
504: IF (p_org_code IS NULL) THEN
520: END get_org_id_from_code;
521:
522: --Bug 7591174 Added a New function to get the to_organization_id from ship_to_location_id
523: FUNCTION get_org_id_from_location_id(
524: p_location_id IN rcv_headers_interface.location_id%TYPE,
525: p_column IN VARCHAR2,
526: p_marker IN OUT NOCOPY BOOLEAN
527: )
528: RETURN rcv_headers_interface.from_organization_id%TYPE IS
524: p_location_id IN rcv_headers_interface.location_id%TYPE,
525: p_column IN VARCHAR2,
526: p_marker IN OUT NOCOPY BOOLEAN
527: )
528: RETURN rcv_headers_interface.from_organization_id%TYPE IS
529: x_org_id rcv_headers_interface.from_organization_id%TYPE;
530: BEGIN
531: p_marker :=FALSE;
532:
525: p_column IN VARCHAR2,
526: p_marker IN OUT NOCOPY BOOLEAN
527: )
528: RETURN rcv_headers_interface.from_organization_id%TYPE IS
529: x_org_id rcv_headers_interface.from_organization_id%TYPE;
530: BEGIN
531: p_marker :=FALSE;
532:
533: IF(p_location_id IS NULL) THEN
551: RETURN NULL;
552: END get_org_id_from_location_id;
553:
554: FUNCTION get_location_id_from_code(
555: p_location_code IN rcv_headers_interface.location_code%TYPE,
556: p_column IN VARCHAR2,
557: p_marker IN OUT NOCOPY BOOLEAN
558: )
559: RETURN rcv_headers_interface.location_id%TYPE IS
555: p_location_code IN rcv_headers_interface.location_code%TYPE,
556: p_column IN VARCHAR2,
557: p_marker IN OUT NOCOPY BOOLEAN
558: )
559: RETURN rcv_headers_interface.location_id%TYPE IS
560: x_location_id rcv_headers_interface.location_id%TYPE;
561: BEGIN
562: p_marker := FALSE;
563:
556: p_column IN VARCHAR2,
557: p_marker IN OUT NOCOPY BOOLEAN
558: )
559: RETURN rcv_headers_interface.location_id%TYPE IS
560: x_location_id rcv_headers_interface.location_id%TYPE;
561: BEGIN
562: p_marker := FALSE;
563:
564: IF (p_location_code IS NULL) THEN
585: RETURN NULL;
586: END get_location_id_from_code;
587:
588: FUNCTION get_payment_terms_id_from_name(
589: p_payment_terms_name IN rcv_headers_interface.payment_terms_name%TYPE,
590: p_column IN VARCHAR2,
591: p_marker IN OUT NOCOPY BOOLEAN
592: )
593: RETURN rcv_headers_interface.payment_terms_id%TYPE IS
589: p_payment_terms_name IN rcv_headers_interface.payment_terms_name%TYPE,
590: p_column IN VARCHAR2,
591: p_marker IN OUT NOCOPY BOOLEAN
592: )
593: RETURN rcv_headers_interface.payment_terms_id%TYPE IS
594: x_payment_terms_id rcv_headers_interface.payment_terms_id%TYPE;
595: BEGIN
596: p_marker := FALSE;
597:
590: p_column IN VARCHAR2,
591: p_marker IN OUT NOCOPY BOOLEAN
592: )
593: RETURN rcv_headers_interface.payment_terms_id%TYPE IS
594: x_payment_terms_id rcv_headers_interface.payment_terms_id%TYPE;
595: BEGIN
596: p_marker := FALSE;
597:
598: IF (p_payment_terms_name IS NULL) THEN
613: RETURN NULL;
614: END get_payment_terms_id_from_name;
615:
616: FUNCTION get_vendor_id_from_name(
617: p_vendor_name IN rcv_headers_interface.vendor_name%TYPE,
618: p_column IN VARCHAR2,
619: p_marker IN OUT NOCOPY BOOLEAN
620: )
621: RETURN rcv_headers_interface.vendor_id%TYPE IS
617: p_vendor_name IN rcv_headers_interface.vendor_name%TYPE,
618: p_column IN VARCHAR2,
619: p_marker IN OUT NOCOPY BOOLEAN
620: )
621: RETURN rcv_headers_interface.vendor_id%TYPE IS
622: x_vendor_id rcv_headers_interface.vendor_id%TYPE;
623: BEGIN
624: p_marker := FALSE;
625:
618: p_column IN VARCHAR2,
619: p_marker IN OUT NOCOPY BOOLEAN
620: )
621: RETURN rcv_headers_interface.vendor_id%TYPE IS
622: x_vendor_id rcv_headers_interface.vendor_id%TYPE;
623: BEGIN
624: p_marker := FALSE;
625:
626: IF (p_vendor_name IS NULL) THEN
641: RETURN NULL;
642: END get_vendor_id_from_name;
643:
644: FUNCTION get_vendor_id_from_num(
645: p_vendor_num IN rcv_headers_interface.vendor_num%TYPE,
646: p_column IN VARCHAR2,
647: p_marker IN OUT NOCOPY BOOLEAN
648: )
649: RETURN rcv_headers_interface.vendor_id%TYPE IS
645: p_vendor_num IN rcv_headers_interface.vendor_num%TYPE,
646: p_column IN VARCHAR2,
647: p_marker IN OUT NOCOPY BOOLEAN
648: )
649: RETURN rcv_headers_interface.vendor_id%TYPE IS
650: x_vendor_id rcv_headers_interface.vendor_id%TYPE;
651: BEGIN
652: p_marker := FALSE;
653:
646: p_column IN VARCHAR2,
647: p_marker IN OUT NOCOPY BOOLEAN
648: )
649: RETURN rcv_headers_interface.vendor_id%TYPE IS
650: x_vendor_id rcv_headers_interface.vendor_id%TYPE;
651: BEGIN
652: p_marker := FALSE;
653:
654: IF (p_vendor_num IS NULL) THEN
669: RETURN NULL;
670: END get_vendor_id_from_num;
671:
672: FUNCTION get_vendor_site_id_from_code(
673: p_vendor_site_code IN rcv_headers_interface.vendor_site_code%TYPE,
674: p_vendor_id IN OUT NOCOPY rcv_headers_interface.vendor_id%TYPE,
675: p_org_id IN rcv_headers_interface.org_id%TYPE,
676: p_column IN VARCHAR2,
677: p_marker IN OUT NOCOPY BOOLEAN
670: END get_vendor_id_from_num;
671:
672: FUNCTION get_vendor_site_id_from_code(
673: p_vendor_site_code IN rcv_headers_interface.vendor_site_code%TYPE,
674: p_vendor_id IN OUT NOCOPY rcv_headers_interface.vendor_id%TYPE,
675: p_org_id IN rcv_headers_interface.org_id%TYPE,
676: p_column IN VARCHAR2,
677: p_marker IN OUT NOCOPY BOOLEAN
678: )
671:
672: FUNCTION get_vendor_site_id_from_code(
673: p_vendor_site_code IN rcv_headers_interface.vendor_site_code%TYPE,
674: p_vendor_id IN OUT NOCOPY rcv_headers_interface.vendor_id%TYPE,
675: p_org_id IN rcv_headers_interface.org_id%TYPE,
676: p_column IN VARCHAR2,
677: p_marker IN OUT NOCOPY BOOLEAN
678: )
679: RETURN rcv_headers_interface.vendor_site_id%TYPE IS
675: p_org_id IN rcv_headers_interface.org_id%TYPE,
676: p_column IN VARCHAR2,
677: p_marker IN OUT NOCOPY BOOLEAN
678: )
679: RETURN rcv_headers_interface.vendor_site_id%TYPE IS
680: x_vendor_site_id rcv_headers_interface.vendor_site_id%TYPE;
681: x_vendor_id rcv_headers_interface.vendor_id%TYPE;
682: BEGIN
683: p_marker := FALSE;
676: p_column IN VARCHAR2,
677: p_marker IN OUT NOCOPY BOOLEAN
678: )
679: RETURN rcv_headers_interface.vendor_site_id%TYPE IS
680: x_vendor_site_id rcv_headers_interface.vendor_site_id%TYPE;
681: x_vendor_id rcv_headers_interface.vendor_id%TYPE;
682: BEGIN
683: p_marker := FALSE;
684:
677: p_marker IN OUT NOCOPY BOOLEAN
678: )
679: RETURN rcv_headers_interface.vendor_site_id%TYPE IS
680: x_vendor_site_id rcv_headers_interface.vendor_site_id%TYPE;
681: x_vendor_id rcv_headers_interface.vendor_id%TYPE;
682: BEGIN
683: p_marker := FALSE;
684:
685: IF (p_vendor_site_code IS NULL) THEN
708: RETURN NULL;
709: END get_vendor_site_id_from_code;
710:
711: FUNCTION get_vendor_site_code_from_id(
712: p_vendor_site_id IN OUT NOCOPY rcv_headers_interface.vendor_site_id%TYPE,
713: p_vendor_id IN OUT NOCOPY rcv_headers_interface.vendor_id%TYPE,
714: p_org_id IN rcv_headers_interface.org_id%TYPE,
715: p_column IN VARCHAR2,
716: p_marker IN OUT NOCOPY BOOLEAN
709: END get_vendor_site_id_from_code;
710:
711: FUNCTION get_vendor_site_code_from_id(
712: p_vendor_site_id IN OUT NOCOPY rcv_headers_interface.vendor_site_id%TYPE,
713: p_vendor_id IN OUT NOCOPY rcv_headers_interface.vendor_id%TYPE,
714: p_org_id IN rcv_headers_interface.org_id%TYPE,
715: p_column IN VARCHAR2,
716: p_marker IN OUT NOCOPY BOOLEAN
717: )
710:
711: FUNCTION get_vendor_site_code_from_id(
712: p_vendor_site_id IN OUT NOCOPY rcv_headers_interface.vendor_site_id%TYPE,
713: p_vendor_id IN OUT NOCOPY rcv_headers_interface.vendor_id%TYPE,
714: p_org_id IN rcv_headers_interface.org_id%TYPE,
715: p_column IN VARCHAR2,
716: p_marker IN OUT NOCOPY BOOLEAN
717: )
718: RETURN rcv_headers_interface.vendor_site_code%TYPE IS
714: p_org_id IN rcv_headers_interface.org_id%TYPE,
715: p_column IN VARCHAR2,
716: p_marker IN OUT NOCOPY BOOLEAN
717: )
718: RETURN rcv_headers_interface.vendor_site_code%TYPE IS
719: x_vendor_site_code rcv_headers_interface.vendor_site_code%TYPE;
720: x_vendor_id rcv_headers_interface.vendor_id%TYPE;
721: BEGIN
722: p_marker := FALSE;
715: p_column IN VARCHAR2,
716: p_marker IN OUT NOCOPY BOOLEAN
717: )
718: RETURN rcv_headers_interface.vendor_site_code%TYPE IS
719: x_vendor_site_code rcv_headers_interface.vendor_site_code%TYPE;
720: x_vendor_id rcv_headers_interface.vendor_id%TYPE;
721: BEGIN
722: p_marker := FALSE;
723:
716: p_marker IN OUT NOCOPY BOOLEAN
717: )
718: RETURN rcv_headers_interface.vendor_site_code%TYPE IS
719: x_vendor_site_code rcv_headers_interface.vendor_site_code%TYPE;
720: x_vendor_id rcv_headers_interface.vendor_id%TYPE;
721: BEGIN
722: p_marker := FALSE;
723:
724: IF (p_vendor_site_id IS NULL) THEN
746: RETURN NULL;
747: END get_vendor_site_code_from_id;
748:
749: FUNCTION get_sfloc_id_from_code(
750: p_ship_from_location_code IN rcv_headers_interface.ship_from_location_code%TYPE,
751: p_vendor_site_id IN rcv_headers_interface.vendor_site_id%TYPE,
752: p_column IN VARCHAR2,
753: p_marker IN OUT NOCOPY BOOLEAN
754: )
747: END get_vendor_site_code_from_id;
748:
749: FUNCTION get_sfloc_id_from_code(
750: p_ship_from_location_code IN rcv_headers_interface.ship_from_location_code%TYPE,
751: p_vendor_site_id IN rcv_headers_interface.vendor_site_id%TYPE,
752: p_column IN VARCHAR2,
753: p_marker IN OUT NOCOPY BOOLEAN
754: )
755: RETURN rcv_headers_interface.ship_from_location_id%TYPE IS
751: p_vendor_site_id IN rcv_headers_interface.vendor_site_id%TYPE,
752: p_column IN VARCHAR2,
753: p_marker IN OUT NOCOPY BOOLEAN
754: )
755: RETURN rcv_headers_interface.ship_from_location_id%TYPE IS
756: x_ship_from_location_id rcv_headers_interface.ship_from_location_id%TYPE;
757: BEGIN
758: p_marker := FALSE;
759:
752: p_column IN VARCHAR2,
753: p_marker IN OUT NOCOPY BOOLEAN
754: )
755: RETURN rcv_headers_interface.ship_from_location_id%TYPE IS
756: x_ship_from_location_id rcv_headers_interface.ship_from_location_id%TYPE;
757: BEGIN
758: p_marker := FALSE;
759:
760: IF (p_ship_from_location_code IS NULL) THEN
1235: /*******************************************************/
1236: /* SECTION 3: Framework for calling default from codes */
1237: /*******************************************************/
1238: PROCEDURE default_rhi_from_code(
1239: rhi IN OUT NOCOPY rcv_headers_interface%ROWTYPE
1240: ) IS
1241: x_dummy_mkr BOOLEAN;
1242: BEGIN
1243: IF (rhi.customer_id IS NULL) THEN
1393: -- Bug 6434823, Bug 6603681, Bug 7651399
1394: asn_debug.put_line('checking for rhi vendor fields');
1395: If (rhi.receipt_source_code = 'VENDOR' and rhi.vendor_id IS NULL AND rhi.vendor_name IS NULL AND rhi.vendor_num IS NULL) Then
1396: rcv_error_pkg.set_error_message('RCV_VENDOR_ALL_NULL');
1397: rcv_error_pkg.log_interface_error('RCV_HEADERS_INTERFACE',
1398: 'VENDOR_ID',
1399: g_curr_group_id,
1400: g_curr_header_id,
1401: g_curr_transaction_id);
1493: END IF;
1494: END default_rhi_from_code;
1495:
1496: PROCEDURE check_rhi_consistency(
1497: rhi IN OUT NOCOPY rcv_headers_interface%ROWTYPE
1498: ) IS
1499: x_dummy_mkr BOOLEAN;
1500: BEGIN
1501: IF (g_rhi_ou_mkr = TRUE) THEN
2457: /****************************************/
2458: /* SECTION 4: default from backing docs */
2459: /****************************************/
2460: PROCEDURE default_rhi_from_rsh(
2461: rhi IN OUT NOCOPY rcv_headers_interface%ROWTYPE
2462: ) IS
2463: rsh rcv_shipment_headers%ROWTYPE;
2464: BEGIN
2465: IF (rhi.receipt_header_id IS NOT NULL) THEN
2791:
2792: PROCEDURE default_rti_from_rhi(
2793: rti IN OUT NOCOPY rcv_transactions_interface%ROWTYPE
2794: ) IS
2795: rhi rcv_headers_interface%ROWTYPE;
2796: BEGIN
2797: /* If this row does not have a header_interface_id it is possible that the
2798: parent_interface_txn does. This extra query is free because of caching */
2799: IF ( rti.header_interface_id IS NULL
6966: /************************************/
6967: PROCEDURE create_rhi_from_rti(
6968: rti IN OUT NOCOPY rcv_transactions_interface%ROWTYPE
6969: ) IS
6970: x_receipt_num rcv_headers_interface.receipt_num%TYPE;
6971: BEGIN
6972: IF (rti.header_interface_id IS NOT NULL) THEN
6973: RETURN;
6974: END IF;
6972: IF (rti.header_interface_id IS NOT NULL) THEN
6973: RETURN;
6974: END IF;
6975:
6976: SELECT rcv_headers_interface_s.NEXTVAL
6977: INTO rti.header_interface_id
6978: FROM DUAL;
6979:
6980: IF (rti.expected_receipt_date IS NULL) THEN
6982: END IF;
6983:
6984: x_receipt_num := rcv_table_functions.get_rsh_row_from_id(rti.shipment_header_id).receipt_num;
6985:
6986: INSERT INTO rcv_headers_interface
6987: (created_by,
6988: creation_date,
6989: last_updated_by,
6990: last_update_date,
7153: NULL;
7154: END default_lot_serial_control;
7155:
7156: PROCEDURE default_header(
7157: rhi IN OUT NOCOPY rcv_headers_interface%ROWTYPE
7158: ) IS
7159: BEGIN
7160: g_curr_table := 'RCV_HEADERS_INTERFACE';
7161: g_curr_group_id := rhi.GROUP_ID;
7156: PROCEDURE default_header(
7157: rhi IN OUT NOCOPY rcv_headers_interface%ROWTYPE
7158: ) IS
7159: BEGIN
7160: g_curr_table := 'RCV_HEADERS_INTERFACE';
7161: g_curr_group_id := rhi.GROUP_ID;
7162: g_curr_header_id := rhi.header_interface_id;
7163: g_curr_transaction_id := rhi.header_interface_id;
7164: rhi.processing_status_code := 'PENDING';
7198: x_subinv_starts_null BOOLEAN;
7199: BEGIN
7200: elapsed_time('BEGIN default_transaction');
7201: asn_debug.put_line('rti.interface_transaction_id = ' || rti.interface_transaction_id);
7202: g_curr_table := 'RCV_HEADERS_INTERFACE';
7203: g_curr_group_id := rti.GROUP_ID;
7204: g_curr_header_id := rti.header_interface_id;
7205: g_curr_transaction_id := rti.interface_transaction_id;
7206: g_subtract_pll_qty_rcv := FALSE;