#!/bin/sh  
# \
exec oagtclsh "$0" "$@"

set auto_path [linsert $auto_path 0  /usr/local/oag/apps/lib/$env(HOST_ARCH)]
set auto_path [linsert $auto_path 0 /usr/local/oag/lib_patch/$env(HOST_ARCH)]

APSStandardSetup

proc PlotLast24Hours {} {
    set time [clock seconds]

    set columns "PF:D1109:BackRackRmTemp PF:D1109:LftApplRackTemp PF:D1109:MCRWinFrmTemp PF:D1109:RmCntrClmnTemp PF:D1109:TopRack6Temp PF:D1109:NodeRmTemp PF:D1109:UtilityRmTemp PF:D1109:ElectRmTemp PF:D1109:RmBackClmnTemp D1109:RR7I:HotAisleTemp D1109:RR7I:ColdAisleTemp D1109:FCU704:RtrnAirTemp D1109:FCU704:DischAirTemp D1109:RR7H:HotAisleTemp D1109:RR7H:ColdAisleTemp D1109:FCU705:RtrnAirTemp D1109:FCU705:DischAirTemp D1109:RR6J:HotAisleTemp D1109:RR6J:ColdAisleTemp D1109:FCU706:RtrnAirTemp D1109:FCU706:DischAirTemp D1109:RR5F:HotAisleTemp D1109:RR5F:ColdAisleTemp D1109:FCU707:RtrnAirTemp D1109:FCU707:DischAirTemp D1109:RR3G:HotAisleTemp D1109:RR3G:ColdAisleTemp D1109:FCU708:RtrnAirTemp D1109:FCU708:DischAirTemp D1109:RR4C:HotAisleTemp D1109:RR4C:ColdAisleTemp D1109:FCU709:RtrnAirTemp D1109:FCU709:DischAirTemp D1109:RR1B:HotAisleTemp D1109:RR1B:ColdAisleTemp D1109:FCU710:RtrnAirTemp D1109:FCU710:DischAirTemp D1109:RRCtls:HotAisleTemp D1109:RRCtls:ColdAisleTemp D1109:FCU711:RtrnAirTemp D1109:FCU711:DischAirTemp"
    foreach col $columns {
        append fileList [APSFindPVDataFiles \
            -ReadbackName $col \
            -SampleIntervals 128 \
            -startDateList [clock format [expr {$time - 86400}] -format "%Y %j %m %d"] \
            -endDateList [clock format $time -format "%Y %j %m %d"]]
    }
    if {[llength $fileList]==0} {
        return
    }
    set fileList  [lsort $fileList]

    set datafile /tmp/[APSTmpString]
    APSAddToTempFileList $datafile
    if {[catch {eval exec sddscombinelogfiles $fileList -pipe=out | sddsprocess -pipe=in $datafile -filter=column,Time,[expr {$time - 86400}],$time} result]} {
        return -code error $result
    }

    catch {eval exec sddsplot $datafile -layout=1,1 -mode=y=linear,x=linear -ticks=xtime -legend "-column=Time,(PF:D1109:BackRackRmTemp,PF:D1109:LftApplRackTemp,PF:D1109:MCRWinFrmTemp,PF:D1109:RmCntrClmnTemp,PF:D1109:TopRack6Temp,PF:D1109:NodeRmTemp,PF:D1109:UtilityRmTemp,PF:D1109:ElectRmTemp,PF:D1109:RmBackClmnTemp)"  -graph=line,vary,eachfile -end "-column=Time,(D1109:RR7I:HotAisleTemp,D1109:RR7H:HotAisleTemp,D1109:RR6J:HotAisleTemp,D1109:RR5F:HotAisleTemp,D1109:RR3G:HotAisleTemp,D1109:RR4C:HotAisleTemp,D1109:RR1B:HotAisleTemp,D1109:RRCtls:HotAisleTemp)"  -graph=line,vary,eachfile "-column=Time,(D1109:RR7I:ColdAisleTemp,D1109:RR7H:ColdAisleTemp,D1109:RR6J:ColdAisleTemp,D1109:RR5F:ColdAisleTemp,D1109:RR3G:ColdAisleTemp,D1109:RR4C:ColdAisleTemp,D1109:RR1B:ColdAisleTemp,D1109:RRCtls:ColdAisleTemp)" -graph=symbol,connect=subtype,vary=subtype,eachfile \"-topline=Aisle Temps\" -end "-column=Time,(D1109:FCU704:RtrnAirTemp,D1109:FCU705:RtrnAirTemp,D1109:FCU706:RtrnAirTemp,D1109:FCU707:RtrnAirTemp,D1109:FCU708:RtrnAirTemp,D1109:FCU709:RtrnAirTemp,D1109:FCU710:RtrnAirTemp,D1109:FCU711:RtrnAirTemp)"  -graph=line,vary,eachfile "-column=Time,(D1109:FCU704:DischAirTemp,D1109:FCU705:DischAirTemp,D1109:FCU706:DischAirTemp,D1109:FCU707:DischAirTemp,D1109:FCU708:DischAirTemp,D1109:FCU709:DischAirTemp,D1109:FCU710:DischAirTemp,D1109:FCU711:DischAirTemp)" -graph=symbol,connect=subtype,vary=subtype,eachfile  \"-topline=Vent Temps\"}

}

PlotLast24Hours
