Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
stringvar n;
if isnull({pPC60403.CAUSE_CODE}) then
n := " "
else
n := ({pPC60403.CAUSE_CODE});
if isnull({@start_dd})then
n := n & " "
else
n := n & ({@start_dd});
if isnull({@outage_time})then
n := n & " "
else
n := n & ({@outage_time});
n;
Local StringVar outString := "";
if {pPC60403.HDR_RECORD_STATUS}="O"
then (if {pPC60403.HDR_START_DATE}<{?START_DATE} then outstring := "0*"
else outstring := Cstr({pPC60403.HDR_START_DATE},"dd") )
else (if {pPC60403.LIR_START_DATETIME}<{?START_DATE} then outstring := "0*"
else outstring := Cstr({pPC60403.HDR_START_DATE},"dd") );
outString
Dim outage_hour As Number
if IsNull({@outage_secs}) or {@outage_secs} < 360 then
outage_hour = .1
else
outage_hour = ({@outage_secs} / 3600)
end if
formula = ToText(outage_hour,"000.0",1,"","")
if isnull({pPC60403.FFA_REMOTE_BASE_IDENT}) or {pPC60403.FFA_REMOTE_BASE_IDENT} = "" then
n := space(3)
else
n := ({pPC60403.FFA_REMOTE_BASE_IDENT}) + space(3-length({pPC60403.FFA_REMOTE_BASE_IDENT}));