Discussion Topics > Script BASIC

BOI ACL

(1/1)

John Spikowski:
The following is an example of the Sage 100 BOI API instantiating a ACL AR_Customer lookup.


--- Code: Script BASIC ---' BOI - ACL AR_Customer IMPORT BOI.sbi oscript = BOI::CREATE(:SET, "ProvideX.Script")BOI::CBN oScript, "Init", :CALL, "C:\\Sage\\Sage 100 Standard\\MAS90\\Home"osession = BOI::CBN(oscript, "NewObject", :SET, "SY_Session")BOI::CBN osession, "nSetUser", :CALL, "JRS", "MyPassword"BOI::CBN osession, "nsetcompany", :CALL, "ABC"BOI::CBN osession, "nSetModule", :CALL, "A/R"mdate = BOI::CBN(osession, "sModuleDate", :GET)BOI::CBN osession, "nSetDate", :CALL, "A/R", mdateBOI::CBN(osession, "nSetProgram", :CALL, BOI::CBN(osession, "nLookupTask", :CALL, "AR_Customer_ui"))ocust = BOI::CBN(oscript, "NewObject", :SET, "AR_Customer_bus", osession)oui = BOI::CBN(oscript, "NewObject", :SET, "AR_Customer_ui", osession)BOI::CBN(oui, "nInvokeLookup", :CALL, "AR_Customer", retval) PRINT retval,"\n" BOI::CBN ocust, "DropObject"BOI::CBN osession, "DropObject"BOI::RELEASE oscript 

C:\ScriptBASIC\BOI>scriba acltest.sb
01SAGE
C:\ScriptBASIC\BOI>

Navigation

[0] Message Index