APPS.AHL_DI_DOC_REVISION_PUB dependencies on DUAL

Line 347: SELECT TRUNC(SYSDATE) into p_x_revision_tbl(i).revision_date FROM DUAL;

343: --if rev date is null then rev date = sysdate.
344:
345: IF p_x_revision_tbl(i).revision_date IS NULL
346: THEN
347: SELECT TRUNC(SYSDATE) into p_x_revision_tbl(i).revision_date FROM DUAL;
348: -- truncate time stamp
349: /* as per FP for ER 5859915 where PM had decided to remove following validation
350: ELSE
351: SELECT SYSDATE into l_sysdate FROM DUAL;

Line 351: SELECT SYSDATE into l_sysdate FROM DUAL;

347: SELECT TRUNC(SYSDATE) into p_x_revision_tbl(i).revision_date FROM DUAL;
348: -- truncate time stamp
349: /* as per FP for ER 5859915 where PM had decided to remove following validation
350: ELSE
351: SELECT SYSDATE into l_sysdate FROM DUAL;
352: IF p_x_revision_tbl(i).revision_date < TRUNC(l_sysdate)
353: THEN
354: FND_MESSAGE.SET_NAME('AHL','AHL_DI_REVDT_LESS_SYSDT');
355: FND_MSG_PUB.ADD;

Line 459: SELECT TRUNC(SYSDATE) into p_x_revision_tbl(i).obsolete_date FROM DUAL;

455:
456: IF p_x_revision_tbl(i).revision_status_code IS NOT NULL AND
457: p_x_revision_tbl(i).revision_status_code = 'OBSOLETE'
458: THEN
459: SELECT TRUNC(SYSDATE) into p_x_revision_tbl(i).obsolete_date FROM DUAL;
460: -- truncate time stamp
461: END IF;
462:
463:

Line 1204: SELECT TRUNC(SYSDATE) into p_x_revision_tbl(i).obsolete_date FROM DUAL;

1200: p_x_revision_tbl(i).revision_status_code = 'OBSOLETE'
1201: THEN
1202: -- IF p_x_revision_tbl(i).obsolete_date IS NULL
1203: -- THEN
1204: SELECT TRUNC(SYSDATE) into p_x_revision_tbl(i).obsolete_date FROM DUAL;
1205: -- truncate time stamp
1206: -- END IF;
1207: END IF;
1208: