DBA Data[Home] [Help]

APPS.PA_PROJECT_SUBTEAMS_PVT dependencies on PA_PROJECT_SUBTEAMS_PUB

Line 65: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_FALSE;

61: -- Initialize the Error Stack
62: PA_DEBUG.init_err_stack('PA_PROJECT_SUBTEAMS_PVT.Create_Subteam');
63:
64: -- Initialize the error flag
65: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_FALSE;
66:
67: -- Issue API savepoint if the transaction is to be committed
68: IF p_commit = FND_API.G_TRUE THEN
69: SAVEPOINT SBT_PVT_CREATE_SBT;

Line 86: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;

82: IF ( (p_object_type is null OR p_object_type = FND_API.G_MISS_CHAR)
83: OR (p_object_id IS NULL OR p_object_id = FND_API.G_MISS_NUM)) THEN
84: PA_UTILS.Add_Message( p_app_short_name => 'PA'
85: ,p_msg_name => 'PA_SBT_PRJID_INV');
86: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;
87: END IF;
88:
89: If(p_object_type = 'PA_PROJECTS') then
90:

Line 96: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;

92: FETCH get_project INTO l_rowid;
93: IF get_project%notfound THEN
94: PA_UTILS.Add_Message( p_app_short_name => 'PA'
95: ,p_msg_name => 'PA_SBT_PRJID_INV');
96: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;
97: END IF;
98:
99: CLOSE get_project;
100:

Line 110: -- PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;

106: end if;
107: --IF l_name_count < 1 then
108: -- PA_UTILS.Add_Message( p_app_short_name => 'PA'
109: -- ,p_msg_name => 'PA_SBT_PRJID_INV');
110: -- PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;
111: --END IF;
112:
113:
114: --

Line 121: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;

117: IF p_subteam_name IS NULL OR
118: p_subteam_name = FND_API.G_MISS_CHAR THEN
119: PA_UTILS.Add_Message( p_app_short_name => 'PA'
120: ,p_msg_name => 'PA_SBT_NAME_INV');
121: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;
122: END IF;
123:
124: --
125: -- Check that subteam name is not used by existing record with the same

Line 135: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;

131:
132: IF get_project_subteam%found THEN
133: PA_UTILS.Add_Message( p_app_short_name => 'PA'
134: ,p_msg_name => 'PA_SBT_NAME_INV');
135: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;
136: END IF;
137: CLOSE get_project_subteam;
138:
139:

Line 150: -- PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;

146:
147: --IF l_name_count > 0 THEN
148: -- PA_UTILS.Add_Message( p_app_short_name => 'PA'
149: -- ,p_msg_name => 'PA_SBT_NAME_INV');
150: -- PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;
151: --END IF;
152:
153:
154: --dbms_output.put_line(l_assignment_rec.project_id);

Line 160: IF (p_validate_only <> FND_API.G_TRUE AND PA_PROJECT_SUBTEAMS_PUB.g_error_exists <> FND_API.G_TRUE) THEN

156:
157:
158: -- Create the record if there is no error
159:
160: IF (p_validate_only <> FND_API.G_TRUE AND PA_PROJECT_SUBTEAMS_PUB.g_error_exists <> FND_API.G_TRUE) THEN
161: PA_PROJECT_SUBTEAMS_PKG.Insert_Row
162: (p_subteam_name => p_subteam_name
163: ,p_object_type => p_object_type
164: ,p_object_id => p_object_id

Line 191: IF p_commit = FND_API.G_TRUE AND PA_PROJECT_SUBTEAMS_PUB.g_error_exists <> FND_API.G_TRUE THEN

187: );
188:
189: END IF;
190: -- Commit if the flag is set and there is no error
191: IF p_commit = FND_API.G_TRUE AND PA_PROJECT_SUBTEAMS_PUB.g_error_exists <> FND_API.G_TRUE THEN
192: COMMIT;
193: END IF;
194:
195: -- Reset the error stack when returning to the calling program

Line 200: IF PA_PROJECT_SUBTEAMS_PUB.g_error_exists = FND_API.G_TRUE THEN

196: PA_DEBUG.Reset_Err_Stack;
197:
198: -- If g_error_exists is TRUE then set the x_return_status to 'E'
199:
200: IF PA_PROJECT_SUBTEAMS_PUB.g_error_exists = FND_API.G_TRUE THEN
201:
202: x_return_status := FND_API.G_RET_STS_ERROR;
203:
204: END IF;

Line 288: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_FALSE;

284: PA_DEBUG.init_err_stack('PA_PROJECT_SUBTEAMS_PVT.Update_Subteam');
285:
286:
287: -- Initialize the error flag
288: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_FALSE;
289:
290: x_return_status := FND_API.G_RET_STS_SUCCESS;
291:
292: -- Issue API savepoint if the transaction is to be committed

Line 302: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;

298: -- Check project_subteam_id IS NOT NULL
299: IF p_subteam_id IS NULL THEN
300: PA_UTILS.Add_Message( p_app_short_name => 'PA'
301: ,p_msg_name => 'PA_SBT_ID_INV');
302: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;
303: END IF;
304:
305: --
306: -- Check that mandatory subteam name is not null

Line 311: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;

307: --
308: IF p_subteam_name IS NULL THEN
309: PA_UTILS.Add_Message( p_app_short_name => 'PA'
310: ,p_msg_name => 'PA_SBT_NAME_INV');
311: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;
312: END IF;
313:
314: --
315: -- Check that mandatory project id exists

Line 321: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.g_true;

317: IF ((p_object_type is null OR p_object_type=FND_API.g_miss_char)
318: OR (p_object_id IS NULL OR p_object_id=FND_API.g_miss_num)) THEN
319: PA_UTILS.Add_Message( p_app_short_name => 'PA'
320: ,p_msg_name => 'PA_SBT_PRJID_INV');
321: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.g_true;
322: ELSE
323: IF (p_object_type='PA_PROJECTS'
324: AND p_object_id is not null
325: AND p_object_id <> FND_API.g_miss_num )THEN

Line 332: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;

328: FETCH get_project INTO l_rowid;
329: IF get_project%notfound THEN
330: PA_UTILS.Add_Message( p_app_short_name => 'PA'
331: ,p_msg_name => 'PA_SBT_PRJID_INV');
332: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;
333: END IF;
334:
335: CLOSE get_project;
336: --SELECT COUNT(*)

Line 345: -- PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;

341:
342: -- IF l_name_count < 1 then
343: -- PA_UTILS.Add_Message( p_app_short_name => 'PA'
344: -- ,p_msg_name => 'PA_SBT_PRJID_INV');
345: -- PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;
346: --END IF;
347: END IF;
348: END IF;
349:

Line 370: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;

366: IF get_project_subteam%found THEN
367: -- if the name is already taken by another subteam
368: PA_UTILS.Add_Message( p_app_short_name => 'PA'
369: ,p_msg_name => 'PA_SBT_NAME_INV');
370: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;
371: END IF;
372:
373: CLOSE get_project_subteam;
374:

Line 387: -- PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;

383: -- IF l_count > 0 THEN
384: -- if the name is already taken by another subteam
385: -- PA_UTILS.Add_Message( p_app_short_name => 'PA'
386: -- ,p_msg_name => 'PA_SBT_NAME_INV');
387: -- PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;
388: --END IF;
389: --END IF;
390:
391: IF (p_validate_only = FND_API.G_FALSE AND PA_PROJECT_SUBTEAMS_PUB.g_error_exists <> FND_API.G_TRUE) THEN

Line 391: IF (p_validate_only = FND_API.G_FALSE AND PA_PROJECT_SUBTEAMS_PUB.g_error_exists <> FND_API.G_TRUE) THEN

387: -- PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;
388: --END IF;
389: --END IF;
390:
391: IF (p_validate_only = FND_API.G_FALSE AND PA_PROJECT_SUBTEAMS_PUB.g_error_exists <> FND_API.G_TRUE) THEN
392:
393: --dbms_output.put_line('Call table handler');
394:
395: PA_PROJECT_SUBTEAMS_PKG.Update_Row

Line 425: IF p_commit = FND_API.G_TRUE AND PA_PROJECT_SUBTEAMS_PUB.g_error_exists <> FND_API.G_TRUE THEN

421: ,x_msg_data => x_msg_data
422: );
423: END IF;
424: -- Commit if the flag is set and there is no error
425: IF p_commit = FND_API.G_TRUE AND PA_PROJECT_SUBTEAMS_PUB.g_error_exists <> FND_API.G_TRUE THEN
426: COMMIT;
427: END IF;
428:
429: -- Reset the error stack when returning to the calling program

Line 434: IF PA_PROJECT_SUBTEAMS_PUB.g_error_exists = FND_API.G_TRUE THEN

430: PA_DEBUG.Reset_Err_Stack;
431:
432: -- If g_error_exists is TRUE then set the x_return_status to 'E'
433:
434: IF PA_PROJECT_SUBTEAMS_PUB.g_error_exists = FND_API.G_TRUE THEN
435: x_return_status := FND_API.G_RET_STS_ERROR;
436: END IF;
437:
438:

Line 502: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_FALSE;

498: -- Initialize the Error Stack
499: PA_DEBUG.init_err_stack('PA_PROJECT_SUBTEAMS_PVT.Delete_Subteam');
500:
501: -- Initialize the error flag
502: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_FALSE;
503:
504: x_return_status := FND_API.G_RET_STS_SUCCESS;
505:
506: -- Issue API savepoint if the transaction is to be committed

Line 519: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.g_true;

515: FETCH get_project_subteam INTO l_rowid;
516: IF get_project_subteam%found THEN
517: PA_UTILS.Add_Message( p_app_short_name => 'PA'
518: ,p_msg_name => 'PA_SBT_ID_INUSE');
519: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.g_true;
520: END IF;
521:
522: CLOSE get_project_subteam;
523:

Line 540: -- PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;

536:
537: --IF l_count >0 THEN
538: -- PA_UTILS.Add_Message( p_app_short_name => 'PA'
539: -- ,p_msg_name => 'PA_SBT_ID_INUSE');
540: -- PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;
541: --END IF;
542:
543:
544: IF (p_validate_only = FND_API.G_FALSE AND PA_PROJECT_SUBTEAMS_PUB.g_error_exists <> FND_API.G_TRUE) THEN

Line 544: IF (p_validate_only = FND_API.G_FALSE AND PA_PROJECT_SUBTEAMS_PUB.g_error_exists <> FND_API.G_TRUE) THEN

540: -- PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;
541: --END IF;
542:
543:
544: IF (p_validate_only = FND_API.G_FALSE AND PA_PROJECT_SUBTEAMS_PUB.g_error_exists <> FND_API.G_TRUE) THEN
545:
546: if p_record_version_number = FND_API.G_MISS_NUM then
547: l_record_version_number := NULL;
548: else

Line 563: IF p_commit = FND_API.G_TRUE AND PA_PROJECT_SUBTEAMS_PUB.g_error_exists <> FND_API.G_TRUE THEN

559: ,x_msg_data => x_msg_data
560: );
561:
562: -- Commit if the flag is set and there is no error
563: IF p_commit = FND_API.G_TRUE AND PA_PROJECT_SUBTEAMS_PUB.g_error_exists <> FND_API.G_TRUE THEN
564: COMMIT;
565: END IF;
566:
567:

Line 575: IF PA_PROJECT_SUBTEAMS_PUB.g_error_exists = FND_API.G_TRUE THEN

571: PA_DEBUG.Reset_Err_Stack;
572:
573: -- If g_error_exists is TRUE then set the x_return_status to 'E'
574:
575: IF PA_PROJECT_SUBTEAMS_PUB.g_error_exists = FND_API.G_TRUE THEN
576:
577: x_return_status := FND_API.G_RET_STS_ERROR;
578:
579: END IF;