PIQInfo.rsc!:\system\OPL\PIQInfo.rscPIQInfo.opo!:\system\OPL\PIQInfo.opoPIQInfo.mbm!:\system\OPL\PIQInfo.mbmPocket IQ Library!
Copyright
Version:Visit us at www.PocketIQ.comPocket IQ information noticeThis file is an essential shared elementof Pocket IQ applications. Please do notdelete or alter in way, as doing so mayaffect applications in the Pocket IQ range.ContinuePutting the IQ back in shareware
d:\development\IQText\IQText.opm!:\system\opm\IQText.OPMPocket IQ - IQText OPM7
D:\Development\IQText\IQText
IQText
+-Copyright
2000 RedFoot Software & Pocket IQO
+-Freeware Clip text, Buffer and Editor utility(
+0IQText is not designed to run as a 'Stand Alone'O
+%application. Do not modify or delete!(
+1The latest version of this OPM is available from:O
www.PocketIQ.comO
ContinueO
IQ_PBUFFADDR&
IQ_PLEN&
IQ_PTEXT&
IQ_TEMP1$
IQ_TEMP2$
IQ_SIX$
IQ_CR$
IQ_LF$
IQ_BYTECOUNT&
IQ_FILEHANDLE%
IQ_BYTE%
IQ_RET%
IQ_ITED&
IQ_JTED%
IQ_CLIPID%
+8B&;
IQ_GET_BUFFER_TEXT_SIZE&
IQ_WRITE
IQ_WRITEBUF
IQ_WRITEB
IQ_CLIPID%
C:\System\Data\Clpboard.cbd(
IQ_CLIPID%
IQ_WRITE
IQ_CLIPID%
}wom$
IQ_CLIPID%
IQ_POKEDATA
IQ_SAVEFILE%
IQ_SIX$
IQ_CR$
IQ_LF$
IQ_PBUFFADDR&
IQ_PLEN&
IQ_PTEXT&
IQ_BYTECOUNT&
IQ_RET%
IQ_FILEHANDLE%
IQ_ITED&
IQ_TEMP1$
IQ_TEMP2$
IQ_JTED%
Opening file. Please wait ...O
O$hD[
REVOC[
Series 7C
netBookC`[
IQ_TEMP1$
IQ_PTEXT&
IQ_BYTECOUNT&
IQ_PLEN&
IQ_PBUFFADDR&
IQ_PTEXT&
IQ_RET%
IQ_FILEHANDLE%
IQ_TEMP2$
IQ_BYTE%
Saving File...
DO_NOT_LAUNCH1
IQ_TEXT_LINK
IQ_CREATE_CTBUFFER&
IQ_DELETE_BUFFER
IQ_ADD_STRING_TO_BUFFER
IQ_GET_STRING_FROM_BUFFER_END$
IQ_GET_BUFFER_TEXT_SIZE&
IQ_COPY_BUFFER_TO_CLIP
IQ_WRITEB
IQ_WRITEBUF=
IQ_WRITE
IQ_EDITOR%
IQ_POKEDATA#
IQ_SAVEFILE%
SYSTEM\
SYSRAM1
c:\Programs\Pythia\export.opl
File: EXPORT.OPO
Version: 2.6
+0 This file cannot be executed by itself
+> Copyright
1998-1999 Palmscape & PYTHIA Information
CHANGESET$
EXPORTFORMAT
EXPORTFIELDS
EXPORTNOTES
GETFILENAME$
OPENFILE%
WRITETOKEN
WRITEFIELD
READTOKEN$
IMPORTERROR
IMPORTNOTE
IMPORTFIELD
NEXTID$
STORETEXT
ACTIVEWINDOWS
APPSHORT$
MAXNOTESIZE%
IMPORTDATA$
CU_COUNT&
CU_POS&
.expK
export.dbf select formatset, file,format,field,lastfield,prefile,postfile,prerecord,postrecord,startrecord,prefield,postfield,Note_NoOfLines,Note_LineWidth from format
FORMATSET$
FILE$
FORMAT%
FIELD$
LASTFIELD%
PREFILE$
POSTFILE$
PRERECORD$
POSTRECORD$
STARTRECORD%
PREFIELD$
POSTFIELD$
NOTE_NOOFLINES%
NOTE_LINEWIDTH%
FORMATSET$#
Import/Export parametersO
+ <No Sets>
FORMATSET$#
,...K
FORMATSET$#
SetOs+
FormatOf+
LabelOl+
CabinetOc+
NotesOn+
ExportOx+
ImportOm+
CancelO
FORMATSET$#
FILE$#
FORMAT%
STARTRECORD%
FIELD$#
LASTFIELD%
PREFILE$#
+ POSTFILE$#
PRERECORD$#
POSTRECORD$#
STARTRECORD%
+ PREFIELD$#
POSTFIELD$#
NOTE_NOOFLINES%
NOTE_LINEWIDTH%
Export
Import
Import/Export canceled
ExportC[
Enter file to exportO
ExportO
Export canceled
Exporting
+Iexport.dbf select name, prompt from export where seq<>'9999' order by seq
NAME$
PROMPT$
Exporting :+
NAME$#
PROMPT$#
NAME$#
PROMPT$#
ImportC[(
Enter file to importO
ImportO
Import canceled
Importing
Opening
+Iexport.dbf select name, prompt from export where seq<>'9999' order by seq
NAME$
PROMPT$
<EOF>C
<EOF>Cd[
<EOF>C
<EOF>C[
PROMPT$#
NotesC[+
PROMPT$#
PROMPT$#
PROMPT$#
NotesC[+
PROMPT$#
<EOF>C[
PROMPT$#
PROMPT$#
NotesC[+
PROMPT$#
<EOF>C[
PROMPT$#
Importing O
ElemSequenceO
F10$'
F11%$
F14$'
F15&%
F16$'
F17$'
F18$'
F19&%
F20$'
ETYPE$'
NOTESO
.dbfKO
<EOF>C[
Could not import this file. W
- KW
R {IO
NOOFACTIVESCREENS%
PROMPT$
IMPORTDATA$
SHOWERROR
Expected:
(length: K
) - Found: K
(length: K
SETUPMULTILINE
GETMULTILINE$
export.dbf select file,format,field,lastfield,prefile,postfile,prerecord,postrecord,startrecord,prefield,postfield,Note_NoOfLines,Note_LineWidth from format where formatset='
FILE$
FORMAT%
FIELD$
LASTFIELD%
PREFILE$
POSTFILE$
PRERECORD$
POSTRECORD$
STARTRECORD%
PREFIELD$
POSTFIELD$
NOTE_NOOFLINES%
NOTE_LINEWIDTH%
PREFILE$#
+ POSTFILE$#
PRERECORD$#
POSTRECORD$#
+ PREFIELD$#
POSTFIELD$#
FORMAT%
STARTRECORD%
FIELD$#
LASTFIELD%
Export formatO
Format+ List,Form
+ File HeadO
+ File FootO
Before RecordO
After RecordO
End with 'After Record'
Field separator
End with field separator
Before FieldO
After FieldO
SaveOs+
CancelO
W7Os@[
FORMAT%$
PREFILE$'
+ POSTFILE$'
PRERECORD$'
POSTRECORD$'
+ PREFIELD$'
POSTFIELD$'
STARTRECORD%$
FIELD$'
LASTFIELD%$
DATESTR$
EXPORTNOTE
WRITETOKEN
PROMPT$
F10$#
F11%
F14$#
F15&!
F16$#
F17$#
F18$#
F19&!
F20$#
NotesC[0
+<export.dbf select name,prompt, seq from export where ftype='
' order by seqK
NAME$
PROMPT$
+)Field sequence (empty fields are skipped)O
SEQ$#
9999C[
SEQ$#
NAME$#
PROMPT$#
CancelO
SEQ$'
SEQ$'
+Kexport.dbf select name,prompt, seq from export where ftype='N' order by seq
NAME$
PROMPT$
+Nexport.dbf select note_NoOfLines, Note_LineWidth from format where formatset='
NOTE_NOOFLINES%
NOTE_LINEWIDTH%
SEQ$#
9999C[
SEQ$#
NOTE_NOOFLINES%
NOTE_LINEWIDTH%
Settings for export of notesO
Sequence No
Number Of LinesO
Line WidthO
CancelO
SEQ$'
SEQ$'
NOTE_NOOFLINES%$
NOTE_LINEWIDTH%$
WRITETOKEN
FETCHTEXT&
MAXNOTESIZE%
APPSHORT$
+Nexport.dbf select note_NoOfLines, Note_LineWidth from format where formatset='
NOTE_NOOFLINES%
NOTE_LINEWIDTH%
NOTESO
.dbfKO
NOTE_NOOFLINES%
NOTE_NOOFLINES%
@`\[V
NOTE_LINEWIDTH%
NOTE_LINEWIDTH%
0\d[!
NOTE_NOOFLINES%
READLINE$
SHOWERROR
+Nexport.dbf select note_NoOfLines, Note_LineWidth from format where formatset='
NOTE_NOOFLINES%
NOTE_LINEWIDTH%
NOTE_NOOFLINES%
NOTE_NOOFLINES%
NOTE_LINEWIDTH%
O$h@[
NOTE_LINEWIDTH%
CHOICEDIALOG$
+2Export.dbf select formatset, formatset from formatO
New Name
+*Enter name of new export/import format set
export.dbf select formatset, file,format,field,lastfield,prefile,postfile,prerecord,postrecord,startrecord,prefield,postfield,Note_NoOfLines,Note_LineWidth from format
FORMATSET$
FILE$
FORMAT%
FIELD$
LASTFIELD%
PREFILE$
POSTFILE$
PRERECORD$
POSTRECORD$
STARTRECORD%
PREFIELD$
POSTFIELD$
NOTE_NOOFLINES%
NOTE_LINEWIDTH%
FORMATSET$'
+9export.dbf select formatset from format where formatset='
FORMATSET$
+"Edit export/import format set name
FORMATSET$'
export.dbf select formatset, file,format,field,lastfield,prefile,postfile,prerecord,postrecord,startrecord,prefield,postfield,Note_NoOfLines,Note_LineWidth from format where formatset='
FORMATSET$
FILE$
FORMAT%
FIELD$
LASTFIELD%
PREFILE$
POSTFILE$
PRERECORD$
POSTRECORD$
STARTRECORD%
PREFIELD$
POSTFIELD$
NOTE_NOOFLINES%
NOTE_LINEWIDTH%
EXPORT
IMPORTFIELD
IMPORTERROR
EXPORTFORMAT
WRITEFIELD
EXPORTFIELDSl
EXPORTNOTES
EXPORTNOTE>
IMPORTNOTEP
CHANGESET$
SYSRAM1
SYSTEM\
D:\programs\Cabinet\cabinet.opl
File: CABINET.OPO
Version: 2.1.3
+0 This file cannot be executed by itself
+; Copyright
1998-2000 Marc de Oliveira & PocketIQ
FINDOPM$
IQ_TEXT_LINK
iqtext.opmO
DoRun2O
EVENT
PROCESS
ERROR_HANDLER
SHIFT%
CONTROL%
APPTITLE$
APPVER$
EMAIL$
TBAROFFER%
POINTER_EVENT
FINDLAST
FINDFIRST
ACTIVEWINDOWS
FINDNEXT
FINDPREVIOUS
NEXTELEM
PREVIOUSELEM
DISPLAY_MENU
ACTION_KEY
SHIFT%
CONTROL%
{A`[n
'{A`[
TOOLSWITCH
ABOUT
REREGISTER
FINDNEXT
FINDPREVIOUS
FINDLAST
FINDFIRST
DOPERSONALINFO
DOBOTTLEINFO
DOLISTVIEW
BOTTLENOTES
DELETEELEM
NEWBOTTLE
ACTIVEWINDOWS
DOSELECTELEMTYPE
FINDELEM
FINDNOTE
SFINDELEM
DOEXPORT
SHOWPRICES
FINDSPACE
EDITRATINGS
DOEDITTAPE
EDITTAPES
PREFERENCES
REG_KEY$
APPSHORT$
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O`L{A[
0123456789
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O`L{A[
VideoC[
O`L{A[:
WineC[
VideoC[
O`L{A[)
VideoC[
F17$#
O`L{A[
O {A[
RESETPRINTING
PAGESETUPDIALOG
PRINT
PRINTPREVIEWDIALOG
O`L{A[
O`L{A[
Printer not connected
REREGISTER
PATH$
APPSHORT$
REG_NAME$
REG_KEY$
PREF_RATING%
.iniKW
.iniK
PATH$
APPSHORT$
REG_NAME$
REG_KEY$
PREF_RATING%
.iniK
.iniK
REGISTER$
SETUP_SCREEN
APPTITLE$
REG_NAME$
REG_KEY$
NAGWIN%
Unregistered
0123456789
FIELDNAME$
WRAPLINE$
SETUP_TOOLBAR
DEVICE
FINDOPO$
CREATEINDEX
NEXTID$
LOAD_INI_FILE
OPENELEMS
OPENELEMTYPES
TBARBUTT
FALSE
FIELDLIST1$
FIELDLIST2$
FIELDLIST3$
NOOFACTIVESCREENS%
INUSE%
PROMPT$
APPSHORT$
PATH$
ICON$
GELEM1&
GELEM2&
GELEM3&
GELEM4&
MAINTOOL&
DELTOOL&
NEWTOOL&
HELPID&
MAINTABLE$
MAINELEMS$
MAINELEM$
REG_NAME$
CU_POS&
CU_COUNT&
Fields:
c:\system\apps\
.appKW
c:\system\apps\
\system\apps\
d:\system\apps\
.appKW
d:\system\apps\
\system\apps\
.mbmK
Graphics not found:
.dbfKW
+'First time installation, please wait...
.dbf fields ID(10)K
(250)K
(10)K
(250)K
(250)K
(250)K
(250)K
(250)K
(250)K
(30)K
(30)K
(30)K
(250)K
to K
IDIndK
.dbfK
F1IndK
.dbfK
F2IndK
.dbfK
F3IndK
.dbfK
F4IndK
.dbfK
F5IndK
.dbfK
F6IndK
.dbfK
F7IndK
.dbfK
F8IndK
.dbfK
F11IndK
.dbfK
F12IndK
.dbfK
F13IndK
.dbfK
F14IndK
.dbfK
F15IndK
.dbfK
F16IndK
.dbfK
F17IndK
.dbfK
F18IndK
.dbfK
F19IndK
.dbfK
F20IndK
.dbfK
VideoC[]
+ upg21.opoO
+ upg22.opoO
MusicC[S
BandO
YearO
MainIndK
.dbfK
+*.dbf fields ID(10), EType(30) to ElemTypesK
ETYPE$
+ TypeIdInd
.dbfK+ ElemTypes
EtypeO
TypeEtypeInd
.dbfK+ ElemTypes
+4.dbf fields ID(10), L, TType(10), Text(250) to TextsK
TTYPE$
TEXT$
TTypeO
+ TextIdInd
.dbfK+
Texts
+#.dbf fields NextVal TO ElemSequenceK
SEQ&%
+#.dbf fields NextVal TO TextSequenceK
SEQ&%
+".dbf fields name(30) TO RegisteredK
NAME$
NAME$'
Unregistered
+4.dbf fields id(10), Name(30), clause(255) TO ClausesK
NAME$
CLAUSE$
+ ClauseIndK
.dbfK+
Clauses
NameO
ClauseNameIndK
.dbfK+
Clauses
+).dbf select id, name, clause from clausesK
NAME$
CLAUSE$
ElemSequenceO
BookC[\
NAME$'
Lent Out
CLAUSE$'
+'amount>0 and LentTo<>'' order by LentTo
VideoC[
NAME$'
Lent out
CLAUSE$'
+1amount>0 and LentTo<>'' order by TapeNo, StartPos
ElemSequenceO
NAME$'
Motion Pictures
CLAUSE$'
+Iamount>0 and Categories like '*Motion Picture*' order by TapeNo, StartPos
MusicC[h
NAME$'
Lent out
CLAUSE$'
amount>0 and LentTo<>''
ElemSequenceO
ArtC[
NAME$'
Lent out
CLAUSE$'
Elements>0 and LentTo<>''
ElemSequenceO
NAME$'
No Location
CLAUSE$'
Elements>0 and Location=''
WineC[
NAME$'
Ready To Drink
CLAUSE$'
+0amount>0 and ReadyYear<'2000' order by ReadyYear
ElemSequenceO
NAME$'
French Wines
CLAUSE$'
+.amount>0 and area like '*France' order by area
ElemSequenceO
NAME$'
Californian Wines
CLAUSE$'
+3amount>0 and area like '*California*' order by area
ElemSequenceO
NAME$'
Portuguese Wines
CLAUSE$'
+0amount>0 and area like '*Portugal' order by area
export.dbfW
+Bexport.dbf Fields name(20), prompt(20), seq(5), ftype(1) to export
NAME$
PROMPT$
FTYPE$
NAME$'
PROMPT$'
SEQ$'
SEQ$'
FTYPE$'
FTYPE$'
NAME$'
Notes
PROMPT$'
Notes
SEQ$'
FTYPE$'
+ ExpSeqInd
Export.dbf+
Export
export.dbf fields formatset(20), file(255), format, field(20), lastfield, prefile(255), postfile(255), prerecord(255), postrecord(255), startrecord, prefield(255), postfield(255), Note_NoOfLines, Note_LineWidth to format
FORMATSET$
FILE$
FORMAT%
FIELD$
LASTFIELD%
PREFILE$
POSTFILE$
PRERECORD$
POSTRECORD$
STARTRECORD%
PREFIELD$
POSTFIELD$
NOTE_NOOFLINES%
NOTE_LINEWIDTH%
FORMATSET$'
HTML Export
FILE$'
.expK
FORMAT%$
PREFILE$'
<html><head><title>
K+& List</title></head><body><center><h1>K
K+n List</h1><h2>Send queries and coments to <a href="mailto:My@Email.address">My@Email.address</a></h2></center>K
+ POSTFILE$'
<hr><i>Last updated on W
by K
</i></body></html>K
FIELD$'
<li><b>
+ PREFIELD$'
+ </b>: <i>
POSTFIELD$'
LASTFIELD%$
PRERECORD$'
<hr><ul>
POSTRECORD$'
</ul>
STARTRECORD%$
NOTE_NOOFLINES%$
NOTE_LINEWIDTH%$
FORMATSET$'
Sheet Export
FILE$'
.expK
FORMAT%$
PREFILE$'
+ POSTFILE$'
FIELD$'
+ PREFIELD$'
POSTFIELD$'
LASTFIELD%$
PRERECORD$'
POSTRECORD$'
STARTRECORD%$
NOTE_NOOFLINES%$
NOTE_LINEWIDTH%$
NoteO
HelpO
area='K
and(
area='K
and(
and area is null
ADDWHERE$
ALERT_INFO
SFIND$
MAINTABLE$
APPSHORT$
MAINELEMS$
where
.dbf select * from K
The Where-Clause is
characters too longKO
SETUP_SCREEN
PREF_RATING%
Preferences
Rating Style+SAsterix Scale (0-5),10 Point Scale,20 Point Scale,100 Point Scale, Description, Off
CancelO
REGISTER$
APPSHORT$
APPTITLE$
+ .dbf select name from RegisteredK
NAME$
NAME$#
UnregisteredC[
NAME$'
TBARINIT
TBARHIDE
TBARSHOW
APPSHORT$
TOOLBAR%
SCREENWIDTH%
W.OFL
DOBOTTLEINFO
NEWBOTTLE
BOTTLENOTES
DOBOTTLEINFO
DOSELECTELEMTYPE
DOPERSONALINFO
BOTTLENOTES
MAINSCN%
SCREEN%
{A` O
{A` O
{A` O
{A` O
{A` O
{A` O
{A` O
{A` O
{A` O
{A` O
{A` O
{A` O
{A` O
TBARHIDE
TBARSHOW
SETUP_SCREEN
TOOLBAR%
SCREENWIDTH%
DATESTR$
FETCHRATING$
WRAPLINE$
SCREEN%
SCREENW%
SCREENX%
SCREENWIDTH%
SCREENY%
SCREENH%
INUSE%
FONT&
ALIGNMENT%
PROMPT$
APPSHORT$
CU_POS&
CU_COUNT&
REG_NAME$
GELEM1&
GELEM2&
GELEM3&
GELEM4&
ETYPE$#
No Id
<No O
WineC+
WineC[*
% alc.K
StampC[!
WineC[(
ArtC[5
O @[j
ArtC[
StampC["
F10$#
F11%
F14$#
F15&!
F16$#
F17$#
F18$#
HomeC
StampC`[
F19&!
F19&!
{U}WB
F19&!
QMO<{U}WB
F19&!
QMO<{
QM}WB
F20$#
WineC[
+&.dbf select text from texts where ID='K+
K+"' and TType='NOTES' order by id, lK
TEXT$
TEXT$#
Find:
O$@[)
WineC[
Area Rating:
TBARSETTITLE
DEVICE
PATH$
APPSHORT$
HELPTHREAD&
.hlpKO
.hlpK
Help file (
.hlp) not foundK
EXIT$
SAVE_INI_FILE
FINDOPO$
HELPTHREAD&
Closing, please wait...
cabinet.opoO
pythia.opoO
SETUP_SCREEN
NOOFACTIVESCREENS%
NOOFSCREENS%
INUSE%
SETUP_SCREEN
NOOFACTIVESCREENS%
INUSE%
FALSE
BOTTLEINFO
SETUP_SCREEN
INUSE%
PERSONALINFO
SETUP_SCREEN
INUSE%
SETUPMULTILINE
GETMULTILINE$
DOPERSONALINFO
BOTTLENOTES
DOSELECTELEMTYPE
INUSE%
MAINELEM$
PROMPT$
CU_LIST%
CU_LIST$
to maintainK
F10$#
+ Maintain
InformationKO
<No O
ETYPE$#
,...K
ETYPE$#
SaveOsO
Collection InfoOa+
NotesOn
F10$'
Os@[^
SETUPMULTILINE
GETMULTILINE$
MAINELEM$
INUSE%
PROMPT$
APPSHORT$
to maintainK
O"{WK
O"{WK
O"{WK
F14$#
F16$#
F17$#
F18$#
F20$#
F11%
F15&!
F19&!
Maintain Collection InformationO
HomeC
StampC`[
SaveOs+
CancelO
F14$'
F16$'
F17$'
F18$'
F20$'
F11%$
F15&%
F19&%
Os@[J
MAINTAINBOTTLENOTES
SETUP_SCREEN
FETCHTEXT&
STORETEXT
MAINELEM$
APPSHORT$
to maintainK
Notes for +
- K+
NOTESO
.dbfKO
SaveOs
Os@[-
NOTESO
.dbfKO
OPENELEMS
OPENELEMTYPES
ACTIVEWINDOWS
CU_POS&
Jumping to first
Jumping to first
ACTIVEWINDOWS
CU_POS&
CU_COUNT&
Jumping to last
NEXTID$
ALERT_YESNOCANCEL$
OPENELEMS
BOTTLEINFO
ACTIVEWINDOWS
APPSHORT$
MAINELEM$
SFIND$
CU_COUNT&
CU_POS&
ElemSequenceO
Copy fields from +
into new K
+E(To avoid a bug in OPL your current where clause will now be cleared)O
F10$#
F11%
F14$#
F15&!
F16$#
F17$#
F18$#
F19&!
F20$#
WineC[#
F10$'
F11%$
F15&%
F14$'
F16$'
F17$'
F18$'
F19&%
F20$'
ALERT_OK$
ACTIVEWINDOWS
MAINELEM$
CU_COUNT&
CU_POS&
DeletingO
to deleteK
+ deleted.K
SELECTELEMTYPE$
SETUP_SCREEN
MAINELEM$
to updateK
NEWELEMTYPE$
EDITELEMTYPE$
DELETEELEMTYPE%
PROMPT$
MAINELEM$
CU_LIST%
CU_LIST$
Selection for current K
type not found (K
<No O
ETYPE$#
),...K
ETYPE$#
SelectO
EditOe+
NewOn+
DeleteOd+
CancelO
MAINELEM$
PROMPT$
NEW ID
TypeK
Create new O
CreateO
CancelO
ETYPE$'
REOPENELEMTYPES
CHANGEELEMTYPE
PROMPT$
not foundK
ETYPE$#
Edit O
SaveO
CancelO
ETYPE$'
CHANGEELEMTYPE
MAINELEM$
type not foundK
Another
type exists with this id (K
FIELDNAME$
REOPENELEMS
APPSHORT$
PROMPT$
MAINELEMS$
MAINELEM$
.dbf select id, KO
from K
where KO
cleared of this K
typeK
FINDFIRST
SCREEN%
FIND$
ACTIVEWINDOWS
CU_POS&
FIND$
MAINELEMS$
Jumping to first
Jumping to first
No more
ACTIVEWINDOWS
CU_POS&
CU_COUNT&
FIND$
MAINELEMS$
Jumping to last
No more
ACTIVEWINDOWS
FIND$
CU_POS&
+ Not found
ACTIVEWINDOWS
FIND$
CU_POS&
+ Not found
File,Folder,DiskK
CancelO
OPENELEMS
FIELDNAME$
PROMPT$
FIND$
APPSHORT$
MAINELEM$
Calculating...
> 0KO
MusicC
ArtC`[$
F11%
F11%
F11%
MusicC
ArtC`[#
Item Count:
Count:K
Title Count:
Total Spending:
Total Value:
Total Surplus:
Average Spending:
Average Value:
Total Surplus %:Od|
SETUPMULTILINE
FIELDNAME$
CHOICEDIALOG$
ALERT_INFO
NEXTID$
EDITCLAUSE
GETMULTILINE$
OPENELEMS
ACTIVEWINDOWS
ERROR_HANDLER
SFIND$
PROMPT$
APPSHORT$
FIELDLIST1$
FIELDLIST2$
FIELDLIST3$
TESTING%
CU_POS&
CU_COUNT&
MAINELEMS$
APPTITLE$
APPVER$
EMAIL$
+5Type in an SQL where clause (without the WHERE token)O
+6Abbreviations: (must be first character in the string)
a: O
o: order by
VideoC[)
ot: order by TapeNo, StartPos
ListOl+
SaveOs+
CancelO
Ol@[B
QueryO
+/.dbf select id, name from Clauses order by nameKO
+*.dbf select clause from Clauses where id='K
CLAUSE$
CLAUSE$#
ErrorO
Could not find selected clauseO
+).dbf select id, name, clause from ClausesK
NAME$
CLAUSE$
ElemSequenceO
NAME$'
New Clause
+*.dbf select clause from Clauses where id='K
CLAUSE$
ErrorO
Could not find selected clauseO
Os@[<
@`\['
o C["
order by
otC[!
order by TapeNo,StartPos
found, please retypeK
Bad query - please, retype W
SETUPMULTILINE
GETMULTILINE$
APPSHORT$
+4.dbf select id, name, clause from Clauses where id='K
NAME$
CLAUSE$
NAME$#
CLAUSE$#
Edit Clause:
ClauseO
SaveOs+
CancelO
W7Os@[1
NAME$'
CLAUSE$'
FINDOPO$
EXPORT
export.opoO
APPSHORT$
+3.dbf select ID, EType from ElemTypes order by etypeK
ETYPE$
ALERT_INFO
REOPENELEMS
ACTIVEWINDOWS
MAINELEMS$
SFIND$
APPSHORT$
CU_POS&
CU_COUNT&
+ Find Note
Set+$Find Note can only fetch sets of 12
+%Specify the set that you want to see.
1-12, 2: K
13-24 etc)K
Search for NoteO
CancelO
+<.dbf select id, l, ttype, text from texts where text like '*K
TTYPE$
TEXT$
id='K+
WarningO
could not be fetched. Try using a more precise search string or view the remaining sets separately. You will now be viewing set K
InformationO
No matching notes were foundO
Canceled
ADDWHERE$
FIELDNAME$
CHOICEDIALOG$
DOBOTTLEINFO
NEWBOTTLE
DELETEELEM
ACTIVEWINDOWS
SFIND$
APPSHORT$
PROMPT$
MAINELEMS$
CU_POS&
+%Enter field name to view in list view
+ List ViewO
.dbf select id,KO
from K
+ ORDER BY C[
and K
+ ORDER BY C[
where
DORUN
DORUN2i
PROCESS
ACTION_KEY'
PRINTKEY
EVENT
LOAD_INI_FILE
SAVE_INI_FILE
REREGISTERA
GETLISTORS$[)
OPENELEMS
PREFERENCES
TJEKREGISTRATIONP-
SETUP_TOOLBAR
CMDA%u.
CMDB%
CMDC%
CMDD%
POINTER_EVENT
TOOLSWITCHc0
SETUP_SCREENV1
TOOLBARTITLE
BACKGROUND)<
FOREGROUND<<
HELPO<
EXIT&=
STATICWINDOWS
ACTIVEWINDOWS
DEVICE
DOBOTTLEINFOX?
DOPERSONALINFO
BOTTLEINFO4@
PERSONALINFO*F
BOTTLENOTES
MAINTAINBOTTLENOTES
REOPENELEMS
REOPENELEMTYPES#L
NEXTELEMVL
PREVIOUSELEM
NEWBOTTLEHM
DELETEELEMHQ
DOSELECTELEMTYPE
SELECTELEMTYPE$
NEWELEMTYPE$+U
EDITELEMTYPE$
DELETEELEMTYPE%GW
CHANGEELEMTYPE
FINDELEM6Y
FINDNEXT
FINDPREVIOUSeZ
FINDFIRST$[
FINDLAST
GETFILENAME$
SHOWPRICES
SFINDELEMd_
EDITCLAUSE
FIELDNAME$
DOEXPORTwg
OPENELEMTYPES
FINDNOTE0h
DOLISTVIEW
ADDWHERE$
DBASE[
SYSRAM1
SYSTEM\
D:\programs\Pythia\pythia
File: PYTHIA.OPO
Version: 1.8.2
+0 This file cannot be executed by itself
+= Copyright
1999-2000 PocketIQ & PYTHIA Information
ALERT_OK$
Exit programO
Shutting down...
SHOWERROR
APPSHORT$
C:\SYSTEM\OPL\
C:\SYSTEM\OPL\
D:\SYSTEM\OPL\
D:\SYSTEM\OPL\
+ The file
K+- is not found in \system\opl or \system\apps\K
SHOWERROR
APPSHORT$
C:\SYSTEM\OPM\
C:\SYSTEM\OPM\
D:\SYSTEM\OPM\
D:\SYSTEM\OPM\
+ The file
K+- is not found in \system\opm or \system\apps\K
APPSHORT$
APPYEAR$
APPAUTHOR$
SPLASHID&
SPLASHXPOS%
SPLASHYPOS%
APPTITLE$
APPVER$
APPEMAIL$
C:\SYSTEM\OPL\PIQInfo.rscW
C:\SYSTEM\OPL\PIQInfo.rsc
D:\SYSTEM\OPL\PIQInfo.rscW
D:\SYSTEM\OPL\PIQInfo.rsc
E:\SYSTEM\OPL\PIQInfo.rscW
E:\SYSTEM\OPL\PIQInfo.rsc
C:\SYSTEM\OPL\PIQInfo.mbmW
C:\SYSTEM\OPL\PIQInfo.mbm
D:\SYSTEM\OPL\PIQInfo.mbmW
D:\SYSTEM\OPL\PIQInfo.mbm
E:\SYSTEM\OPL\PIQInfo.mbmW
E:\SYSTEM\OPL\PIQInfo.mbm
C:\SYSTEM\APPS\
.aifKW
C:\SYSTEM\APPS\
.mbmK
D:\SYSTEM\APPS\
.aifKW
D:\SYSTEM\APPS\
.mbmK
E:\SYSTEM\APPS\
.aifKW
E:\SYSTEM\APPS\
.mbmK
& Pocket IQK
OxO,O
SHOWSPLASH
SPLASHID&
APPTITLE$
APPVER$
APPYEAR$
APPAUTHOR$
APPEMAIL$
C:\SYSTEM\OPL\PIQInfo.opoW
C:\SYSTEM\OPL\PIQInfo.opo
D:\SYSTEM\OPL\PIQInfo.opoW
D:\SYSTEM\OPL\PIQInfo.opo
E:\SYSTEM\OPL\PIQInfo.opoW
E:\SYSTEM\OPL\PIQInfo.opo
About
+ version K
Copyright (C)
& Pocket IQKO
http://www.pocketIQ.comO
+'Sorry, an unexpected error has occured.
Please E-mail me at:
andK
++tell me the exact circumstances and the key
presses that led to this error.
++I will also need the following information:
- W
- W
ContinueO
.dbf select nextval from K
SEQ&!
SEQ&%
IQ_ADD_STRING_TO_BUFFER
IQ_GET_STRING_FROM_BUFFER_END$
ALERT_INFO
ErrorO
HTMLC[
<TITLE>
</TITLE>K
HTMLC[
<IMG SRC="
HTMLC[3
HTMLC[
</i>K
HTMLC[
</b>K
HTMLC[
HTMLC[!
<center>
K+ </center>K
CollectionC[
Cabinet Suite
Registering
+:Type in the name that you have registered and the key that
you have received.
C\`[j
Invoice ManagerC[/
+!Company Accounting registered to
registered to K
Registration failed
CU_LIST$
CU_LIST%
NAME$
NAME$#
K+ <NO NAME>K
NAME$#
<NO ITEMS>
IQ_GET_BUFFER_TEXT_SIZE&
IQ_GET_STRING_FROM_BUFFER_END$
IQ_DELETE_BUFFER
+' select ID, TType from Texts where ID='K
' and TType='K
TTYPE$
+% select ID, L, TType, Text from TextsK
TTYPE$
TEXT$
TTYPE$'
SEQ&%
TEXT$'
SHOWERROR
SHOWERROR
SHOWERROR
O$h@[
<EOF>
SHOWERROR
O$h@[
<EOF>
SHOWERROR
IQ_CREATE_CTBUFFER&
IQ_ADD_STRING_TO_BUFFER
+" select Text from Texts where ID='K
' and TType='K
' order by id,lK
TEXT$
TEXT$#
WRAPLINE$
WRAPLINE$
CancelO
WRAPLINE$
CancelO
CHOICEDIALOGNEW$
REPLACE$
NAME$
Select
NAME$#
<Empty
,...K
NAME$#
<Empty
SelectO
NewOn+
DeleteOd+
EditOe+
CloseO
SelectO
CloseO
SEC["
SelectO
EditOe+
CloseO
EnterC[!
EXIT$
FINDOPO$o
FINDOPM$e
SHOWSPLASH[
ABOUT
ERROR_HANDLERi
NEXTID$
SETUPMULTILINE)
GETMULTILINE$e
SHOWERROR
REPLACE$
HTF_TITLE$]
HTF_IMG$
HTF_H$
HTF_I$'
HTF_B$a
HTF_P$
HTF_CENTER$
REGISTER$
MAKELIST$
STORETEXT
WRITELINE-
WRITETOKEN
READLINE$
READTOKEN$
OPENFILE%
FETCHTEXT&U
WRAPLINE$/
ALERT_INFO
ALERT_OK$
ALERT_YESNOCANCEL$
CHOICEDIALOG$N
CHOICEDIALOGNEW$
DATESTR$
SENDSTRING
SENDTOKEN%!
RUNAPPLICATION&
SYSTINFO
SYSTEM\
D:\programs\Customer\FixList.opl
+$c:\system\apps\customer\customer.dbfW
c:\system\apps\customer\
+$d:\system\apps\customer\customer.dbfW
d:\system\apps\customer\
customer.dbfKW
PriorityO
TaskPriority
Customer.dbf+
Tasks
+ Completed
Customer.dbf has been fixed
Information
+$Customer.dbf do not need to be fixed
Error
+ Could not see file: Customer.dbf
DBASE[
D:\programs\Customer\createdb
+: File: CREATEDB.OPO for Customer Relation Manager
+<Customer.dbf fields ID(10), L, TType(10), Text(250) to Texts
TTYPE$
TEXT$
TTypeO
+ TextIdInd
Customer.dbf+
Texts
+)Customer.dbf fields NextVal TO IDSequence
SEQ&%
++Customer.dbf fields NextVal TO TaskSequence
SEQ&%
INSTALLTABLES
DBASE[
9d9GD
?<0tw
UGnFf
"Data.app;@O
Table1
Title:
Text:
6. Find Text
7. Lists and Documents
P 8. Contacting PocketIQ
P 9. How to register
10. FREE Upgrades !
11. Licence agreement
12. Readme.txt
12. Readme.txt
5. Notes Section
Table1
ColA9
ColB9
ColA10
ColB10
Index1
ColA92
ColA9
0. Customer Relation Manager
1. General Usage
2. Company Section
3. Person Section
4. Task Section
5. Notes Section
11. Disclaimer & Licence agreement
12. Readme.txt
7. Lists and Documents5
The top of the screen is the company section. This section shows information on the company related to the current task.
By tapping anywhere in this section (or by pressing the Enter key) you will open the edit company dialog of the current company. This will let you update all company specific informtion on the current company.
From the company dialog you can edit and view general notes on the selected company (Ctrl-N).
When the Company section is selected you can use the keyboard to manipulate the company information.
The Company section is selected when the section pointer points to it. You can move the section pointer with the Up and Down keys.
When the company section is selected the Left and Right keys lets you browse through all the registered companies. Note that when changing the current company the entire screen will be refreshed with information related to the company shown.
The space bar opens the Select company dialog. Here you can select any company directly and you can create a new entry for a company.
Under the Company section is the Person section. This section shows information on the employee related to the current task.
By tapping anywhere in this section (or by pressing the Enter key) you will open the edit person dialog of the current employee. This will let you update all person specific informtion on the current person.
From the person dialog you can edit and view general notes on the selected person (Ctrl-N).
When the Person section is selected you can use the keyboard to manipulate the Person information.
The Person section is selected when the section pointer points to it. You can move the section pointer with the Up and Down keys.
When the Person section is selected the Left and Right keys lets you browse through all the registered persons of the current company (the current company is shown in the Company section above). Note that when changing the current person the screen will be refreshed with tasks related to that person.
The space bar opens the Select person dialog. Here you can select any person directly and you can create a new entry for a person employed by the current company.
Under the Person section is the Task section. This section shows information on the current task (headline, ref no, state etc).
By tapping anywhere in this section (or by pressing the Enter key) you will open the edit task dialog of the current task. This will let you update all task specific informtion on the current task (task type or state etc).
When the Task section is selected you can use the keyboard to manipulate the Task information.
The Task section is selected when the section pointer points to it. You can move the section pointer with the Up and Down keys.
When the Task section is selected the Left and Right keys lets you browse through all the registered tasks of the current person (the current person is shown in the Person section above). Note that when changing the current task the screen will be refreshed with notes related to that task.
The space bar opens the Select task dialog. Here you can select any task releated to the current person directly and you can create a new entry for a task related to the current person.
Customer Relation Manager can generate a number of lists and documents in different formats.
Status Lists
To generate a list based on tasks status do the following:
- Press Ctrl-L to open the Select Status dialog.
- Select the status and task type that you want your list to contain.
- If you just want a pop-list to select from then press Enter.
- If you want a text file list then press Ctrl-G. Note that you can have the file made in HTML format by checking the HTML Format checkbox.
Single task
To generate a file containing information on a single task (the current task) press Ctrl-B (HTML format) or Shift-Ctrl-B (TXT format).
Person List
To generate a list of all pending tasks for a single person (the current person) press Ctrl-P (HTML format) or Shift-Ctrl-P (TXT format). This list will include tasks of status Open, Waiting on client and Waiting on supplier.
If you just want to include a list in a mail to your customer or supplier I have found that the best layout is reached like this:
- Generate the list in HTML Format
- Open the file in the web browser
- Select the entire page (Ctrl-A)
- Copy the page (Ctrl-C)
- Paste the page into a mail (Ctrl-V)
Preferences for Documents
The following two preferences will influence the generation of documents. These can be set in the Preference dialog (Ctrl-K):
Title: The value of this preference will be placed on the top of all generated documents. Use this to setup you company name.
Delay: This preference holds the delay used after starting up the Web Browser before opening the generated document. If you exeprience that the document is not opened correctly the first time the web browser is started up then increse the delay.
PocketIQ can be contacted in a number of ways, for either support or registering your software.
Internet:
http://www.PocketIQ.com
Telephone / Fax:
+44 (0)1234 353970
Email:
Pythia@PocketIQ.com
support@PocketIQ.com
Post:
44 Harpur Street
Bedford
Bedfordshire
MK40 2QT
England
s and Documents5
Under the Task section is the Notes section. This section shows the notes on the current task.
By tapping anywhere in this section (or by pressing the Enter key) you will open the edit notes dialog of the current task.
When the Notes section is selected you can use the keyboard to manipulate the Notes.
The Notes section is selected when the section pointer points to it. You can move the section pointer with the Up and Down keys.
When the Notes section is selected the Left and Right keys lets you jump between Public notes and Internal notes of the current task (the current task is shown in the Task section above).
The space bar opens the Edit notes dialog (like the Enter key).
This section describes how the Customer Relation Manager is intended to be used.
Customer Relation Manager is a program for maintaining communications on customer tasks and making reports based on the registered customer and task information.
Customer Relation Manager lets you register:
- Company inforation on the companies that you are in contact with.
- User information on the users/customers that you communicate with.
- Task information on the customer task that you are handling. The type of task can be Support Task, Enhancement request or Contract Negotiation. You can keep track of status information on each task (Open, Waiting on client, Waiting on supplier, Completed or Cancelled).
- Public notes and Internal notes on the progress of the customer tasks.
- Product information on the products you are selling, reselling, supporting etc. Each task can be related to a product and each product is related to a supplier (Companies can be marked as suppliers).
Based on this information the program can generate:
- Task reports on specific customer tasks.
- Lists of all active tasks of a specific user.
- Lists of all tasks of a specific status.
- Lists of all tasks related to a specific product or a specific supplier.
The main screen shows all the information related to a single customer task. The screen is divided into the following sections:
- Company section
- Person section
- Task section
- Notes section
These will be explained in the following chapters.
Registered users of Customer Relation Manager are entitled to receive free upgrades via the internet or on floppy disk, as they become available.
For details on how to get latest version see "Contacting PocketIQ". If you do not have access to the internet send a stamped addressed envelope with a PC formatted floppy disk to the address shown.
Please note that the free upgrades offer excludes postage fees & hardware costs.
The Pocket IQ End User Licence Agreement (EULA) is a legal agreement between you and Pocket IQ Limited. By downloading or installing this SOFTWARE, you agree to be bound by the terms of this Agreement. If you do not agree to the terms of this Agreement, remove this SOFTWARE immediately.
Pocket IQ END USER LICENCE AGREEMENT (EULA)
This licence refers to any product which is distributed by Pocket IQ.
GRANT OF LICENCE
This Pocket IQ Licence Agreement ("Licence") permits you to use one copy of this product, on multiple machines which may include user documentation provided in electronic form ("SOFTWARE"), providing it is for the sole, exclusive use of the registered user. The SOFTWARE is licensed as a single product. Its component parts may not be separated for use on more than one computer or by more than one user at any one time.
COPYRIGHT
The SOFTWARE (including any images and text incorporated into the product) is owned by Pocket IQ and the independent application author, or its suppliers and is protected by English copyright laws and international treaty provisions.
REVERSE TRANSLATION
The SOFTWARE, including all related program files may not be altered in any way. Reverse Translation is expressly forbidden without written permission of the Pocket IQ and the independent application author.
LIMITED WARRANTY
To the maximum extent permitted by applicable law, Pocket IQ and the independent application author disclaims all warranties, either express or implied, including but not limited to warranties of merchantability and fitness for a particular purpose. In no event shall Pocket IQ, the independent application author or its suppliers be liable for any damages whatsoever (including, without limitation, damages for loss of business profits, business interruption, loss of business information, or other pecuniary loss) arising out of the use or inability to use this Pocket IQ product.
The SOFTWARE is supplied 'as is' and no advice or technical support is guaranteed from Pocket IQ or any third party.
Pocket IQ applications can be registered exclusively through Palmscape, the leading online store for the EPOC platform.
To register this product simply visit the Pocket IQ internet site and follow the registration instructions.
Alternatively you can register directly with Palmscape in any of the following ways:
Online Orders:
Purchase online via Palmscape's secure online service. Simply visit www.palmscape.com, and select the "Buy now" link. Palmscape accept most major credit cards (see below).
Telephone \ Fax orders:
Palmscape accept telephone orders via the United Kingdom office which can be reached on +44 (0)1234 353970.
Postal Orders:
Payment can be made by UK Cheque, Cash or Credit Card direct to the Palmscape office, located at:
44 Harpur Street
Bedford
Bedfordshire
MK40 2QT
England.
Please mark clearly that you wish to purchase this application.
Payment types:
Palmscape accept major Credit cards, Switch, Delta as well as UK Cheque, Eurocheque and Cash. If you are paying in any currency other than GB Pounds please add 10% to cover conversion fees.
8. Contacting PocketIQE
9. How to registerE
Sketch
jffVUU
ffUUef
kffVUU
&Paint.app
0. Customer Relation Manager7
2000 Marc de Oliveira & PocketIQ
Welcome to Customer Relation Manager, a quality application from Pocket IQ and Marc de Oliveira.
Support: Pythia@PocketIQ.com
Internet: www.PocketIQ.com
OCustomer Relation Manager 1.0.3 for the Psion Series 5 and 5mx (C) 2000 Marc de Oliveira & PocketIQ
This tool lets you keep track of the status and progress of all your customer related tasks.
Installation:
------------
Installation from SIS file:
1) Execute the Customer.sis file on your pc or Psion.
2) Choose C or D drive for the installation (make sure that there is enought disk space).
3) The program will install itself.
4) Install PIQInfo.sis, pythia.sis, systinfo.sis and sysram1.sis if necessary.
Installation from ZIP file:
1) Make sure the \System folder is shown on your Series 5 system screen. If it's not, enable it in the 'Preferences' dialogue.
2) Using PsiWin copy the files PYTHIA.OPO, PIQInfo.OPO, PIQInfo.RSC and PIQInfo.MBM to the folder \system\opl (you might have to create the folder)
3) Go into \System\Apps on C: or D: and make a new folder called "Customer"
4) Using PsiWin, copy the following files to the new \System\Apps\Customer folder:
Customer.app
Customer.aif
Customer.mbm
Customer.hlp
CreateDB.opo
4) Copy the files systinfo.opx and sysram1.opx in the folder \system\opx
5) A new icon should appear on your Extras bar
Problems
--------
1. Read only files
Some times files become read only while being installed. None of the files should be read only. If you get any errors like the program is unable to write information to your Psion go through the program files to see if some of them are read only.
In the system-view you can open the file property window by selecting (highlighting) a file and pressing Ctrl-P. In the property window you can see and set/clear the read only checkbox.
2. Copying between C and D
Be very careful when you move or copy applications between the C and D drives. It seems that the Psion is not correctly updated when applicaions are copied from C to D or vice versa.
Always delete the application directory from one drive before reinstalling on the other drive.
3. Low on battery
When starting up this program for the first time a lot of writing is done to the disk. If your machine is low on battery these writes can go wrong and turn the application files bad. This should only be an issue when running the application the first time.
4. Not enough memory
This program needs up to 300 Kb of free memory on the C drive. If you try to run the program with less than 300 Kb of free memory on the C drive it may not behave as expected.
Usage:
------
Press Ctrl+Shift+H to see help file.
Bugs:
-----
Registering:
------------
Registering the program will give you the following benefits:
1) The register window will not pop up on startup
2) You get free support via e-mail (Pythia@PocketIQ.com)
3) Your suggestions to new functionalities will be implemented (as far as resources permits it)
How to register
Go to the PocketIQ home page at:
http://www.PocketIQ.com
Here you can register using credit card or cheque.
After receiving your registering fee I will mail you a Key that you can use to register the program.
Made by:
--------
Marc de Oliveira
for Pythia Information & PocketIQ
Web: http://www.PocketIQ.com
E-mail: Pythia@PocketIQ.com
History:
--------
2000.03.01: Version 1.0
2000.03.14: Version 1.0.1
- Fixed error occuring when using the Find function (Ctrl-F).
2000.07.31: Version 1.0.2
- Missing file is now correctly installed.
- Changed to 4-color mode making the menus faster.
- A blinking "Closing" message is now shown during exit, so that you know that you pressed the correct key.
2000.08.22: Version 1.0.3
- Fixed error when generating lists.
Note: if you are installing this version on top of a previous version you will need to run the FixList.opo file to fix this error.
Courier
Courier
10. FREE Upgrades !E
11. Licence agreementE
2. Company SectionE
1. General UsageE
12. Readme.txt5
3. Person SectionE
4. Task SectionE
5. Notes Section5
6. Find Text5
You can search through all text entered in the Customer Relation Manager but only within one section at a time.
To search for a text within the current section just press Ctrl-F to open the Find Text dialog.
UGnFf
UGnFf
"Customer"Customer
!D:\programs\Customer\Customer.opl
TBARLINK
Z:\SYSTEM\OPL\TOOLBAR.OPO
MainO
APPTITLE$
APPVER$
APPEMAIL$
APPYEAR$
APPAUTHOR$
REG_KEY$
REG_NAME$
SHOW_ETYPE$
SHOW_ETYPE%
TOOLBAR%
G_FIND$
CONTROL%
SHIFT%
SCREENWIDTH%
FALSE
THREE&
FOUR&
MINIT%
MAINSCN%
SCREEN%
SCREENX%
SCREENY%
SCREENW%
SCREENH%
ALIGNMENT%
ICON$
PATH$
DATA$
THREAD&
UPID&
DOWNID&
SLIDERID&
HELPID&
ICON1&
ICON2&
ICON3&
BLOCKICON&
MBMFILE%
CU_LIST$
CU_LIST%
CU_INV$
CU_ELEMTYPE%
CU_CUSTOMER$
DOCDIR$
APPSHORT$
CURR_BLOCK%
CURR_NOTETYPE$
BROWSERDELAY$
SUPPORTTITLE$
SPLASHID&
SPLASHXPOS%
SPLASHYPOS%
SHOWSPLASH
EVENT
Customer Relation Manager
Customer
1.0.3
Marc de Oliveira
Pythia@PocketIQ.com
Starting up
c:\system\opl\pythia.opoW
c:\system\opl\pythia.opo
d:\system\opl\pythia.opoW
d:\system\opl\pythia.opo
+(Could not find PYTHIA.OPO in \system\opl
FINDOPM$
IQ_TEXT_LINK
iqtext.opmO
DoRun2O
EVENT
BACKGROUND
FOREGROUND
PROCESS
ERROR_HANDLER
SHIFT%
CONTROL%
APPTITLE$
APPVER$
APPEMAIL$
TBAROFFER%
POINTER_EVENT
REFRESHSCREEN
NEXTELEMTYPE
PREVIOUSELEMTYPE
NEXTELEM
PREVIOUSELEM
DISPLAY_MENU
ACTION_KEY
CU_INV$
SHIFT%
CONTROL%
{A`[n
'{A[$
Cut/Copy/Paste unsupported
InfraRed unsupported
Zoom in unsupported
Zoom out unsupported
Jump to last
Jump to first
'{A`[
MINIT%
CONTROL%
File+
RegisterOR+
CloseOe
Edit+
Edit current element...OE+$Find text in current element type...Of+
Edit ProductsOr
Lists+
Tasks...Olh+
Open tasksOo+
Tasks waiting for clientOw+
Tasks waiting for supplierOW+
Completed tasksOc+
Canceled tasksOx
+ Documents+
Current task (HTM-format)Ob+
Current task (TXT-format)OB+1Pending task list for current person (HTM-format)Op+1Pending task list for current person (TXT-format)OP+
Task list based on statusOl
Tools+
PreferencesOkh+
About Customer Relation ManagerOA+
HelpOH
W:O`L{
ABOUT
GENERATETASK
LISTTASKS
DUMPTASKS
DOEDITELEMENT
FINDTEXT
PREFERENCES
GENERATEPERSONLIST
DOEDITPRODUCT
REREGISTER
TOOLSWITCH
DOEDIT
DELETEELEMENT
CONTROL%
REG_KEY$
SHIFT%
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O`L{A
Zoom in unsupported
O`L{A
Zoom out unsupported
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O`L{A[
0123456789
O`L{A[
O`L{A[
O`L{A[
O`L{A[
O {A[
Shift+
O {A[
O {A[
O`{9[
RESETPRINTING
PAGESETUPDIALOG
PRINTRANGEDIALOG
PRINT
PRINTPREVIEWDIALOG
PRINTDIALOG
O`L{A[
O`L{A[
O`L{A[
O`L{A[
Printer not connected
REREGISTER
DATA$
APPSHORT$
REG_NAME$
REG_KEY$
SUPPORTTITLE$
BROWSERDELAY$
.iniKW
.iniK
Customer Relation Management
DATA$
APPSHORT$
REG_NAME$
REG_KEY$
SUPPORTTITLE$
BROWSERDELAY$
.iniK
.iniK
REGISTER$
SETUP_SCREEN
APPTITLE$
REG_NAME$
REG_KEY$
Unregistered
0123456789
SETUP_TOOLBAR
DEVICE
INSTALLTABLES
REOPEN
TBARBUTT
LOAD_INI_FILE
REFRESHSCREEN
FALSE
CURR_NOTETYPE$
APPSHORT$
PATH$
DATA$
SCREENX%
SCREENY%
SCREENW%
SCREENH%
ALIGNMENT%
ICON$
UPID&
DOWNID&
SLIDERID&
HELPID&
ICON1&
ICON2&
ICON3&
BLOCKICON&
NOTES
c:\system\apps\
.appKW
c:\system\apps\
\system\apps\
c:\system\apps\
d:\system\apps\
.appKW
d:\system\apps\
\system\apps\
d:\system\apps\
.mbmK
Icon not found:
.dbf select id from companiesK
CREATEDB.OPO
CREATEDB.OPO
+t.dbf select id, se, name, address1, address2, address3, tel, fax, licensed, companytype from companies order by nameK
NAME$
ADDRESS1$
ADDRESS2$
ADDRESS3$
LICENSED$
COMPANYTYPE$
.dbf select id from PersonsK
+*.dbf select id from tasks order by id descK
CompO
PersO
TaskO
HelpO
APPTITLE$
SUPPORTTITLE$
BROWSERDELAY$
preferencesK
Title
Delay
SaveOs+
CloseO
W7Os@[
REOPEN
APPSHORT$
+].dbf select id, c_id, name, email, tel, mobile, fax, role, licensed from persons where c_id='K+
' order by nameK
C_ID$
NAME$
EMAIL$
MOBILE$
ROLE$
LICENSED$
+|.dbf select id, p_id, product_id, headline, state, task_type, priority, created_date, completed_date from tasks where p_id='K+
' order by id descK
P_ID$
PRODUCT_ID$
HEADLINE$
STATE$
TASK_TYPE$
PRIORITY$
CREATED_DATE&
COMPLETED_DATE&
+}.dbf select id, supplier_id, name, purchaseprice, supportprice, mbmfile, version, current_product from products order by nameK
SUPPLIER_ID$
NAME$
PURCHASEPRICE
SUPPORTPRICE
MBMFILE$
VERSION$
CURRENT_PRODUCT$
REGISTER$
SETUP_SCREEN
APPTITLE$
NAME$#
UnregisteredC[!
NAME$'
TBARINIT
TBARHIDE
TBARSHOW
APPSHORT$
TOOLBAR%
SCREENWIDTH%
DOEDITCOMPANY
DOEDITPERSON
DOEDITTASK
DOEDITELEMENT
MAINSCN%
SCREEN%
CURR_BLOCK%
TBARHIDE
TBARSHOW
REFRESHSCREEN
TOOLBAR%
SCREENWIDTH%
WRAPLINE$
PRODUCTFIELD$
SCREEN%
SCREENW%
SCREENX%
SCREENWIDTH%
SCREENY%
SCREENH%
ALIGNMENT%
CURR_NOTETYPE$
APPSHORT$
MBMFILE%
CURR_BLOCK%
BLOCKICON&
NAME$#
COMPANYTYPE$#
Supplier
+ LICENSED$#
Licensed
Not Licensed
+ ADDRESS1$#
, K+ ADDRESS2$#
, K+ ADDRESS3$#
Phone: +
TEL$#
Fax: +
FAX$#
NAME$#
+ LICENSED$#
Licensed
Not Licensed
Phone: +
TEL$#
Mobile: +
MOBILE$#
Fax: +
FAX$#
E-mail: +
EMAIL$#
Role: +
ROLE$#
+ HEADLINE$#
STATE$#
State: Open
STATE$#
State: Waiting on Client
STATE$#
State: Waiting on Supplier
STATE$#
State: Completed
STATE$#
State: Cancelled
TASK_TYPE$#
Task Type: Support Task
TASK_TYPE$#
Task Type: Enhancement Request
TASK_TYPE$#
Task Type: Contract Negotiation
Priority: + PRIORITY$#
NOTESC[A
[Public Notes]
Internal Notes
Public Notes
[Internal Notes]
+&.dbf select text from texts where ID='K+
' and TType='K
' order by id, lK
TEXT$
TEXT$#
TEXT$#
TEXT$#
TEXT$#
TEXT$#
TEXT$#
TEXT$#
TEXT$#
TEXT$#
PRODUCT_ID$#
MBMFileO
Not specifiedG\[L
O0O0O
O O O
TBARSETTITLE
DEVICE
RUNAPPLICATION&
PATH$
APPSHORT$
THREAD&
.hlpKO
.hlpK
DataO
Help file not found
EXIT$
SAVE_INI_FILE
THREAD&
Closing...
SETUP_SCREEN
FALSE
DOEDITCOMPANY
DOEDITPERSON
DOEDITTASK
DOEDITNOTE
CURR_BLOCK%
EDITCOMPANY
EDITPERSON
EDITTASK
EDITNOTE
REFRESHSCREEN
CURR_BLOCK%
CURR_NOTETYPE$
REOPEN
Not specified
MBMFileC[
MBMFILE$#
NameC[
NAME$#
SupplierC[
SUPPLIER_ID$#
CHOICEDIALOG$
NEWPRODUCT
DELETEPRODUCT
EDITPRODUCT
REFRESHSCREEN
APPSHORT$
PRODUCT_ID$#
ProductsO
+0.dbf select id, name from products order by nameKO
PRODUCT_ID$'
NEXTID$
REOPEN
EDITPRODUCT
REFRESHSCREEN
APPSHORT$
IDSequenceO
NAME$'
<New Product>
REOPEN
ALERT_INFO
SETUPMULTILINE
GETMULTILINE$
EDITNOTE
CHOICEDIALOGNEW$
APPSHORT$
ErrorO
+$Could not find the selected product.O
SUPPLIER_ID$#
unknown supplier
NAME$#
NAME$#
Oh{WK
MBMFILE$#
VERSION$#
CURRENT_PRODUCT$#
PURCHASEPRICE"
SUPPORTPRICE"
Edit
from K
Product
Version
Purch. Price)
Supp. Price)
MBM IconO
Active
SaveOs+
CancelO
NotesOn+
SupplierOu
No Name
NAME$'
MBMFILE$'
VERSION$'
CURRENT_PRODUCT$'
CURRENT_PRODUCT$'
PURCHASEPRICE&
SUPPORTPRICE&
On@[)
GENERALO
SupplierO
+G.dbf select id, name from companies where companytype='S' order by nameKO
unknown supplier
NAME$#
SUPPLIER_ID$'
+ Cancelled
ALERT_INFO
REOPEN
ALRET_INFO
APPSHORT$
+6.dbf select id, headline from tasks where product_id='K
HEADLINE$
ErrorO
+3Cannot delete product while dependent tasks exist (+
: K+ HEADLINE$#
ErrorO
Product not foundO
CHOICEDIALOG$
NEWCOMPANY
DELETECOMPANY
ALERT_INFO
EDITCOMPANY
REOPEN
REFRESHSCREEN
APPSHORT$
CompanyO
+1.dbf select id, name from companies order by nameKO
ErrorO
+$Could not find the selected company.O
NEXTID$
EDITCOMPANY
REFRESHSCREEN
APPSHORT$
IDSequenceO
NAME$'
<New Company>
ALERT_INFO
EDITNOTE
ErrorO
+$Could not find the selected company.O
NAME$#
+ ADDRESS1$#
+ ADDRESS2$#
+ ADDRESS3$#
TEL$#
FAX$#
COMPANYTYPE$#
+ LICENSED$#
Edit CompanyO
Company
+ Address 1
+ Address 2
+ Address 3
Phone
Licensed
Type+
Customer,Supplier
CancelO
General NotesOn
No Name
NAME$'
+ ADDRESS1$'
+ ADDRESS2$'
+ ADDRESS3$'
TEL$'
FAX$'
COMPANYTYPE$'
COMPANYTYPE$'
+ LICENSED$'
+ LICENSED$'
On@[)
GENERALO
+ Cancelled
ALERT_INFO
CHOICEDIALOG$
NEWPERSON
DELETEPERSON
EDITPERSON
REOPEN
REFRESHSCREEN
APPSHORT$
ErrorO
+WYou must maintain persons in context of a company. Please create a company entry first.O
PersonO
+0.dbf select id, name from Persons where c_id = 'K+
' order by nameKO
ErrorO
+#Could not find the selected person.O
NEXTID$
EDITPERSON
REFRESHSCREEN
APPSHORT$
IDSequenceO
NAME$'
<New Person>
C_ID$'
ALERT_INFO
SETUPMULTILINE
GETMULTILINE$
EDITNOTE
ErrorO
+#Could not find the selected person.O
ROLE$#
NAME$#
EMAIL$#
MOBILE$#
TEL$#
FAX$#
+ LICENSED$#
Edit PersonO
RoleO
E-Mail
Phone
Mobile
Licensed
CancelO
General NotesOn
No Name
NAME$'
ROLE$'
MOBILE$'
EMAIL$'
TEL$'
FAX$'
+ LICENSED$'
+ LICENSED$'
On@[)
GENERALO
+ Cancelled
ALERT_INFO
CHOICEDIALOG$
NEWTASK
DELETETASK
EDITTASK
REFRESHSCREEN
APPSHORT$
ErrorO
+\You must maintain support tasks in context of a person. Please, create a person entry first.O
Support TaskO
+2.dbf select id, headline from tasks where p_id = 'K+
' order by headlineKO
ErrorO
+)Could not find the selected support task.O
NEXTID$
EDITTASK
REFRESHSCREEN
APPSHORT$
TaskSequenceO
+ HEADLINE$'
<New Support Task>
P_ID$'
STATE$'
+ PRIORITY$'
CREATED_DATE&%
COMPLETED_DATE&%
ALERT_INFO
PRODUCTFIELD$
SETUPMULTILINE
GETMULTILINE$
CHOICEDIALOGNEW$
APPSHORT$
ErrorO
+)Could not find the selected support task.O
PRODUCT_ID$#
NameO
O6{WK
+ HEADLINE$#
+ PRIORITY$#
STATE$#
STATE$#
STATE$#
STATE$#
STATE$#
TASK_TYPE$#
TASK_TYPE$#
TASK_TYPE$#
CREATED_DATE&!
COMPLETED_DATE&!
Edit Support Task for '
Task No
HeadlineO
State+>Open,Waiting on Client,Waiting on Supplier,Completed,Cancelled