= 1 then hngnm1 = Split(hngnm(1), "/") end if prcpvolnms = hngnm1(0)&"/"&"{@prcpvolnm1}" formula =prcpvolnms ]]>= 1 then hngnm1 = Split(hngnm(1), "/") end if prcpvolnms = hngnm1(0)&"/"&"{@prcpvolnm2}" formula =prcpvolnms ]]>= 1 then hngnm1 = Split(hngnm(1), "/") end if prcpvolnms = hngnm1(0)&"/"&"{@prcpvolnm3}" formula =prcpvolnms ]]>= 1 then hngnm1 = Split(hngnm(1), "/") end if prcpvolnms = hngnm1(0)&"/"&"{@prcpvolnm4}" formula =prcpvolnms ]]>= 1 then hngnm1 = Split(hngnm(1), "/") end if prcpvolnms = hngnm1(0)&"/"&"{@prcpvolnm5}" formula =prcpvolnms ]]>
"" then if drugtmspect(i) >= 2400 & drugtmspect(i) < 4800 then tmpdrugtmspect = drugtmspect(i) - 2400 else if drugtmspect(i) >= 4800 & drugtmspect(i) < 7200 then tmpdrugtmspect = drugtmspect(i) - 4800 else if drugtmspect(i) >= 7200 & drugtmspect(i) < 9600 then tmpdrugtmspect = drugtmspect(i) - 7200 else if drugtmspect(i) >= 9600 & drugtmspect(i) < 12000 then tmpdrugtmspect = drugtmspect(i) - 9600 end if if tmpdrugtmspect > 1200 then if Mid(tmpdrugtmspect,3,2) == 00 then drugtmspectime = Mid(tmpdrugtmspect-12,1,2) & "P" else Mid(tmpdrugtmspect,3,2) > 00 then drugtmspectime = Mid(tmpdrugtmspect-12,1,2) & ":" & Mid(tmpdrugtmspect,3,2) & "P" else if tmpdrugtmspect <= 1200 then if Mid(tmpdrugtmspect,3,2) == 00 then drugtmspectime = Mid(tmpdrugtmspect,1,2) & "A" else Mid(tmpdrugtmspect,3,2) > 00 then drugtmspectime = Mid(tmpdrugtmspect,1,2) & ":" & Mid(tmpdrugtmspect,3,2) & "A" end if end if Next formula = drugtmspectime]]>