Change part of Date output to Alpha

[SL100guy]

I can't figure out how to get iMonth to reflect a three character alpha output for dateFileName i.e. OUTPUT: 12 AUG 2009.

The second part of this request for assistance is to ask how to convert the 2009 output to 09 output instead. FINAL OUTPUT: 12 AUG 09

SCRIPT:

string datefilename

proc main
clear
datefilename = ""
file_date()
endproc

proc file_date
integer iMonth, iDay, iYear, iHour, iMin, iSec
ltimeints $LTIME iMonth iDay iYear iHour iMin iSec
strfmt dateFileName " %02d %02d %02d" iYear iDay iMonth
termmsg dateFileName
endproc

 

[kodr]

This code comes from the help file (ltimeints):

proc main
   integer Month, Day         ; Integers to contain date and
   integer Year, Hour         ; time converted from long
   integer Min, Sec           ; date and time.
   string MonStr              ; String to contain month.

   ; Convert long time value into it's counter parts, year,
   ; month, day, hour, min, and sec.
   ltimeints $LTIME Year Month Day Hour Min Sec
   monthstr Month MonStr   ; Get the month in string format.
   usermsg "Month is %s and it's day %d." MonStr Day

endproc

 

[knob]

To answer the second part about turning 2009 into 09, you can use the strdelete command to remove the two leading digits from the year as such:

strdelete iYear 0 2

http://www.aspectscripting.com

 

[SL100guy]

Thanks that got me pointed in the right direction. I got what I need now. Cheers!