######################################################################
#
# Macro Name    : g:/mining/surpac/survey/ug/rod.tcl
#
# Version       : Surpac Vision V5.0-K
#
# Creation Date : Mon Jan 31 14:12:58 2005
#
# Description   : 
#
######################################################################

set status [ SclFunction "STRINGS OVER DTM" {
  frm00209={
    {
      dtmloc="bm-cent"
      dtmid="$Levela"
      swadesc="Y"
      bdyopt="N"
      interp="N"
      inploc="ring"
      rinpid="$Level"
      strange=""
      outloc="ring"
      outid="$Level"
    }
  }
  frm00121={
    {
      _action="apply"
    }
  }
  frm00608={
    {
      strfld1="D9"
      op1="="
      dtmfld1="D1"

    }
  }
}]

set status [ SclFunction "STRINGS OVER DTM" {
  frm00209={
    {
      dtmloc="bm-cent"
      dtmid="$Levelc"
      swadesc="Y"
      bdyopt="N"
      interp="N"
      inploc="ring"
      rinpid="$Level"
      strange=""
      outloc="ring"
      outid="$Level"
    }
  }
  frm00121={
    {
      _action="apply"
    }
  }
  frm00608={
    {
      strfld1="D10"
      op1="="
      dtmfld1="D1"

    }
  }
}]

set status [ SclFunction "STRINGS OVER DTM" {
  frm00209={
    {
      dtmloc="bm-cent"
      dtmid="$Levele"
      swadesc="Y"
      bdyopt="N"
      interp="N"
      inploc="ring"
      rinpid="$Level"
      strange=""
      outloc="ring"
      outid="$Level"
    }
  }
  frm00121={
    {
      _action="apply"
    }
  }
  frm00608={
    {
      strfld1="D11"
      op1="="
      dtmfld1="D1"

    }
  }
}]

