D66Q #MACRO QUOTIME
D6LB #SKIP %A
D762 #SKIP
D7KL ! ZERO QUOTIME INVALID
D85= #SKIP %A
D8JW (
D94G #MEND CONSTANT
D9J6 #TRANSFER AQUOTIME
D=3Q %A
D=HB #END
D?32 )
D?GL #NORMAL