[Home] [Help]
PACKAGE: APPS.PO_MSG_MAPPING_UTL
Source
1 PACKAGE PO_MSG_MAPPING_UTL AS
2 /* $Header: PO_MSG_MAPPING_UTL.pls 120.1 2006/01/31 10:00 jinwang noship $ */
3
4 -- constants for column_value_key and tokenx_value_keys in type msg_rec_type
5 -- header level keys
6 c_rate_type CONSTANT VARCHAR2(30) := 'C_RATE_TYPE';
7 c_agent_name CONSTANT VARCHAR2(30) := 'C_AGENT_NAME';
8 c_ship_to_location CONSTANT VARCHAR2(30) := 'C_SHIP_TO_LOCATION';
9 c_bill_to_location CONSTANT VARCHAR2(30) := 'C_BILL_TO_LOCATION';
10 c_payment_terms CONSTANT VARCHAR2(30) := 'C_PAYMENT_TERMS';
11 c_vendor_name CONSTANT VARCHAR2(30) := 'C_VENDOR_NAME';
12 c_vendor_site_code CONSTANT VARCHAR2(30) := 'C_VENDOR_SITE_CODE';
13 c_vendor_contact CONSTANT VARCHAR2(30) := 'C_VENDOR_CONTACT';
14 c_style_display_name CONSTANT VARCHAR2(30) := 'C_STYLE_DISPLAY_NAME';
15 c_from_rfq_num CONSTANT VARCHAR2(30) := 'C_FROM_RFQ_NUM';
16
17 -- line level keys
18 c_item CONSTANT VARCHAR2(30) := 'C_ITEM';
19 c_item_desc CONSTANT VARCHAR2(30) := 'C_ITEM_DESC';
20 c_job_business_group_name CONSTANT VARCHAR2(30) := 'C_JOB_BUSINESS_GROUP_NAME';
21 c_job_name CONSTANT VARCHAR2(30) := 'C_JOB_NAME';
22 c_category CONSTANT VARCHAR2(30) := 'C_CATEGORY';
23 c_ip_category CONSTANT VARCHAR2(30) := 'C_IP_CATEGORY';
24 c_uom_code CONSTANT VARCHAR2(30) := 'C_UOM_CODE';
25 c_line_type CONSTANT VARCHAR2(30) := 'C_LINE_TYPE';
26 c_un_number CONSTANT VARCHAR2(30) := 'C_UN_NUMBER';
27 c_hazard_class CONSTANT VARCHAR2(30) := 'C_HAZARD_CLASS';
28 c_template_name CONSTANT VARCHAR2(30) := 'C_TEMPLATE_NAME';
29 c_amount CONSTANT VARCHAR2(30) := 'C_AMOUNT';
30 c_unit_price CONSTANT VARCHAR2(30) := 'C_UNIT_PRICE';
31 c_line_num CONSTANT VARCHAR2(30) := 'C_LINE_NUM';
32 c_quantity CONSTANT VARCHAR2(30) := 'C_QUANTITY';
33 c_item_revision CONSTANT VARCHAR2(30) := 'C_ITEM_REVISION';
34 c_ga_flag CONSTANT VARCHAR2(30) := 'C_GA_FLAG';
35 c_negotiated_flag CONSTANT VARCHAR2(30) := 'C_NEGOTIATED_FLAG';
36 c_created_language CONSTANT VARCHAR2(30) := 'C_CREATED_LANGUAGE';
37
38 -- line location level keys
39 c_ship_to_organization_code CONSTANT VARCHAR2(30) := 'C_SHIP_TO_ORGANIZATION_CODE';
40 c_loc_ship_to_location CONSTANT VARCHAR2(30) := 'C_LOC_SHIP_TO_LOCATION';
41 c_receiving_routing CONSTANT VARCHAR2(30) := 'C_RECEIVING_ROUTING';
42 c_tax_code_id CONSTANT VARCHAR2(30) := 'C_TAX_CODE_ID';
43 c_price_discount CONSTANT VARCHAR2(30) := 'C_PRICE_DISCOUNT';
44 c_style_id CONSTANT VARCHAR2(30) := 'C_STYLE_ID';
45 c_start_date CONSTANT VARCHAR2(30) := 'C_START_DATE';
46
47 TYPE msg_rec_type IS RECORD
48 (
49 app_name VARCHAR2(30),
50 message_name VARCHAR2(30),
51 column_name VARCHAR2(30),
52 column_value_key VARCHAR2(100),
53 num_of_tokens NUMBER,
54 token1_name VARCHAR2(100),
55 token1_value_key VARCHAR2(100),
56 token2_name VARCHAR2(100),
57 token2_value_key VARCHAR2(200),
58 token3_name VARCHAR2(100),
59 token3_value_key VARCHAR2(200),
60 token4_name VARCHAR2(100),
61 token4_value_key VARCHAR2(200),
62 token5_name VARCHAR2(100),
63 token5_value_key VARCHAR2(200),
64 token6_name VARCHAR2(100),
65 token6_value_key VARCHAR2(200),
66 column_value VARCHAR2(4000),
67 token1_value VARCHAR2(200),
68 token2_value VARCHAR2(200),
69 token3_value VARCHAR2(200),
70 token4_value VARCHAR2(200),
71 token5_value VARCHAR2(200),
72 token6_value VARCHAR2(200)
73 );
74
75 TYPE msg_mapping_list IS TABLE OF msg_rec_type
76 INDEX BY pls_integer;
77
78 TYPE msg_mapping_context_list IS TABLE OF msg_mapping_list
79 INDEX BY VARCHAR2(25);
80
81 PROCEDURE find_msg
82 ( p_context IN VARCHAR2,
83 p_id IN NUMBER,
84 x_msg_exists OUT NOCOPY VARCHAR2,
85 x_msg_rec OUT NOCOPY msg_rec_type
86 );
87
88 END PO_MSG_MAPPING_UTL;