s sql = "SELECT * FROM "_Document_" WHERE ID = "_IDDOC  
                  s DocValues = ..ReturnSQLResultSet(sql) // подстановка значений из документа
                  S columns = DocValues.GetColumnCount()
                  while DocValues.Next(){ 
                  
                        For col =  1 : 1 :columns {
                            s ColName = "["_DocValues.GetColumnName(col)_"]"  
                            if $FIND(Expression,ColName) '= 0 {
    	                        s FieldDate = ""
    	                        s FieldDate = DocValues.GetData(col)
                                         // не работают
    	                        //if FieldDate = "<<$C(0)>>" set FieldDate = ""
                                        //s FieldDate = $G(FieldDate )
                                       // if $FIND(FieldDate,"$C") '=  0   set FieldDate = ""

    	                        s ^aa(col) = FieldDate
	                            if FieldDate = "" { // Если значение отсутствует
	                               S Expression=$TRANSLATE(Expression,ColName," = NULL")
	                            } else{
	                               S Expression=$TRANSLATE(Expression,ColName,FieldDate)
		                        }
                            }
                            
                          } 
                  }

if FieldDate = $C( 0 )