home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Phoenix CD 2.0
/
Phoenix_CD.cdr
/
01e
/
let12.zip
/
READ-DB.LET
< prev
next >
Wrap
Text File
|
1987-09-17
|
402b
|
10 lines
Rec=(+ Rec 1)
Deleted=(replace (read DB-File (+ 139 (* Rec 87)) 1) " " "No" "*" "Yes")
FirstName=(trim (read DB-File (+ 140 (* Rec 87)) 10))
LastName=(trim (read DB-File (+ 150 (* Rec 87)) 12))
Street=(trim (read DB-File (+ 162 (* Rec 87)) 32))
City=(trim (read DB-File (+ 194 (* Rec 87)) 20))
State=(trim (read DB-File (+ 214 (* Rec 87)) 2))
ZIP=(trim (read DB-File (+ 216 (* Rec 87)) 10))