[Home] [Help]
PACKAGE: APPS.ECE_FLATFILE_PVT
Source
1 PACKAGE ECE_FLATFILE_PVT AS
2 -- $Header: ECVFILES.pls 120.2 2005/09/30 06:53:13 arsriniv ship $
3
4 G_MAXCOLWIDTH NUMBER := 400; -- ****** IMPORTANT ********
5 G_TRANSLATOR_CODE VARCHAR2(35):= 'TP_TRANSLATOR_CODE';
6 G_TRANSACTION_DATE VARCHAR2(35):= 'TRANSACTION_DATE';
7 G_RUN_ID VARCHAR2(35):= 'RUN_ID';
8 G_COMMON_KEY_LENGTH NUMBER := 100;
9 G_RECORD_NUM_START NUMBER := 92;
10 G_RECORD_NUM_LENGTH NUMBER := 4;
11
12 TYPE attribute_rec_type IS RECORD(
13 key_column_name VARCHAR2(50),
14 value VARCHAR2(400),
15 position NUMBER);
16
17 TYPE attribute_tbl_type IS TABLE OF attribute_rec_type
18 INDEX BY BINARY_INTEGER;
19
20 -- This is the global attribute table...
21 t_tran_attribute_tbl attribute_tbl_type;
22
23 TYPE interface_rec_type IS RECORD(
24 base_table_name VARCHAR2(50),
25 base_column_name VARCHAR2(50),
26 interface_table_name VARCHAR2(50),
27 interface_column_name VARCHAR2(50),
28 Record_num NUMBER,
29 Position NUMBER,
30 data_type VARCHAR2(50),
31 data_length NUMBER,
32 value VARCHAR2(32767),
33 layout_code VARCHAR2(2),
34 record_qualifier VARCHAR2(3),
35 interface_column_id NUMBER,
36 conversion_seq NUMBER,
37 xref_category_id NUMBER,
38 conversion_group_id NUMBER,
39 xref_key1_source_column VARCHAR2(50),
40 xref_key2_source_column VARCHAR2(50),
41 xref_key3_source_column VARCHAR2(50),
42 xref_key4_source_column VARCHAR2(50),
43 xref_key5_source_column VARCHAR2(50),
44 ext_val1 VARCHAR2(500),
45 ext_val2 VARCHAR2(500),
46 ext_val3 VARCHAR2(500),
47 ext_val4 VARCHAR2(500),
48 ext_val5 VARCHAR2(500),
49 ext_column_name VARCHAR2(50)); -- bug 2823215
50
51 TYPE interface_tbl_type IS TABLE OF interface_rec_type
52 INDEX BY BINARY_INTEGER;
53
54 PROCEDURE get_tran_attributes(p_transaction_type IN VARCHAR2);
55
56 PROCEDURE print_attributes;
57
58 PROCEDURE select_clause(
59 cTransaction_Type IN VARCHAR2,
60 cCommunication_Method IN VARCHAR2,
61 cInterface_Table IN VARCHAR2,
62 cExt_Table OUT NOCOPY VARCHAR2,
63 p_Interface_tbl OUT NOCOPY interface_tbl_type,
64 p_common_key_name OUT NOCOPY VARCHAR2,
65 cSelect_string OUT NOCOPY VARCHAR2,
66 cFrom_string OUT NOCOPY VARCHAR2,
67 cWhere_string OUT NOCOPY VARCHAR2,
68 p_output_level IN VARCHAR2 DEFAULT NULL,
69 cMapCode IN VARCHAR2 DEFAULT NULL);
70
71 PROCEDURE write_to_ece_output(
72 cTransaction_Type IN VARCHAR2,
73 cCommunication_Method IN VARCHAR2,
74 cInterface_Table IN VARCHAR2,
75 p_Interface_tbl IN interface_tbl_type,
76 iOutput_width IN INTEGER,
77 iRun_id IN INTEGER,
78 p_common_key IN VARCHAR2);
79
80 PROCEDURE find_pos(
81 p_Interface_tbl IN Interface_tbl_type,
82 cSearch_text IN VARCHAR2,
83 nPos IN OUT NOCOPY NUMBER);
84
85 FUNCTION match_xref_conv_seq(
86 p_gateway_tbl IN Interface_tbl_type,
87 p_conversion_group IN NUMBER,
88 p_sequence_num IN NUMBER,
89 p_Pos OUT NOCOPY NUMBER) RETURN BOOLEAN;
90
91 FUNCTION match_xref_conv_seq(
92 p_level IN NUMBER,
93 p_conversion_group IN NUMBER,
94 p_sequence_num IN NUMBER,
95 p_Pos OUT NOCOPY NUMBER) RETURN BOOLEAN;
96
97 /*
98 PROCEDURE match_data_loc_id(
99 p_Interface_tbl IN interface_tbl_type,
100 p_data_loc_id IN NUMBER,
101 p_Pos OUT NOCOPY NUMBER);
102 */
103
104 PROCEDURE match_interface_column_id(
105 p_Interface_tbl IN interface_tbl_type,
106 p_Interface_column_id IN NUMBER,
107 p_Pos OUT NOCOPY NUMBER);
108
109 FUNCTION match_conversion_group_id(
110 p_gateway_tbl IN interface_tbl_type,
111 p_conversion_id IN NUMBER,
112 p_sequence_num IN NUMBER,
113 p_pos OUT NOCOPY NUMBER) RETURN BOOLEAN;
114
115 FUNCTION match_record_num(
116 p_gateway_tbl IN interface_tbl_type,
117 p_Record_num IN NUMBER,
118 p_Pos OUT NOCOPY NUMBER,
119 p_total_unit OUT NOCOPY NUMBER) RETURN BOOLEAN;
120 /* Bug 1759234.
121 Changed the acess modifier of the parameter ckey_tbl
122 of procedure init_table to IN OUT to preserve the
123 value in ckey_tbl
124 */
125
126 PROCEDURE init_table(
127 cTransaction_Type IN VARCHAR2,
128 cInt_tbl_name IN VARCHAR2,
129 cOutput_level IN VARCHAR2,
130 bKey_exist IN BOOLEAN,
131 cInterface_tbl OUT NOCOPY ece_flatfile_pvt.interface_tbl_type,
132 cKey_tbl IN OUT NOCOPY ece_flatfile_pvt.interface_tbl_type,
133 cMapCode IN VARCHAR2 DEFAULT NULL);
134
135 PROCEDURE define_interface_column_type(
136 c IN INTEGER,
137 cCol IN VARCHAR2,
138 iCol_size IN INTEGER,
139 p_tbl IN ece_flatfile_pvt.interface_tbl_type);
140
141 PROCEDURE assign_column_value_to_tbl(
142 c IN INTEGER,
143 p_tbl IN OUT NOCOPY ece_flatfile_pvt.interface_tbl_type);
144
145 PROCEDURE assign_column_value_to_tbl(
146 c IN INTEGER,
147 iCount IN INTEGER,
148 p_tbl IN OUT NOCOPY ece_flatfile_pvt.interface_tbl_type,
149 p_key_tbl IN OUT NOCOPY ece_flatfile_pvt.interface_tbl_type);
150
151 FUNCTION pos_of(
152 pInterface_Tbl IN ece_flatfile_pvt.interface_tbl_type,
153 cCol_name IN VARCHAR2) RETURN NUMBER;
154
155 END ECE_FLATFILE_PVT;
156