RPGIV @ Work

A unique site for RPG and System i Lovers

Welcome!

Hi, this site will provide all what you need in System i and RPG developments.

My Name is Chamara Withanachchi, System i Expert and RPG Developer. And in the field for last 11 years.

I hope you will find lot of valuable information from this site

Last Day of the Month Print E-mail
User Rating: / 1
PoorBest 
Written by Chamara Withanachchi   
 D #DateISO        S               D   DatFmt(*ISO)                         
                                                                            
  /Free                                                                     
                                                                            
    // Retrieve end of month date (last day of month)                       
    //  %date() may be replaced by any date field                           
    #DateISO=(%date()+%months(1))-%days(%subdt((%date()+%months(1)):*days));
    *INLR = *ON;                                                            
                                                                            
  /end-free        

User Comments

Please login or register to add comments

<Previous   Next>