* Advanced Revelation and OpenInsight filing system action codes.
EQU READ.RECORD TO 1
EQU READO.RECORD TO 2
EQU WRITE.RECORD TO 3
EQU DELETE.RECORD TO 4
EQU LOCK.RECORD TO 5
EQU UNLOCK.RECORD TO 6
EQU SELECT TO 7
EQU READNEXT TO 8
EQU CLEARSELECT TO 9
EQU CLEARFILE TO 10
EQU OPEN.FILE TO 11
EQU CREATE.FILE TO 12
EQU RENAME.FILE TO 13
EQU MOVE.FILE TO 14
EQU DELETE.FILE TO 15
EQU OPEN.MEDIA TO 16
EQU CREATE.MEDIA TO 17
EQU READ.MEDIA TO 18
EQU WRITE.MEDIA TO 19
EQU UNLOCK.ALL TO 20
EQU FLUSH TO 21
EQU INSTALL TO 22
*EQU RESERVED TO 23
*EQU RESERVED TO 24
*EQU RESERVED TO 25
EQU OMNI.SCRIPT TO 26
* Following OMNI.SCRIPT sub-codes are passed in the FMC
EQU OMNIBUS_LIST$ TO 'GROUP_NUMBER'
EQU OMNIBUS_CALL$ TO 0 ;* Required
EQU SMART_TEST$ TO 1 ;* Required - returns 0 in FLAG if
* bond is NOT smart. Otherwise returns
* an intelligence factor in FLAG.
EQU SCRIPT_CALL$ TO 2 ;* Intelligent database language script
* for smart bonds only
EQU SCRIPT_OK_CALL$ TO 3 ;* For smart bonds only. If true then
* asynchronous processesing is used.
EQU CLOSE.MEDIA TO 27
EQU RECORD.COUNT TO 28
EQU REMAKE.FILE TO 29
EQU CREATE.INDEX TO 30
EQU DELETE.INDEX TO 31
EQU UPDATE.INDEX TO 32
EQU SELECT.INDEX TO 33
EQU READNEXT.INDEX TO 34
* Source Date: 16:41:43 12 JAN 1993 Build ID: OI*1.0.10 Level: 2.0