1$99000$*,`~~~~~~   7&!UQ" ............................................................d4d4d4d4#$!MD000.INT !MEDICAL MANAGEMENT SYSTEM ........!DN000.INT !DENTAL MANAGEMENT SYSTEM ........!IN000.INT !INSURANCE AGENCY MANAGEMENT ......!LT000.INT !LEGAL TIME ACCOUNTING SYSTEM .....!RE000.INT !REAL ESTATE MANAGEMENT SYSTEM ....!PM000.INT !PROPERTY MANAGEMENT SYSTEM .......!AR000.INT !ACCOUNTS RECEIVABLE ..............!GL000.INT !GENERAL LEDGER ACCOUNTING ........ !AP000.INT !ACCOUNTS PAYABLE ................. !IV000.INT !INVENTORY MANAGEMENT ............. !OE000.INT !ON LINE ORDER ENTRY .............. !PA000.INT !PAYROLL PROCESSING ............... !FI000.INT !FINANCIAL ANALYSIS ...............!00000.INT !RESERVED FOR FUTURE USE ..........!00000.INT !RESERVED FOR FUTURE USE ..........!00000.INT !RESERVED FOR FUTURE USE ..........!00000.INT !RESERVED FOR FUTURE USE ..........!00000.INT !RESERVED FOR FUTURE USE ..........!00000.INT !RESERVED FOR FUTURE USE ..........!00000.INT !RESERVED FOR FUTURE USE ..........%#&#$d4U N I V A I R S Y S T E M S I N I T I A L I Z A T I O N P R O G R A M $d4d4d4764%$'DO YOU WISH TO ADD NEW, OR RE-INITIALIZE SERIAL NUMBERS ?(`( 70&$664d4d4 PLEASE ENTER THE SERIAL NUMBER OF THE FOLLOWING UNIVAIR PACKAGES$d4d46$ $ U$ $*$ HIT < CR > $S$dn;h,$$MJ$d4)J$-QOS$$d4++t2.6.. 7̀ 2.!0000.INT7'6`.!j@d4 J. !$dn;hEND7f6'TXdp Xp 7INVALID SERIAL NUMBER ('END' TO EXIT INITIALIZATION)$d46B26d4d4 N Y R2 2 =======================================2/R.64.. 7?///6'$d4JTERMINAL INITIALIZATION SECTION$d4d4 JTHIS SECTION INITIALIZES SPECIAL SCREEN CONTROL CHARACTERS$d4 JUNIQUE TO THE USERS COMPUTER SYSTEM AND CRT TERMINAL IN USE$d4d4 $ $d4d41. ADM..........................$)J15. TRS-80 MODEL III.*.........$d42. ADM 3A.......................$)J16. ARCHIVE SYSTEMS............$d43. BEEHIVE......................$)J17. XEROX 820..................$d44. CMC 100......................$)J18. FALCO TS-1.................$d45. CROMEMCO CS2,CS3,Z-2H........$)J19. VECTOR GRAPHICS............$d46. HAZELTINE....................$)J20. HEATH H-89 / ZENITH Z-89...$d47. INFOTON......................$)J21. RESERVED FOR FUTURE USE....$d48. IMSAI........................$)J22. RESERVED FOR FUTURE USE....$d49. MSI 6800.*...................$)J23. RESERVED FOR FUTURE USE....$d410. OSI CHALLENGER III.*.........$)J24. RESERVED FOR FUTURE USE....$d411. PERKIN - ELMER...............$)J25. RESERVED FOR FUTURE USE....$d412. SOROC IQ-120.................$)J26. RESERVED FOR FUTURE USE....$d413. SD SYSTEMS...................$)J27. RESERVED FOR FUTURE USE....$d414. TRS-80 MODEL II..............$)J28. NONE OF THE ABOVE..........$d4d4 SELECTION ? ............n;hEND7 P6'(X:(7 c6A(( 7 v6(^96 6 6 6666Z6o6666 66666 666(RR*R/2 R26ZRR2 R26ZRER/2R*R26Z~RR2~R R2SET AUTO LINE-FEED SWITCH TO 'CR', THEN HIT 'RETURN'n;0h6Z R2RAR26ZRR2 R26ZRR2 R26ZRER2RAR26ZRKR2RAR26ZRR2 R226Z R2RR26ZRRR/2 R26ZR2R26ZRER2RAR26ZTHE ASCII CODES FOR YOUR TERMINAL'S 'HOME CURSOR AND CLEAR$d4SCREEN' AND 'UP-CURSOR' MUST BE INSERTED. ENTER ONE OR MORE$d4ASCII CODES (IN DECIMAL) AS NEEDED, BUT ENTER ONLY ONE ASCII$d4CODE PER 'RETURN'. IF YOUR TERMINAL NEEDS TIME TO ERASE THE$d4SCREEN (IF SOME BEGINNING CHARACTERS ARE LOST FOLLOWING A$d4SCREEN ERASE), THEN ENTER THE WORD 'ZERO$' AFTER THE LAST$d4ASCII CODE FOR 'HOME CURSOR AND CLEAR SCREEN'...............$d4d4d41NOW ENTER THE ASCII CODE(S), ONE CODE PER 'ENTRY', FOR......2WHEN YOU ARE FINISHED, HIT .............................1$d4YOUR TERMINAL'S 'HOME CURSOR AND CLEAR SCREEN' FUNCTION.....$d42$d4(7R32d41$d4YOUR TERMINAL'S 'UP-CURSOR' FUNCTION........................$d42$d4(73222222456RR.6\.7.SR.U2.6\.7€.SR.U2$d4JDISK DRIVE ASSIGNMENT INITIALIZATION$d4%#76Qd4d4'DO YOU WISH TO RE-INITIALIZE YOUR DISK DRIVE ASSIGNMENTS ?(`( 7Q6d4d4'DO YOU PLAN TO USE MORE THAN ONE 'DATA' DISK ?(`!(d4d4d4HOW MANY DISK DRIVES DOES YOUR SYSTEM HAVE ? .......... (1,2,3,4) $d7x77077 7$d4-$$d46d4d4'WOULD YOU LIKE STANDARD DISK DRIVE ASSIGNMENTS ?(`( 7P6րA:2A:2A:2A:277B:277C:2C:277D:2$d4d4MAIN 'PROGRAM' DISK IS ON DRIVE ............................. $$d4MAIN 'DATA' DISK IS ON DRIVE ................................ $$d4MAIN 'SORTING AND COPYING' DISK IS ON DRIVE ................. $$d4AUXILIARY 'PROGRAM' DISK IS ON DRIVE ........................ $$d4d4d48#6gd4d4WHICH DRIVE WILL HOLD THE MAIN 'PROGRAM' FILES ? .... (A,B,C,D-P) $dxRs2AP 7I$d4-$$d46d4:2222d4WHAT IS THE STORAGE CAPACITY OF THE PROGRAM DISK ? ............. $d4 FOR EXAMPLE: 500K = 500 8M = 8000 (NO COMMA) .............. $dn;hEND7 6'9X9Zp9. 7N)*INVALID DISK CAPACITY$$d46g: 9WV;:<:=:77z68#76d4d4WHICH DRIVE WILL HOLD THE MAIN 'DATA FILES' ? ....... (A,B,C,D-P) $dxRs2AP 7$d4-$$d46d4:2d4WHAT IS THE STORAGE OF THE MAIN DATA DISK ? ....... < CR > =$d :V$d n;hEND7l6' 7{9X9Zp9. 7)*INVALID DISK CAPACITY$$d46; 9WV8#76d4d4WHICH DRIVE WILL BE USED FOR 'SORTING & COPYING' ? ...(A,B,C,D-P) $dxRs2AP 7H$d4-$$d46d4:227)*CAN'T COPY TO THE DATA DISK$$d46d4WHAT IS THE STORAGE OF THE SORTING DATA DISK ? .... < CR > =$d :V$d n;hEND76' 7 9X9Zp9. 7H)*INVALID DISK CAPACITY$$d46; 9WV<;8#7j6d4d4WHICH DRIVE 'MIGHT' HOLD ANY 'OPTIONAL' PROGRAMS ? .. (A,B,C,D-P) $dxRs2AP 7$d4-$$d46n:2d4WHAT IS THE STORAGE OF THE OPTIONAL DISK ? ........ < CR > =$d :V$d n;hEND7O6' 7^9X9Zp9. 7)*INVALID DISK CAPACITY$$d46= 9WV:;<=2$d4JMISC. INFORMATION INITIALIZATION SECTION$d4d4d4ENTER YOUR PRINTER'S FORM FEED CONTROL CHARACTER$d4 (USUALLY 12 --- IF NONE, HIT 'CR') ........................... $dn;hEND76'7X:R222d4>d4'DO YOU WISH AUTOMATIC INTERFACE TO GENERAL LEDGER ?(`?7000.0007100.0001500.0001000.0001100.0004000.0004100.0008000.0003000.000( (  7J$$d46( 7[@6!<@6!$d46À?AW00000000S??0000.000GL ACCOUNT # FOR ACCOUNTS RECEIVABLE ........... ( 1000 - 1999 ) $dn;hEND76'(X:(( 7$d46b??AW00000000SGL ACCOUNT # FOR CASH ON HAND .................. ( 1000 - 1999 ) $dn;hEND7P6'(X:(( 7o$d46??AW00000000SGL ACCOUNT # FOR ESCROW FUNDS RECEIVED ......... ( 1000 - 1999 ) $dn;hEND76'(X:(( 7 $d46??AW00000000SGL ACCOUNT # FOR ACCOUNTS PAYABLE .............. ( 4000 - 4999 ) $dn;hEND7 t6'(X:(( 7 $d46 ??AW00000000SGL ACCOUNT # FOR ESCROW FUNDS PAYABLE .......... ( 4000 - 4999 ) $dn;hEND7!6'(X:(( 7!%$d46 ??AW00000000Sd4d4ENTER MONTH YOUR FISCAL YEAR ENDS ....................... (1-12) $dn;hEND7!6'BX:BB  7!$d46!n;hEND7"6'S27"6#SASZ 7#d4FIRST CHARACTER MUST BE A CAPITAL LETTER ........................n;h6"2COPYRIGHT 1980 BY UNIVAIR INC. ST LOUIS MO.24R7#kC2D2@pW!R BpWV?2EMASTER.DATE- 2`#%*>%4,5,,,,,, p+ p+ p+ ,,,,,,,,,,,,,?%,p+,, ,,? 7$=%,,,,,,?&$7$I6$S%,?CDFS:S;Ud4d4d4FS:S;U< U=UC2D26RR.6\.7$.SR.U2.6\.7%.SR.U2$d4 CURRENT INITIAL DATA VALUES$d4d4 7%jG ID CODE: 6%G ID CODE: NONEH COMPANY TITLE: GH$d4d4d4 MAIN 'PROGRAM' DISK IS ON DRIVE ............. $$d4 MAIN 'DATA' DISK IS ON DRIVE ................ $$d4 MAIN 'SORTING AND COPYING' DISK IS ON DRIVE . $$d4 AUXILIARY 'PROGRAM' DISK IS ON DRIVE ........ $$d4d4Xp7&00/00/000000002F00/00/00'ENTER TODAY'S DATE .................... < CR > = ''F ? IJI'TKL#)MAW2FM%,p+,, ,,?d4d4d4JTHE INITIAL CONTROL CHARACTERS HAVE BEEN INITIALIZED.$d4JREFER TO THE USER'S MANUAL FOR THE MAIN PROGRAM LOAD.$d4MASTERy0ZERO$7'33/6(<0Xp7( INVALID CODE - REENTER$d46(<0pW7(6()33RR6(<330X:R6(<3n;0h07(P6'37(_3R'$";'TS$ (Y/N) $d(xRsQ$d4-$$d4( (  7(6(`IJ$'$d4IJN$JJ$dn;h,$$d4END7(OTOK7)+PTOO LONG - MAX LENGTH OF KpW CHARACTERS)J*P$$d46(Q$ 7)<6)R6)QORR 7)SRUQS S 7))J*INPUT CONTAINS A NON-PRINTING CHARACTER$$d46(Q7)6)RS- 7)6)S.S9 S/ 7)QR6)D( 7)6*L#T$ 7*V U26+6*END7**6,YMQ7*;6*O7*G6+Q7*S6+؀U2OT)+Q7*s6+؀OMV2)+Q7*6+؀MSMUMV2T7*6+؀USX:VUX:WVX:UU  7+)J*INVALID MONTH$$d46)X312931303130313130313031AXUUXUWW 7+TAApVVAp 7+)J*INVALID DAY$$d46)MS/YU/VVSU2AXJJ$ $M$d46,)J*INVALID DATE - MUST BE MMDDYY OR MM/DD/YY$$d46)Z[ A\ 7,Y)J*TODAYS DATE IS F$$d46)]AS 7))J*INPUT CONTAINS A NON-PRINTING CHARACTER$$d46(Q7)6)RS- 7)6)S