PREPARE AFILE Examples


Example 1:

 

  

PREP

EMP,"EMPL","EMPL1":

  

  

"U,3-5,10-20","100"

 

Logical file:

EMP

Text file:

EMPL.??? (.TXT under SUNDB86x or as defined in screen definition file under PLBCM.)

AAM file:

EMPL1.??? (.AAM under SUNDB86x or as defined in screen definition file under PLBCMP)

Key info:

(2 keys (3-5 & 10-20), wildcard is `?'(default), non-case sensitive searches (U))

Record length:

100

Mode:

SHARE (by default)

 

Example 2:

 

  

PREP

EMP,"EMPL","EMPL2":

  

  

"D=^,1-15,20-25","150",EXCLUSIVE

 

Logical file:

EMP

Text file:

EMPL.??? (.TXT under SUNDB86x or as defined in screen definition file under PLBCMP)

AAM file:

EMPL2.??? (.AAM under SUNDB86x or as defined in screen definition file under PLBCMP.)

Key info:

(2 keys (1-15 & 20-25), wildcard is `^', case sensitive searches)

Record length:

150

Mode:

EXCLUSIVE

 

Parameters given as literals could have been variables.

 

Example 3:

 

AFILE

AFILE

WEOF

XMODE

INTEGER

4

.

 

 

CMP_EOR_CR

INTEGER

4,"0x1" ;CR only

CMP_EOR_CRLF

INTEGER

4,"0x2" ;CRLF

CMP_EOR_LF

INTEGER

4,"0x4" ;LF only

CMP_EOR_LFCR

INTEGER

4,"0x8" ;LFCR

CMP_OPEN_MASK

INTEGER

4,"0x70" ;

CMP_SHARE

INTEGER

4,"0x0" ;Share mode

CMP_EXCLUSIVE

INTEGER

4,"0x10" ;Exclusive mode

CMP_SHARENF

INTEGER

4,"0x20" ;Share NoFlush

CMP_READ

INTEGER

4,"0x40" ;Read mode

CMP_NOTRUNC

INTEGER

4,"0x400" ;NO TRUNCATION

.

 

 

  

CLEAR

XMODE

  

OR

CMP_EOR_CR,XMODE

  

OR

CMP_SHARENF,XMODE

  

OR

CMP_NOTUNC,XMODE

  

PREP

AFILE,"filelst":

  

  

"filelstx","1-5","20",MODE=XMODE

.

 

 

  

WRITE

AFILE;"KEY1X678901234567890"

  

CLOSE

AFILE

 

Logical file:

AFILE

Text file:

filelst.??? (.TXT under SUNDB86x or as defined in screen definition file under PLBCMP.)

AAM file:

filelstx.??? (.AAM under SUNDB86x or as defined in screen definition file under PLBCMP.)

Key info.:

(2 keys (1-5 & 20), case sensitive searches)

Record length:

20

Mode:

CR only, Share No Flush and no truncation

 

Example 4:

 

  

PREP

EMP,"C:\PAYROLL\EMPL","C:\INDEX\EMPL1|209.20.30.5:503":

  

  

"U,3-5,10-20","100"

 

Logical file:

EMP

Text file:

C:\PAYROLL\EMPL.??? (as defined in screen definition file) at the server.

AAM file:

C:\INDEX\EMPL1.??? (as defined in screen definition file.) at the server

Key Info:

(2 keys (3-5 & 10-20), wildcard is `?'(default), non-case sensitive searches (U))

Record length:

100

Server address:

209.20.30.5

Server port:

503

Mode:

SHARE (by default)

 

Example 5:

 

  

PREP

EMP,"textfile","aamfile":

  

  

CANCELCHAR="ESC",CHECKTIME=1

 

Logical file:

EMP

Text file:

textfile.??? (as defined in screen definition file.)

AAM file:

aamfile.??? (as defined in screen definition file.)

Mode:

SHARE (by default)

Cancel key:

the ESCape key

Check interval:

one second

 



PL/B Language Reference POWER Example PREPARE (FILE) Examples