Sage-ST

Sage-ST ä
Objexit
Documentation

Close	DefineIOProc	Edit	Execute
GetExtraData	GetLastError	GetLibraryName	HistoricalLink
IsDone	IsOpen	LargeBitmapId	LinkOccurred
ObjectClassDes	ObjectClassName	ObjectComponentName	Open
RegisterClass	SetExtraData	SetLinkInfo	SmallBitmapId
StoreDefault	ValidObject


  PROCEDURE Close
             (VAR   dataH : SYSTEM.ADDRESS);


  PROCEDURE Edit
             (CONST dataH : SYSTEM.ADDRESS);


  PROCEDURE DefineIOProc
             (CONST IPROC : ObjDef.IOProc);


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


  PROCEDURE GetExtraData
             (CONST dataH : SYSTEM.ADDRESS;
              VAR   extra : SYSTEM.ADDRESS);


  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 IsDone
             (CONST dataH : SYSTEM.ADDRESS) : BOOLEAN;


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


  PROCEDURE LargeBitmapId
             (CONST dataH : SYSTEM.ADDRESS) : CARDINAL;


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


  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 Open
             (CONST ExitName       : ARRAY OF CHAR;
              CONST instanceNumber : CARDINAL;
              CONST extra          : SYSTEM.ADDRESS;
              VAR   dataH          : SYSTEM.ADDRESS);


  PROCEDURE RegisterClass;


  PROCEDURE SetExtraData
             (CONST dataH     : SYSTEM.ADDRESS;
              CONST extraData : SYSTEM.ADDRESS);


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


  PROCEDURE SmallBitmapId
             (CONST dataH : SYSTEM.ADDRESS) : CARDINAL;


  PROCEDURE StoreDefault
             (CONST editFlag   : BOOLEAN;
              VAR   objectName : ARRAY OF CHAR;
              CONST objectDes  : ARRAY OF CHAR;
              VAR   ObjID      : CARDINAL);


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