This code shows how to insert a command in the Manager that displays a dialog that shows the minimum and maximum number of appendices allowed in the current form definition. It uses MinNoOfAppendices and MaxNoOfAppendices.
Function OnAppStart() As Long
Application.MngrAddMenuItem(1,true,"No. of appendices","",true)
OnAppStart = EV_OK
End Function
Function OnAppUserDefined1() As Long
Dim lstrRes as string
Dim lintMin as integer
Dim lintMax as integer
lintMin = ManagerApp.FormDef.MinNoOfAppendices
lintMax = ManagerApp.FormDef.MaxNoOfAppendices
lstrRes = "Min. appendices: " & lintMin & " Max. appendices: " & lintMax
msgbox lstrRes
OnAppUserDefined1 = EV_OK
End Function