February 29th

[John Backus]

Some versions of Powerhouse on an HP3000 system might utilize a workaround
like the following:

DEFINE HP_DD   = JCW("HPDATE")
DEFINE HP_MM   = JCW("HPMONTH")
DEFINE HP_YY   = JCW("HPYEAR")
DEFINE HP_CCYY = JCW("HPYYYY")
DEFINE SYSDATEC  CHA*6=(ASCII(HP_YY,2)+ASCII(HP_MM,2)+ASCII(HP_DD,2))
DEFINE SYSDATEN  NUM*6  = NCONVERT(SYSDATEC)

John Backus
Beechglen Development, Inc.
www.beechglen.com



= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
Subscribe: "subscribe powerh-l" in message body to majordomo@lists.swau.edu
Unsubscribe: "unsubscribe powerh-l" in message to majordomo@lists.swau.edu
This list is closed, thus to post to the list, you must be a subscriber.