Add workstates, filtered for page level, to a combo box

Build 1501 on 14/Nov/2017  This topic last edited on: 21/Mar/2016, at 18:44

Adding workstates, filtered for page level, to a combo box

Dim workstate As InputDlg.Combo = New InputDlg.Combo

workstate.AddItem(TeraDP.GN4.WinUI.Properties.Resources.STR_NONE, 0)

For Each ws As Schema.Class.workstateObj In EditorialLogin.Get().GetWorkstates()

  If ws.levelsAttr.Get(Schema.Class.workstateObj.levelsEnum.PageVal) Then

    workstate.AddItem(ws.nameAttr, ws.idAttr)

  End If

Next