Sage-ST

Sage-ST ä
Objsequence
Documentation

Close	DefineIOProc	DoFinalize	DoInitialize
Edit	Execute	GetChildObject	GetLastError
GetLibraryName	HistoricalLink	InitInstance	LinkOccurred
ObjectClassDes	ObjectClassName	ObjectComponentName	Open
RegisterCallback	RegisterClass	Run	SetLinkInfo
TerminateObject	TotalChildObjects


  PROCEDURE Close
             (VAR   dataH : SYSTEM.ADDRESS);


  PROCEDURE DefineIOProc
             (CONST IPROC : ObjDef.IOProc);


  PROCEDURE DoInitialize
             (CONST dataH : SYSTEM.ADDRESS) : BOOLEAN;


  PROCEDURE DoFinalize
             (CONST dataH : SYSTEM.ADDRESS) : BOOLEAN;


  PROCEDURE Edit
             (CONST dataH : SYSTEM.ADDRESS);


  PROCEDURE GetChildObject
             (CONST objectID    : CARDINAL;
              CONST childNumber : CARDINAL;
              VAR   childID     : CARDINAL;
              VAR   Occurrence  : CARDINAL);


  PROCEDURE GetLastError
             (CONST dataH : SYSTEM.ADDRESS;
              VAR   Error : INTEGER;
              VAR   Des   : ARRAY OF CHAR);


  PROCEDURE GetLibraryName
             (VAR   libraryName : ARRAY OF CHAR);


  PROCEDURE HistoricalLink
             (CONST dataH       : SYSTEM.ADDRESS;
              VAR   Link        : INTEGER;
              VAR   exitType    : INTEGER;
              VAR   interface   : INTEGER;
              VAR   ObjectLabel : ARRAY OF CHAR;
              VAR   done        : BOOLEAN);


  PROCEDURE LinkOccurred
             (CONST dataH       : SYSTEM.ADDRESS;
              VAR   Link        : INTEGER;
              VAR   exitType    : INTEGER;
              VAR   interface   : INTEGER;
              VAR   ObjectLabel : ARRAY OF CHAR;
              VAR   done        : BOOLEAN);


  PROCEDURE Open
             (CONST sequenceName   : ARRAY OF CHAR;
              CONST instanceNumber : CARDINAL;
              CONST extra          : SYSTEM.ADDRESS;
              VAR   dataH          : SYSTEM.ADDRESS);


  PROCEDURE Execute
             (CONST dataH : SYSTEM.ADDRESS;
              CONST proc  : ObjDef.GeneralProc);


  PROCEDURE ObjectClassDes
             (VAR   Des : ARRAY OF CHAR);


  PROCEDURE ObjectClassName
             (VAR   ClassName : ARRAY OF CHAR);


  PROCEDURE ObjectComponentName
             (CONST dataH         : SYSTEM.ADDRESS;
              VAR   componentName : ARRAY OF CHAR);


  PROCEDURE TerminateObject
             (CONST dataH : SYSTEM.ADDRESS);


  PROCEDURE TotalChildObjects
             (CONST objectID : CARDINAL) : CARDINAL;


  PROCEDURE RegisterClass;


  PROCEDURE RegisterCallback
             (CONST dataH      : SYSTEM.ADDRESS;
              CONST objType    : ARRAY OF CHAR;
              CONST objName    : ARRAY OF CHAR;
              CONST objectID   : CARDINAL;
              CONST ActionProc : ObjDef.GeneralProc);


  PROCEDURE Run
             (CONST sequenceName : ARRAY OF CHAR;
              CONST UProc        : ObjDef.GeneralProc;
              VAR   Link         : INTEGER);


  PROCEDURE SetLinkInfo
             (CONST dataH       : SYSTEM.ADDRESS;
              CONST Link        : INTEGER;
              CONST exitType    : INTEGER;
              CONST interface   : INTEGER;
              CONST ObjectLabel : ARRAY OF CHAR;
              CONST isLink      : BOOLEAN);


  PROCEDURE InitInstance
             (VAR   extra : SYSTEM.ADDRESS);