o:v͈C!vo~ANAL DBFANALY CQDANALY FRM,CHECKINGDBF5CLIST FRM=CODE FRMCODES DBFA CODYR CQD ENTERCK CQD?INSTALL CQDLCODE FRMLNAMES FRMMCODE CQDMENU CQDaMODCK CQDMONREC FRMNUMMON CQDNUMYR CQDREAD ME iwRECCK CQD.RECON CMD%RECON CQDqSTAT CQDYSUMMARY CQDSUMMARY DBFSUMMARY FRM:1s~1s@##ͥ7$:C6 s#.:*? пͤ#~+Ksͱ$8Zs:C6tmsͱ$8.͔rr rrr>  r~.r#r rͤ7)CODE:NUNpAMOUNTNpMONTHCpNAMECpTAXNpANALYSISNp * * * Recon. Cmd * * * * * * 07 Dec. 83 * * * * * * Copyright Dial Computer Consultants 07 Dec. 83 * * * * * * Routine To Determine Reconcile Status ERASE STORE 0000.00 TO xtcheck STORE 0000.000 TO xtdep STORE 1 TO xgo ERASE @ 10,5 SAY 'Summing Reconciled Checks Please Wait' @ 21,0 SUM amount FOR check:num <> 0 .AND. recon TO xtcheck @ 10,5 SAY 'Summing Reconciled Deposits Please Wait' @ 21,0 SUM amount FOR check:num = 0 .AND. recon TO xtdep STORE ((xtdep - xtcheck) + sbalance) TO xxbal DO WHILE xgo ERASE @ 08,20 SAY 'Enter 0 For Sorted Output To Printer ' @ 10,20 SAY 'Enter 1 For Sorted Output To Display ' @ 12,20 SAY 'Enter 2 For Reconcile Error Analysis ' @ 14,20 SAY ' Press RETURN To Exit ' @ 17,10 say 'Use 2 If Bank Statement And Your Computer Do Not Agree.' @ 18,10 Say 'This Will Produce A Check Listing By Check No. Of This ' @ 19,10 say 'Months Reconciled Checks/Deposits For An Error Analysis' @ 20,01 ? chr(7) WAIT TO xmhoice ERASE IF xmhoice = '2' @ 8,20 SAY 'Place Printer ON-LINE' @ 10,20 SAY 'Press RETURN When Ready ' @ 20,01 ? chr(7) WAIT TO xnext ERASE @ 10,15 SAY 'Generating Reconcilation File Please Wait' @ 22,0 SET EJECT OFF * * * Printer SetUp Routine MX-80 SET PRINT ON ? chr(27) + chr(64) SET PRINT OFF * * * End Of Printer SeUp ERASE REPORT FORM monrec FOR mod:rec TO PRINT ENDIF xmhoice = '2' IF xmhoice = '1' .OR. xmhoice = '0' IF xmhoice = '0' ERASE SET EJECT OFF * * * Printer SetUp Routine MX-80 SET PRINT ON ? chr(27) + chr(64) SET PRINT OFF * * * End Of Printer SeUp SET EJECT OFF SET FORMAT TO PRINT ENDIF xmhoice = '0' * * * Routine To Output Data As The Bank Statement Presents It To You @ 1,5 SAY DATE() @ 3,20 SAY ' Reconciled Check/Deposit Status To Date' @ 5,30 SAY 'FOR' @ 5,34 SAY name @ 7,5 SAY ' Starting Balance.............$ ' @ 7,40 SAY sbalance @ 9,5 SAY ' Total Reconciled Income......$ ' @ 9,40 SAY xtdep @ 11,5 SAY ' Total Reconciled Checks.....$ ' @ 11,40 SAY xtcheck @ 13,5 SAY ' Monthly Reconciled Income...$ ' STORE (xtdep - mdep) TO xadep @ 13,40 SAY xadep @ 15,5 SAY ' Monthly Reconciled Checks...$ ' STORE ( xtcheck - mcheck) TO xacheck @ 15,40 SAY xacheck @ 17,5 SAY ' Total Bank Charges .........$ ' @ 17,40 SAY bank @ 19,5 SAY ' Bank Statement .............$ ' STORE xtdep - xtcheck + sbalance TO xbal STORE xbal - bank TO xstate @ 19,40 SAY xstate IF xmhoice = '1' @ 21,1 WAIT TO xhoice ERASE ENDIF xmhoice = '1' LOCATE FOR .not. recon STORE 4 TO xline DO WHILE .not. eof IF xmhoice = '1' .AND. xline = 22 .OR. xmhoice = '1' .AND. xline = 4; .OR. xmhoice = '0' .AND. xline = 4 @ 0,5 SAY ' The Outstanding Checks Or Deposits Are;' @ 1,1 SAY ' Check | Date | Code | Description | Amount; |' @ 2,1 SAY ' No. | | No. | | ; |' @ 3,1 SAY ' --------|------|------|-----------------------------|---------; --|' ENDIF xmhoice = '1' .AND. xline = 22 .OR. xmho IF .not. eof @ xline,1 SAY check:num @ xline,12 SAY mon:day @ xline,20 SAY code:nu @ xline,25 SAY disc @ xline,57 SAY amount ENDIF .not. eof STORE 1 + xline TO xline IF xline = 21 .AND. xmhoice = '1' @ 21,0 WAIT TO xhoice STORE 4 TO xline ERASE ENDIF xline = 21 .AND. xmhoice = '1' CONTINUE ENDDO WHILE IF xmhoice = '1' @ 21,0 WAIT TO xhoice ERASE ENDIF xmhoice = '1' @ 5,5 SAY ' As of ' @ 5,14 SAY DATE() @ 7,5 SAY ' Checkbook Balance With Checking Charge Is........$ ' @ 7,63 SAY totdep-totck-bank+sbalance @ 21,1 SET FORMAT TO screen IF xmhoice = '1' WAIT TO xhoice ERASE ENDIF xmhoice = '1' ENDIF xmhoice = '1' .OR. xmhoice = '0' IF xmhoice = ' ' ERASE STORE 'Y' TO xhoice @ 10,10 SAY 'Exit With Constants Saves' @ 10,40 GET xhoice @ 12,10 say 'Yes, Erases The Ability To Print A Listing Of Checks/Deposits' @ 13,10 say 'That Were Reconciled This Month. ' @ 15,10 say 'Only Say Yes If The Bank Statement And Your Computer ' @ 16,10 say 'Agree On Your Checking Account Status.' ?? chr(7) READ ERASE IF !(xhoice) = 'Y' @ 10,5 SAY 'Storing Memory Constants Please Wait.' STORE xtcheck TO mcheck STORE xtdep TO mdep RELEASE ALL LIKE x* REPLACE ALL mod:rec WITH f STORE 0 TO xgo ELSE STORE 0 TO xgo ENDIF !(xhoice) = 'Y' ENDIF xmhoice = ' ' ENDDO WHILE xgo esCHECK:NUMNpMON:DAYNpCODE:NUNpDISCCpAMOUNTNpRECONLpMOD:RECLp tore 0000.00 to maydep store 0000.00 to junck store 0000.00 to jundep store 0000.00 to jlyck store 0000.00 to jlydep store 0000.00 to augck store 0000.00 to augdep store 0000.00 to sepck store 0000.00 to sepdep store 0000.00 to octck store 0000.00 to octdep store 0000.00 to novck store 0000.00 to nocdep store 0000.00 to decck store 0000.00 to decdep store 0000.00 to c:amt STORE 000000 to ck:num store 0000 to c:dat store 0000.00 to bank store 0000.00 to tdep store 0000.00 to y Checking Account n y n 6,check:num >Check No.;====== n 8,code:nu Code Number;======== n 35,disc >====> The Description Is <==== As Follows ..............;=================================== 10,amount > The Amount;========== y F 18571207 22Dec. 606.34TF 18581207 38Car Loan 373.85TF 18591208 74Dr. Amin 3.00TF 1012111211 95Allow & Gas & Misc 120.00TF 18781208 61Northrop Credit Union 8CODE:NUNpNAMECpTAXNpANALYSISNp  132131 21232131 3123213213 412321321321313 5dsadsadjsa3re3w54q1s4sad  10Bank of America (VISA) * 12Bergstroms * 13Besco * 14Best Products * 15Brea Pets * 16Broadway * 17Chrisitans Market * 18Citi Corp (Master Charge)* 19Cloth World * 20Computique * 21C. P. C. (Apple Computer)* 22Crocker Bank (Mortgage) * 23C. V. S. * 24Demicelli's * 25Fashion Gal * 27Florsheim's * 28Foto Hall * 29Fraiser Fabrics * 30Fullerton, City of * 31Ganahl Lumber * 32Gem Meat * 33Gemco (Non Food) * 34Good Looks Beauty Supply * 35Hair We Are * 36Hansel & Gretal * 37H.F.E.A. ( Apple Club ) * 38H.F.E.A. ( Visa ) * 39Hobbyman * 40Home Silk Shop * 42House of Fabrics * 43Irvine Ranch * 44Deleted * 45Johnson & Johnson * 46Karl's Toys * 47K - Mart * 48J. C. Penneys * 49Lane Bryant * 50L. A. Times * 51Lerners * 52Little Fokes Shop * 53Litton Credit Union * 54Longs Drugs * 55L. P. Lumber * 56Lucky's * 57Magic Razor * 58May Company * 59Mc Coys Market * 60Mervyns * 61Miscellaneous * 62Montgomery Wards * 63Nordstroms * 64Ole's * 65Orvac Electronics * 66Pacific Telephone * 67Pelex Camera * 68Petries * 69Phethean Cheese Place * 70Pink Tigers Cleaners * 71Ralphs * 72Register * 73Doctor * 74Pharmacy * 75Save On * 76Sears * 77Shell Oil * 78Skaggs * 79Southern Cal. Edison * 80Southern Cal. Gas * 81State Farm (30 & MMDD) * 83Stricklers * 84Subscriptions * 85Thriftys * 86Toy City * 87Toys R Us * 88Waldenbooks * 89Winemans * 90William's Volvo * 91Von's * 92Zody's * 93Gemco ( Only Food ) * 94Donations * 95Auto Teller ( 10 & MMDD )* 96Pic'N Save * 97Fresta Florist * 98Adrays * 99Albertson *100Alpha Beta *102Bargain Basket *103Wherehouse *104U. S. Toys *105Apple ][ Computer *106Newberry's *107SuperCuts *108U. S. Post Office *109Fed Co *110Pantry *111Farmer Boys *112Ford Electronics *113Miscellanous (Only Food) *114Gifts *115Target *116HandyMan *117Trader Joe's *112test *11312321313 * 11Tom Orr  * 1qq 115Target 116HandyMan 117Trader Joe's say 'Account Code Maintance Routine' @ 6,20 say '*******************************' @ 8,20 say '(1) Add A New Code Number ' @ 10,20 say '(2) Delete A Code Number ' @ 12,20 say '(3) Sort By Code Number' vhmenu.cmdW   !#"$%&'()+*,-/.01o23457698:;<>=@?ACDBEFGKHIJNMLOPQRUTVSYs? <#x}PetCX+J귴Iy)|FJv˷)i<>GWY1%(WW^7 AȚ.?X16}+|Tvt)sx{ܣGDx p^bvIsz/y*cCXoRaӃ;AT*֨WSYڬQ1VXQdw +z&>H_gWYj?ꯊ<dgy*US Rڌ)kFQz4O%Ԭ=v Wj=v7)EkJ+OYoR(XQ4B=w_WEwo*+Ve]&i c9wAYX]簳簳qϵ I=uLkFNu*{"w.WW/CXr zKy*9^ºHoifлx\_Mrs\+[c4q" 9^e;toZlj$$*:CoOo9^s\ ҽkxUqRzyء[A.KV6'r{8rs\HqۤU«rU)Lh )jw^_5뛄H϶E+s+?WK,->hR]\k{F0.6b7oRfG.[9m.LbwpfJ~ަ4c3SХ%?M_lc3SХ-縟9"bwpfJtry#bwpfJ9mzZLWCb6}HZLWClryF9~̔z5;:ts:A@BCEDFGHJIKMLNORPQSTUWV*T]N *T>ggrSBJo*T0Gp(VRL6%1G%$;i>ggrC *TPDŽsF->j/m'zzϹprΌ֯{Ϲp[8gF[s/JΙq(v}&S1@݉[!BU#OgaVћL4EO1-۹ƯՉ7E}Ԝ3dJ8;~ =D}^Hb&lƑ0 zI۽ ;&e;:Ɖk,_G937vs}07h}ޑM6OҤw͓rfaC8{ #rԥqƐ;W֔PhCToȔvlcC kJXRd&iF2eHuiClcH}^H+ cȮ'i8ސ)s˽?Pv,E3r¢ Qd0jQIsHIdkˮ 7r"CLQd0Ivͨ W1M.)fflcȮ0z3ސI[S5tx kU-{ d1.@IB2K2k]: Q_z5è@&n<_C玽~89gFG\~_L1@NV!B>Gҟ$ di ze>*Tp m"uLX?OQ}̃):;)~ q > N *\ʼPhC\~_A}v:\g9gkEȔrFL8(DmWi~_E*(>ao"w9gƩMLqT@<6'QU>j/_ż~^E*(><ɼ}ޑsf}7){0N~>Ȕύcv2X%?Ni^sb|QU*^`b8ٰ7\kD>X%?NrzHqc\?sfvU037L،=(dJ(yT~0'b|(LVDMxEjDŽ7$Qr^E0 (>b {ELn(\$$$O\,ao75X5 qJk,_'4~1E奣}(dFIo~V'޽Q$Ɍ(wV(dFIo]NF$3JB#}̽?F$3JB9`zDŽQ奣}(R9%2JBΙQF:l%?N%}|1(lj*UoI2p{HZ'̸FoI993$""u -$I/8Q"ea r9! [8Q"%. 7~89g5 {H]~_5X5 qJŞ7zc,rp dy>9/u >U"(7yn{`~S7O:iy&o .7\?OΙ̇e|QU(R ("u}`y2(lj*Uo\a^'T^'Uq2(ljBWWops}sf\7)]teAsԙ͸MMt_'ɔitɦagW8e?\?f! ;9  =ļ}>b&lz)sK6 u,Sүr"Iv}z)%Qa?㰑stN#&BmJz)5JlFC̚GLB{r& z {ڗUa\'zHɔq̽?PC<c:Gҟ$KFϹ_sμ}7}h9~So b $tc7T}=0w>~\Qs/\Ιq(W}FϹp9gơ\aK.5 q z,[8Q(,3 /ơHo^(\$$$O\,ao75X5 qJk,_'4~1E奣}(dFIo~V'޽Q$Ɍ(v/analy.cmdY   "!#%$&(')+*-,./0214357689:;o<=@>?ABCDEGFIHJKLMPNOQRSTWVUXƍgl ;'|/ƍ7.t?zW2nHٸqU(dAO[-'ˎ2fq\F]7nHٸq*Xx0x'KE\ "]ۗR`rJqƵU"~]  OX(*H}B(O/ld"7a{>,׹@ՋY8c[ 2[iŷ=wYdS%?}m`6$ma7pnmg5RHߤx{ݓ[&͍=uΔ>%$”>ѽʕ$y}߄V̤D3 pNo*X(*[]]$}*=wYdϹ'.VԂ/ewYܺmisE{r뜊͵b`&b唍7.H E:BdkDb)Ͷ0Iĝ>ihwf&&RMnZPX9e1HXי9u8cqnmg5[}3j/ &[o6]M ǛJ)Qn]ƍ# [O[m{p^gl A'KkDb!*7/b`t7Kq հp\H ˾X2ly5]MŒaB5lv7.H>Yny-,>+6S/fw?(SӭYZeȔ:Tkk ?O J]Y˜ˉ2j x û"=!R(|{qÆ< M&Æqu|d߳pƶd|dVBʣtUZ<{}-{G龹x\J$ՋvG龹x\puz7n}ʣtUZ<{Ջv׽SqcW9El A>)}sWi^ma7x+7.H}ƶd\[% O9}ּ@qr|1HK}tMXzEcr<*Zu.%~Kǒ3s @ulXG%VK|$[wG HGM/l؝--BʎǒKZ=l| Uzdw*Rv*=\?;WHxK 'ʃ`;+()ߩHKyW9«0T鱫ONUG H/jA^.R[ESLG]7"ˎ—Zoܸq.%^J$>]xK)?W3G^J,)ƍV~>@kDb)?W3G]ʿ&io\\뿋O0fХ]jZ/xIzQqJŧ\?hݷO/l؝--oRv*LП򝊔Ѻow.*J]w*⑲l?>ZF/*vRW4ONEʎXJ |E݆QP\\v)ŲceSͻ{H&m)߼WoR>ĥѽʕ/4F)ǒ?:3盎[ip>Yv`8 FpK*3`Hl͵}SBQ1?(E/3F麍v`(oBp`(o2ׂZ~yw`)u߾)Z0}ּ@qr=eM FghgS)vcodyr.cmdQ   "!$#%&'()*+,-./1023465798:;<=?>@CABoDEFGJHIKMPNOL[O2:88<880-WXaăc̓Oɷ۠OI|J_o@pppypppٷ춏n7>K`Mx)(5p|q!X֔4Yn3˚3{Mi5 5_Dڽ??Q_z+tx5 V()]IojZ"0o5J^NV[nEDa.Śv_KDmrQd5 V]D6VE'1P>\mbMIk tr> 4V:rrM"UckBoj\Gd}ZOLku{~.1q f1m sM:N/)nokz/JI(?l})z<5&HK i7C%~^i^N&޿f$i!f$L̓耈w{oKYdOp|q!X֔4Yn3˚3{MBծ\.?hWmŚծ\]~DѲϗ= [bMB|ծ\4ܡZsz.$D׬_ʊTGx9fPK5g$5_u{D`SvJǶ)ÐsGc[{؎I N3[{k jiGy&TG<ߔYd{:4Q93á5ʊTG@ 4&жct@*#o_]ѧ=?rf[vTphcM۱G?mk؎ʙmk )Ҧ<.5l#{&O{%~kBY5(Ś0edRf3My\ $Ҧ<..1q!XdRf3My\\6$I3ޘ6C>#l{MiYnP%~kJ;r+xXܹMˑ5&H՗m !f$һk#5 V()]IojZ"0o5J^NV[nEDa.Śv_KDmrQd5 V]D6VE'1P>\mbMvinstall.cmdX  ! "#$&%'()*+-,./02134o56879:<;=?>@ABCDEGFJIHLKMPOQNSTUVWR-I(AI1mӀ ϟk?~8)גdFM&ŬO+j}O\C$ޞxОr;Ӽ,XG-T Z[:%lnu߻Za?9{[ji #g`ԹLQDA͢s-)fʽYtݧq vl8F%ݏӸa=6J-_>"2w;-f]蠻D)fѹ8: [{`W|ow뻣-IÅ)߸`Ղ=HÌ-KO%H[nrՂ=_ ϟ-?A2sQ؋Q9ǰ-a;[x*|gT 43jQaۻ[mo{ R{rATjji}c,Sѵ|4nøݟa< ή];-i1ӒxvSفrݿ8JϮ>}ާ+ xvaR}xv2ӸaP v݇LRxF.kϮOg!H-!G<OgO%= ,ٝy s*x-_>2J-_>e2sRDcO%G#fo.LHŅ[n_LiZZ+a>1K"H7)R˱ +a>1K^|S {nƑJTWOؘD1 tߛEZ=H%G#fOɘ%-]ݰfnƑI*P-Ac"QWO㦹z@v7Iz]WO[Ma^fѹvƽYtAawZbcLW|fsq(ǜ -fDi\F|AsE޹~g`ԹŬkji[S/,:r ;u{ƝeJ๸P3xwa+[SI$sYjRY-Z޹eJ๸P˩:seJ๸P;qgx..rw}{VrYZޖ-cᝥ&erc"QWOoQJ_˱ _ ]r*LEf;|tuþEM+}-A]ڢGfTMK-؃fHdR珘?FwƁ|,=NDQ-؃ ԭDPs{036iZ؋֟$}˜HQ-:^TkIi\"HUkQmjo-:^Iő.#8"1Ma- |-joGRq? ;u{ƝeZ\2Tt-QEW;uRm4n;Sѵ|tݻi=2:[9PUG eL:jg8Rk%-awZbvb*8;Z_']i}ٕ֧7<{TpvaϮ4L*8xv2ӸaP v݇LRxF.kϮOg!H-!G<:PERCENTNpMONTHCpAMOUNTN pCODE:NUNpNAMECpSALESNpTAXNpANALYSISNp  n n n 10,CODE:NU Code Number;********** 25,NAME The Place Of Business Name;*************************  * * * * * * Copyright Dial Computer Constultants 07 Dec. 83 * * * ERASE STORE 1 TO xgain DO WHILE xgain ERASE @ 5,20 SAY 'Account Code Maintance Routine' @ 6,20 SAY '*******************************' @ 8,20 SAY '(1) Add A New Code Number ' @ 10,20 SAY '(2) Delete A Code Number ' @ 12,20 SAY '(3) Sort By Code Number' @ 14,20 SAY '(4) Sort By Alpha ' @ 16,20 SAY '(5) n n n 25,NAME The Place Of Business Name;************************ 10,CODE:NU Code Number;**********  READ LOCATE FOR code:nu = xelno REPLACE name WITH 'Deleted' ENDIF xes = '2' IF xes = '3' ERASE @ 10,5 SAY 'Sorting By Code Numbers Please Wait' INDEX ON code:nu TO c:code USE b:codes INDEX c:code STORE 1 TO xxx DO WHILE xxx ERASE @ 08,20 SAY 'Enter 0 For Sorted Output To Printer ' @ 10,20 SAY 'Enter 1 For Sorted Output To Display ' @ 12,20 SAY ' vOnummon.cmdQ  ! "#%$&'()*+-,./102354687:9;<>=?@BACDEFoGHJKILONPM%%%055$f%%>%%%SID_B&7\"{\Ÿn?񧦓D?ܧDlj|ZD)H/FǥS|։uڼgb}Vb}n#9~JPn+oK[5/y\ ~f2.ߣ\]2_q+4 `|ug!Rx7gqOĔU5/J}NTT_* uY'*ѯ}* u08އKiOzNtb3ox}u>DE:zmާ*6SRR"*]^|95󸔛2;i;^>x1@fQ.8GItb'hkދ@jb45OIII4b|9+>ua6CY'* S4/FjE|8Yz)ͧ5,]]}ww)g>+߫Xs{kҊŗ5Qc>L ?_W&+ӯb}PfG-+cگb}(qsk>&26TWm׼Pŗ5.l}>ƆJ~f7\ÅH,´/^P^ }FT*tle~iF{%Ҳ(W}x%܇*^_݇?Ze㝛x\++'IJU[<ՐJ}૖t}I\+׼ CǹW-ռF,QNX|'<^X[%-_<99W-oռF>U[>v;!i:"-it_E[TW-o=OܜqKO(9~&j gANyHON8$=>w^:>*v;!i"-_<99}="LK u}Us.>tz-C?JI--gXGPu)%Ϥ$9~JSA|Zx" 㽊qݼ'EZ}BT VPD׼>R5T[CE]^c'h2xRM&(1GTC}}!HҗN)RR"*]^|95󸔛2;i;^>x1@fQvlsummary.cmdV   "!#$%&'()*,+/-.021354678o9:;><=?B@ACEDGFHIJKMLPNOQSRTUƍ4[KgTkܸqƝ9 ;30nѸqmc$Ԅf4.ЋyN;37B4nx%5=Wnޟ]Ɗ%?D^һnHB̿s9CɧEj{ը#u1> .rM!"3JSUIY Fi ,lxc"I~BjӳC/W.K-R,"!}l1)9?PJ]1d,_90]BL ܛ-B'g))^Iȇt#BT R0JSU$¢of^g)-ߒi!rA[b!߅k[:JB4nx%5cFXOjt%4HmU鞹^0 :0h4BCqlCz\{ݩ Ͽq-~v0V,9DF!Hֻx cŒ?!2JFz}hmƊ%Ň(=߮]mƊ%"n~Xwۃbɟ(=6b4KۦeCM!AY'79(MVnf ϿؕNwӧ/yRx+ b էرKXO!9e眡tן޽[!ue眡t%G$;#-9ز1XvOOvzڵ[ 1.[9g>gI="3ן%Q[!e/; է؈Ck"\ןJlYT?#(9e眡43ן [!_t ϿؕNwӧ/yRx+ 3mj[6OgCA`6xmS۲r7R/R1ђs.φʾ ,MSĪ_f]?+>\q-^i^d?b iٚH^oPͅ~3JSՓ•}.w7[$FNlHp Aȴ6oR;Cv0V,SwN9g>ݼxwFe=woĖEuw]9g>]eQ.I3EK%,C̿+sӓ];#vĖE3B̿VvOYz e=mcIĖEuw9C96bКH3;3e=mm#[ 1nN9g>Ck" e=mĖEuwزsB$Q"Ӻw>7Hφʾ`637[[6-'g >ۦeC)Ý'u;fCSi9)ݶzok^_90]BӳM` l~\F_UէW,g.OϨFi!Q\ Y PrintOut Of Period Reconcilations n n 15,CHECK:NUM Check Number Or Deposit 10,AMOUNT Amount  4.60TF 1497 603108Pop & GrandPa 7.10TF 1498 603108Packing Material 12.09TF 1499 603114Al's Pen 12.39TF 1500 604 61Stencils 22.69TF 1501 604116Misc. 21.24FF 1502 604 87Party Stuff 64.13FF 1503 604 56Food 12.44FF 1504 60vnumyr.cmdG   "!#%$&)(*'+-,0./124567398:<;>=o?AC@DBEFlxЍ]aQ6fdLq|l6f9 \{r.=_3E|v6v=!C?Wt5 Bo7 +׎IfLlo,=O۞F+,uῐ8 V./~gi}kr /~;.a7%gwL~i5Za99>xk_,ܛX~hڎDА Ҝm9W+3 _A8Kx-ɹʌ`K!թKߢod.,Z?[Fv^LAWZl0ྦ? |3yO{[%\TYq {cƉ}IhVxD*[} ˾0/buaqD>IĹg+U"Egv osQer $|AEzb  UA,VG_6ڷ#,"gk9W+3;[b  UAzb  U$lkkeloA΋)H THϾI2?f5}/ZR(Rf4=Da8/* y Checking Account n y n 6,check:num >Check No.;====== n 6,mon:day Check Date;====== n 35,disc >====> The Description Is <==== As Follows ..............;=================================== 10,amount > The Amount;========== y vmcode.cmdP   "!o#$&%(')*+,-./0123546789:;=<>?@ABCDEFGHIJLKMONQD>?-$JQDYz$,x[H(9Di/ܨS/i{{e[ %?<΂%Jt(Q{>CSnWM"q2'e^EC1sK}vz>U>~KɫT{͗'h>eڝWX#AXd_kd/ߛ$yFEb5.{M n<UFEU%һM n/AFEDZX i<U_6b-J\sPei9X\c8w9EH]Aq^\u'3sztNɁ\sD%nuow{M"oShP>sag*A c.s\SeɦY2m|oTs{%פ#ρk,kT/}P>;~> ϽK%lCTroW6s*~Nfm JK%4)?P,~v5Uq*^UrHKk%~7{y\Se}P>2.]Ň2U?^5Uc!U|@"J9p0WɸWʘ}{\Sܒ~Oa\So>k{{DʠeI7pOxρkB=S%9{g|y?'i~M)ρk?~{{SAewߜOH ;mOy\SUפEee\Z=Q|Ýkn}Y oc>C}ԦXM]἟OR%>O9p0W9OE%hS9pMW5Uk+YP%Qr,N9΁kz>DU/#)9yz.9yD7+H2jvAqy^\u\9} "&I?Dn]~I .r/5{)9֗if16duyz.9ybsȯ9׫s@@EDZ&I?Wb-,>8Q7\ |6<{EH]'j#] Uw5sztŃkz>b/-mZ$6һ+un=-mZ$4!w7WNKiBT/Kɸ[]|MTY?Xd1Z9Y\c8+2׫s }U$=""Y^ &8+27D7X81\бcOZOkk'Knjv_x |o̅3.$ZljJB́ nqb4m\58+275Y9y\֫6hW稠9p562k5Y9sB^E._hKH}}sB\u\D5Ί ́LzKtD5]r 8wɁ:^Eb-%Bd ]$OxX )7Op9 N WB7}{.:G|8Q7|Ox\u珹8]3Kt׫s*FEroaI!{RwZH^#ρkFEroGBz~sԍAVx,9pMk[eI:H9pMH&ρkCxs56"}ρkz>W5Nc.2+ E"8B_ ρkb"}s y\HtṌ ;^˯^_V΁ nqb4m\֫6hW>]b.u9p! :N W2.f\HtåisY9<5Ί ́sBu^A/}}sY9s@OTb1"~霮ƹKybsy*Po>k,n/_vXz-什K' UwlD5]r d'z1G_*: /:gtyWΠ%N Gze#][1Z9Y\c8+2׫s }U$=""Y^ &8+27D7X81\ y Dial Computer Checking Tax Analysis n y n 6,code:nu Code Number****** n 25,name Company Name; ;*********************** 10,amount Total Amount;********* y 7,percent Yearly Percent******* y 10,sales Yearly Sales Tax;********** yv0modck.cmdX  ! "#%$&'(*),+-o.0/21345678:9;=<>?@ABCEDFGHIJKLMNOPQRSUTVWذa;Ӊ 6l3Zoil0a NM3HXm >`]M3ZoÆ 6l'%2 4~9eSiwI˼ 7r!fBӧxge_8}w 7b-n)-w~9eSi'%2$=vwIu [J!] L 4|nywCHRuyvkg- 9|+v9|wEm"`mw2!ǿ騴z q,g4|oy:v['+;/iEw3$oy:*v ;oum5M ̮_; ^'_M-3vtv9:!ʃw?ذa~AŗfwNewI˼˅Ð 9nW1uƻ\;̼l꫓w?\0ەo_;vߴ"yGՙ&wdݻgLB (3si5=^kzH!Ƽغw +MlM #ib]ijZ5q "yG +M_VYȺwՙBLh8u!$MBLh8u!3j +-g4|NejF1.uwrbyZGJ b\}u(k|ww s!0fPNqbBەwϹwB (WbB:O\0ەo_;vߴ"yGՙ&w?wB W_ 9:6l}'fwNewM0Iw?ϡB"@{8dd1ٕ p\}uƻ-pCyn'&tTZc4 9^ɻi^ɻ-X<n˅Þoy:* R؎+Rn˅ú gJWg#bBNxeW'\;oQ)-mwKv 6-]\;pF) 9}r!0`},VB3 Pafs6fPkJ!噁tv҇d#NfPkG@WxZc-VZ)|Ri!ٲ<wLjSٻk2 in6l؀tvZ坡ޥ,2}I5K;$m2uwW8̻C. r֦>-ԧe}c+Z;ZԷ_¶wϨ5G2 ֦>-vmnO\0M}[?dd1O}V(l{ y)4ˀ2\}uErܮ4}Ʌe@:ŽEr ,a+M߾&wJӷiE3}M$Ⱥwՙ~fPf^jkzH!^CzyunWٚFp=մkekADnWu3-kd1"fL8q(BIfL8q(B»gԚ^R9T:AݝٻgԚ^| $qi`îջ;@wϹwB (W[1!J׻\;LYS܋[1!_n'X C. rJӷqoZ#L_ۻlذI:eY(ݴ‰Ż;B0<."UŻq9|wEwbrY0N2p< :<0ywv u3-kd1"fL8q(BIfL8q(B»gԚ^R9T:AݝٻgԚ^| y Checking Account Analysis n y n 15,CODE:NU >Code Number;============== n 30,name < Business Name;============================= 10,AMOUNT Amount ;========== y vrecck.cmdZ  ! #"%$'&()*+,.-/01243567o8:9;<>=?@ABDCEGHFJILNMKOQSPTRXVWYU͛Gs!i޼yш4Ïk͛777o\xy&7QPu˕:$z49͛777orA:G)娫W҆mP=ell\cy9`4QڸWAu+[#?W-lݔoPJ +c(mzԲ d/o)lGm]8 +W3|ԆK̕A:C7 t1M?GCŌi{1c~zt1M?G~`޼y<{E?tt.69SSbŌi ּ1M?kL0ԾZ*b4}kl| B TmZQ.ڛ@ՆuQ坥|7PѼ/CŌi֍u^̘omNM3[7Xb43 oX6`=`/7;//fLӷn֣ sv !k6]9+~\LSyrڃ]M\.xkrZ7hv9` eM]kC dzFko+\gAJgmDJgm(6YYYQ{Nc'^#]N7H)e `3jk=<<]\zBpKf2džݩ)P%?A@BDCEGFHJIKMLNPORQSTUWYVX\[Z T~(%Ǐ_Q'~xw G^߃:)Rۆ~`m5銺H>KSB)<~{JU`BBh0E(|d^m@J>2v 6Ս"6J>2v 6Ս'J>2v O_GGNզ_%;+7 |d^)|RQ|Ÿ`ns'P 큵p[5_S+XXCHv5*@㝂yhUvm^9VimOU~\96+1*=U~Whm<Ǯ*q(\VjFʴ3;?sv%;JMH6fk>gwc!±(w!ݍ!o_FQ#Jȡ D\FF G`TKچvx|w7K*XJ~3~<~m5w?=6OT/wQy uG cW;rm^#!(ڼRdhUGNIvn6Ғm6ݍF()|:>[SݍBT#cp%~!i*Vߏ+GRӷ IS6_]+'kQy \֎mH8JNhl~8ToU>qC96oAVRe|qڝֆ>Omu6^/;~+%)\75y#c}b)w~A^))\_wP*j0!|lB%kqmG:X`uֆX=w)|)D|?Y@vW}J~FN["~ߵݍ=XMK~;?k0'vW}J~?·`E27=k{"~< x׼L@s07}NH qCu%^g 5yvSxSJ~??/:xx^E &H 9 b>ik$8:sKƏŸS`UuZ?|n0 ;M)ܛ>1ޒ΃WJ;ͽ?J{mF`cNc 'Q[?/GNX]ƾFҴ#cjS/L쉒9_)G^XzzBlN{K(|abOO!K.L`T/;W~abO~=wEW?4h }Ǧ:MGTk%_#cjS/L쉒@@;xJ<~=lB +U`v"O#epبFʴB$sH \\U`)?MU`IV2~Qz=J-Ɲpn#c\(;c/Tkd~+5}[#eݍ"i)r䦻%ܴkd~*'6"uQG(M 2".7rpX<]RMwx|w7h+7/C*Sw~v6KPdqc=Zg%?xxK,vW}U`BBh0E(ܽQ[`NhU=@5\}kߡEK5ʥ {M N5V%O"'/xɉ'v9 b>ik$8:sKvstat.cmdR   !"$#%&')(+*,-/.012346587o9:;=<>?@ABCDEFGHIKJNMOPLQo߾̍{}۷oCatl`.o߾y֬_k}6@euhr( =o߾nпϊߎe~= .DpauɋѸv˱.=/~쳿|d#,t$k|$~܄j^=r Х'H>^ۂ]6e#]%ŵϸ!{DңXmr@cmْr}iq #ն=.dKv}6qA>+ޣFwA?7=4]}(쳿|nп=wPpa7 ޣ., 4V-=%8{v{K`ɬ)( (IS+gv7(Cu>?G@=E.~ "+Vus{VVJvrI& "QgO2}>%Ξ\2Lߣ' Ξ\24( ɕ*J_2Lߣ8{u_M{;P|(w4 ΞWܣ<ΞWDLߣax=wEvr%Ξ>G0:{rPG<Ξ>Ti#(w,<Ξd=cޣܱgOV(w, ΞU{;ٓUJQ8{ļGkJ=9R=]CgOTܣܵy=9RJcex=ɐ#e@'W (,`(Jsr2<'W* |0}r 'rļG8{rZ=%$ Ξ\Vܣ\B8{rZJ_V1}r gO 2Q.AJ=YAG '+*=%hxgOV+UxbAx=f/GdPzi0}r Ξ*=%<Ξ* ^Lߣ\&<Ξdp{K8{r?Q.YCgOnJsrɚ<ΞO({uV}^ 咵u$b(]ٓlgV =EudZ2\Q.J8{sbޣ\ 'N`z1ޠwՙ(E3pTio?XeXGV {4 4V-"ow{̍-(p:ݣml17I c{݅Ej%{lwaQڶEl|4Vm{\dޣ\|[ c=(Xm"@&{]l!q{m\gk3.# 2Lߣ8{u_M{;P|(w4 ΞWܣ<ΞWDLߣax=wEvr%Ξ>G0:{r Th program withi th librar fil ar dBas ] Versio 2. progra tha wil allo th use t perfor variou analysi function o checkin account Th progra consis o th followin command data an forma files Data Files: anal.dbf / Temporary data bases summary.dbf / checking.dbf Main checking data codes.dbf Business Names Command Files: analy.cm Perfors monthl analysis codyr.cmd Perfors Business yearly analysis enterck.cmd Enter Check/Deposit routine install.cmd Generates a new data diskette mcode.fr Add/Deletes/Sort Busines Name data menu .cmd PROGRAM START ROUTINE nummon.cm Liss transaction fo a given month numyr.cmd Numerical List of all transactions reck.cmd Generates Reconciliation status recon.cmd Reconciles check/deposit data stat.cmd Generates account status Formats: clist.frm / code.frm / lcode.frm / lnames.frm / Various output formats mon:rec.frm / summary.frm / summary.cmd / analy.frm / Th progra i se u fo tw driv system therefor comman file i th abov librar (excep fo read.me an dBas shoul b o driv an blan formate diskett i driv B Th progra output printe control i th followin files analy.cm codyr.cmd mcode.fr nummon.cm numyr.cmd reck.cmd stat.cmd Thes file outpu chr(27 chr(64 t rese th printer I th user' printe i no compatibl wit thes rese commands th abov file hav th printe setu sectio note s tha th use tha the ca b chang easily ***************************************************************** INSTALL Eac tim th use start ou wit NE DAT DISKETTE th install.cm fil mus b ru t establis th require dat file o th drive Durin th operatio o th install.cm fil prompt wil appea fo ACCOUN NAME YEAR an STARTIN BALANCE Afte th generatio o th require dat fil th install.cm fil wil promp th use i th CODES.DB shoul b destroye o lef intact Th CODE.DB i fil o busines name Accounts...etc. an thre digi numbe tha th progra assign t thes names Vi thes cod number th progra wil b abl t perfor th followin analysis: (A) Monthly Totals On All Code Numbers (B) Yearly Totals On All Code Numbers (C) Sales Tax Paid to Date (D) Percent Of Total Against All Codes Numbers (E) Category Analysis: (1) Food (2) Utilities (3) Toys (4) Credit Cards (5) House Expenses (6) Car Expenses NOTE I yo selec t destro th establishe CODES.DBF o yo ar startin t us th progra fo th firs time yo mus selec (K COD NUMBE MAINTENANCE firs befor yo tr t ente an check o deposits ***************************************************************** MENU Onc th INSTALL.CM ha b ru th checkin progra i entere vi th MENU.CMD Thi comman fil prompt th use fo TODAY' DAT i (MM/DD/YY format chec i mad t insur tha th dat entere i legitimat date Afte successfull enterin th dat th followin choice ar presente t th user: A = Enter Check Data ? B = Modify Check Data ? C = Reconcile Checks ? D = Sort By Check Number For The Year ? E = Sort By Check Number For The Month ? F = Sort By Code Number For The Year ? G = Account Status ? H = Account Reconcile Status ? I = Account Analysis ? J = Tax Analysis ? K = Code Number Maintenance ? L = Quit ? ----------------------------------------------------------------- A Enter Check Data? Wil allo th use t ente eithe deposit o checks Th followin dat wil require fo eac check: (1) Check Number (0 thru 999999) (2) Check Date (MM/DD) (3) Business Code Number (0 thru 999) (4) Optional Description (UP to 30 characters) (5) Amount ($0.01 thru $9999.99) (1 Th progra determine i th dat tha i bein entere i chec o deposi b th chec number NO ZER chec numbe indicate chec an ZER chec numbe indicate deposit (2 Th dat promp require th entr o th check/deposi dat i MM/D format Fo month tha onl hav on digi (Jan thr Sept. th use mus ente 0 thr 09 Th use mus ente 0 thr 0 fo date tha hav o on digit (3 Th progra wil promp th use fo cod number Thi entere cod numbe wil b checke agains max/mi lis o lega cod number befor th progra continues (4 Th use wil b prompte t ente a chec mem o u t 3 characters (5 Th operato wil ente th amoun o th check/deposi usin th followin forma $0000.0 Thi forma i dBas ] pictur entr tha allow th use t ente dat usin th followin rules: (a T ente check/deposi fo $100.0 th use ca ente eithe 011 (b T ente check/deposi fo $33.33 th use ca ente 0033333333 (c T ente check/deposi fo $1.0 th use ca ente eithe 1.1 NOTE (1 Th use shoul pla wit amoun entr forma fe time t full understan ho i operates I th pictur forma i determine t b unsatisfactory th use ca chang th ENTERCK.CM fairl easily (2 I chec numbe i t b voide out th use mus ente VOI a th descriptio an 00.0 a th amount. ----------------------------------------------------------------- B) Modify Check Data ? Wil allo th use t modif check/deposi dat tha ha bee entere b th ente chec routine Th routin wil reques th use ente th chec numbe t b modified Th routin wil us th dBas ][ FIN functio t locat th specifi entry Afte successfull findin th reques check al dat associate wit th entr wil b presente fo th use t change I additio th th dat tha th use enter i th th ente chec routine thi routin wil displa tw additiona dat fields (1 Reconcil Statu an (2 Monthl Reconcil Status Fiel (1 i use b th reconcil statu routin t indicat i th check/deposi ha bee reconciled Fiel (2 i use b th reconcil statu routin t indicat i th check/deposi ha bee reconcile thi mont i th las reportin period T modif deposit th use enter ZER a th chec numbe prompt Thi wil indicat t th routin tha deposi wil b modifie an promp fo th deposi dat wil b displayed Th use the enter th deposi dat i th MM/D format NOTE (1 Bot th reconcil statu an monthl reconcil statu field ar logica fields (2 Th monthl reconcil statu fiel i rese t fals whe th use exi th reconcil statu routin wit th constant sav option (3 T insur tha th modif chec dat routin work a intented th use mus insur tha eac chec ha UNIQU number ----------------------------------------------------------------- C) Reconcile Checks ? Thi routin i use whe th use receive ban statement reportin whic checks/deposit hav bee presente t th ban fo collection Upo selectio o th option th routin wil promp th use fo th firs (lowest chec numbe t b reconciled Th routin wil the promp th use fo secon (highest chec number tha i th las numbe o a UNBROKE sequenc o check tha hav bee returne b th bank (Usuall th ban indicate chec ou o sequenc b a > Th routin wil the reconcil al th check withi th tw chec number entered A th completio o reconcilin check th routin wil retur wit th chec numbe tha wa supposedl no returne b th bank I th sequenc o check returne b th ban consist o onl on check th secon numbe ca b entere a ZERO. Afte enterin al th check returne b th bank ZER entere a th promp fo th firs chec numbe i sequenc wil terminat th chec reconciliatio an mov t th deposi reconciliatio routine Th use wil b presente wit lis o al deposit tha hav no bee reconcile t date Th use enter th recor numbe o th deposi t b reconciled T exi th deposi reconciliatio routin th use enter ZER a th recor numbe prompt Completio o th deposi reconcilliatio i followe b promp fo th use t ente monthl ban charges Onc th ban charge hav bee entered th routin wil promp th use t determin i i i necessar t reconcil deposit tha hav VOI a th descriptio an 00.0 fo th amount. ----------------------------------------------------------------- D) Sort By Check Number For The Year ? E) Sort By Check Number For The Month ? F) Sort By Code Number For The Year ? G) Account Status ? Th abov fou option allo th use t obtai differen dat sorts Thi analysi ca eithe b displaye o sen t th printer. ----------------------------------------------------------------- H) Account Reconcile Status ? Provides the user with a listing that will indicate the total: (1) Starting Balance (2) Deposits reconciled to date (3) Checks reconciled to date (4) Deposits reconciled this month (5) Checks reconciled this month date (6) Total bank charges (7) Account balance that SHOULD match the banks balance Additionall thi routin wil giv th use listin o al checks/deposit tha hav no bee returne b th bank. Attemptin th exi routin the wil caus promp tha wil as th use i th memor constant shoul b destroye o saved Th use shoul selec t sav th constant ONL i th ban statemen an item an an abov match I th use doe sav th constant an th abov d no match th abilit t lis al checks/deposit tha hav bee returne tha mont wil b lost. NOTE: I th use re-enter th las month ban statemen al returne checks/deposit BU NO TH BAN CHARGE listin o tha month reconcile check ca b provided. ----------------------------------------------------------------- I) Account Analysis ? Provide th use a analysi o th tota amoun o check writte agains al cod number fo give month I addition thi routin wil su al cod number tha belon th th si categorie entere i th cod number maintenanc routine. ----------------------------------------------------------------- J) Tax Analysis ? Provide th use yearl analysi o th tota amoun o check writte agains al cod numbers Additionall thi routin wil su al cod number tha belon th th si categorie entere i th cod numbe maintenanc routine. NOTE: (1 Th sale ta rat i percent Thi ca easil b change t an percen b replacin th '1.06 i th summary.cm wit '1.XX wher th X i th percen o sale tax. (2 I th use wishe t chang an o th ta percent (ie 100% 20% an 30% thi ca b don i th summary.cm fil b changin th (amount-(amount/1.06) . formula t (amount- (amount/1.XX) .Y wher X i a state abov and i eithe o fo 2 o 3 percent ----------------------------------------------------------------- K) Code Number Maintenance ? Allow th use t ente busines name a receiv progra assigne cod number Upo selectio o th optio th use wil b presened wit th followin secondar menu: Account Code Maintenance Routine ******************************* (1) Add A New Code Number (2) Delete A Code Number (3) Sort By Code Number (4) Sort By Alpha (5) Exit Whe th use select (1 t receiv cod numbe fo ne busines th routin wil promp th use for: (a) Business Name (b) Tax Rate ( use to determine amount of paid sales tax) (c Analysi Cod use t determin i compan fal withi on o si categorie ) NOTE: (1) The program must have at least '1' code number to work. (2 Th differen sale ta rate ar intende t accommodat (a norma purchases (b foo purchase [t accoun fo possibl taxabl items] an (c Loans. ----------------------------------------------------------------- L) Quit ? Saves all constants to a memory file. NOTE: T insur th successfull operatio o thi progra th use MUS exi th progra usin thi option ***************************************************************** Th comman file tha resid withi th check.lbr ar copyrigh (C 198 by: Al Schaul C/O DIAL COMPUTER CONSULTANTS 2558 East Balfour Ave. Fullerton, Ca. 92631 (714) 525-8162 Thi progra i hereb proclaime publi domain fee confiden tha th progra work a intente i to I user' have: (1) any questions (2) problems (3) suggestions for enhancments woul appreciat tha message b lef a th NOCC BB (714 961-113 ***************************************************************** DISCLAIMER OF WARRANTY ***************************************************************** N warrant expres o implie i conveye t th user Th use assume al responsibilit associate wit th program used ----------------------------------------------------------------- Best Regards, Al Schaul. 22 March 84