DBA Data[Home] [Help]

APPS.AHL_VWP_DEPT_SHIFTS_PUB dependencies on AHL_VWP_DEPT_SHIFTS_PUB

Line 1: PACKAGE BODY AHL_VWP_DEPT_SHIFTS_PUB AS

1: PACKAGE BODY AHL_VWP_DEPT_SHIFTS_PUB AS
2: /* $Header: AHLPDSHB.pls 115.9 2002/12/24 18:34:24 ssurapan noship $ */
3: --
4: G_PKG_NAME VARCHAR2(30):='AHL_VWP_DEPT_SHIFTS_PUB';
5: G_DEBUG VARCHAR2(1):=FND_PROFILE.VALUE('AHL_API_FILE_DEBUG_ON');

Line 4: G_PKG_NAME VARCHAR2(30):='AHL_VWP_DEPT_SHIFTS_PUB';

1: PACKAGE BODY AHL_VWP_DEPT_SHIFTS_PUB AS
2: /* $Header: AHLPDSHB.pls 115.9 2002/12/24 18:34:24 ssurapan noship $ */
3: --
4: G_PKG_NAME VARCHAR2(30):='AHL_VWP_DEPT_SHIFTS_PUB';
5: G_DEBUG VARCHAR2(1):=FND_PROFILE.VALUE('AHL_API_FILE_DEBUG_ON');
6: --
7: PROCEDURE DEFAULT_MISSING_ATTRIBS
8: (

Line 9: p_x_vwp_deptshift_rec IN OUT NOCOPY AHL_VWP_DEPT_SHIFTS_PUB.vwp_deptshift_rec

5: G_DEBUG VARCHAR2(1):=FND_PROFILE.VALUE('AHL_API_FILE_DEBUG_ON');
6: --
7: PROCEDURE DEFAULT_MISSING_ATTRIBS
8: (
9: p_x_vwp_deptshift_rec IN OUT NOCOPY AHL_VWP_DEPT_SHIFTS_PUB.vwp_deptshift_rec
10: )
11: AS
12: BEGIN
13: IF p_x_vwp_deptshift_rec.OBJECT_VERSION_NUMBER=FND_API.G_MISS_NUM

Line 124: p_x_vwp_deptshift_rec IN OUT NOCOPY AHL_VWP_DEPT_SHIFTS_PUB.VWP_DEPTSHIFT_REC

120: (
121: x_return_status OUT NOCOPY VARCHAR2,
122: x_msg_count OUT NOCOPY NUMBER,
123: x_msg_data OUT NOCOPY VARCHAR2,
124: p_x_vwp_deptshift_rec IN OUT NOCOPY AHL_VWP_DEPT_SHIFTS_PUB.VWP_DEPTSHIFT_REC
125: )
126: as
127: CURSOR get_org_id(C_NAME VARCHAR2)
128: IS

Line 177: --AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside translate1 -- l_check_flag' || l_check_flag);

173: IF G_DEBUG='Y' THEN
174: AHL_DEBUG_PUB.enable_debug;
175: END IF;
176: x_return_status:=FND_API.G_RET_STS_SUCCESS;
177: --AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside translate1 -- l_check_flag' || l_check_flag);
178: IF p_x_vwp_deptshift_rec.ORGANIZATION_NAME IS NULL OR p_x_vwp_deptshift_rec.ORGANIZATION_NAME=FND_API.G_MISS_CHAR
179: THEN
180: --AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside organization-- l_check_flag' || l_check_flag);
181: FND_MESSAGE.SET_NAME('AHL','AHL_VWP_ORG_NAME_NULL');

Line 180: --AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside organization-- l_check_flag' || l_check_flag);

176: x_return_status:=FND_API.G_RET_STS_SUCCESS;
177: --AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside translate1 -- l_check_flag' || l_check_flag);
178: IF p_x_vwp_deptshift_rec.ORGANIZATION_NAME IS NULL OR p_x_vwp_deptshift_rec.ORGANIZATION_NAME=FND_API.G_MISS_CHAR
179: THEN
180: --AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside organization-- l_check_flag' || l_check_flag);
181: FND_MESSAGE.SET_NAME('AHL','AHL_VWP_ORG_NAME_NULL');
182: FND_MSG_PUB.ADD;
183: l_check_flag:='N';
184: ELSE

Line 186: --AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside org cursor -- l_check_flag' || l_check_flag);

182: FND_MSG_PUB.ADD;
183: l_check_flag:='N';
184: ELSE
185: l_check_flag:='Y';
186: --AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside org cursor -- l_check_flag' || l_check_flag);
187: OPEN get_org_id(p_x_vwp_deptshift_rec.ORGANIZATION_NAME);
188: FETCH get_org_id INTO p_x_vwp_deptshift_rec.ORGANIZATION_ID;
189: IF get_org_id%NOTFOUND
190: THEN

Line 198: --AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside translate3 -- l_check_flag' || l_check_flag);

194: END IF;
195: CLOSE get_org_id;
196: END IF;
197:
198: --AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside translate3 -- l_check_flag' || l_check_flag);
199: l_check_flag:='N';
200: IF p_x_vwp_deptshift_rec.DEPT_DESCRIPTION IS NULL OR p_x_vwp_deptshift_rec.DEPT_DESCRIPTION=FND_API.G_MISS_CHAR
201: THEN
202: --AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside department-- l_check_flag' || l_check_flag);

Line 202: --AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside department-- l_check_flag' || l_check_flag);

198: --AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside translate3 -- l_check_flag' || l_check_flag);
199: l_check_flag:='N';
200: IF p_x_vwp_deptshift_rec.DEPT_DESCRIPTION IS NULL OR p_x_vwp_deptshift_rec.DEPT_DESCRIPTION=FND_API.G_MISS_CHAR
201: THEN
202: --AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside department-- l_check_flag' || l_check_flag);
203: FND_MESSAGE.SET_NAME('AHL','AHL_VWP_DEPT_NAME_NULL');
204: FND_MSG_PUB.ADD;
205: l_check_flag:='N';
206: ELSE

Line 223: --AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside translate2 -- l_check_flag' || l_check_flag);

219: END IF;
220: CLOSE get_org_dept_id;
221: END IF;
222:
223: --AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside translate2 -- l_check_flag' || l_check_flag);
224:
225: l_check_flag:='N';
226: IF p_x_vwp_deptshift_rec.CALENDAR_DESCRIPTION IS NULL OR p_x_vwp_deptshift_rec.CALENDAR_DESCRIPTION=FND_API.G_MISS_CHAR
227: THEN

Line 228: --AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside calender-- l_check_flag' || l_check_flag);

224:
225: l_check_flag:='N';
226: IF p_x_vwp_deptshift_rec.CALENDAR_DESCRIPTION IS NULL OR p_x_vwp_deptshift_rec.CALENDAR_DESCRIPTION=FND_API.G_MISS_CHAR
227: THEN
228: --AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside calender-- l_check_flag' || l_check_flag);
229: FND_MESSAGE.SET_NAME('AHL','AHL_VWP_CALENDER_NAME_NULL');
230: FND_MSG_PUB.ADD;
231: l_check_flag:='N';
232: ELSE

Line 252: --AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside translate2 -- l_check_flag' || l_check_flag);

248: END IF;
249: CLOSE get_bom_calendar;
250: END IF;
251:
252: --AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside translate2 -- l_check_flag' || l_check_flag);
253:
254: l_check_flag:='N';
255: IF p_x_vwp_deptshift_rec.SHIFT_NUM IS NULL OR p_x_vwp_deptshift_rec.SHIFT_NUM=FND_API.G_MISS_NUM
256: THEN

Line 257: --AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside shift number-- l_check_flag' || l_check_flag);

253:
254: l_check_flag:='N';
255: IF p_x_vwp_deptshift_rec.SHIFT_NUM IS NULL OR p_x_vwp_deptshift_rec.SHIFT_NUM=FND_API.G_MISS_NUM
256: THEN
257: --AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside shift number-- l_check_flag' || l_check_flag);
258: FND_MESSAGE.SET_NAME('AHL','AHL_VWP_SHIFT_NUMBER_NULL');
259: FND_MSG_PUB.ADD;
260: l_check_flag:='N';
261: ELSE

Line 281: AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside translate2 -- l_check_flag' || l_check_flag);

277: CLOSE get_bom_shift_num;
278: END IF;
279:
280: IF G_DEBUG='Y' THEN
281: AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside translate2 -- l_check_flag' || l_check_flag);
282: END IF;
283:
284: l_check_flag:='N';
285: IF p_x_vwp_deptshift_rec.SEQ_NAME IS NULL OR p_x_vwp_deptshift_rec.SEQ_NAME=FND_API.G_MISS_CHAR

Line 288: AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside sequence number-- l_check_flag' || l_check_flag);

284: l_check_flag:='N';
285: IF p_x_vwp_deptshift_rec.SEQ_NAME IS NULL OR p_x_vwp_deptshift_rec.SEQ_NAME=FND_API.G_MISS_CHAR
286: THEN
287: IF G_DEBUG='Y' THEN
288: AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside sequence number-- l_check_flag' || l_check_flag);
289: END IF;
290: --
291: FND_MESSAGE.SET_NAME('AHL','AHL_VWP_WORK_DAYS_NULL');
292: FND_MSG_PUB.ADD;

Line 298: AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside translate2 -- l_check_flag' || l_check_flag);

294: ELSE
295: l_check_flag:='Y';
296: END IF;
297: IF G_DEBUG='Y' THEN
298: AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside translate2 -- l_check_flag' || l_check_flag);
299: END IF;
300: IF l_check_flag='Y'
301: THEN
302: IF G_DEBUG='Y' THEN

Line 303: AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside sequence number ***** -- l_check_flag' || l_check_flag);

299: END IF;
300: IF l_check_flag='Y'
301: THEN
302: IF G_DEBUG='Y' THEN
303: AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- inside sequence number ***** -- l_check_flag' || l_check_flag);
304: END IF;
305: OPEN get_bom_workdays(p_x_vwp_deptshift_rec.CALENDAR_CODE,p_x_vwp_deptshift_rec.SHIFT_NUM,p_x_vwp_deptshift_rec.SEQ_NAME);
306: FETCH get_bom_workdays INTO p_x_vwp_deptshift_rec.SEQ_NUM;
307: IF get_bom_workdays%NOTFOUND

Line 334: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_VWP_DEPT_SHIFTS_PUB',

330: WHEN OTHERS THEN
331: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
332: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
333: THEN
334: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_VWP_DEPT_SHIFTS_PUB',
335: p_procedure_name => 'TRANSLATE_VALUE_ID',
336: p_error_text => SUBSTR(SQLERRM,1,240));
337: END IF;
338: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

Line 350: p_vwp_deptshift_rec IN AHL_VWP_DEPT_SHIFTS_PUB.vwp_deptshift_rec

346: (
347: x_return_status OUT NOCOPY VARCHAR2,
348: x_msg_count OUT NOCOPY NUMBER,
349: x_msg_data OUT NOCOPY VARCHAR2,
350: p_vwp_deptshift_rec IN AHL_VWP_DEPT_SHIFTS_PUB.vwp_deptshift_rec
351: )
352: as
353: l_counter NUMBER:=0;
354: l_prim_key NUMBER:=0;

Line 404: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_VWP_DEPT_SHIFTS_PUB',

400: WHEN OTHERS THEN
401: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
402: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
403: THEN
404: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_VWP_DEPT_SHIFTS_PUB',
405: p_procedure_name => 'VALIDATE_VWP_DEPT_SHIFT',
406: p_error_text => SUBSTR(SQLERRM,1,240));
407: END IF;
408: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

Line 472: AHL_DEBUG_PUB.debug( 'AHL_VWP_DEPT_SHIFTS_PUB.','+CREATE_VWP_DEPT_SHIFTS+');

468:
469: -- Debug info.
470:
471: IF G_DEBUG='Y' THEN
472: AHL_DEBUG_PUB.debug( 'AHL_VWP_DEPT_SHIFTS_PUB.','+CREATE_VWP_DEPT_SHIFTS+');
473: AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- before translate shift_num ' || l_vwp_deptshift_rec.SHIFT_NUM);
474: END IF;
475:
476: TRANSLATE_VALUE_ID

Line 473: AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- before translate shift_num ' || l_vwp_deptshift_rec.SHIFT_NUM);

469: -- Debug info.
470:
471: IF G_DEBUG='Y' THEN
472: AHL_DEBUG_PUB.debug( 'AHL_VWP_DEPT_SHIFTS_PUB.','+CREATE_VWP_DEPT_SHIFTS+');
473: AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- before translate shift_num ' || l_vwp_deptshift_rec.SHIFT_NUM);
474: END IF;
475:
476: TRANSLATE_VALUE_ID
477: (

Line 484: AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- after transalate shift_num' || l_vwp_deptshift_rec.SHIFT_NUM);

480: x_msg_data =>l_msg_data,
481: p_x_vwp_deptshift_rec =>l_vwp_deptshift_rec
482: );
483: IF G_DEBUG='Y' THEN
484: AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- after transalate shift_num' || l_vwp_deptshift_rec.SHIFT_NUM);
485: END IF;
486: l_msg_count := FND_MSG_PUB.count_msg;
487: IF l_msg_count > 0
488: THEN

Line 514: AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- after validation shift_num' || l_vwp_deptshift_rec.SHIFT_NUM);

510: x_msg_data =>l_msg_data,
511: p_vwp_deptshift_rec =>l_vwp_deptshift_rec);
512: END IF;
513: IF G_DEBUG='Y' THEN
514: AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- after validation shift_num' || l_vwp_deptshift_rec.SHIFT_NUM);
515: END IF;
516:
517: l_msg_count := FND_MSG_PUB.count_msg;
518:

Line 528: AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- before insert shift_num' || l_vwp_deptshift_rec.SHIFT_NUM);

524: END IF;
525:
526: -- insert process goes here
527: IF G_DEBUG='Y' THEN
528: AHL_DEBUG_PUB.debug('AHL_VWP_DEPT_SHIFTS_PUB -- before insert shift_num' || l_vwp_deptshift_rec.SHIFT_NUM);
529: END IF;
530: IF l_vwp_deptshift_rec.DML_OPERATION='C'
531: THEN
532: Select AHL_DEPARTMENT_SHIFTS_S.nextval into

Line 630: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_VWP_DEPT_SHIFTS_PUB',

626: ROLLBACK TO CREATE_VWP_DEPT_SHIFTS;
627: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
628: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
629: THEN
630: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_VWP_DEPT_SHIFTS_PUB',
631: p_procedure_name => 'CREATE_VWP_DEPT_SHIFTS',
632: p_error_text => SUBSTR(SQLERRM,1,240));
633:
634: END IF;

Line 768: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_VWP_DEPT_SHIFTS_PUB',

764: ROLLBACK TO DELETE_DEPT_SHIFTS;
765: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
766: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
767: THEN
768: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_VWP_DEPT_SHIFTS_PUB',
769: p_procedure_name => 'CREATE_VWP_DEPT_SHIFTS',
770: p_error_text => SUBSTR(SQLERRM,1,240));
771:
772: END IF;

Line 778: END AHL_VWP_DEPT_SHIFTS_PUB;

774: p_count => x_msg_count,
775: p_data => X_msg_data);
776: END;
777:
778: END AHL_VWP_DEPT_SHIFTS_PUB;