OPLObjectFile** LOC::M:\OPL\DUTIL2.OPL DATAUTIL.DBF \DAT\ SEARCH% SFIND$ FUNC% FOPEN% EXIT% FONT% TOTAL% FPOS% FLEN% SCRWDTH% SCRLINE% TEMP$ FTITLE$ TITLE% RECDIS% ENTRY% MOVE% TEXT$ FLDCNT% SHREC% VLEFT% VRIGHT% VPOS% ENTPOS% SCROLL& MAXPOS& MAXFLD% REMIND% SHARE ABOUT LISTDAT MENUSEL SHOWREC FINDTXT A.T.Abbey 1994K END OF FILE SAVESET SHARE DATASORT SETFLDW ABOUT FONTSEL FINDTEXT SHOWREC FINDTXT EXIT% FOPEN% SCROLL& TITLE% RECDIS% FUNC% SCRLINE% MOVE% FPOS% SFIND$ SEARCH% VLEFT% SCRWDTH% MAXPOS& Files+ OpenOo+ Save SettingsOs+ ExitOx Sort+ Sort the DataOS Display+ Toggle Display ModeOd+ Set FontOF+ Set Field WidthsOw+ Toggle Title ON/OFFOt+ Toggle Display Rec No.Or+ Set Scroll WidthOm Search+ Find TextOf+ Find NextOn+ Find PreviousOp+ List All FoundOl+ Jump To EntryOj Help+ KeysOk+ AboutOa Oo@[] +)Do You Wish To Save The Current Settings? YESOY+ W7Oy@[ Om@[4 % Of Screen Width for scrollO +)Do You Wish To Save The Current Settings? YESOY+ W7Oy@[ O,h@[ NON CRITICAL - FILE CLOSE ERROR DATABASE NEEDS COMPRESSING( EITHER IGNORE THIS MESSAGE( + PLEASE USE THE COMPRESS FACILITY( IN THE PSION DATABASE FILE MENU( +%USE THIS UTILITY TO SORT THE DATABASE( Od@[: Oj@[B JUMP TO RECORD Record No:O Ow@[4 OF@[0 Op@[u No More Found On@[X No More Found {QOd{U}WBIx {QOd{U}WBMx ENTRY% WARNING Sorting Data on a large fileO Can take some timeO Sorting is not recommendedO with files on a FLASH RAMO Do You Wish To Sort the File? YESOY+ W7On@[ O,h@[ NON-CRITICAL FILE CLOSE ERROR DATABASE NEEDS COMPRESSING( +%DATAUTIL MAY CORRECT THIS DURING SORT( IF ANY OTHER ERRORS OCCUR( + PLEASE USE THE COMPRESS FACILITY( IN THE PSION DATABASE FILE MENU( VPOS% ENTRY% VLEFT% SCROLL& MOVE% FONT% SCRWDTH% SCRLINE% EXIT% TITLE% RECDIS% FOPEN% \dat\*.dbf SETFLDW ENTRY% FOPEN% FLEN% FONT% SCRWDTH% SCRLINE% TITLE% RECDIS% SCROLL& MAXPOS& MAXFLD% LOC::M:\ .DUTK FONT% SCRWDTH% SCRLINE% TITLE% RECDIS% SCROLL& FONT% SCRWDTH% SCRLINE% TITLE% RECDIS% SCROLL&! PRESS ANY KEY SHOWREC SFIND$ SEARCH% ENTER TEXT TO BE FOUND Find: NO MATCHES FOUND PRTFIELD ENTPOS% VPOS% SCRLINE% TITLE% SHREC% RECDIS% FTITLE$ FLEN% FLDCNT% PRTLIN SHARE SCRWDTH% SCRLINE% TITLE% FTITLE$ FLDCNT% REMIND% SEARCH% SCROLL& MAXFLD% VIEW RECORD -ESC to Exit *MORE FIELDS* VIEW RECORD -ESC to Exit + VIEW RECORD -ESC to Exit ****** MAIN MENU ****** ------- SEARCH MODE ------- {QOd{U}WBIx {QOd{U}WBMx SCRWDTH% PRTFIELD SETFLDW FONTSEL TEXT$ TITLE% SHREC% VPOS% RECDIS% FTITLE$ FLEN% FLDCNT% SCRLINE% VLEFT% SCROLL& SCRWDTH% MAXPOS& +"ENTER TEXT TO BE FOUND (List Mode) Find: ****** SEARCH FOR: NO MORE FOUND ****** SEARCH FOR: {QOd{U}WBIx {QOd{U}WBMx SCRWDTH% RECDIS% SHREC% VRIGHT% VLEFT% VPOS% SCRLINE% FONT% SCRWDTH% SCRLINE% Font Selection Font+ Series3 Normal,Series3 Bold,Series3 Digits,SmallMono,Roman 8 pixel,Roman 11 pixel,Roman 13 pixel,Roman 16 pixel,Swiss 8 pixel,Swiss 11 pixel,Swiss 13 pixel,Swiss 16 pixel,Small Mono FONT% FLEN% FLDCNT% FTITLE$ SCRWDTH% CALCULATING WIDTHSO Total Records: Records Read: PRESS ESC TO STOP CALCULATION {U}WB FIELD AVERAGE CURRENT TITLE **NEW** TOTAL Items: +6(S)et, (M)ax, (A)verage or (No.) of field to change +:(ESC) Exits without changes. ** Current Screenwidth = Fields: Om@`[. Oa@`[. O:0\[ Field to Change? Field to Change? Width for field Os@`[- ERROR% HANDLE% CHAR& FIELD% READFILE PRINTFLD ENTRY% FLDCNT% FTITLE$ TEMP$ DATABASE FILE FilenameO PLEASE WAITO {_0A[ {_1A[ FILE READ ERROR {_:A[ ERROR% HANDLE% FIELD% TEMP$ FIELD% FLEN% FONT% SCRWDTH% SCRLINE% TITLE% RECDIS% SCROLL& LOC::M:\ .DUTK FONT% SCRWDTH% SCRLINE% TITLE% RECDIS% SCROLL& FONT%$ SCRWDTH%$ SCRLINE%$ TITLE%$ RECDIS%$ SCROLL&% SETTINGS SAVED SHARE ABOUT ABOUT HELP: KEYS: DATAUTIL General( Moving around the Database( Individual Record Mode( Searching the Database( About DATAUTIL( + KEYS USED OK+ Open File( Save Settings( Toggle Display Mode( Show Record No. Toggle( shift FK+ Change Font( shift SK+ Sort Database( Change Field Widths( Exit Program( MOVING IN THE DATABASE Next Record( Previous Record( HOME+ First Record( Last Record( Exit ( Set Scroll Width( Horizontal Scroll( ShiftO End Of Field( INDIVIDUAL RECORD MODE Toggles Mode( ENTER+ Next Record( DELETE+ Previous Record( Vertical Scroll( Horizontal Scroll( ShiftO End Of Field( Return to Main Menu( SEARCHING THE DATABASE FK+ Find Text( NK+ Find Next( Find Previous( Find Text, List Mode( Jump to Record No.( + K or HELPK+ Keys Used( Exit from Searches( DATABASE UTILITY Tony Abbey July 1994KO UNREGISTEREDO +#This Program is issued as SharewareO +.If you find it useful, please send 8 + SAE toO Tony AbbeyO 4 Broadacre Close, BredonO Tewkesbury, Glos. GL20 7NWO +7A Copy - Nag Screens and Beeps Will Then Be Sent To YouO WAIT-UNREGISTERED!!O WHY NOT REGISTER?O IT ONLY COSTS 8.00O ABOUT DATAUTIL A Utility for ViewingO Database Files on the PSION 3AO Version 2.0O Tony AbbeyKO 4 Broadacre CloseO BredonO TewkesburyO Glos. GL20 7NWO VPOS% VLEFT% STPOS% ENPOS% REMLEN% MFWDTH% VPOS VLEFT STPOS ENPOS REMLEN MFWDTH VPOS VLEFT STPOS2 ENPOS REMLEN SHOWDATA MENUSEL DATASORT LOAD~ FINDTEXT LISTDATi SHOWREC PRTLIN FINDTXT PRTFIELD/+ FONTSEL?- SETFLDW`/ MAIN*; READFILE PRINTFLDm@ SAVESET KEYS