[Info-vax] OpenVMS - DCL - Data entry filtering

Phillip Helbig undress to reply helbig at asclothestro.multivax.de
Fri Mar 27 18:12:04 EDT 2015


In article <mf4jdf$ahn$1 at dont-email.me>, David Froble
<davef at tsoft-inc.com> writes: 

> So, you want a unique filename.  This should work in most cases ....
> 
> $ ! Get date in YYYY-MM-DD format
> $
> $ T = f$cvtime(f$time())
> $
> $ ! Now convert to YYYYMMDD format
> $
> $ YY = f$extract(0,4,T)
> $ MM = f$extract(5,2,T)
> $ DD = f$extract(8,2,T)
> $ HH = f$extract(11,2,T)
> $ NN = f$extract(14,2,T)
> $ SS = f$extract(17,2,T)
> $ XX = f$extract(20,2,T)
> $
> $ D = YY + MM + DD + HH + NN + SS + XX
> $
> $ write sys$output D

Much quicker: 

   $  WRITE SYS$OUTPUT F$UNIQUE()




More information about the Info-vax mailing list