address "ISREDIT";"macro (whocall)"    /*rexx*/
   /*author: David McRitchie, "The REXX Macros Toolbox", 1993/12/17 */
   started = time('l') "started"
   if whocall \= "" then whocall = whocall "-- "
   zfnote = "line_before .zfirst = noteline"
   /* SYSVAR() not available on SPF/PC */
   date1 = left(date('s'),4)"/"substr(date('s'),5,2)"/"right(date('s'),2)
   ended   = time('l') "on" date1
   zfnote "'"||whocall/*||sysvar("sysicmd")*/started", ended at" ended"'"
   exit 0