NomenclaturesBalance(NmkClassId As Long) As INomenclaturesBalance ( PropertyGet )
Получить интерфейс "Остатки по номенклатуре"
Синтаксис:
objectvariable.NomenclaturesBalance( NmkClassId )
objectvariable -
ITcs_Inventory
NmkClassId - идентификатор класса номенклатуры
Возвращает: указатель на
NomenclaturesBalance
Пример на VB:
Dim TCS As CSDN.TCS
Dim App As CSDN.Tcs_Application
Sub Test()
Call Login
If App.NmkClasses.RunModuleForSelect("Выберите класс", False) Then
I = App.Inventory.NomenclaturesBalance(App.NmkClasses.Properties("ID").AsInteger).ShowModal("Остатки по номенклатуре")
End If
End Sub
Sub Login()
If TCS Is Nothing Then Set TCS = CreateObject("CSDN.TCS")
If App Is Nothing Then Set App = TCS.Login
End Sub