image of READY prompt

Wang2200.org

Listing of file='IDS2sS35' on disk='vmedia/701-2718B.wvd.zip'

### Logical Record 0
"\E1IDS2sS35\CE<\AE?,4>(t\8E\802\96\19\00\CAX\EF\CA@3\C2X\C0        1IDSSCRNF                                 "
"                                                  r&\0C\06\06\00\00 17TJB093082 IDEAS        "
"                                                      Release 2.1                  "
"                                                                                   "
"           File access options                                                     "
"     0  No Read, Set Field Only (No Optional Read Allwd)  SEQUENCE                 "
"  1  Random record with key specified                  Conditional Y/N?           2"
"  First logical record with key >= that specified   Only if SYSFLAG =          3  N"
"ext logical record                                                                 "
"                                              Data file                  Options 1 "
"& 2 require a key specification below :    Access option =                    F/C F"
"ield/Constant                      Len  Only if SYSFLAG =          Key spec        "
"                                     Else use option                               "
"                                  Error message on                                 "
"                               Record read mode                                    "
"                            Inquiry=I,Update=U                                     "
"                                                                                   "
"                       If record is found set    Option 3 assumes the following :  "
"                    work buffer area for                                           "
"                 field/file:                 1. Option 2 Find First Logical record "
"has been      equal to record buffer         performed on the file prior to this re"
"ad         field/file:                 2. No sequential record read has been perfor"
"med     If record is found             on other files since last option 2 or 3 read"
".    set System Flag =                                                             "
### Logical Record 1
"\19\00\10\00\0Ep\80\00\00"\01\A0\00Bp\80\14\00\07\03\C0\10\02p@\14\00\09\040\18\02p@\14\00\01\04\C0\08\02\00\00\14\00\01\04\D0\08\06\00\00\14\00\08\05 \10\17p\80\14\00\08\05\A0\18\17p\80\14\00\02\81\93 #\01\80\14\00\01\04"
"\F0(%\80\80TN\01\05\000!P\80\14\00\01\05\100%\80\80\14\00\08\068@\17p\80 \00\01\06\B8H%\00\80 \00\01\06\C0P!P\80\14\00\01\06\D0P%\80\80\14\00\01\06\E0X%\00\80\00\00\01\06\F0`%\80\80\14\00\01\07\00h"
"%p\80\14\00\08\07\10\90\1Dp\80\00\00\08\07\90\A0\1Dp\80\00\00\01\08\10\B0#P\80\14\00\01\08 \B0'\80\80\14\00\01\080PKp\80\14\00$\08@PQp\80\14\00\02\0A\80P\9Bp\80\14\00\01\0A\A0XKp\80\14\00$\0A\B0XQp"
"\80\14\00\02\0C\F0X\9Bp\80\14\00\01\0D\10`Kp\80\14\00$\0D `Qp\80\14\00\02\0F``\9Bp\80\14\00\01\0F\80hKp\80\14\00$\0F\90hQp\80\14\00\02\11\D0h\9Bp\80\14\00\01\11\F0pKp\80\14\00$\12\00pQp\80\14"
"\00\02\14@p\9Bp\80\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\16'\07R!\00\00%\08'\07R\16\00\07%\13\00\00\19\12\00\00\19\09\00\00\19\05\00\02\19\08\00\07\19\02'\05R\02\00\03\19\00\00\01y"
### Logical Record 2
"MOD TYPEOP DESC SCRN/RPTOPPROMPTTYPECODERECORD #FILE ID FIELD/OPSEQUENCECONDIT'NSYS"
"FLAG#FLGSTATEFILENAMEOPTION 1READFLG#FLAGCONDOPTION 2ERR MSG?READMODESETFIELDFROM F"
"LDSET FLAGSET CONDKEY1 F/CKEY1 VALKEY1 LENKEY2 F/CKEY2 VALKEY2 LENKEY3 F/CKEY2 VALK"
"EY2 LENKEY3 F/CKEY4 VALKEY4 LENKEY5 F/CKEY5 VALKEY5 LEN                            "
"                                                                                   "
"                                                                                   "