DoMultiUpdateProp(Prop As IProp,Options As MultiUpdatePropOptions) As Long

DoMultiUpdateProp(Prop As IProp,Options As MultiUpdatePropOptions) As Long ( Function )

Изменить значение свойства по выделеным записям

Синтаксис:

objectvariable.DoMultiUpdateProp( Prop, Value, Options )

objectvariable - IGModule2

Prop - свойство Prop

Value - значение свойства

Options - значение из tagMultiUpdatePropOptions

Возвращает: количество измененных записей

Пример на VB Script:

Sub Test()
    Dim I
    Dim NMks
    
    If TCSApp.NmkClasses.RunModuleForSelect("Выберите класс", False) Then
    
        Set NMks = TCSApp.Nomenclatures(TCSApp.NmkClasses.Properties("ID").AsInteger)
        
        If NMks.RunModuleForSelect("Выделите записи", True) Then
            If TCSApp.Mesuriments.RunModuleForSelect( "Выберите единицу измерения", False ) Then
                I = NMks.DoMultiUpdateProp( NMks.Properties("MESUR_ID"), TCSApp.Mesuriments.Properties("ID").AsInteger, 1 Or 4 Or 8 )                                     
            End If 
        End If
    
        Set NMks = Nothing
    
    End If
End Sub