636: l_effective_date DATE;
637:
638: BEGIN
639:
640: PO_DEBUG.debug_stmt(l_log_head,l_progress,'Start');
641: l_progress:=010;
642:
643: --BUG#7046429 p_effective data can be passed as NULL.
644: l_effective_date := nvl(p_effective_date,TRUNC(sysdate));
669:
670:
671: EXCEPTION
672: when OTHERS THEN
673: PO_DEBUG.debug_stmt(l_log_head,l_progress,'No data found');
674: RETURN FALSE;
675: END;
676: END IF;
677: l_progress:=020;
675: END;
676: END IF;
677: l_progress:=020;
678: IF X_flag='Y' THEN
679: PO_DEBUG.debug_stmt(l_log_head,l_progress,'Record found');
680: RETURN TRUE;
681: ELSE
682: PO_DEBUG.debug_stmt(l_log_head,l_progress,'No data found');
683: RETURN FALSE;
678: IF X_flag='Y' THEN
679: PO_DEBUG.debug_stmt(l_log_head,l_progress,'Record found');
680: RETURN TRUE;
681: ELSE
682: PO_DEBUG.debug_stmt(l_log_head,l_progress,'No data found');
683: RETURN FALSE;
684: END IF;
685: END is_PO_active;
686: