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 "