SingleCalculateDocFromID(DocumentID As Long) As ISingleCalculateDocument ( PropertyGet )


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

Синтаксис:

objectvariable.SingleCalculateDocFromID( DocumentID )

objectvariable - ITcs_Inventory

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

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


Пример на VB Script:
Sub Test()
    Dim I
    Dim IDCalculateDocument
    Dim SingleCalculateDocument
    
    If TCSApp.Inventory.CalculateDocuments.RunModuleForSelect("Выберите расчетный документ", False) Then
    
        IDCalculateDocument = TCSApp.Inventory.CalculateDocuments.Properties("ID").AsInteger
    
        Set SingleCalculateDocument = TCSApp.Inventory.SingleCalculateDocFromID( IDCalculateDocument )
        I = SingleCalculateDocument.ShowModal("Расчетный документ")
        Set SingleCalculateDocument = Nothing
    
    End If
        
End Sub