DBA Data[Home] [Help]

APPS.PER_POD_UPD dependencies on PER_POD_SHD

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

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

Line 29: per_pod_shd.g_old_rec.id_flex_num;

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

Line 33: per_pod_shd.g_old_rec.summary_flag;

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

Line 37: per_pod_shd.g_old_rec.enabled_flag;

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

Line 41: per_pod_shd.g_old_rec.start_date_active;

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

Line 45: per_pod_shd.g_old_rec.end_date_active;

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

Line 49: per_pod_shd.g_old_rec.segment1;

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

Line 53: per_pod_shd.g_old_rec.segment2;

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

Line 57: per_pod_shd.g_old_rec.segment3;

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

Line 61: per_pod_shd.g_old_rec.segment4;

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

Line 65: per_pod_shd.g_old_rec.segment5;

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

Line 69: per_pod_shd.g_old_rec.segment6;

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

Line 73: per_pod_shd.g_old_rec.segment7;

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

Line 77: per_pod_shd.g_old_rec.segment8;

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

Line 81: per_pod_shd.g_old_rec.segment9;

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

Line 85: per_pod_shd.g_old_rec.segment10;

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

Line 89: per_pod_shd.g_old_rec.segment11;

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

Line 93: per_pod_shd.g_old_rec.segment12;

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

Line 97: per_pod_shd.g_old_rec.segment13;

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

Line 101: per_pod_shd.g_old_rec.segment14;

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

Line 105: per_pod_shd.g_old_rec.segment15;

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

Line 109: per_pod_shd.g_old_rec.segment16;

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

Line 113: per_pod_shd.g_old_rec.segment17;

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

Line 117: per_pod_shd.g_old_rec.segment18;

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

Line 121: per_pod_shd.g_old_rec.segment19;

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

Line 125: per_pod_shd.g_old_rec.segment20;

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

Line 129: per_pod_shd.g_old_rec.segment21;

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

Line 133: per_pod_shd.g_old_rec.segment22;

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

Line 137: per_pod_shd.g_old_rec.segment23;

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

Line 141: per_pod_shd.g_old_rec.segment24;

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

Line 145: per_pod_shd.g_old_rec.segment25;

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

Line 149: per_pod_shd.g_old_rec.segment26;

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

Line 153: per_pod_shd.g_old_rec.segment27;

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

Line 157: per_pod_shd.g_old_rec.segment28;

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

Line 161: per_pod_shd.g_old_rec.segment29;

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

Line 165: per_pod_shd.g_old_rec.segment30;

161: per_pod_shd.g_old_rec.segment29;
162: End If;
163: If (p_rec.segment30 = hr_api.g_varchar2) then
164: p_rec.segment30 :=
165: per_pod_shd.g_old_rec.segment30;
166: End If;
167:
168: --
169: hr_utility.set_location(' Leaving:'||l_proc, 10);

Line 214: l_rec per_pod_shd.g_rec_type;

210: p_name out nocopy varchar2,
211: p_validate in boolean default false) is
212: --
213: l_proc varchar2(72) := g_package||'upd_or_sel';
214: l_rec per_pod_shd.g_rec_type;
215: --
216: begin
217: hr_utility.set_location('Entering:'||l_proc, 5);
218: --

Line 222: per_pod_shd.convert_args

218: --
219: -- convert args into record format
220: --
221: l_rec :=
222: per_pod_shd.convert_args
223: (p_position_definition_id,
224: null,
225: null,
226: null,

Line 262: if per_pod_shd.api_updating

258: p_segment30);
259: --
260: -- check to see if we are updating a row
261: --
262: if per_pod_shd.api_updating
263: (p_position_definition_id => l_rec.position_definition_id) then
264: --
265: hr_utility.set_location(l_proc, 10);
266: --