Visual Basic Accpac Controls

[ROM21]

Does anyone know where I can get documentation for the Accpac controls for visual basic. In particular:

AccpacAR1300UIctrl
AccpacOE1100UIctrl

 

[ROM21]

Ooppss, sorry forgot to post Accpac Version: 5.2/5.3

 

[Jay Converse]

There is no documentation. What do you want to know?

 

[ROM21]

I'd like to hide a fiew of the tabbed fields and some of the option boxes.

ie. Processing Tab
Territory field.

etc

 

[Jay Converse]

Run the Accpac UI Info utility to get all the UI control names, then put statements like this:

AccpacOE1100UICtrl1.UIAppControls("afeoeordhlocation1").Visible = False

 

[ROM21]

Where do I get the UI info utility?

 

[Jay Converse]

Start/Programs/Accpac/Tools

 

[ROM21]

Thanks

 

[ROM21]

Hey tuba when I try to do the following:

AccpacOE1100UICtrl1.UIAppControls("afeOEORDHterritory3").Visible = False

I get a message from the compiler saying that I "can't assign to a read-only property" How do I fix this?

 

[Jay Converse]

Sorry about that, use .MacroVisibleFlag instead.

 

[ROM21]

Thanks, any way to hide some of the menu Tabs i.e Taxes Tab? I printed out the UI control names but can't seem to find the tab names.

 

[Jay Converse]

Try these samples I got from another forum:

Dim WithEvents tabCtl As TabDlg.SSTab

Private Sub AccpacOE1100UICtrl1_OnUIAppOpened()
Set tabCtl = AccpacOE1100UICtrl1.UIAppControls("stbOrderEntry").GetControl
End Sub

Private Sub tabCtl_Click(ByVal PreviousTab As Integer)
MsgBox "Tab clicked"
End Sub

From full VB:

Dim WithEvents tabctl As VBControlExtender

Private Sub AccpacBK1600UICtrl1_OnUIAppOpened()
Set tabctl = AccpacBK1600UICtrl1.UIAppControls("tbOptions").GetControl
End Sub

Private Sub tabctl_ObjectEvent(Info As EventInfo)
If Info.Name = "Click" Then
MsgBox ("tab clicked")
End If
End Sub