This (IMO unwanted) change in functionality occurred at 10.0. I have
written a user conversion to return the time greater than 24 hours:
01: SUBROUTINE U2134(ANSWER,STATUS,DATA,CONVTYPE)
0002: * OCONV to show hours > 24 after UV10 changes hh:mm
0003: *
0004: * CATALOG AS $2134 e.g. CATALOG BP $2134 U2134
0005: *
0006: * DAN 7.5.04
0007: SECONDS = ABS(DATA)
0008: MINUTES = SECONDS / 60
0009: MINUTES += 0.5
0010: MINUTES = INT(MINUTES)
0011: HOURS = MINUTES / 60
0012: HOURS = INT(HOURS)
0013: MINUTES = MINUTES - (HOURS * 60)
0014: IF HOURS < 10 THEN HOURS = '0':HOURS
0015: ANSWER = HOURS:':':('00':MINUTES)[2]
0016: IF DATA < 0 THEN ANSWER = '-':ANSWER
0017: END
HTH
========================
David Norman
Senior Software Engineer
SA Ambulance Service
Box 3, GPO
Adelaide, South Australia 5001
*+61 8 8274 0384
* fax +61 8 8271 4844
* [EMAIL PROTECTED]
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/
