home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Datafile PD-CD 1B
/
DATAFILE_PDCD1B.iso
/
_pocketbk
/
pocketbook
/
003
/
dutil2_zip
/
DATAUTIL.OPA
/
DATAUTIL.txt
next >
Wrap
Text File
|
1994-08-08
|
5KB
|
422 lines
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<D
SHAREHI
ABOUT"K
PRERR