ibmi-brunch-learn

Announcement

Collapse
No announcement yet.

Prevent 00/00/00 in a 6,0 field

Collapse
X
 
  • Filter
  • Time
  • Show
Clear All
new posts

  • Prevent 00/00/00 in a 6,0 field

    Cobwebs are cluttering my mind...
    I have a report using 6,0 fields as date fields with an edit code of "Y". When the date is not available, they don't want to see the 00/00/00.

    How do I do this easily?
    Everyday's a school day, what grade are you in?

  • #2
    Code:
    dcl-s printDate char(8);
    
    if date = 0;
      printDate = *blanks;
    else;
      printDate = %editc(date:'Y');
    endif;

    Comment

    Working...
    X