image of READY prompt

Wang2200.org

Listing of file='IDS2sINQ' on disk='vmedia/701-2740.wvd.zip'

### Logical Record 0
"\E1IDS2sINQ\A6\ECu\A7.@\A6\ED/\03Is\D0\09!\D2\10&\A6\C9@\00\00\00        1IDSLIBR0                           DATAFI"
"LE                                                z\0B\01\03\03\00\00  2TJB111111              "
"                                                                                  S"
"AMPLE SCREEN FOR RANDOM INQUIRY INTO FILE # 1                                   KEY"
" IS 'FIELD001'; MESSAGE IS ON FIELD 'LAST'                               LAST FIELD"
" BRANCHES BACK TO KEY AFTER CLEARING SCREEN              FIELD001:                 "
"                                                                                   "
"                                                   FIELD002:                       "
"                                                                                   "
"                                             FIELD003:                             "
"                                                                                   "
"                                       FIELD004:                                   "
"                                                                                   "
"                                 FIELD005:                                         "
"                                                                                   "
"                           FIELD006:                                               "
"                                                                                   "
"                     FIELD007:                                                     "
"                                                                                   "
"               FIELD008:                                                           "
"                                                                                   "
"         FIELD009:                                                                 "
"                                                                                   "
"   FIELD010:                                                                       "
### Logical Record 1
"\0A\00\18 \15y\81\14\00\0A\00\B00\15q\80\14\00\0A\01P@\15q\80\14\00\0A\01\F0P\15q\80\14\00\0A\02\90`\15q\80\14\00\0A\030p\15q\80\14\00\0A\03\D0\80\15q\80\14\00\0A\04p\90\15q\80\14\00\0A\05\10\A0\15q\80\14\00\0A\05"
"\B0\B0\15q\80\14\00\01\06`\B8\9F\98\01\14\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00"
"\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\01\12\03T"
### Logical Record 2
"FIELD001FIELD002FIELD003FIELD004FIELD005FIELD006FIELD007FIELD008FIELD009FIELD010LAS"
"T                                                                                  "
"                                                                                   "
### Logical Record 3
" f\03.\00IDS2sINQFIELD001                                                              "
"                                                                                   "
"                                                                                   "
### Logical Record 4
" h\03.\00IDS2sINQFIELD001                                    BHDISPMSG1                "
"                                                                                   "
"                                                                                   "
### Logical Record 5
" l\03.\00IDS2sINQFIELD001Enter key field for desired record                            "
"                                                                                   "
"                                                                                   "
### Logical Record 6
" \86#.\00IDS2sINQFIELD001 FILE # 11   NIFILE # 1FILE # 1DYFFIELD001                    "
"        10                                                                         "
"                                                                                   "
### Logical Record 7
" \88#.\00IDS2sINQFIELD001                                    BHDISPERR1IFFLGDOFBQFIELD0"
"01IFFLGDOFBUFIELD001        BQLAST                                                 "
"                                                                                   "
### Logical Record 8
" \8C#.\00IDS2sINQFIELD001Record does not exist -- re-enter                             "
"                                                                                   "
"                                                                                   "
### Logical Record 9
" f\03.\00IDS2sINQLAST                                                                  "
"                                                                                   "
"                                                                                   "
### Logical Record 10
" h\03.\00IDS2sINQLAST                                                          BHDISPMS"
"G1                                                                                 "
"                                                                                   "
### Logical Record 11
" l\03.\00IDS2sINQLAST    Key 'EXEC' to recall another record, '31 to cancel.           "
"                                                                                   "
"                                                                                   "
### Logical Record 12
" f%.\00IDS2sINQLAST                                                                  "
"                                                                                   "
"                                                                                   "
### Logical Record 13
" h%.\00IDS2sINQLAST                                        B SKIP02PFIFLFK=32BHRINGBE"
"LL        BQLAST            BIBLANKFLDIDS2sINQBUFIELD001        BQFIELD001         "
"                                                                                   "
### Logical Record 14
" l%.\00IDS2sINQLAST                                                                  "
"  Loading menu program                                            Specified menu pr"
"ogram does not exist                                                               "