wenn immer die gleiche datei gemeint ist, so gib diese eben im cmd an
Code:
pgm                                                              
                                                                 
  dcl &newfile *char  10 /* neuer FileName   */                  
  dcl &date    *char   6 /* Datum            */                  
                                                                 
  rtvsysval qdate &date                                          
                                                                 
  chgvar &newfile ('MyFile' *tcat %sst(&date 1 4))                  
                                                                 
  cpyf MyLib/MyFile MyLib/&newfile mbropt(*replace) crtfile(*yes)
                                                                 
endpgm
gruß ronald

[Dieser Beitrag wurde von malzusrex am 31. März 2003 editiert.]