Fred van der Windt wrote:
I am all for constants like...

SEC_HOUR DC    F'3600'


I prefer to let the assembler do the work, especially when processing
TOD clock values:

&SecsIn1Hr   SETA 60*60                     1hr = 60 min * 60 secs
      LM    R14,R15,=FL8S12'&SecsIn1Hr.E6' Get 60 mins value
      L     R1,=FS(12-20)'&SecsIn1Hr.E6'   Get 60 mins value

--
Edward E Jaffe
Phoenix Software International, Inc
831 Parkview Drive North
El Segundo, CA 90245
310-338-0400 x318
edja...@phoenixsoftware.com
http://www.phoenixsoftware.com/

Reply via email to