APPS.PER_STB_SHD dependencies on PER_STB_SHD

Line 1: Package Body per_stb_shd as

1: Package Body per_stb_shd as
2: /* $Header: pestbrhi.pkb 115.0 2003/07/03 06:26:56 kavenkat noship $ */ --
3: -- ----------------------------------------------------------------------------
4: -- | Private Global Definitions |
5: -- ----------------------------------------------------------------------------

Line 7: g_package varchar2(33) := ' per_stb_shd.'; -- Global package name

3: -- ----------------------------------------------------------------------------
4: -- | Private Global Definitions |
5: -- ----------------------------------------------------------------------------
6: --
7: g_package varchar2(33) := ' per_stb_shd.'; -- Global package name
8: --
9: -- ----------------------------------------------------------------------------
10: -- |---------------------------< constraint_error >---------------------------|
11: -- ----------------------------------------------------------------------------

Line 74: = per_stb_shd.g_old_rec.setup_task_code and

70: --
71: l_fct_ret := false;
72: Else
73: If (p_setup_task_code
74: = per_stb_shd.g_old_rec.setup_task_code and
75: p_object_version_number
76: = per_stb_shd.g_old_rec.object_version_number
77: ) Then
78: --

Line 76: = per_stb_shd.g_old_rec.object_version_number

72: Else
73: If (p_setup_task_code
74: = per_stb_shd.g_old_rec.setup_task_code and
75: p_object_version_number
76: = per_stb_shd.g_old_rec.object_version_number
77: ) Then
78: --
79: -- The g_old_rec is current therefore we must
80: -- set the returning function to true

Line 88: Fetch C_Sel1 Into per_stb_shd.g_old_rec;

84: --
85: -- Select the current row into g_old_rec
86: --
87: Open C_Sel1;
88: Fetch C_Sel1 Into per_stb_shd.g_old_rec;
89: If C_Sel1%notfound Then
90: Close C_Sel1;
91: --
92: -- The primary key is invalid therefore we must error

Line 99: <> per_stb_shd.g_old_rec.object_version_number) Then

95: fnd_message.raise_error;
96: End If;
97: Close C_Sel1;
98: If (p_object_version_number
99: <> per_stb_shd.g_old_rec.object_version_number) Then
100: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
101: fnd_message.raise_error;
102: End If;
103: l_fct_ret := true;

Line 153: Fetch C_Sel1 Into per_stb_shd.g_old_rec;

149: ,p_argument_value => p_object_version_number
150: );
151: --
152: Open C_Sel1;
153: Fetch C_Sel1 Into per_stb_shd.g_old_rec;
154: If C_Sel1%notfound then
155: Close C_Sel1;
156: --
157: -- The primary key is invalid therefore we must error

Line 164: <> per_stb_shd.g_old_rec.object_version_number) Then

160: fnd_message.raise_error;
161: End If;
162: Close C_Sel1;
163: If (p_object_version_number
164: <> per_stb_shd.g_old_rec.object_version_number) Then
165: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
166: fnd_message.raise_error;
167: End If;
168: --

Line 222: end per_stb_shd;

218: Return(l_rec);
219: --
220: End convert_args;
221: --
222: end per_stb_shd;