2: /* $Header: GMLPOHAB.pls 120.1 2005/09/30 13:41:34 pbamb noship $ */
3:
4: v_segment1 VARCHAR2(32);
5: v_revision_num NUMBER;
6: v_agent_id PO_HEADERS_ALL.AGENT_ID%TYPE;
7: v_bill_to_location_id PO_HEADERS_ALL.BILL_TO_LOCATION_ID%TYPE;
8: v_terms_id PO_HEADERS_ALL.TERMS_ID%TYPE;
9: v_freight_code PO_HEADERS_ALL.FREIGHT_TERMS_LOOKUP_CODE%TYPE;
10: v_fob_code PO_HEADERS_ALL.FOB_LOOKUP_CODE%TYPE;
3:
4: v_segment1 VARCHAR2(32);
5: v_revision_num NUMBER;
6: v_agent_id PO_HEADERS_ALL.AGENT_ID%TYPE;
7: v_bill_to_location_id PO_HEADERS_ALL.BILL_TO_LOCATION_ID%TYPE;
8: v_terms_id PO_HEADERS_ALL.TERMS_ID%TYPE;
9: v_freight_code PO_HEADERS_ALL.FREIGHT_TERMS_LOOKUP_CODE%TYPE;
10: v_fob_code PO_HEADERS_ALL.FOB_LOOKUP_CODE%TYPE;
11: v_carrier_code PO_HEADERS_ALL.SHIP_VIA_LOOKUP_CODE%TYPE;
4: v_segment1 VARCHAR2(32);
5: v_revision_num NUMBER;
6: v_agent_id PO_HEADERS_ALL.AGENT_ID%TYPE;
7: v_bill_to_location_id PO_HEADERS_ALL.BILL_TO_LOCATION_ID%TYPE;
8: v_terms_id PO_HEADERS_ALL.TERMS_ID%TYPE;
9: v_freight_code PO_HEADERS_ALL.FREIGHT_TERMS_LOOKUP_CODE%TYPE;
10: v_fob_code PO_HEADERS_ALL.FOB_LOOKUP_CODE%TYPE;
11: v_carrier_code PO_HEADERS_ALL.SHIP_VIA_LOOKUP_CODE%TYPE;
12: v_po_header_id PO_HEADERS_ALL.PO_HEADER_ID%TYPE;
5: v_revision_num NUMBER;
6: v_agent_id PO_HEADERS_ALL.AGENT_ID%TYPE;
7: v_bill_to_location_id PO_HEADERS_ALL.BILL_TO_LOCATION_ID%TYPE;
8: v_terms_id PO_HEADERS_ALL.TERMS_ID%TYPE;
9: v_freight_code PO_HEADERS_ALL.FREIGHT_TERMS_LOOKUP_CODE%TYPE;
10: v_fob_code PO_HEADERS_ALL.FOB_LOOKUP_CODE%TYPE;
11: v_carrier_code PO_HEADERS_ALL.SHIP_VIA_LOOKUP_CODE%TYPE;
12: v_po_header_id PO_HEADERS_ALL.PO_HEADER_ID%TYPE;
13: err_num NUMBER;
6: v_agent_id PO_HEADERS_ALL.AGENT_ID%TYPE;
7: v_bill_to_location_id PO_HEADERS_ALL.BILL_TO_LOCATION_ID%TYPE;
8: v_terms_id PO_HEADERS_ALL.TERMS_ID%TYPE;
9: v_freight_code PO_HEADERS_ALL.FREIGHT_TERMS_LOOKUP_CODE%TYPE;
10: v_fob_code PO_HEADERS_ALL.FOB_LOOKUP_CODE%TYPE;
11: v_carrier_code PO_HEADERS_ALL.SHIP_VIA_LOOKUP_CODE%TYPE;
12: v_po_header_id PO_HEADERS_ALL.PO_HEADER_ID%TYPE;
13: err_num NUMBER;
14: err_msg VARCHAR2(100);
7: v_bill_to_location_id PO_HEADERS_ALL.BILL_TO_LOCATION_ID%TYPE;
8: v_terms_id PO_HEADERS_ALL.TERMS_ID%TYPE;
9: v_freight_code PO_HEADERS_ALL.FREIGHT_TERMS_LOOKUP_CODE%TYPE;
10: v_fob_code PO_HEADERS_ALL.FOB_LOOKUP_CODE%TYPE;
11: v_carrier_code PO_HEADERS_ALL.SHIP_VIA_LOOKUP_CODE%TYPE;
12: v_po_header_id PO_HEADERS_ALL.PO_HEADER_ID%TYPE;
13: err_num NUMBER;
14: err_msg VARCHAR2(100);
15:
8: v_terms_id PO_HEADERS_ALL.TERMS_ID%TYPE;
9: v_freight_code PO_HEADERS_ALL.FREIGHT_TERMS_LOOKUP_CODE%TYPE;
10: v_fob_code PO_HEADERS_ALL.FOB_LOOKUP_CODE%TYPE;
11: v_carrier_code PO_HEADERS_ALL.SHIP_VIA_LOOKUP_CODE%TYPE;
12: v_po_header_id PO_HEADERS_ALL.PO_HEADER_ID%TYPE;
13: err_num NUMBER;
14: err_msg VARCHAR2(100);
15:
16: /*========================================================================+
26: | 03-27-00 HW BUG#:1222249 store po_header_id |
27: +========================================================================*/
28:
29: PROCEDURE store(p_segment1 IN VARCHAR2, p_revision_num IN NUMBER,
30: p_agent_id IN PO_HEADERS_ALL.AGENT_ID%TYPE,
31: p_bill_to_location_id IN PO_HEADERS_ALL.BILL_TO_LOCATION_ID%TYPE,
32: p_terms_id IN PO_HEADERS_ALL.TERMS_ID%TYPE,
33: p_freight_code IN PO_HEADERS_ALL.FREIGHT_TERMS_LOOKUP_CODE%TYPE,
34: p_fob_code IN PO_HEADERS_ALL.FOB_LOOKUP_CODE%TYPE,
27: +========================================================================*/
28:
29: PROCEDURE store(p_segment1 IN VARCHAR2, p_revision_num IN NUMBER,
30: p_agent_id IN PO_HEADERS_ALL.AGENT_ID%TYPE,
31: p_bill_to_location_id IN PO_HEADERS_ALL.BILL_TO_LOCATION_ID%TYPE,
32: p_terms_id IN PO_HEADERS_ALL.TERMS_ID%TYPE,
33: p_freight_code IN PO_HEADERS_ALL.FREIGHT_TERMS_LOOKUP_CODE%TYPE,
34: p_fob_code IN PO_HEADERS_ALL.FOB_LOOKUP_CODE%TYPE,
35: p_carrier_code IN PO_HEADERS_ALL.SHIP_VIA_LOOKUP_CODE%TYPE,
28:
29: PROCEDURE store(p_segment1 IN VARCHAR2, p_revision_num IN NUMBER,
30: p_agent_id IN PO_HEADERS_ALL.AGENT_ID%TYPE,
31: p_bill_to_location_id IN PO_HEADERS_ALL.BILL_TO_LOCATION_ID%TYPE,
32: p_terms_id IN PO_HEADERS_ALL.TERMS_ID%TYPE,
33: p_freight_code IN PO_HEADERS_ALL.FREIGHT_TERMS_LOOKUP_CODE%TYPE,
34: p_fob_code IN PO_HEADERS_ALL.FOB_LOOKUP_CODE%TYPE,
35: p_carrier_code IN PO_HEADERS_ALL.SHIP_VIA_LOOKUP_CODE%TYPE,
36: p_po_header_id IN PO_LINE_LOCATIONS_ARCHIVE_ALL.PO_HEADER_ID%TYPE)
29: PROCEDURE store(p_segment1 IN VARCHAR2, p_revision_num IN NUMBER,
30: p_agent_id IN PO_HEADERS_ALL.AGENT_ID%TYPE,
31: p_bill_to_location_id IN PO_HEADERS_ALL.BILL_TO_LOCATION_ID%TYPE,
32: p_terms_id IN PO_HEADERS_ALL.TERMS_ID%TYPE,
33: p_freight_code IN PO_HEADERS_ALL.FREIGHT_TERMS_LOOKUP_CODE%TYPE,
34: p_fob_code IN PO_HEADERS_ALL.FOB_LOOKUP_CODE%TYPE,
35: p_carrier_code IN PO_HEADERS_ALL.SHIP_VIA_LOOKUP_CODE%TYPE,
36: p_po_header_id IN PO_LINE_LOCATIONS_ARCHIVE_ALL.PO_HEADER_ID%TYPE)
37: AS
30: p_agent_id IN PO_HEADERS_ALL.AGENT_ID%TYPE,
31: p_bill_to_location_id IN PO_HEADERS_ALL.BILL_TO_LOCATION_ID%TYPE,
32: p_terms_id IN PO_HEADERS_ALL.TERMS_ID%TYPE,
33: p_freight_code IN PO_HEADERS_ALL.FREIGHT_TERMS_LOOKUP_CODE%TYPE,
34: p_fob_code IN PO_HEADERS_ALL.FOB_LOOKUP_CODE%TYPE,
35: p_carrier_code IN PO_HEADERS_ALL.SHIP_VIA_LOOKUP_CODE%TYPE,
36: p_po_header_id IN PO_LINE_LOCATIONS_ARCHIVE_ALL.PO_HEADER_ID%TYPE)
37: AS
38: BEGIN
31: p_bill_to_location_id IN PO_HEADERS_ALL.BILL_TO_LOCATION_ID%TYPE,
32: p_terms_id IN PO_HEADERS_ALL.TERMS_ID%TYPE,
33: p_freight_code IN PO_HEADERS_ALL.FREIGHT_TERMS_LOOKUP_CODE%TYPE,
34: p_fob_code IN PO_HEADERS_ALL.FOB_LOOKUP_CODE%TYPE,
35: p_carrier_code IN PO_HEADERS_ALL.SHIP_VIA_LOOKUP_CODE%TYPE,
36: p_po_header_id IN PO_LINE_LOCATIONS_ARCHIVE_ALL.PO_HEADER_ID%TYPE)
37: AS
38: BEGIN
39: v_segment1 := p_segment1;
68: +========================================================================*/
69:
70: PROCEDURE process
71: AS
72: v_old_agent_id PO_HEADERS_ALL.AGENT_ID%TYPE;
73: v_old_bill_to_location_id PO_HEADERS_ALL.BILL_TO_LOCATION_ID%TYPE;
74: v_old_terms_id PO_HEADERS_ALL.TERMS_ID%TYPE;
75: v_old_freight_code PO_HEADERS_ALL.FREIGHT_TERMS_LOOKUP_CODE%TYPE;
76: v_old_fob_code PO_HEADERS_ALL.FOB_LOOKUP_CODE%TYPE;
69:
70: PROCEDURE process
71: AS
72: v_old_agent_id PO_HEADERS_ALL.AGENT_ID%TYPE;
73: v_old_bill_to_location_id PO_HEADERS_ALL.BILL_TO_LOCATION_ID%TYPE;
74: v_old_terms_id PO_HEADERS_ALL.TERMS_ID%TYPE;
75: v_old_freight_code PO_HEADERS_ALL.FREIGHT_TERMS_LOOKUP_CODE%TYPE;
76: v_old_fob_code PO_HEADERS_ALL.FOB_LOOKUP_CODE%TYPE;
77: v_old_carrier_code PO_HEADERS_ALL.SHIP_VIA_LOOKUP_CODE%TYPE;
70: PROCEDURE process
71: AS
72: v_old_agent_id PO_HEADERS_ALL.AGENT_ID%TYPE;
73: v_old_bill_to_location_id PO_HEADERS_ALL.BILL_TO_LOCATION_ID%TYPE;
74: v_old_terms_id PO_HEADERS_ALL.TERMS_ID%TYPE;
75: v_old_freight_code PO_HEADERS_ALL.FREIGHT_TERMS_LOOKUP_CODE%TYPE;
76: v_old_fob_code PO_HEADERS_ALL.FOB_LOOKUP_CODE%TYPE;
77: v_old_carrier_code PO_HEADERS_ALL.SHIP_VIA_LOOKUP_CODE%TYPE;
78: v_from_date VARCHAR2(13) := SYSDATE;
71: AS
72: v_old_agent_id PO_HEADERS_ALL.AGENT_ID%TYPE;
73: v_old_bill_to_location_id PO_HEADERS_ALL.BILL_TO_LOCATION_ID%TYPE;
74: v_old_terms_id PO_HEADERS_ALL.TERMS_ID%TYPE;
75: v_old_freight_code PO_HEADERS_ALL.FREIGHT_TERMS_LOOKUP_CODE%TYPE;
76: v_old_fob_code PO_HEADERS_ALL.FOB_LOOKUP_CODE%TYPE;
77: v_old_carrier_code PO_HEADERS_ALL.SHIP_VIA_LOOKUP_CODE%TYPE;
78: v_from_date VARCHAR2(13) := SYSDATE;
79: v_to_date VARCHAR2(13) := SYSDATE;
72: v_old_agent_id PO_HEADERS_ALL.AGENT_ID%TYPE;
73: v_old_bill_to_location_id PO_HEADERS_ALL.BILL_TO_LOCATION_ID%TYPE;
74: v_old_terms_id PO_HEADERS_ALL.TERMS_ID%TYPE;
75: v_old_freight_code PO_HEADERS_ALL.FREIGHT_TERMS_LOOKUP_CODE%TYPE;
76: v_old_fob_code PO_HEADERS_ALL.FOB_LOOKUP_CODE%TYPE;
77: v_old_carrier_code PO_HEADERS_ALL.SHIP_VIA_LOOKUP_CODE%TYPE;
78: v_from_date VARCHAR2(13) := SYSDATE;
79: v_to_date VARCHAR2(13) := SYSDATE;
80: errbuf VARCHAR2(80);
73: v_old_bill_to_location_id PO_HEADERS_ALL.BILL_TO_LOCATION_ID%TYPE;
74: v_old_terms_id PO_HEADERS_ALL.TERMS_ID%TYPE;
75: v_old_freight_code PO_HEADERS_ALL.FREIGHT_TERMS_LOOKUP_CODE%TYPE;
76: v_old_fob_code PO_HEADERS_ALL.FOB_LOOKUP_CODE%TYPE;
77: v_old_carrier_code PO_HEADERS_ALL.SHIP_VIA_LOOKUP_CODE%TYPE;
78: v_from_date VARCHAR2(13) := SYSDATE;
79: v_to_date VARCHAR2(13) := SYSDATE;
80: errbuf VARCHAR2(80);
81: retcode number;