SingleBalanceDocFromID(DocumentID As Long) As ISingleBalanceDocument ( PropertyGet )


Получить учетный документ по его идентификатору

Синтаксис:

objectvariable.SingleBalanceDocFromID( DocumentID )

objectvariable - ITcs_Inventory

DocumentID - идентификатор учетного документа

Возвращает: указатель на SingleBalanceDocument


Пример на VB Script:
Sub Test()
    Dim I
    Dim IDBalanceDocument
    Dim SingleBalanceDocument
    
    If TCSApp.Inventory.BalanceDocuments.RunModuleForSelect("Выберите учетный документ", False) Then
    
        IDBalanceDocument = TCSApp.Inventory.BalanceDocuments.Properties("ID").AsInteger
    
        Set SingleBalanceDocument = TCSApp.Inventory.SingleBalanceDocFromID( IDBalanceDocument )
        I = SingleBalanceDocument.ShowModal("Учетный документ")
        Set SingleBalanceDocument = Nothing
    
    End If
        
End Sub