READ

Files With Sequential Access Mode

Syntax

readSequentialFile ( <file>, <buffer>[, <into>], [locking] )

Parameters

<file>

The file id of the file to be read.

<buffer>

The file buffer, the content that will be read.

<into> (Optional)

Data from the file buffer will be copied into this variable.

<locking> (Optional)

Locking mode (only when open for I-O)

Examples

READ SequentialFile.

readSequentialFile(sequentialfile, fd_Seqdata);

READ SequentialFile INTO recorddata.

readSequentialFile(sequentialfile, fd_Seqdata, locDef.recorddata);

READ SequentialFile INTO recorddata
    AT END MOVE "Ended" TO filestatus

if (!(readSequentialFile(sequentialfile, fd_Seqdata, locDef.recorddata))) {
    locDef.filestatus.assign("Ended");
}

Indexed Files With Sequential Retrieval

Syntax

readRandomAccessFileNextRecord ( <file>, <buffer>[, <into>] )

Parameters

<file>

The file id of the file to be read.

<buffer>

The file buffer, the content that will be read.

<into> (Optional)

Data from the file buffer will be copied into this variable.

<locking> (Optional)

Locking mode (only for I-O).

Examples

READ IndexedFile NEXT RECORD INTO recorddata.

readRandomAccessFileNextRecord(indexedfile, fd_Idxdata, locDef.recorddata);

Indexed Files With Random Retrieval

Syntax

readRandomAccessFile ( <file>, <buffer>, <index>, <locateValue> [, <into>] )

Parameters

<file>

The file id of the file to be read.

<buffer>

The file buffer, the content that will be read.

<index>

The index key defined with the file.

<locateValue>

The value to look for (Key phrase).

<into> (Optional)

Data from the file buffer will be copied into this variable.

<locking> (Optional)

Locking mode (only for I-O).

Examples

READ IndexedFile.

readRandomAccessFile(indexedfile, fd_Idxdata, idx_Idxkey, fd_Idxdata.idxkey);

READ IndexedFile INTO recorddata.

readRandomAccessFile(indexedfile, fd_Idxdata, idx_Idxkey, fd_Idxdata.idxkey, locDef.recorddata);

READ IndexedFile INTO recorddata KEY Idxkey
    INVALID KEY MOVE "Invalid key" TO filestatus
    NOT INVALID KEY MOVE "OK" TO filestatus.

if (!(readRandomAccessFile(indexedfile, fd_Idxdata, idx_Idxkey, fd_Idxdata.idxkey, locDef.recorddata))) {
    locDef.filestatus.assign("Invalid key");
} else {
    locDef.filestatus.assign("OK");
}

Relative Files

Syntax

readRandomAccessFilePosition ( <file>, <buffer>, <position>[, <into>] )

Parameters

<file>

The file id of the file to be read.

<buffer>

The file buffer, the content that will be read.

<position>

The record key field.

<into> (Optional)

Data from the file buffer will be copied into this variable.

Examples

READ RelativeFile.

ReadRandomAccessFilePosition(Relativefile, m_Fd_Reldata, m_LocDef.Relkey.Value);

READ RelativeFile INTO recorddata.

ReadRandomAccessFilePosition(Relativefile, m_Fd_Reldata, m_LocDef.Relkey.Value, m_LocDef.Recorddata);