#!/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

foreach sector "38 40" {
    exec sddsprocess ./../glitchLogs/Srf1.atrig.template \
      /tmp/Srf1.sector.$sector \
      -reedit=col,ControlName,%/<sector>/${sector}/ \
      -reedit=col,ReadbackName,%/<sector>/${sector}/
    lappend fileList /tmp/Srf1.sector.$sector
}
eval exec sddscombine ./../glitchLogs/Srf1.atrig.misc $fileList \
  -pipe=out -merge | sddssort -col=ControlName -pipe -unique -numericHigh \
  | sddsprocess -pipe -edit=column,SimpleControlName,ControlName,S?/./K \
  | sddsselect -pipe /home/helios/oagData/pvdata/iocRecNamesOAG.sdds \
  -match=SimpleControlName=rec_name -nowarning -reuse \
  | sddsconvert -pipe=in ./../glitchLogs/Srf1.atrig \
  -delete=column,SimpleControlName -delete=parameter,NumberCombined

sdds load ./../glitchLogs/Srf1.atrig data
append data(ParameterNames) " InstallLocation"
set data(Parameter.InstallLocation) [list /home/helios/oagData/glitchLogs/Srf1/Srf1.atrig]
set data(Layout.DataMode.Mode) "ascii"
sdds save ./../glitchLogs/Srf1.atrig data

eval file delete -force $fileList 
set fileList ""

foreach sector "36 37" {
    exec sddsprocess ./../glitchLogs/Srf2.atrig.template \
      /tmp/Srf2.sector.$sector \
      -reedit=col,ControlName,%/<sector>/${sector}/ \
      -reedit=col,ReadbackName,%/<sector>/${sector}/
    lappend fileList /tmp/Srf2.sector.$sector
}
eval exec sddscombine ./../glitchLogs/Srf2.atrig.misc $fileList \
  -pipe=out -merge | sddssort -col=ControlName -pipe -unique -numericHigh \
  | sddsprocess -pipe -edit=column,SimpleControlName,ControlName,S?/./K \
  | sddsselect -pipe /home/helios/oagData/pvdata/iocRecNamesOAG.sdds \
  -match=SimpleControlName=rec_name -nowarning -reuse \
  | sddsconvert -pipe=in ./../glitchLogs/Srf2.atrig \
  -delete=column,SimpleControlName -delete=parameter,NumberCombined

sdds load ./../glitchLogs/Srf2.atrig data
append data(ParameterNames) " InstallLocation"
set data(Parameter.InstallLocation) [list /home/helios/oagData/glitchLogs/Srf2/Srf2.atrig]
set data(Layout.DataMode.Mode) "ascii"
sdds save ./../glitchLogs/Srf2.atrig data

eval file delete -force $fileList 

