eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PAY_JP_MAG_UTILITY_PKG dependencies on PAY_MAG_TAPE

Line 69: -- Show all contexts in pay_mag_tape.internal_cxt_names/values.

65: end dequeue_formula;
66: -- ----------------------------------------------------------------------------
67: -- |----------------------------< show_contexts >-----------------------------|
68: -- ----------------------------------------------------------------------------
69: -- Show all contexts in pay_mag_tape.internal_cxt_names/values.
70: -- This procedure is only for debug purpose.
71: --
72: procedure show_contexts
73: is

Line 78: for i in 1..pay_mag_tape.internal_cxt_names.count loop

74: l_proc varchar2(61) := c_package || 'show_contexts';
75: begin
76: hr_utility.set_location('Entering : ' || l_proc, 10);
77: --
78: for i in 1..pay_mag_tape.internal_cxt_names.count loop
79: hr_utility.trace('context : ' || to_char(i, 99) || ' : ' || rpad(pay_mag_tape.internal_cxt_names(i), 30, ' ') || ' : ' || pay_mag_tape.internal_cxt_values(i));
80: end loop;
81: --
82: hr_utility.set_location('Leaving : ' || l_proc, 20);

Line 79: hr_utility.trace('context : ' || to_char(i, 99) || ' : ' || rpad(pay_mag_tape.internal_cxt_names(i), 30, ' ') || ' : ' || pay_mag_tape.internal_cxt_values(i));

75: begin
76: hr_utility.set_location('Entering : ' || l_proc, 10);
77: --
78: for i in 1..pay_mag_tape.internal_cxt_names.count loop
79: hr_utility.trace('context : ' || to_char(i, 99) || ' : ' || rpad(pay_mag_tape.internal_cxt_names(i), 30, ' ') || ' : ' || pay_mag_tape.internal_cxt_values(i));
80: end loop;
81: --
82: hr_utility.set_location('Leaving : ' || l_proc, 20);
83: end show_contexts;

Line 87: -- Clear all contexts in pay_mag_tape.internal_cxt_names/values except for

83: end show_contexts;
84: -- ----------------------------------------------------------------------------
85: -- |----------------------------< clear_contexts >----------------------------|
86: -- ----------------------------------------------------------------------------
87: -- Clear all contexts in pay_mag_tape.internal_cxt_names/values except for
88: -- the first entry "NO_OF_CONTEXTS".
89: --
90: procedure clear_contexts
91: is

Line 92: l_count number := pay_mag_tape.internal_cxt_names.count;

88: -- the first entry "NO_OF_CONTEXTS".
89: --
90: procedure clear_contexts
91: is
92: l_count number := pay_mag_tape.internal_cxt_names.count;
93: begin
94: for i in 2..l_count loop
95: pay_mag_tape.internal_cxt_names.delete(i);
96: pay_mag_tape.internal_cxt_values.delete(i);

Line 95: pay_mag_tape.internal_cxt_names.delete(i);

91: is
92: l_count number := pay_mag_tape.internal_cxt_names.count;
93: begin
94: for i in 2..l_count loop
95: pay_mag_tape.internal_cxt_names.delete(i);
96: pay_mag_tape.internal_cxt_values.delete(i);
97: end loop;
98: --
99: pay_mag_tape.internal_cxt_values(1) := fnd_number.number_to_canonical(1);

Line 96: pay_mag_tape.internal_cxt_values.delete(i);

92: l_count number := pay_mag_tape.internal_cxt_names.count;
93: begin
94: for i in 2..l_count loop
95: pay_mag_tape.internal_cxt_names.delete(i);
96: pay_mag_tape.internal_cxt_values.delete(i);
97: end loop;
98: --
99: pay_mag_tape.internal_cxt_values(1) := fnd_number.number_to_canonical(1);
100: end clear_contexts;

Line 99: pay_mag_tape.internal_cxt_values(1) := fnd_number.number_to_canonical(1);

95: pay_mag_tape.internal_cxt_names.delete(i);
96: pay_mag_tape.internal_cxt_values.delete(i);
97: end loop;
98: --
99: pay_mag_tape.internal_cxt_values(1) := fnd_number.number_to_canonical(1);
100: end clear_contexts;
101: -- ----------------------------------------------------------------------------
102: -- |-----------------------------< set_context >------------------------------|
103: -- ----------------------------------------------------------------------------

Line 104: -- Set context value to pay_mag_tape.internal_cxt_names/values.

100: end clear_contexts;
101: -- ----------------------------------------------------------------------------
102: -- |-----------------------------< set_context >------------------------------|
103: -- ----------------------------------------------------------------------------
104: -- Set context value to pay_mag_tape.internal_cxt_names/values.
105: -- All data types "NUMBER", "TEXT" and "DATE" are supported for contexts.
106: -- Need to convert to canonical format.
107: --
108: procedure set_context(

Line 113: l_count number := pay_mag_tape.internal_cxt_names.count;

109: p_context_name in varchar2,
110: p_context_value in varchar2)
111: is
112: l_found boolean := false;
113: l_count number := pay_mag_tape.internal_cxt_names.count;
114: begin
115: --
116: -- If the context with specified name exists,
117: -- override the context value with specified value.

Line 120: if pay_mag_tape.internal_cxt_names(i) = p_context_name then

116: -- If the context with specified name exists,
117: -- override the context value with specified value.
118: --
119: for i in 1..l_count loop
120: if pay_mag_tape.internal_cxt_names(i) = p_context_name then
121: pay_mag_tape.internal_cxt_values(i) := p_context_value;
122: l_found := true;
123: exit;
124: end if;

Line 121: pay_mag_tape.internal_cxt_values(i) := p_context_value;

117: -- override the context value with specified value.
118: --
119: for i in 1..l_count loop
120: if pay_mag_tape.internal_cxt_names(i) = p_context_name then
121: pay_mag_tape.internal_cxt_values(i) := p_context_value;
122: l_found := true;
123: exit;
124: end if;
125: end loop;

Line 132: pay_mag_tape.internal_cxt_values(1) := fnd_number.number_to_canonical(l_count);

128: -- create new entry.
129: --
130: if not l_found then
131: l_count := l_count + 1;
132: pay_mag_tape.internal_cxt_values(1) := fnd_number.number_to_canonical(l_count);
133: pay_mag_tape.internal_cxt_names(l_count) := p_context_name;
134: pay_mag_tape.internal_cxt_values(l_count) := p_context_value;
135: end if;
136: end set_context;

Line 133: pay_mag_tape.internal_cxt_names(l_count) := p_context_name;

129: --
130: if not l_found then
131: l_count := l_count + 1;
132: pay_mag_tape.internal_cxt_values(1) := fnd_number.number_to_canonical(l_count);
133: pay_mag_tape.internal_cxt_names(l_count) := p_context_name;
134: pay_mag_tape.internal_cxt_values(l_count) := p_context_value;
135: end if;
136: end set_context;
137: --

Line 134: pay_mag_tape.internal_cxt_values(l_count) := p_context_value;

130: if not l_found then
131: l_count := l_count + 1;
132: pay_mag_tape.internal_cxt_values(1) := fnd_number.number_to_canonical(l_count);
133: pay_mag_tape.internal_cxt_names(l_count) := p_context_name;
134: pay_mag_tape.internal_cxt_values(l_count) := p_context_value;
135: end if;
136: end set_context;
137: --
138: procedure set_context(

Line 160: -- Show all parameters in pay_mag_tape.internal_prm_names/values.

156: end set_context;
157: -- ----------------------------------------------------------------------------
158: -- |---------------------------< show_parameters >----------------------------|
159: -- ----------------------------------------------------------------------------
160: -- Show all parameters in pay_mag_tape.internal_prm_names/values.
161: -- This procedure is only for debug purpose.
162: --
163: procedure show_parameters
164: is

Line 169: for i in 1..pay_mag_tape.internal_prm_names.count loop

165: l_proc varchar2(61) := c_package || 'show_parameters';
166: begin
167: hr_utility.set_location('Entering : ' || l_proc, 10);
168: --
169: for i in 1..pay_mag_tape.internal_prm_names.count loop
170: hr_utility.trace('parameter : ' || to_char(i, 99) || ' : ' || rpad(pay_mag_tape.internal_prm_names(i), 60, ' ') || ' : "' || pay_mag_tape.internal_prm_values(i) || '"');
171: end loop;
172: --
173: hr_utility.set_location('Leaving : ' || l_proc, 20);

Line 170: hr_utility.trace('parameter : ' || to_char(i, 99) || ' : ' || rpad(pay_mag_tape.internal_prm_names(i), 60, ' ') || ' : "' || pay_mag_tape.internal_prm_values(i) || '"');

166: begin
167: hr_utility.set_location('Entering : ' || l_proc, 10);
168: --
169: for i in 1..pay_mag_tape.internal_prm_names.count loop
170: hr_utility.trace('parameter : ' || to_char(i, 99) || ' : ' || rpad(pay_mag_tape.internal_prm_names(i), 60, ' ') || ' : "' || pay_mag_tape.internal_prm_values(i) || '"');
171: end loop;
172: --
173: hr_utility.set_location('Leaving : ' || l_proc, 20);
174: end show_parameters;

Line 178: -- Derive the parameter value from pay_mag_tape.internal_prm_names/values.

174: end show_parameters;
175: -- ----------------------------------------------------------------------------
176: -- |----------------------------< get_parameter >-----------------------------|
177: -- ----------------------------------------------------------------------------
178: -- Derive the parameter value from pay_mag_tape.internal_prm_names/values.
179: --
180: function get_parameter(p_parameter_name in varchar2) return varchar2
181: is
182: l_parameter_value varchar2(81);

Line 184: for i in 1..pay_mag_tape.internal_prm_names.count loop

180: function get_parameter(p_parameter_name in varchar2) return varchar2
181: is
182: l_parameter_value varchar2(81);
183: begin
184: for i in 1..pay_mag_tape.internal_prm_names.count loop
185: if pay_mag_tape.internal_prm_names(i) = p_parameter_name then
186: l_parameter_value := pay_mag_tape.internal_prm_values(i);
187: exit;
188: end if;

Line 185: if pay_mag_tape.internal_prm_names(i) = p_parameter_name then

181: is
182: l_parameter_value varchar2(81);
183: begin
184: for i in 1..pay_mag_tape.internal_prm_names.count loop
185: if pay_mag_tape.internal_prm_names(i) = p_parameter_name then
186: l_parameter_value := pay_mag_tape.internal_prm_values(i);
187: exit;
188: end if;
189: end loop;

Line 186: l_parameter_value := pay_mag_tape.internal_prm_values(i);

182: l_parameter_value varchar2(81);
183: begin
184: for i in 1..pay_mag_tape.internal_prm_names.count loop
185: if pay_mag_tape.internal_prm_names(i) = p_parameter_name then
186: l_parameter_value := pay_mag_tape.internal_prm_values(i);
187: exit;
188: end if;
189: end loop;
190: --

Line 196: -- Set parameter value to pay_mag_tape.internal_prm_names/values.

192: end get_parameter;
193: -- ----------------------------------------------------------------------------
194: -- |----------------------------< set_parameter >-----------------------------|
195: -- ----------------------------------------------------------------------------
196: -- Set parameter value to pay_mag_tape.internal_prm_names/values.
197: -- Note supported parameter data type by PYUMAG is "TEXT" only.
198: -- Here passes parameters with canonical format.
199: --
200: procedure set_parameter(

Line 206: l_count number := pay_mag_tape.internal_prm_names.count;

202: p_parameter_value in varchar2,
203: p_default_value in varchar2 default ' ')
204: is
205: l_found boolean := false;
206: l_count number := pay_mag_tape.internal_prm_names.count;
207: begin
208: --
209: -- If the parameter with specified name exists,
210: -- override the parameter value with specified value.

Line 213: if pay_mag_tape.internal_prm_names(i) = p_parameter_name then

209: -- If the parameter with specified name exists,
210: -- override the parameter value with specified value.
211: --
212: for i in 1..l_count loop
213: if pay_mag_tape.internal_prm_names(i) = p_parameter_name then
214: pay_mag_tape.internal_prm_values(i) := nvl(p_parameter_value, p_default_value);
215: l_found := true;
216: exit;
217: end if;

Line 214: pay_mag_tape.internal_prm_values(i) := nvl(p_parameter_value, p_default_value);

210: -- override the parameter value with specified value.
211: --
212: for i in 1..l_count loop
213: if pay_mag_tape.internal_prm_names(i) = p_parameter_name then
214: pay_mag_tape.internal_prm_values(i) := nvl(p_parameter_value, p_default_value);
215: l_found := true;
216: exit;
217: end if;
218: end loop;

Line 225: pay_mag_tape.internal_prm_values(1) := fnd_number.number_to_canonical(l_count);

221: -- create new entry.
222: --
223: if not l_found then
224: l_count := l_count + 1;
225: pay_mag_tape.internal_prm_values(1) := fnd_number.number_to_canonical(l_count);
226: pay_mag_tape.internal_prm_names(l_count) := p_parameter_name;
227: pay_mag_tape.internal_prm_values(l_count) := nvl(p_parameter_value, p_default_value);
228: end if;
229: end set_parameter;

Line 226: pay_mag_tape.internal_prm_names(l_count) := p_parameter_name;

222: --
223: if not l_found then
224: l_count := l_count + 1;
225: pay_mag_tape.internal_prm_values(1) := fnd_number.number_to_canonical(l_count);
226: pay_mag_tape.internal_prm_names(l_count) := p_parameter_name;
227: pay_mag_tape.internal_prm_values(l_count) := nvl(p_parameter_value, p_default_value);
228: end if;
229: end set_parameter;
230: --

Line 227: pay_mag_tape.internal_prm_values(l_count) := nvl(p_parameter_value, p_default_value);

223: if not l_found then
224: l_count := l_count + 1;
225: pay_mag_tape.internal_prm_values(1) := fnd_number.number_to_canonical(l_count);
226: pay_mag_tape.internal_prm_names(l_count) := p_parameter_name;
227: pay_mag_tape.internal_prm_values(l_count) := nvl(p_parameter_value, p_default_value);
228: end if;
229: end set_parameter;
230: --
231: procedure set_parameter(

Line 260: if not pay_mag_tape.internal_cxt_names.exists(1) then

256: -- when processed through PYUMAG or PYUGEN which populate the followings.
257: -- This is mainly for debugging purpose.
258: --
259: begin
260: if not pay_mag_tape.internal_cxt_names.exists(1) then
261: set_context('NO_OF_CONTEXTS', 1);
262: end if;
263: --
264: if not pay_mag_tape.internal_prm_names.exists(1) then

Line 264: if not pay_mag_tape.internal_prm_names.exists(1) then

260: if not pay_mag_tape.internal_cxt_names.exists(1) then
261: set_context('NO_OF_CONTEXTS', 1);
262: end if;
263: --
264: if not pay_mag_tape.internal_prm_names.exists(1) then
265: set_parameter('NO_OF_PARAMETERS', 2);
266: set_parameter('NEW_FORMULA_ID', 0);
267: end if;
268: end pay_jp_mag_utility_pkg;