DBA Data[Home] [Help]

APPS.PAY_PGP_UPD dependencies on PAY_PGP_SHD

Line 14: Procedure convert_defs(p_rec in out pay_pgp_shd.g_rec_type) is

10: -- ----------------------------------------------------------------------------
11: -- |-----------------------------< convert_defs >-----------------------------|
12: -- ----------------------------------------------------------------------------
13: --
14: Procedure convert_defs(p_rec in out pay_pgp_shd.g_rec_type) is
15: --
16: l_proc varchar2(72) := g_package||'convert_defs';
17: --
18: Begin

Line 29: pay_pgp_shd.g_old_rec.group_name;

25: -- is being used then we must set to the 'current' argument value.
26: --
27: If (p_rec.group_name = hr_api.g_varchar2) then
28: p_rec.group_name :=
29: pay_pgp_shd.g_old_rec.group_name;
30: End If;
31: If (p_rec.id_flex_num = hr_api.g_number) then
32: p_rec.id_flex_num :=
33: pay_pgp_shd.g_old_rec.id_flex_num;

Line 33: pay_pgp_shd.g_old_rec.id_flex_num;

29: pay_pgp_shd.g_old_rec.group_name;
30: End If;
31: If (p_rec.id_flex_num = hr_api.g_number) then
32: p_rec.id_flex_num :=
33: pay_pgp_shd.g_old_rec.id_flex_num;
34: End If;
35: If (p_rec.summary_flag = hr_api.g_varchar2) then
36: p_rec.summary_flag :=
37: pay_pgp_shd.g_old_rec.summary_flag;

Line 37: pay_pgp_shd.g_old_rec.summary_flag;

33: pay_pgp_shd.g_old_rec.id_flex_num;
34: End If;
35: If (p_rec.summary_flag = hr_api.g_varchar2) then
36: p_rec.summary_flag :=
37: pay_pgp_shd.g_old_rec.summary_flag;
38: End If;
39: If (p_rec.enabled_flag = hr_api.g_varchar2) then
40: p_rec.enabled_flag :=
41: pay_pgp_shd.g_old_rec.enabled_flag;

Line 41: pay_pgp_shd.g_old_rec.enabled_flag;

37: pay_pgp_shd.g_old_rec.summary_flag;
38: End If;
39: If (p_rec.enabled_flag = hr_api.g_varchar2) then
40: p_rec.enabled_flag :=
41: pay_pgp_shd.g_old_rec.enabled_flag;
42: End If;
43: If (p_rec.start_date_active = hr_api.g_date) then
44: p_rec.start_date_active :=
45: pay_pgp_shd.g_old_rec.start_date_active;

Line 45: pay_pgp_shd.g_old_rec.start_date_active;

41: pay_pgp_shd.g_old_rec.enabled_flag;
42: End If;
43: If (p_rec.start_date_active = hr_api.g_date) then
44: p_rec.start_date_active :=
45: pay_pgp_shd.g_old_rec.start_date_active;
46: End If;
47: If (p_rec.end_date_active = hr_api.g_date) then
48: p_rec.end_date_active :=
49: pay_pgp_shd.g_old_rec.end_date_active;

Line 49: pay_pgp_shd.g_old_rec.end_date_active;

45: pay_pgp_shd.g_old_rec.start_date_active;
46: End If;
47: If (p_rec.end_date_active = hr_api.g_date) then
48: p_rec.end_date_active :=
49: pay_pgp_shd.g_old_rec.end_date_active;
50: End If;
51: If (p_rec.segment1 = hr_api.g_varchar2) then
52: p_rec.segment1 :=
53: pay_pgp_shd.g_old_rec.segment1;

Line 53: pay_pgp_shd.g_old_rec.segment1;

49: pay_pgp_shd.g_old_rec.end_date_active;
50: End If;
51: If (p_rec.segment1 = hr_api.g_varchar2) then
52: p_rec.segment1 :=
53: pay_pgp_shd.g_old_rec.segment1;
54: End If;
55: If (p_rec.segment2 = hr_api.g_varchar2) then
56: p_rec.segment2 :=
57: pay_pgp_shd.g_old_rec.segment2;

Line 57: pay_pgp_shd.g_old_rec.segment2;

53: pay_pgp_shd.g_old_rec.segment1;
54: End If;
55: If (p_rec.segment2 = hr_api.g_varchar2) then
56: p_rec.segment2 :=
57: pay_pgp_shd.g_old_rec.segment2;
58: End If;
59: If (p_rec.segment3 = hr_api.g_varchar2) then
60: p_rec.segment3 :=
61: pay_pgp_shd.g_old_rec.segment3;

Line 61: pay_pgp_shd.g_old_rec.segment3;

57: pay_pgp_shd.g_old_rec.segment2;
58: End If;
59: If (p_rec.segment3 = hr_api.g_varchar2) then
60: p_rec.segment3 :=
61: pay_pgp_shd.g_old_rec.segment3;
62: End If;
63: If (p_rec.segment4 = hr_api.g_varchar2) then
64: p_rec.segment4 :=
65: pay_pgp_shd.g_old_rec.segment4;

Line 65: pay_pgp_shd.g_old_rec.segment4;

61: pay_pgp_shd.g_old_rec.segment3;
62: End If;
63: If (p_rec.segment4 = hr_api.g_varchar2) then
64: p_rec.segment4 :=
65: pay_pgp_shd.g_old_rec.segment4;
66: End If;
67: If (p_rec.segment5 = hr_api.g_varchar2) then
68: p_rec.segment5 :=
69: pay_pgp_shd.g_old_rec.segment5;

Line 69: pay_pgp_shd.g_old_rec.segment5;

65: pay_pgp_shd.g_old_rec.segment4;
66: End If;
67: If (p_rec.segment5 = hr_api.g_varchar2) then
68: p_rec.segment5 :=
69: pay_pgp_shd.g_old_rec.segment5;
70: End If;
71: If (p_rec.segment6 = hr_api.g_varchar2) then
72: p_rec.segment6 :=
73: pay_pgp_shd.g_old_rec.segment6;

Line 73: pay_pgp_shd.g_old_rec.segment6;

69: pay_pgp_shd.g_old_rec.segment5;
70: End If;
71: If (p_rec.segment6 = hr_api.g_varchar2) then
72: p_rec.segment6 :=
73: pay_pgp_shd.g_old_rec.segment6;
74: End If;
75: If (p_rec.segment7 = hr_api.g_varchar2) then
76: p_rec.segment7 :=
77: pay_pgp_shd.g_old_rec.segment7;

Line 77: pay_pgp_shd.g_old_rec.segment7;

73: pay_pgp_shd.g_old_rec.segment6;
74: End If;
75: If (p_rec.segment7 = hr_api.g_varchar2) then
76: p_rec.segment7 :=
77: pay_pgp_shd.g_old_rec.segment7;
78: End If;
79: If (p_rec.segment8 = hr_api.g_varchar2) then
80: p_rec.segment8 :=
81: pay_pgp_shd.g_old_rec.segment8;

Line 81: pay_pgp_shd.g_old_rec.segment8;

77: pay_pgp_shd.g_old_rec.segment7;
78: End If;
79: If (p_rec.segment8 = hr_api.g_varchar2) then
80: p_rec.segment8 :=
81: pay_pgp_shd.g_old_rec.segment8;
82: End If;
83: If (p_rec.segment9 = hr_api.g_varchar2) then
84: p_rec.segment9 :=
85: pay_pgp_shd.g_old_rec.segment9;

Line 85: pay_pgp_shd.g_old_rec.segment9;

81: pay_pgp_shd.g_old_rec.segment8;
82: End If;
83: If (p_rec.segment9 = hr_api.g_varchar2) then
84: p_rec.segment9 :=
85: pay_pgp_shd.g_old_rec.segment9;
86: End If;
87: If (p_rec.segment10 = hr_api.g_varchar2) then
88: p_rec.segment10 :=
89: pay_pgp_shd.g_old_rec.segment10;

Line 89: pay_pgp_shd.g_old_rec.segment10;

85: pay_pgp_shd.g_old_rec.segment9;
86: End If;
87: If (p_rec.segment10 = hr_api.g_varchar2) then
88: p_rec.segment10 :=
89: pay_pgp_shd.g_old_rec.segment10;
90: End If;
91: If (p_rec.segment11 = hr_api.g_varchar2) then
92: p_rec.segment11 :=
93: pay_pgp_shd.g_old_rec.segment11;

Line 93: pay_pgp_shd.g_old_rec.segment11;

89: pay_pgp_shd.g_old_rec.segment10;
90: End If;
91: If (p_rec.segment11 = hr_api.g_varchar2) then
92: p_rec.segment11 :=
93: pay_pgp_shd.g_old_rec.segment11;
94: End If;
95: If (p_rec.segment12 = hr_api.g_varchar2) then
96: p_rec.segment12 :=
97: pay_pgp_shd.g_old_rec.segment12;

Line 97: pay_pgp_shd.g_old_rec.segment12;

93: pay_pgp_shd.g_old_rec.segment11;
94: End If;
95: If (p_rec.segment12 = hr_api.g_varchar2) then
96: p_rec.segment12 :=
97: pay_pgp_shd.g_old_rec.segment12;
98: End If;
99: If (p_rec.segment13 = hr_api.g_varchar2) then
100: p_rec.segment13 :=
101: pay_pgp_shd.g_old_rec.segment13;

Line 101: pay_pgp_shd.g_old_rec.segment13;

97: pay_pgp_shd.g_old_rec.segment12;
98: End If;
99: If (p_rec.segment13 = hr_api.g_varchar2) then
100: p_rec.segment13 :=
101: pay_pgp_shd.g_old_rec.segment13;
102: End If;
103: If (p_rec.segment14 = hr_api.g_varchar2) then
104: p_rec.segment14 :=
105: pay_pgp_shd.g_old_rec.segment14;

Line 105: pay_pgp_shd.g_old_rec.segment14;

101: pay_pgp_shd.g_old_rec.segment13;
102: End If;
103: If (p_rec.segment14 = hr_api.g_varchar2) then
104: p_rec.segment14 :=
105: pay_pgp_shd.g_old_rec.segment14;
106: End If;
107: If (p_rec.segment15 = hr_api.g_varchar2) then
108: p_rec.segment15 :=
109: pay_pgp_shd.g_old_rec.segment15;

Line 109: pay_pgp_shd.g_old_rec.segment15;

105: pay_pgp_shd.g_old_rec.segment14;
106: End If;
107: If (p_rec.segment15 = hr_api.g_varchar2) then
108: p_rec.segment15 :=
109: pay_pgp_shd.g_old_rec.segment15;
110: End If;
111: If (p_rec.segment16 = hr_api.g_varchar2) then
112: p_rec.segment16 :=
113: pay_pgp_shd.g_old_rec.segment16;

Line 113: pay_pgp_shd.g_old_rec.segment16;

109: pay_pgp_shd.g_old_rec.segment15;
110: End If;
111: If (p_rec.segment16 = hr_api.g_varchar2) then
112: p_rec.segment16 :=
113: pay_pgp_shd.g_old_rec.segment16;
114: End If;
115: If (p_rec.segment17 = hr_api.g_varchar2) then
116: p_rec.segment17 :=
117: pay_pgp_shd.g_old_rec.segment17;

Line 117: pay_pgp_shd.g_old_rec.segment17;

113: pay_pgp_shd.g_old_rec.segment16;
114: End If;
115: If (p_rec.segment17 = hr_api.g_varchar2) then
116: p_rec.segment17 :=
117: pay_pgp_shd.g_old_rec.segment17;
118: End If;
119: If (p_rec.segment18 = hr_api.g_varchar2) then
120: p_rec.segment18 :=
121: pay_pgp_shd.g_old_rec.segment18;

Line 121: pay_pgp_shd.g_old_rec.segment18;

117: pay_pgp_shd.g_old_rec.segment17;
118: End If;
119: If (p_rec.segment18 = hr_api.g_varchar2) then
120: p_rec.segment18 :=
121: pay_pgp_shd.g_old_rec.segment18;
122: End If;
123: If (p_rec.segment19 = hr_api.g_varchar2) then
124: p_rec.segment19 :=
125: pay_pgp_shd.g_old_rec.segment19;

Line 125: pay_pgp_shd.g_old_rec.segment19;

121: pay_pgp_shd.g_old_rec.segment18;
122: End If;
123: If (p_rec.segment19 = hr_api.g_varchar2) then
124: p_rec.segment19 :=
125: pay_pgp_shd.g_old_rec.segment19;
126: End If;
127: If (p_rec.segment20 = hr_api.g_varchar2) then
128: p_rec.segment20 :=
129: pay_pgp_shd.g_old_rec.segment20;

Line 129: pay_pgp_shd.g_old_rec.segment20;

125: pay_pgp_shd.g_old_rec.segment19;
126: End If;
127: If (p_rec.segment20 = hr_api.g_varchar2) then
128: p_rec.segment20 :=
129: pay_pgp_shd.g_old_rec.segment20;
130: End If;
131: If (p_rec.segment21 = hr_api.g_varchar2) then
132: p_rec.segment21 :=
133: pay_pgp_shd.g_old_rec.segment21;

Line 133: pay_pgp_shd.g_old_rec.segment21;

129: pay_pgp_shd.g_old_rec.segment20;
130: End If;
131: If (p_rec.segment21 = hr_api.g_varchar2) then
132: p_rec.segment21 :=
133: pay_pgp_shd.g_old_rec.segment21;
134: End If;
135: If (p_rec.segment22 = hr_api.g_varchar2) then
136: p_rec.segment22 :=
137: pay_pgp_shd.g_old_rec.segment22;

Line 137: pay_pgp_shd.g_old_rec.segment22;

133: pay_pgp_shd.g_old_rec.segment21;
134: End If;
135: If (p_rec.segment22 = hr_api.g_varchar2) then
136: p_rec.segment22 :=
137: pay_pgp_shd.g_old_rec.segment22;
138: End If;
139: If (p_rec.segment23 = hr_api.g_varchar2) then
140: p_rec.segment23 :=
141: pay_pgp_shd.g_old_rec.segment23;

Line 141: pay_pgp_shd.g_old_rec.segment23;

137: pay_pgp_shd.g_old_rec.segment22;
138: End If;
139: If (p_rec.segment23 = hr_api.g_varchar2) then
140: p_rec.segment23 :=
141: pay_pgp_shd.g_old_rec.segment23;
142: End If;
143: If (p_rec.segment24 = hr_api.g_varchar2) then
144: p_rec.segment24 :=
145: pay_pgp_shd.g_old_rec.segment24;

Line 145: pay_pgp_shd.g_old_rec.segment24;

141: pay_pgp_shd.g_old_rec.segment23;
142: End If;
143: If (p_rec.segment24 = hr_api.g_varchar2) then
144: p_rec.segment24 :=
145: pay_pgp_shd.g_old_rec.segment24;
146: End If;
147: If (p_rec.segment25 = hr_api.g_varchar2) then
148: p_rec.segment25 :=
149: pay_pgp_shd.g_old_rec.segment25;

Line 149: pay_pgp_shd.g_old_rec.segment25;

145: pay_pgp_shd.g_old_rec.segment24;
146: End If;
147: If (p_rec.segment25 = hr_api.g_varchar2) then
148: p_rec.segment25 :=
149: pay_pgp_shd.g_old_rec.segment25;
150: End If;
151: If (p_rec.segment26 = hr_api.g_varchar2) then
152: p_rec.segment26 :=
153: pay_pgp_shd.g_old_rec.segment26;

Line 153: pay_pgp_shd.g_old_rec.segment26;

149: pay_pgp_shd.g_old_rec.segment25;
150: End If;
151: If (p_rec.segment26 = hr_api.g_varchar2) then
152: p_rec.segment26 :=
153: pay_pgp_shd.g_old_rec.segment26;
154: End If;
155: If (p_rec.segment27 = hr_api.g_varchar2) then
156: p_rec.segment27 :=
157: pay_pgp_shd.g_old_rec.segment27;

Line 157: pay_pgp_shd.g_old_rec.segment27;

153: pay_pgp_shd.g_old_rec.segment26;
154: End If;
155: If (p_rec.segment27 = hr_api.g_varchar2) then
156: p_rec.segment27 :=
157: pay_pgp_shd.g_old_rec.segment27;
158: End If;
159: If (p_rec.segment28 = hr_api.g_varchar2) then
160: p_rec.segment28 :=
161: pay_pgp_shd.g_old_rec.segment28;

Line 161: pay_pgp_shd.g_old_rec.segment28;

157: pay_pgp_shd.g_old_rec.segment27;
158: End If;
159: If (p_rec.segment28 = hr_api.g_varchar2) then
160: p_rec.segment28 :=
161: pay_pgp_shd.g_old_rec.segment28;
162: End If;
163: If (p_rec.segment29 = hr_api.g_varchar2) then
164: p_rec.segment29 :=
165: pay_pgp_shd.g_old_rec.segment29;

Line 165: pay_pgp_shd.g_old_rec.segment29;

161: pay_pgp_shd.g_old_rec.segment28;
162: End If;
163: If (p_rec.segment29 = hr_api.g_varchar2) then
164: p_rec.segment29 :=
165: pay_pgp_shd.g_old_rec.segment29;
166: End If;
167: If (p_rec.segment30 = hr_api.g_varchar2) then
168: p_rec.segment30 :=
169: pay_pgp_shd.g_old_rec.segment30;

Line 169: pay_pgp_shd.g_old_rec.segment30;

165: pay_pgp_shd.g_old_rec.segment29;
166: End If;
167: If (p_rec.segment30 = hr_api.g_varchar2) then
168: p_rec.segment30 :=
169: pay_pgp_shd.g_old_rec.segment30;
170: End If;
171:
172: --
173: hr_utility.set_location(' Leaving:'||l_proc, 10);

Line 218: l_rec pay_pgp_shd.g_rec_type;

214: p_group_name out varchar2,
215: p_validate in boolean default false) is
216: --
217: l_proc varchar2(72) := g_package||'upd_or_sel';
218: l_rec pay_pgp_shd.g_rec_type;
219: --
220: begin
221: hr_utility.set_location('Entering:'||l_proc, 5);
222: --

Line 226: pay_pgp_shd.convert_args

222: --
223: -- convert args into record format
224: --
225: l_rec :=
226: pay_pgp_shd.convert_args
227: (p_people_group_id,
228: null,
229: null,
230: null,

Line 267: if pay_pgp_shd.api_updating

263: p_segment30);
264: --
265: -- check to see if we are updating a row
266: --
267: if pay_pgp_shd.api_updating
268: (p_people_group_id => l_rec.people_group_id) then
269: --
270: hr_utility.set_location(l_proc, 10);
271: --