Metrologic IS1000 Series Guia do Utilizador descarregar pdf (Página 160)

154

CipherLab BASIC Compiler

User's Guide

For example, if DBF 1 contains four records: 011-231, 120-117, 043-010, 067-150.

The key (index) of the first associate IDX is defined as starting at position 1 with

length of 3, and the key (index) of the second associate IDX is defined as starting at

position 5 with length of 3. All the file pointers of the DBF and IDX files are

currently pointing to the last record.

DBF 1 IDX 1 IDX 2

011-231 011-231 043-010

120-117 043-010 120-117

043-010 067-150 067-150

→

067-150

→

120-117

→

011-231

Then, DEL_RECORD(1) will delete 067-150, DEL_RECORD(1,1) will delete

120-117, DEL_RECORD(1,2) will delete 011-231.

Example

ON COM(1) GOSUB HostCommand

...

HostCommand:

Cmd$ = READ_COM$(1)

CmdIdentifier$ = LEFT$(Cmd$, 1)

DBFNum% = VAL(MID$(Cmd$, 2, 1))

IDXNum% = VAL(MID$(Cmd$, 3, 1))

CardID$ = RIGHT$(Cmd$, LEN(Cmd$)-3)

IF CmdIdentifier$ = "-" THEN

DEL_RECORD(DBFNum%, IDXNum%)

ELSE

...

Sem comentários

Metrologic IS1000 Series Guia do Utilizador Página 160