Category : Lotus and other Spreadsheets
Archive   : CPA123.ZIP
Filename : DATABASE.WK1

0Ç–ÞÁ
ÁÁÁÇÇÇÁÁ 
 
ouffuffvvrnmd d!d"O./0/


ÿ


 
H
$ 
$d h
œ@isaaf(h
@isapp(GANSWERGCOMPANYttGDATABASE
GDELETE::GDRIVEooGEXTRACT »
GEXTRACT1 
GFILEkkGFIND 

GFIND1


GFUNCTIONGHEADING¼Á
GHELPffGHIGHGLOWGMACROSGMASTERGMENU
GNUMBERGPRINTMMGPRINTH"z
GQUITppGRECORD
GSELECTED¼¼GSORTBBGTITLEvvG\0G\D!!G\F//G\G33G\MG\X&&G\Y&&G\Z++ÿÿÿÿÿÿÿÿÿÿÿÿ » 
ÂÇ0




ÿ# ÿgÿÿÿÿÿÿÿÿÿÿÿÿi(ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ ÿÿÿÿÿÿÿÿfÿÿÿÿÿÿÿÿ$
%òDate: @||Page # &ò'(\015 (
„B)
'*¼Áÿÿÿÿ-·
ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿqq

ÿ'NUMBER
ÿ
'CLIENT
ÿ"RETURN ÿ^STAFF
ÿ^DUEÿ'RECEIVEDÿ'COMPLETEDÿ'EXTENDEDÿ'COMMENTS
ÿ "NUMBER
ÿ
'CLIENT
ÿ^RETURN ÿ ^STAFF
ÿ
^DUEÿ'RECEIVEDÿ'COMPLETEDÿ'EXTENDEDÿ'COMMENTSÿ\-ÿ\-ÿ\-ÿ\-ÿ\-ÿ\-ÿ\-
ÿ'Macros
ÿ

ÿ

'Atlantic Mobility
ÿ
`
ÿ

ù
@vß@X6
ÿ
ÿ
'Client Data Baseÿ
'Input Screen
ÿÿ
'Black Estate
ÿ
ÿ
ù~ß@X6 ù ù ù
 ù ù ÿ\-ÿ\-ÿ\-ÿ\-ÿ\-ÿ\-ÿ\- ÿ'\m/ÿ'{ONERROR \m}{LET function," None"}{CALC} ÿ'\0/ÿ'{ONERROR \m}{LET function," None"}{CALC}
ÿÿ
'Color Slides, Inc.
ÿ`
ÿ
ù@vß@X6 ù ù ù
 ù ù ÿ'Client Number......:ÿ'{GOTO}menu~{GOTO}number~ÿ'{GOTO}menu~{GOTO}number~
ÿÿ
'Defense Mechanisms Corp
ÿ`
ÿ
ù@vß@X6 ù ù ù
 ù ù ÿ'Client Name (24x)..:ÿ'{MENUBRANCH master}ÿ'{MENUBRANCH master}
ÿÿ
'Elastic Problem Solvers ÿ"1120S
ÿ
ù@vß@X6 ù ù ù
 ù ù ÿ'Return.............: ù. ù/ ù0
ÿÿ
'File Managers, Inc.
ÿ`
ÿ
ù@vß@X6 ù ù ù
 ù ù ÿ'Staff..............:
ÿ'master ÿ'Enterÿ'Lookÿ'Retrieve
ÿ'Deleteÿ'Sort ÿ 'Printÿ!'Helpÿ"'Quit
ÿÿ
'Go Carts Unlimited
ÿ`
ÿ
ù@vß@X6 ù ù ù
 ù ù ÿ'Due Date (YYMMDD)..: ù%ÿ'Input or edit database record.Tÿ'Look at database records. (IMPORTANT: Do not edit records in LOOK Function.)%ÿ'Retrieve record from database.-ÿ'Delete record from screen or database.ÿ'Sort database records.ÿ 'Print database reports."ÿ!'Read or print help screens.5ÿ"'Exit to blank 123 worksheet after saving work.
ÿÿ
'Houston Trust
ÿ
ÿ
ù~ß@X6 ù ù ù
 ù ù ÿ'Date Received......: ù$ÿ'{LET function," Enter"}{calc}#ÿ'{LET function," Look"}{calc}'ÿ'{LET function," Retrieve"}{calc}%ÿ'{LET function," Delete"}{calc}#ÿ'{LET function," Sort"}{calc}$ÿ '{LET function," Print"}{calc}#ÿ!'{LET function," Help"}{calc}#ÿ"'{LET function," Quit"}{calc} ù. ù/ ù0
ÿ ÿ
'Intelligent Transmission
ÿ `
ÿ
ù €…ß@X6 ù ù ù
ù ù ÿ 'Date Completed.....: ù ÿ '{?}~{DOWN}ÿ '{WINDOWSOFF}>ÿ '{GETNUMBER "Enter client number to retrieve: ",answer}~ÿ '{menubranch delete}ÿ '{menubranch sort}ÿ '{menubranch print}ÿ! '{GOTO}MENU~{PGDN}ÿ" '{menubranch file}
ÿ

ÿ

'Jacks of All Trades
ÿ
)
ÿ

ù
~ß@X6 ù
ù
ù

ù
ù
ÿ
'Date Extended To...:ÿ
'{?}~{DOWN}ÿ
'/reFIND1~ÿ
'{WINDOWSOFF}ÿ!
'{menubranch help}
ÿÿ
'Killer Mechanics, Inc.
ÿ`
ÿ
ù@ß@X6 ù ù ù
 ù ù ÿ'Comments (36x).....:ÿ'{?}~{DOWN})ÿ'{GOTO}FIND1~+A2>=1#AND#+A2<=99999~ÿ'/reEXTRACT1~
ÿ ÿ
'Long Creek Junk Corp
ÿ `
ÿ
ù @¤ß@X 6 ù ù ù
ù ù ÿ \-ÿ \-ÿ \-ÿ \-ÿ \-ÿ \-ÿ \-ÿ '{?}~{DOWN}Eÿ '{GOTO}DATABASE~/rndDATABASE~/rncDATABASE~{END}{DOWN}{RIGHT 8}~ÿ '/reFIND1~ÿ '{WINDOWSON}
ÿ

ÿ

'Mobile Beekeeping, Ltd.
ÿ
`
ÿ

ù
@¤ß@X 6 ù
ù
ù

ù
ù
ÿ
'{?}~!ÿ
'{GOTO}DATABASE~{DOWN}/wth~Eÿ
'{GOTO}DATABASE~/rndDATABASE~/rncDATABASE~{END}{DOWN}{RIGHT 8}~ÿ
'{menubranch sort}
ÿÿ
'Neuter Services, Inc.
ÿ`
ÿ

ù@ß@ ù ù ù ù
 ù ù ÿ'Function Selected..: ÿ' None*ÿ'{IF @cellpointer("contents")>0}{\d}ÿ'{WINDOWSON}ÿ'{LET FIND1,ANSWER}
ÿÿ
'Old Folks at Home Co.
ÿ`
ÿ

ù@ß@ ù ù ù
 ù ù ÿ'{DOWN}{?}~$ÿ'/dqiDATABASE~cFIND~f{?}{ESC}q%ÿ'/dqiDATABASE~cFIND~oEXTRACT~eq
ÿÿ
'Plaster Replicas, Inc.
ÿ`
ÿ
ù€…ß@X6 ù ù ù
 ù ù ÿ\-ÿ\-ÿ\-ÿ\-ÿ\-ÿ\-ÿ\-*ÿ'{IF @cellpointer("contents")>0}{\d}ÿ'/wtcÿ'/rtEXTRACT1~RECORD~
ÿÿ
'Quicksilver Messengers
ÿ`
ÿ
ù€…ß@X6 ù ù ù
 ù ù Jÿ' To break macro control, press [ESC]. To resume, press [ALT] m.ÿ'{DOWN}{?}~ÿ'{branch \m}ÿ'{WINDOWSON}
ÿÿ
'Rust Removers, Inc.
ÿ`
ÿ
ù@vß@X6 ù ù ù
 ù ù ÿ\-ÿ\-ÿ\-ÿ\-ÿ\-ÿ\-ÿ\-*ÿ'{IF @cellpointer("contents")>0}{\d}ÿ'{branch \m}
ÿÿ
'Smith Trust
ÿ
ÿ
ù~ß@X6 ù ù ù
 ù ù ÿ'{DOWN}{?}~
ÿÿ
'Travel Consultants
ÿ`
ÿ
ù€œß@X6 ù ù
ÿ "NUMBER
ÿ
'CLIENT
ÿ^RETURN ÿ ^STAFF
ÿ
^DUEù'RECEIVEDù'COMPLETEDÿ'EXTENDEDÿ'COMMENTSÿ\-ÿ\-ÿ\-ÿ\-ÿ\-ÿ\-ÿ\-*ÿ'{IF @cellpointer("contents")>0}{\d}
ÿÿ
'Universal Liars
ÿ`
ÿ

ù»ß@ ù ù
ÿ ÿ
'Zest Investment Club
ÿ)
ÿ 

ù
~ß@ ù ùÿ'Help Screen #1ÿ'* Client Data Base *ÿ'{DOWN}{?}~
ÿÿ
'Very Special Partners
ÿ)
ÿ

ù»ß@ ù ùÿ\-ÿ\-ÿ\-ÿ\-ÿ\-ÿ\-ÿ\-Vÿ'{GETLABEL "Do you wish to transfer this record to the database? (Y/N) ",answer}
ÿÿ
'Winston Living Trust
ÿÞ
ÿ
ù€…ß@X6 ù ùHÿ'1. The client data base is composed of several ranges. They are0ÿ'{IF ANSWER="Y"}{GOTO}DATABASE~{branch \y}
ÿÿ
'Xylophone Repair Company
ÿ`
ÿ
ù»ß@X 6 ù ùÿ' as follows:ÿ'{branch \m}
ÿÿ
'Young At Heart Partners
ÿ)
ÿ
ù~ß@X6 ù ù
ÿÿ
'Zest Investment Club
ÿ)
ÿ
ù~ß@X6 ù ùÿ'Range Nameÿ'Description ù ù ù
ÿ'answer
ÿ ù ù ù ù
ÿ'RECORD"ÿ'The displayed client record ù ùÿ'DATABASEÿ'Client data base records
ÿ'lowÿ€_ß@W 6 ù ùÿ'FIND+ÿ'Criterion range for record selection ù ùÿ'EXTRACT(ÿ'Output range for record selectionÿ'highÿ€_ß@W 6 ù ù ÿ 'MENUÿ 'Data input screen area ù! ù!
ÿ!'MACROSÿ!'Macro area ÿ!'\d/ÿ!'{IF @cellpointer("contents")=""}{RETURN} ù" ù"ÿ"'COMPANYÿ"'Company name2ÿ"'{IF @cellpointer("contents")<50000}{RETURN} ù# ù#ÿ#'HEADINGSÿ#'Report heading area>ÿ#'{EDIT}{HOME}@date({RIGHT 2},{RIGHT 2},{RIGHT 2})~/rfd4~ ù$ ù$ÿ$'{RETURN} ù% ù%Fÿ%' It is helpful sometimes to go to the ranges to make changes ù& ù&Iÿ&' which cannot be made through the menu. For example, you might ÿ&'\yGÿ&'{IF @cellpointer("contents")=""}/rtRECORD~~/reRECORD~{branch \m} ù' ù'6ÿ''{IF @cellpointer("contents")=NUMBER}{branch \z} ù( ù(ÿ(\-ÿ(\-ÿ(\-ÿ(\-ÿ(\-ÿ(\-ÿ(\-
ÿ('{DOWN} ù) ù)ÿ)'Help Screen #2ÿ)'* Client Data Base *ÿ)'{branch \y}ÿ*\-ÿ*\-ÿ*\-ÿ*\-ÿ*\-ÿ*\-ÿ*\- ù+ ù+ ÿ+'\zIÿ+'{GETLABEL "Do you wish to write over this record (Y/N)? ",ANSWER}~ ù, ù,Hÿ,' wish to change some due dates from 04/15/87 to 04/15/88. The"ÿ,'{IF ANSWER<>"Y"}{branch \m} ù- ù-Mÿ-' easiest way to accomplish this would be to GOTO the range DATABASE'ÿ-'/rtRECORD~~/reRECORD~{branch \m} ù. ù.Mÿ.' ([F5] DATABASE [ENTER]) and copy the new date (@date(88,04,15)) to ù/ ù/Jÿ/' all affected records. If you want to change the Company Name,  ÿ/'\f/ÿ/'{IF @cellpointer("contents")=""}{RETURN} ù0 ù0Lÿ0' GOTO the range COMPANY and enter the new name to the right of the6ÿ0'{IF @cellpointer("contents")=ANSWER}{branch \g} ù1 ù1ÿ1' range name COMPANY.ÿ1'{DOWN}{branch \f} ù2 ù2 ù3 ù3Hÿ3'2. The RECORD is a collection of information about an individual ÿ3'\gEÿ3'{GETLABEL "Do you wish to delete this record (Y/N)? ",ANSWER}~ ù4 ù4Fÿ4' client. Non-date fields can be numeric or alphabetic, but ÿ4'{IF ANSWER<>"Y"}{RETURN} ù5 ù5Jÿ5' processing time is faster for numeric fields. For example, you
ÿ5'{DOWN} ù6 ù6Iÿ6' might enter the number 1120 for C corporation returns and the @ÿ6'{IF @cellpointer("contents")=""}{UP}/re{RIGHT 8}~{RETURN} ù7 ù7Iÿ7' alphabetic label "1120S for S corporation returns. Dates must$ÿ7'/c{END}{DOWN}.{RIGHT 8}~{UP}~ ù8 ù8Hÿ8' be numeric and entered as YYMMDD because a macro converts theÿ8'{RETURN} ù9 ù9Gÿ9' number to 123's @date format. For example, the date 4/15/87 ù: ù:#ÿ:' would be entered 870415.
ÿ:'delete
ÿ:'Screenÿ:'Databaseÿ:'Quit ù; ù;&ÿ;'Erase record from input screen.#ÿ;'Delete record from database.ÿ;'Return to main menu. ù< ù<ÿ<\-ÿ<\-ÿ<\-ÿ<\-ÿ<\-ÿ<\-ÿ<\-ÿ<'/reRECORD~<ÿ<'{GETNUMBER "Enter client number to delete: ",answer}~ÿ<'{branch \m} ù= ù=ÿ='Help Screen #3ÿ='* Client Data Base *ÿ='{menubranch delete}ÿ='{GOTO}DATABASE~{DOWN} ù> ù>ÿ>\-ÿ>\-ÿ>\-ÿ>\-ÿ>\-ÿ>\-ÿ>\-ÿ>'{\f} ù? ù?)ÿ?'/reRECORD~{GOTO}MENU~{GOTO}NUMBER~ ù@ ù@Gÿ@'3. The ENTER function allows you to enter a new record onto theÿ@'{menubranch delete} ùA ùALÿA' data input screen, and, optionally, transfer it to the data base. ùB ùBHÿB' You may also edit a record which has been retrieved using theÿB'sort
ÿB'Number
ÿB'Return ÿB'Staff
ÿB'DueÿB'Receivedÿ B'Completedÿ!B'Extendedÿ"B'Quit ùC ùCKÿC' RETRIEVE function and copy it back to the data base. IMPORTANT:ÿC'Sort by client number.ÿC'Sort by return type.ÿC'Sort by staff.ÿC'Sort by due date.ÿC'Sort by date received.ÿ C'Sort by date completed.ÿ!C'Sort by extension date.ÿ"C'Return to main menu. ùD ùDLÿD' Always use the [ENTER] key when entering data, NOT the DOWN or UPÿD'{WINDOWSOFF}ÿD'{WINDOWSOFF}ÿD'{WINDOWSOFF}ÿD'{WINDOWSOFF}ÿD'{WINDOWSOFF}ÿ D'{WINDOWSOFF}ÿ!D'{WINDOWSOFF}ÿ"D'{branch \m} ùE ùEÿE' arrow keys.ÿE'{HOME}{DOWN}ÿE'{HOME}{DOWN}ÿE'{HOME}{DOWN}ÿE'{HOME}{DOWN}ÿE'{HOME}{DOWN}ÿ E'{HOME}{DOWN}ÿ!E'{HOME}{DOWN} ùF ùF*ÿF'/rncDATASORT~{END}{DOWN}.{RIGHT 8}~*ÿF'/rncDATASORT~{END}{DOWN}.{RIGHT 8}~*ÿF'/rncDATASORT~{END}{DOWN}.{RIGHT 8}~*ÿF'/rncDATASORT~{END}{DOWN}.{RIGHT 8}~*ÿF'/rncDATASORT~{END}{DOWN}.{RIGHT 8}~*ÿ F'/rncDATASORT~{END}{DOWN}.{RIGHT 8}~*ÿ!F'/rncDATASORT~{END}{DOWN}.{RIGHT 8}~ ùG ùGJÿG'4. The LOOK function allows you to look at the records in the dataÿG'/dsdDATASORT~pA2~~gÿG'/dsdDATASORT~pC2~~gÿG'/dsdDATASORT~pD2~~gÿG'/dsdDATASORT~pE2~~gÿG'/dsdDATASORT~pF2~~gÿ G'/dsdDATASORT~pG2~~gÿ!G'/dsdDATASORT~pH2~~g ùH ùHMÿH' base. You are not able to change or edit the records while in theÿH'/rndDATASORT~ÿH'/rndDATASORT~ÿH'/rndDATASORT~ÿH'/rndDATASORT~ÿH'/rndDATASORT~ÿ H'/rndDATASORT~ÿ!H'/rndDATASORT~ ùI ùIMÿI' LOOK function, but you can see if the records were sorted properlyÿI'{WINDOWSON}ÿI'{WINDOWSON}ÿI'{WINDOWSON}ÿI'{WINDOWSON}ÿI'{WINDOWSON}ÿ I'{WINDOWSON}ÿ!I'{WINDOWSON} ùJ ùJ0ÿJ' or examine them for other attributes.ÿJ'{GOTO}MENU~{GOTO}NUMBER~ÿJ'{GOTO}MENU~{GOTO}NUMBER~ÿJ'{GOTO}MENU~{GOTO}NUMBER~ÿJ'{GOTO}MENU~{GOTO}NUMBER~ÿJ'{GOTO}MENU~{GOTO}NUMBER~ÿ J'{GOTO}MENU~{GOTO}NUMBER~ÿ!J'{GOTO}MENU~{GOTO}NUMBER~ ùK ùKÿK'{menubranch sort}ÿK'{menubranch sort}ÿK'{menubranch sort}ÿK'{menubranch sort}ÿK'{menubranch sort}ÿ K'{menubranch sort}ÿ!K'{menubranch sort} ùL ùLJÿL'5. The RETRIEVE function will select a record by client number and ùM ùMMÿM' display it on the screen. You may edit the record using the ENTER ÿM'print
ÿM'Number
ÿM'Return ÿM'Staff
ÿM'DueÿM'Receivedÿ M'Completedÿ!M'Extendedÿ"M'Quit ùN ùNJÿN' function or you may erase it using the DELETE function. If youÿN'Print by client number.ÿN'Print by return type.ÿN'Print by staff.ÿN'Print by due date.ÿN'Print by date received.ÿ N'Print by date completed.ÿ!N'Print by extension date.ÿ"N'Return to main menu. ùO ùOQÿO'{WINDOWSOFF}{GOTO}DATABASE~/rndDATABASE~/rncDATABASE~{END}{DOWN}{RIGHT 8}~QÿO'{WINDOWSOFF}{GOTO}DATABASE~/rndDATABASE~/rncDATABASE~{END}{DOWN}{RIGHT 8}~QÿO'{WINDOWSOFF}{GOTO}DATABASE~/rndDATABASE~/rncDATABASE~{END}{DOWN}{RIGHT 8}~QÿO'{WINDOWSOFF}{GOTO}DATABASE~/rndDATABASE~/rncDATABASE~{END}{DOWN}{RIGHT 8}~QÿO'{WINDOWSOFF}{GOTO}DATABASE~/rndDATABASE~/rncDATABASE~{END}{DOWN}{RIGHT 8}~Qÿ O'{WINDOWSOFF}{GOTO}DATABASE~/rndDATABASE~/rncDATABASE~{END}{DOWN}{RIGHT 8}~Qÿ!O'{WINDOWSOFF}{GOTO}DATABASE~/rndDATABASE~/rncDATABASE~{END}{DOWN}{RIGHT 8}~ÿ"O'{branch \m} ùP ùPÿP\-ÿP\-ÿP\-ÿP\-ÿP\-ÿP\-ÿP\-ÿP'{GETNUMBER "From: ",low}ÿP'{GETNUMBER "From: ",low}ÿP'{GETNUMBER "From: ",low}(ÿP'{GETNUMBER "From (YYMMDD): ",low}(ÿP'{GETNUMBER "From (YYMMDD): ",low}(ÿ P'{GETNUMBER "From (YYMMDD): ",low}(ÿ!P'{GETNUMBER "From (YYMMDD): ",low} ùQ ùQÿQ'Help Screen #4ÿQ'* Client Data Base *ÿQ'{GETNUMBER "To: ",high}ÿQ'{GETNUMBER "To: ",high}ÿQ'{GETNUMBER "To: ",high}'ÿQ'{GETNUMBER "To (YYMMDD): ",high}'ÿQ'{GETNUMBER "To (YYMMDD): ",high}'ÿ Q'{GETNUMBER "To (YYMMDD): ",high}'ÿ!Q'{GETNUMBER "To (YYMMDD): ",high} ùR ùRÿR\-ÿR\-ÿR\-ÿR\-ÿR\-ÿR\-ÿR\-/ÿR'{GETLABEL "Enter report title: ",TITLE}~/ÿR'{GETLABEL "Enter report title: ",TITLE}~/ÿR'{GETLABEL "Enter report title: ",TITLE}~/ÿR'{GETLABEL "Enter report title: ",TITLE}~/ÿR'{GETLABEL "Enter report title: ",TITLE}~/ÿ R'{GETLABEL "Enter report title: ",TITLE}~/ÿ!R'{GETLABEL "Enter report title: ",TITLE}~ ùS ùSÿS'/reFIND1~ÿS'/reFIND1~ÿS'/reFIND1~BÿS'{GOTO}LOW~{EDIT}{HOME}@date({RIGHT 2},{RIGHT 2},{RIGHT 2})~BÿS'{GOTO}LOW~{EDIT}{HOME}@date({RIGHT 2},{RIGHT 2},{RIGHT 2})~Bÿ S'{GOTO}LOW~{EDIT}{HOME}@date({RIGHT 2},{RIGHT 2},{RIGHT 2})~Bÿ!S'{GOTO}LOW~{EDIT}{HOME}@date({RIGHT 2},{RIGHT 2},{RIGHT 2})~ ùT ùTLÿT' request a record and "nothing happens", the record is not in the /ÿT'{GOTO}EXTRACT1~/re{END}{DOWN}.{RIGHT 8}~/ÿT'{GOTO}EXTRACT1~/re{END}{DOWN}.{RIGHT 8}~/ÿT'{GOTO}EXTRACT1~/re{END}{DOWN}.{RIGHT 8}~CÿT'{GOTO}HIGH~{EDIT}{HOME}@date({RIGHT 2},{RIGHT 2},{RIGHT 2})~CÿT'{GOTO}HIGH~{EDIT}{HOME}@date({RIGHT 2},{RIGHT 2},{RIGHT 2})~Cÿ T'{GOTO}HIGH~{EDIT}{HOME}@date({RIGHT 2},{RIGHT 2},{RIGHT 2})~Cÿ!T'{GOTO}HIGH~{EDIT}{HOME}@date({RIGHT 2},{RIGHT 2},{RIGHT 2})~ ùU ùUIÿU' data base. Use the LOOK function to see if the record exists.ÿU'{GOTO}J2~ÿU'{GOTO}L2~ÿU'{GOTO}M2~ÿU'/reFIND1~ÿU'/reFIND1~ÿ U'/reFIND1~ÿ!U'/reFIND1~ ùV ùV ÿV'+A2>=$LOW#AND#+A2<=$HIGH~ÿV'+C2>=$LOW#AND#C2<=$HIGH~ÿV'+D2>=$LOW#AND#D2<=$HIGH~/ÿV'{GOTO}EXTRACT1~/re{END}{DOWN}.{RIGHT 8}~/ÿV'{GOTO}EXTRACT1~/re{END}{DOWN}.{RIGHT 8}~/ÿ V'{GOTO}EXTRACT1~/re{END}{DOWN}.{RIGHT 8}~/ÿ!V'{GOTO}EXTRACT1~/re{END}{DOWN}.{RIGHT 8}~ ùW ùWLÿW'6. The DELETE function is used to remove a record from the data base%ÿW'/dqiDATABASE~cFIND~oEXTRACT~eq%ÿW'/dqiDATABASE~cFIND~oEXTRACT~eq%ÿW'/dqiDATABASE~cFIND~oEXTRACT~eqÿW'{GOTO}N2~ÿW'{GOTO}O2~ÿ W'{GOTO}P2~ÿ!W'{GOTO}Q2~ ùX ùX-ÿX' or erase a record from the screen.!ÿX'/cEXTRACT~a707~{GOTO}a707~!ÿX'/cEXTRACT~a707~{GOTO}a707~!ÿX'/cEXTRACT~a707~{GOTO}a707~ÿX'+E2>=$LOW#AND#E2<=$HIGH~ÿX'+F2>=$LOW#AND#F2<=$HIGH~ÿ X'+G2>=$LOW#AND#G2<=$HIGH~ÿ!X'+H2>=$LOW#AND#H2<=$HIGH~ ùY ùY ÿY'/wdr~ ÿY'/wdr~ ÿY'/wdr~%ÿY'/dqiDATABASE~cFIND~oEXTRACT~eq%ÿY'/dqiDATABASE~cFIND~oEXTRACT~eq%ÿ Y'/dqiDATABASE~cFIND~oEXTRACT~eq%ÿ!Y'/dqiDATABASE~cFIND~oEXTRACT~eq ùZ ùZKÿZ'7. The SORT function is used to sort the database before LOOKing or9ÿZ'{IF @cellpointer("contents")=""}{menubranch print}9ÿZ'{IF @cellpointer("contents")=""}{menubranch print}9ÿZ'{IF @cellpointer("contents")=""}{menubranch print}!ÿZ'/cEXTRACT~a707~{GOTO}a707~!ÿZ'/cEXTRACT~a707~{GOTO}a707~!ÿ Z'/cEXTRACT~a707~{GOTO}a707~!ÿ!Z'/cEXTRACT~a707~{GOTO}a707~ ù[ ù[Nÿ[' PRINTing. You may sort by client number, return, staff, due date, (ÿ['/rncREPORT~{END}{DOWN}.{RIGHT 8}~(ÿ['/rncREPORT~{END}{DOWN}.{RIGHT 8}~(ÿ['/rncREPORT~{END}{DOWN}.{RIGHT 8}~ ÿ['/wdr~ ÿ['/wdr~ ÿ ['/wdr~ ÿ!['/wdr~ ù\ ù\Lÿ\' date received, date completed, or extension date. After sorting,$ÿ\'{GOTO}SELECTED~@rows(REPORT)~$ÿ\'{GOTO}SELECTED~@rows(REPORT)~$ÿ\'{GOTO}SELECTED~@rows(REPORT)~9ÿ\'{IF @cellpointer("contents")=""}{menubranch print}9ÿ\'{IF @cellpointer("contents")=""}{menubranch print}9ÿ \'{IF @cellpointer("contents")=""}{menubranch print}9ÿ!\'{IF @cellpointer("contents")=""}{menubranch print} ù] ù]Jÿ]' control returns to the SORT menu if you wish to sort by anotherGÿ]'/ppcaarREPORT~obra701.a706~s\015~ml5~mr132~fDate: @||Page #~qgpqGÿ]'/ppcaarREPORT~obra701.a706~s\015~ml5~mr132~fDate: @||Page #~qgpqGÿ]'/ppcaarREPORT~obra701.a706~s\015~ml5~mr132~fDate: @||Page #~qgpq(ÿ]'/rncREPORT~{END}{DOWN}.{RIGHT 8}~(ÿ]'/rncREPORT~{END}{DOWN}.{RIGHT 8}~(ÿ ]'/rncREPORT~{END}{DOWN}.{RIGHT 8}~(ÿ!]'/rncREPORT~{END}{DOWN}.{RIGHT 8}~ ù^ ù^ÿ^' attribute.ÿ^'/reSELECTED~ÿ^'/reSELECTED~ÿ^'/reSELECTED~$ÿ^'{GOTO}SELECTED~@rows(REPORT)~$ÿ^'{GOTO}SELECTED~@rows(REPORT)~$ÿ ^'{GOTO}SELECTED~@rows(REPORT)~$ÿ!^'{GOTO}SELECTED~@rows(REPORT)~ ù_ ù_ÿ_'/reREPORT~/rndREPORT~ÿ_'/reREPORT~/rndREPORT~ÿ_'/reREPORT~/rndREPORT~Gÿ_'/ppcaarREPORT~obra701.a706~s\015~ml5~mr132~fDate: @||Page #~qgpqGÿ_'/ppcaarREPORT~obra701.a706~s\015~ml5~mr132~fDate: @||Page #~qgpqGÿ _'/ppcaarREPORT~obra701.a706~s\015~ml5~mr132~fDate: @||Page #~qgpqGÿ!_'/ppcaarREPORT~obra701.a706~s\015~ml5~mr132~fDate: @||Page #~qgpq ù` ù`Iÿ`'8. The PRINT function is used to print database reports. Reportsÿ`'{WINDOWSON}ÿ`'{WINDOWSON}ÿ`'{WINDOWSON}ÿ`'/reSELECTED~ÿ`'/reSELECTED~ÿ `'/reSELECTED~ÿ!`'/reSELECTED~ ùa ùaIÿa' may be printed by client number, return, staff, due date, dateÿa'{GOTO}MENU~{GOTO}NUMBER~ÿa'{GOTO}MENU~{GOTO}NUMBER~ÿa'{GOTO}MENU~{GOTO}NUMBER~ÿa'/reREPORT~/rndREPORT~ÿa'/reREPORT~/rndREPORT~ÿ a'/reREPORT~/rndREPORT~ÿ!a'/reREPORT~/rndREPORT~ ùb ùbIÿb' received, date completed, or extension date. If no report is ÿb'{menubranch print}ÿb'{menubranch print}ÿb'{menubranch print}ÿb'{WINDOWSON}ÿb'{WINDOWSON}ÿ b'{WINDOWSON}ÿ!b'{WINDOWSON} ùc ùcÿc'{GOTO}MENU~{GOTO}NUMBER~ÿc'{GOTO}MENU~{GOTO}NUMBER~ÿ c'{GOTO}MENU~{GOTO}NUMBER~ÿ!c'{GOTO}MENU~{GOTO}NUMBER~ ùd ùdÿd\-ÿd\-ÿd\-ÿd\-ÿd\-ÿd\-ÿd\-ÿd'{menubranch print}ÿd'{menubranch print}ÿ d'{menubranch print}ÿ!d'{menubranch print} ùe ùeÿe'Help Screen #5ÿe'* Client Data Base * ùf ùfÿf\-ÿf\-ÿf\-ÿf\-ÿf\-ÿf\-ÿf\-ÿf'helpÿf'Down ÿf'Up ÿf'Printÿf'Quit ùg ùg ÿg'Page down to next screen.ÿg'Page up to next screen.ÿg'Print help screens.ÿg'Return to main menu. ùh ùhDÿh' printed, no records exist which meet the report criteria.
ÿh'{PGDN}
ÿh'{PGUP}ÿh'/ppcaarPRINTH~gpqÿh'{branch \m} ùi ùiKÿi' For example, to print all records in the data base, enter "From"ÿi'{menubranch help}ÿi'{menubranch help}ÿi'{menubranch help} ùj ùjLÿj' as 1 and "To" as 99999. To print all returns due on December 15, ùk ùkIÿk' 1987, enter "From" as 871215 and "To" as 871215. To print allÿk'fileÿk'C Driveÿk'A Driveÿk'B Driveÿk'Quit ùl ùlKÿl' returns due for staff number 1, enter "From" as 1 and "To" as 1.+ÿl'Save changes to database on drive C.+ÿl'Save changes to database on drive A.+ÿl'Save changes to database on drive B.'ÿl'Do not save changes to database. ùm ùmÿm'/fs{ESC}DATABASE~r#ÿm'/fs{ESC 2}{BS 7}A:DATABASE~r#ÿm'/fs{ESC 2}{BS 7}B:DATABASE~rÿm'{menubranch quit} ùn ùnJÿn'9. The QUIT function takes you to the FILE menu where you can saveÿn'{menubranch file}ÿn'{menubranch file}ÿn'{menubranch file} ùo ùo9ÿo' the changes to your data base before you quit. ùp ùpÿp'quit ÿp'No
ÿp'Yes ùq ùqÿq'Return to menu.ÿq'Exit to 123. ùr ùr'ÿr'This application was created by:ÿr'{branch \m}ÿr'/wey ùs ùs ùt ùtÿt'Stephen A. Leake, CPAÿt'Mesquite, Texas 75149ÿt'companyÿt'Stephen A. Leake, CPA ùu ùuÿu'111 South Broad Streetÿu'(214) 285-8733 ùv ùv ÿv'title$ÿv'Returns Due December 15, 1987 ùw ùw ùx ùx ùy ùy ùz ùz ù{ ù{ ù| ù| ù} ù} ù~ ù~ ù ù ù€ ù€ ù ù ù‚ ù‚ ùƒ ùƒ ù„ ù„ ù… ù… ù† ù† ù‡ ù‡ ùˆ ùˆ ù‰ ù‰ ùŠ ùŠ ù‹ ù‹ ùŒ ùŒ ù ù ùŽ ùŽ ù ù ù ù ù‘ ù‘ ù’ ù’ ù“ ù“ ù” ù” ù• ù• ù– ù– ù— ù— ù˜ ù˜ ù™ ù™ ùš ùš ù› ù› ùœ ùœ ù ù ùž ùž ùŸ ùŸ ù  ù  ù¡ ù¡ ù¢ ù¢ ù£ ù£ ù¤ ù¤ ù¥ ù¥ ù¦ ù¦ ù§ ù§ ù¨ ù¨ ù© ù© ùª ùª ù« ù« ù¬ ù¬ ù­ ù­ ù® ù® ù¯ ù¯ ù° ù° ù± ù± ù² ù² ù³ ù³ ù´ ù´ ùµ ùµ ù¶ ù¶ ù· ù· ù¸ ù¸ ù¹ ù¹ ùº ùº ù» ù» ù¼ ù¼ ù½ ù½ ù¾ ù¾ ù¿ ù¿ ùÀ ùÀ ùÁ ùÁ ù ù ùà ùà ùÄ ùÄ ùÅ ùÅ ùÆ ùÆ ùÇ ùÇ ùÈ ùÈ ùÉ ùÉ ùÊ ùÊ ùË ùË ùÌ ùÌ ùÍ ùÍ ùÎ ùÎ ùÏ ùÏ ùÐ ùÐ ùÑ ùÑ ùÒ ùÒ ùÓ ùÓ ùÔ ùÔ ùÕ ùÕ ùÖ ùÖ ù× ù× ùØ ùØ ùÙ ùÙ ùÚ ùÚ ùÛ ùÛ ùÜ ùÜ ùÝ ùÝ ùÞ ùÞ ùß ùß ùà ùà ùá ùá ùâ ùâ ùã ùã ùä ùä ùå ùå ùæ ùæ ùç ùç ùè ùè ùé ùé ùê ùê ùë ùë ùì ùì ùí ùí ùî ùî ùï ùï ùð ùð ùñ ùñ ùò ùò ùó ùó ùô ùô ùõ ùõ ùö ùö ù÷ ù÷ ùø ùø ùù ùù ùú ùú ùû ùû ùü ùü ùý ùý ùþ ùþ ùÿ ùÿ ù
ù
ù

ù

ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù

ù

ù
ù
ù
ù
ù

ù

ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù
ù!
ù!
ù"
ù"
ù#
ù#
ù$
ù$
ù%
ù%
ù&
ù&
ù'
ù'
ù(
ù(
ù)
ù)
ù*
ù*
ù+
ù+
ù,
ù,
ù-
ù-
ù.
ù.
ù/
ù/
ù0
ù0
ù1
ù1
ù2
ù2
ù3
ù3
ù4
ù4
ù5
ù5
ù6
ù6
ù7
ù7
ù8
ù8
ù9
ù9
ù:
ù:
ù;
ù;
ù<
ù<
ù=
ù=
ù>
ù>
ù?
ù?
ù@
ù@
ùA
ùA
ùB
ùB
ùC
ùC
ùD
ùD
ùE
ùE
ùF
ùF
ùG
ùG
ùH
ùH
ùI
ùI
ùJ
ùJ
ùK
ùK
ùL
ùL
ùM
ùM
ùN
ùN
ùO
ùO
ùP
ùP
ùQ
ùQ
ùR
ùR
ùS
ùS
ùT
ùT
ùU
ùU
ùV
ùV
ùW
ùW
ùX
ùX
ùY
ùY
ùZ
ùZ
ù[
ù[
ù\
ù\
ù]
ù]
ù^
ù^
ù_
ù_
ù`
ù`
ùa
ùa
ùb
ùb
ùc
ùc
ùd
ùd
ùe
ùe
ùf
ùf
ùg
ùg
ùh
ùh
ùi
ùi
ùj
ùj
ùk
ùk
ùl
ùl
ùm
ùm
ùn
ùn
ùo
ùo
ùp
ùp
ùq
ùq
ùr
ùr
ùs
ùs
ùt
ùt
ùu
ùu
ùv
ùv
ùw
ùw
ùx
ùx
ùy
ùy
ùz
ùz
ù{
ù{
ù|
ù|
ù}
ù}
ù~
ù~
ù
ù
ù€
ù€
ù
ù
ù‚
ù‚
ùƒ
ùƒ
ù„
ù„
ù…
ù…
ù†
ù†
ù‡
ù‡
ùˆ
ùˆ
ù‰
ù‰
ùŠ
ùŠ
ù‹
ù‹
ùŒ
ùŒ
ù
ù
ùŽ
ùŽ
ù
ù
ù
ù
ù»ÿ¼0žð
€¸½3ÿ¼Stephen A. Leake, CPAÿ¼'Records Selectedÿ½.žð
€¹½3#ÿ½Returns Due December 15, 1987 ù¾
ÿ¿'Client
ÿ
¿^Clientÿ¿^Dateÿ¿^Dateÿ¿^Dateÿ¿^Extension
ÿÀ'Numberÿ
À^Name
ÿÀ^Return ÿÀ^Staff
ÿÀ^DueÿÀ^ReceivedÿÀ^CompletedÿÀ^DateÿÀ'CommentsÿÁ\-ÿ
Á\-ÿÁ\-ÿÁ\-ÿÁ\-ÿÁ\-ÿÁ\-ÿÁ\-ÿÁ\- ùÂ ùÂ ùÂ ùÃ ùÃ ùÃ ùÄ ùÄ ùÄ ùÅ ùÅ ùÅ ùÆ ùÆ ùÆ ùÇ ùÇ ùÇ