APPS.AHL_DI_DOC_REVISION_PUB dependencies on DUAL

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

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

Line 347: SELECT SYSDATE into l_sysdate FROM DUAL;

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

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

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

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

1179: p_x_revision_tbl(i).revision_status_code = 'OBSOLETE'
1180: THEN
1181: -- IF p_x_revision_tbl(i).obsolete_date IS NULL
1182: -- THEN
1183: SELECT TRUNC(SYSDATE) into p_x_revision_tbl(i).obsolete_date FROM DUAL;
1184: -- truncate time stamp
1185: -- END IF;
1186: END IF;
1187: