Category : Science and Education
Archive   : FIM100.ZIP
Filename : FIM.OVL

 
Output of file : FIM.OVL contained in archive : FIM100.ZIP
4¯*d—fim؉—patient؉Ý؉؏—9AL/AK/AZ/AR/CA/CZ/CO/CT/DE/DC/FL/GA/GU/HI/ID/IL/IN/IA/KS/—;KY/LA/ME/MD/MA/MI/MN/MS/MO/MT/NE/NV/NH/NJ/NM/NY/NC/ND/OH/OK†—3/OR/PA/PR/RI/SC/SD/TN/TX/UT/VT/VA/VI/WA/WV/WI/WY/ †Ø‰ØØØØ Ø
Ø Ø Ø
ØØØØØØØØØØØØØØØØØØØ Ø!Ø"Ø#Ø$Ø%Ø&Ø'Ø(Ø)Ø*Ø+Ø,Ø-Ø.Ø/Ø0Ø1Ø2Ø3Ø4Ø5Ø6Ø7Ø8Ø9Ø:Ø;Ø<Ø=Ø>Ø?Ø@ØAØBØCØDØEØFØGØHØIØJØKØLØMØNØOØPØQØRØSØTØUØVØWØXØYØZØ[Ø\Ø]Ø^Ø_Ø`ØaØbØcØdØeØfØgØhØiØjØkØlØmØnØoØpØqØrØsØtØuØvØwØxØyØzØ{Ø|Ø}Ø~ØØ€ØØ‚ØƒØ„Ø…Ø†Ø‡ØˆØØ‰ØŠØ‹ØŒØØŽØØØ‘Ø’™¸—&file2ç>™ÉؓFXZ'z—PNUMB}—PDIAG}¦#N€¸—&file1ç>™ÉؓFX'z—LNAME}—PATNUMB}¦#Nšæ—numberËÝؕ‰Ýؖ‰ÆÇ79ž•XÞ&€¸™Ðؗ‰™Ðؘ‰™Ðؐ‰™Ðؑ‰™Ðؒ‰™Ð؉™Ð؉‰™Ð؊‰™Ð؋‰™Ð،‰™Ð؉™Ð؏‰™Ð؍‰™Ð؎‰— ؙ‰—ONÉؚ€™™
™N6
™™‹—Patient Information±™™‹— Last Name: ±™™,‹—First: ±™™‹—Number: ±™™.‹—DOB: ±™™‹— Address: ±™™‹—(cont): ±™ ™
‹—City: ±™ ™+‹—State: ±™ ™>‹—Zip: ±™ ™ ‹—Phone: ±™ ™,‹—Special Code (if any): ±™™‹ž˜±™™3‹ž—±™™‹ž—-†ž‘†—-†ž’†±™™3‹ž±™™‹ž‰±™™‹žŠ±™ ™‹ž‹±™ ™2‹žŒ±™ ™C‹ž—-†ž†±™ ™‹ž±™ ™C‹žŽ±™PÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿±™P³ Please enter the above information so that we check for a duplicate file. ³±™P³ If you leave the number blank you will terminate patient add mode. ³±™PÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ±9ž–X¶™™‹—@K !XXXXXXXXXXXXXXXXXXXXXXXXؘH™™3‹—@K !XXXXXXXXXXXXXXXXXXXؗH™™‹—@K ###ؐH™™‹—@K ##ؑH™™‹—@K ####!ؒH™™3‹—IsDateOK(mdob)— @K ##/##/##ØK™™‹؉H™™‹؊H™ ™‹—@K !XXXXXXXXXXXXXXXXXXX؋H™ ™2‹— (STATECHK())—@K !!،K™ ™C‹— (ZIPCHECK())—@K #####ØK™ ™I‹—@K ####؏H™ ™‹؍H™ ™C‹؎H¢ž— 8X>ؕ‰>ؖ‰>؉Y-€~¦$ž˜á؞‰žžÜ؟‰žŸ·CX²6™
ï‹™
ï™™O—ÉÍ»º¼ÍȺ
™™‹—AThe records reflect patients with a similar lastname. ±™™‹—FHit ESC to end. Move Cursor with Arrows. Additional data at far Right.±™€™™NÉØ F‡™
ï‹™
ï™™O—ÉÍ»º¼ÍȺ
— ؙ‰—ONÉؚ™™‹—@If the current patient matches what was turned up in this search±™™‹—@you should abandon inputting this record until you ascertain the±™™‹—
situation.±™™‹—3 DO YOU WANT TO ABANDON INPUTTING THIS RECORD ±Ç™™<‹—!ؙH¢9ž™—YN
ï8X™™<‹—!ؙH¢YÝÿž™—Y8Xx™Ðؗ‰™Ðؘ‰™Ðؐ‰™Ðؑ‰™Ðؒ‰™Ð؉™Ð؉‰™Ð؊‰™Ð؋‰™Ð،‰™Ð؉™Ð؏‰™Ð؍‰™Ð؎‰>؉YÝ؉Æ6žXX™~¦$žž‘†ž’†Ø¡‰ž¡ÜØ¡‰ž¡·CX(6Ç
€Ø¢‰Y9€Ø¢آљOYiZ+™,€ÉØ£F‡™ó™ÉØ£F‡™¼™ÉØ£F‡YÀÿÆ
6ž¥—,†ž¦†—,†ž§†—,,†ž¨†Ø¤‰— &AllVideo纙O—ÉÍ»º¼ÍȺ
™™‹—AThe records reflect a patient with the same Number.. Details are:±™™‹— Last name: ±™™‹ž©±™™‹— First: ±™™‹žª±™™(‹—DOB: ±™™-‹ž«/±— ج‰™™
‹—4Please resolve this matter before proceeding further±™™
‹—" Hit any key to continue±Æ—Press any key to continue...Œä‡Çž¦—,†ž¥†—,†ž§†—,,†ž¨†Ø¤‰— &AllVideoçº6Y>ؖ‰€~¦$YCùžXy™
ÉØ­FX]ž—تˆž˜Ø©ˆžž‘†ž’†Ø”ˆžØ«ˆž‰Ø®ˆžŠØ¯ˆž‹Ø°ˆžŒØ±ˆžž†Ø²ˆžØ³ˆžŽØ´ˆY Éص,>ؕ‰™¸ïØ>‰ïØ?‰ïØ@‰— ض‰ïØ·‰— ظ‰ïع‰— غ‰ïØ»‰ïØG‰ïØH‰ïØI‰ïØJ‰ïØK‰ïØL‰ïØM‰ïØN‰ïØO‰ïØP‰ïØQ‰ïØR‰ïØS‰ïØT‰ïØU‰ïØV‰ïØW‰ïØX‰ïØY‰ïØZ‰ïØ[‰— Ø\‰ïؼ‰— Ø^‰ïؽ‰— Ø`‰ïؾ‰— Øe‰ïØ¿‰— Øg‰ïØÀ‰— Øi‰ïØÁ‰ïØk‰ïØl‰ïØm‰ïØn‰ïØo‰ïØp‰ïØq‰ïØr‰ïØs‰ïØt‰ïØu‰ïØv‰ïØw‰ïØx‰ïØy‰ïØz‰ïØ{‰ïØ|‰ïØ}‰ïØ~‰ï؉ï؀‰ï؁‰ï؂‰™
ÉØ­FX㞐ž‘†ž’†ØˆžØ«ˆžž†Ø²ˆž>ØȞ?ØĈž@Øňž¶Øƈž·ØLjž¹ØȈž¸ØɈž»ØʈžºØˈžGØ̈žHØ͈žIØΈžMØψžNØЈžOØшžPØ҈žQØӈžRØԈžSØՈžTØֈžUØ׈žVØ؈žWØوžXØڈžYØۈžZØ܈ž[Ø݈ž\Øވž¼Ø߈ž^Øàˆž½Øሞ`Ø∞¾Ø㈞eØ䈞¿Ø刞gØ戞ÀØ爞iØ舞ÁØ鈞kØꈞlØ눞mØ숞nØ툞oØpØqØðˆžrØñˆžsØòˆžtØóˆžuØôˆžvØõˆžwØöˆžxØ÷ˆžyØøˆžzØùˆž{Øúˆž|Øûˆž}Øüˆž~ØýˆžØþˆž€ØÿˆžØˆž‚؈Ýؖ‰YÉص,>ؕ‰>ؖ‰ž–X“žØ‰žÂ؉ž/؉ž/Ø ‰žØ
‰ž/Ø ‰ž/Ø ‰ž/Ø
‰ž /؉ž
/؉ž /؉ž ؉ž²Ø‰ž
؉ž«Ø‰žØ‰žØ‰žØ‰žØ‰žØ‰žØ‰žØ‰žØ‰žØ‰žØ‰žØ‰žØ ‰žØ!‰žØ"‰ž/Ø#‰žØ$‰žØ%‰žØ&‰ž Ø'‰ž!Ø(‰ž"Ø)‰ž#/Ø*‰ž$Ø+‰ž%Ø,‰ž&Ø-‰ž'Ø.‰ž(Ø/‰ž)Ø0‰ž*Ø1‰ž+Ø2‰ž,Ø3‰ž-Ø4‰ž.Ø5‰ž/Ø6‰ž0Ø7‰ž1Ø8‰ž2Ø9‰ž3Ø:‰ž4Ø;‰ž5Ø<‰ž6Ø=‰žÃØ>‰žÄØ?‰žÅØ@‰žÆض‰žÇØ·‰žÌØG‰žÍØH‰žÎØI‰žÏØM‰žÐØN‰žÑØO‰žÒØP‰žÓØQ‰žÔØR‰žÕØS‰žÖØT‰ž×ØU‰žØØV‰žÙØW‰žÚØX‰žÛØY‰žÜØZ‰žÝØ[‰žÞØ\‰žßؼ‰žàØ^‰žáؽ‰žâØ`‰žãؾ‰žäØe‰žåØ¿‰žæØg‰žçØÀ‰žèØi‰žéØÁ‰žêØk‰žëØl‰žìØm‰žíØn‰žîØo‰žïØp‰žðØq‰žñØr‰žòØs‰žóØt‰žôØu‰žõØv‰žöØw‰ž÷Øx‰žøØy‰žùØz‰žúØ{‰žûØ|‰žüØ}‰žýØ~‰žþ؉žÿ؀‰ž؁‰ž؂‰ž7؃‰ž8؄‰ž9؅‰ž:؆‰—ONÉؚ€™‹—.UNIFORM DATA SYSTEM FOR MEDICAL REHABILITATION±€™3‹—- Facility Code: ±™Patient Number: ±™™‹—Admission Date: ±™™ ™ ™D6
™™
‹—Was program interrupted: ±™™)‹—
(1-Yes, 2-No)±™™‹—5If yes, please provide: Transfer Date Return Date±™™‹—1st interruption:±™ ™‹—2nd interruption:±™
™‹—3rd interruption:±™ ï™™O6
™
™‹—Admission Class: ±™
™‹—*(1-First Rehab 2-Evaluation 3-Readmission)±™™‹—Zip Code (home): ±™™‹—Sex: ±™™&‹—(1-Male 2-Female)±™™:‹— Birthdate: ±™™‹—Race/Ethnicity: ±™™‹—9(1-White 2-Black 3-Asian 4-Amer Indian 5-Other 6-Hispanic±™™‹—English Language: ±™™‹—(1-Yes 2-No 3-Partial)±™™‹—Marital Status: ±™™‹—5(1-Single 2-Married 3-Widowed 4-Separated 5-Divorced)±™™‹—Living Arrangement±™™ ‹—Setting:±™™‹—Pre Hosp±™™!‹—
Admit From±™™‹— Living With:±™™‹—Pre-Hosp±— PATIENT: ž˜Ü†—, †ž—܆Ø;‰— PATIENT: ž˜Ü†— †žÂ€™׆—-†žÂ™™׆—-†žÂ™™׆Ø<‰™™(ž;c™+o€o‹ž;±™™‹žÂ€™ח-†žÂ™™׆—-†žÂ™™׆±™™‹ž²€™ח-†ž²™™׆±€™D‹—###ØH™™-‹—IsDateOK(maddat)—
@K ##/##/####ØK™™&‹—(MPGINT$(' 12'))—#Ø
K¢ž
—18X™™*‹—IsDateOK(mindt1)—
@K ##/##/####Ø K™™9‹—IsDateOK(mintr1)—
@K ##/##/####Ø K™ ™*‹—IsDateOK(mindt2)—
@K ##/##/####Ø
K™ ™9‹—IsDateOK(mintr2)—
@K ##/##/####ØK™
™*‹—IsDateOK(mindt3)—
@K ##/##/####ØK™
™9‹—IsDateOK(mintr3)—
@K ##/##/####ØK™
™‹—(MADCLA$(' 123'))—@K #ØK™™$‹—(MSEX$(' 12'))—@K #ØK™™E‹ž«±™™‹—(MPATR$(' 123456'))—@K #ØK™™‹—(MLANG$(' 123'))—@K #ØK™™‹—(MMSTAT$(' 12345'))—@K #ØK¢™ ï™™O6 ™ ï™™O6
™
™‹—LIVING ARRANGEMENT CODES±™™‹—D01-Home 02-Board and Care 03-Transitional Living ±™™‹—D04-Intermediate care 05-Skilled Nursing ±™™‹—K06-Acute Unit-your own facility 07-Acute Unit-another facility±™™‹—K08-Chronic Hospital 09-Rehab Facility-other 10-Other 11-Expired±™™‹—/(MSET1$(' /01/02/03/04/05/06/07/08/09/10/11'))—@K ##ØK™™,‹—/(MSET2$(' /01/02/03/04/05/06/07/08/09/10/11'))—@K ##ØK¢™ ï™™O6 ™ ï™™O6
™
™‹—LIVING WITH CODES±™™‹—D1-Alone 2-Family/Relatives 3-Friends ±™™‹—K4-Attendant 5-Other ±™™‹—(MLIV1$(' 12345'))—#ØK¢€™‹—Vocational Status - ±€™‹—
Category: ±€™)‹—
Admission ±™™‹— Effort: ±™™)‹—
Admission ±™ï™™O6
™™‹—ICategories: 1-Employed 2-Sheltered 3-Student 4-Homemaker±™™‹—?Effort: 1-Full time 2-Part time 3-Adjusted workload±™™‹—55-Not working 6-Retired-age 7-Retired-disability±€™3‹—(MVOCC1$(' 1234567'))—@K #ØK™™3‹—(MVOCE1$(' 123'))—@K #Ø!K¢€ï™™O6 ™™‹—$Functional Independence Measure(FIM)±™™(ž<c™+o€o‹ž<±™™‹— Admit ±™™9‹— Admit ±™™‹— SELF CARE±™™.‹—
LOCOMOTION±™™‹—
A. Feeding±™™*‹—L. alk/wheel±™™,‹— hr,oth±™™9‹—[±™™;‹—]±™™‹— B. Grooming±™ ™‹—
C. Bathing±™ ™*‹— M. Stairs±™
™‹—D. Dressing-Upper Body±™ ™‹—E: Dressing-Lower Body±™ ™.‹—
COMMUNICATION±™ ™‹— F. Toileting±™ ™,‹—uditory,isual or oth ±™
™)‹—N. Comprehens'n±™
™9‹—[±™
™;‹—]±™™‹—SPHINCTER CONTROL±™™,‹—erbal, onverbal, oth±™™)‹—
O. Expression±™™9‹—[±™™;‹—]±™™‹—G. Bladder Management±™™‹—H. Bowel Management±™™.‹—SOCIAL COGNITION±™™‹—MOBILITY±™™*‹—P. Social Inter.±™™‹—I. Bed,Chair,W/Chair±™™*‹—Q. Problem Solving±™™‹— J. Toilet±™™*‹— R. Memory±™™‹—K. Tub, Shower±™™3‹—Totals±™™‹ï™—@K #Ø>I™™‹ï™—@K #ØGI™ ™‹ï™—@K #ØMI™
™‹ï™—@K #ØSI™ ™‹ï™—@K #ØVI™ ™‹ï™—@K #ØYI™™‹ï™—@K #ØkI™™‹ï™—@K #ØnI™™‹ï™—@K #ØtI™™‹ï™—@K #ØzI™™‹ï™—@K #؀I™™:‹—(MLWCA1$(' WCB'))—@K !ضK™™=‹ï™—@K #Ø·I™ ™=‹ï™—@K #ØPI™
™:‹—(MCCOM1A$(' AVB'))—@K !Ø\K™
™=‹ï™—@K #ؼI™™:‹—(MEXPV1A$(' VNB'))—@K !ØeK™™=‹ï™—@K #Ø¿I™™=‹ï™—@K #ØqI™™=‹ï™—@K #ØwI™™=‹ï™—@K #Ø}I¢ž>žG†žM†žS†žV†žY†žk†žn†žt†žz†ž€†ž·†žP†ž¼†ž¿†žq†žw†ž}†Øƒ‰™™;‹žƒ™Ô±™
ÉØ=FX+ž¶Øƈž·ØLjž\Øވž¼Ø߈žØˆžØˆž ؈ž
؈ž ؈ž ؈ž
؈žØ ˆžØ
ˆžØ ˆžØ ˆžØ
ˆžØˆžØˆžØˆžØˆžØˆžØˆžØˆžØˆžØˆžØˆžØˆž ؈ž!؈ž"؈ž#؈ž$؈ž%؈ž&؈ž'Ø ˆž(Ø!ˆž)Ø"ˆž*Ø#ˆž+Ø$ˆž,Ø%ˆž-Ø&ˆž.Ø'ˆž/Ø(ˆž0Ø)ˆž1Ø*ˆž2Ø+ˆž3Ø,ˆž4Ø-ˆž5Ø.ˆž6Ø/ˆž7Ø0ˆž8Ø1ˆž9Ø2ˆž:Ø3ˆž;Ø4ˆž<Ø5ˆž=Ø6ˆž>ØȞ?ØĈž@Øňž»ØʈžºØˈžGØ̈žHØ͈žIØΈžMØψžNØЈžOØшžPØ҈žQØӈžRØԈžSØՈžTØֈžUØ׈žVØ؈žWØوžXØڈžYØۈžZØ܈ž[Ø݈žeØ䈞¿Ø刞gØ戞ÀØ爞iØ舞ÁØ鈞kØꈞlØ눞mØ숞nØ툞oØpØqØðˆžrØñˆžsØòˆžtØóˆžuØôˆžvØõˆžwØöˆžxØ÷ˆžyØøˆžzØùˆž{Øúˆž|Øûˆž}Øüˆž~ØýˆžØþˆž€ØÿˆžØˆž‚؈žƒØ7ˆž„Ø8ˆž…Ø9ˆž†Ø:ˆYÉص,ƍ—Press any key to continue...Œä‡ÇYÙYÉص,YÉص,Ç7—OFFÉؚÆÉØ>F‡Y4”=dÇÆ
Ç—[]¾ÆÇ7Çk™d6—OFFÉØÇ&ÆYØ•Ø•Ø•Ø•Ø•Ø•Ø •Ø
•Ø •Ø •Ø
•Ø•Ø•Ø•Ø•Ø•Ø•Ø•Ø•Ø•Ø•Ø•Ø•Ø•Ø•Ø•Ø•Ø•Ø•Ø •Ø!•Ø"•Ø#•Ø$•Ø%•Ø&•Ø'•Ø(•Ø)•Ø*•Ø+•—fimØ)‰—patientØ(‰ÝØ ‰™ vØ-ÃÉØ.F‡—FIM؉ÉØ/,™™™™J—M—B/WÉØ0F‡—
FIM100.EXEAX—
FIM100.EXE-— fim .dbfAyX"™™‹—Be patient while I do some work±$
#ü—TEMPLATE!#û$—
RHCOD Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
PNUMB Ø1ˆ—CØ2ˆ™
Ø3ˆïØ4ˆ—
ADDAT Ø1ˆ—DØ2ˆ™Ø3ˆïØ4ˆ—
DIDAT Ø1ˆ—DØ2ˆ™Ø3ˆïØ4ˆ—
PGINT Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
INDT1 Ø1ˆ—DØ2ˆ™Ø3ˆïØ4ˆ—
INTR1 Ø1ˆ—DØ2ˆ™Ø3ˆïØ4ˆ—
INDT2 Ø1ˆ—DØ2ˆ™Ø3ˆïØ4ˆ—
INTR2 Ø1ˆ—DØ2ˆ™Ø3ˆïØ4ˆ—
INDT3 Ø1ˆ—DØ2ˆ™Ø3ˆïØ4ˆ—
INTR3 Ø1ˆ—DØ2ˆ™Ø3ˆïØ4ˆ—
ADCLA Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
ZIP Ø1ˆ—CØ2ˆ™ Ø3ˆïØ4ˆ—
DOB Ø1ˆ—DØ2ˆ™Ø3ˆïØ4ˆ—
SEX Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
PATR Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
LANG Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
MSTAT Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
SET1 Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
SET2 Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
SET3 Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
SET4 Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
LIV1 Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
LIV2 Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
LIV3 Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
VOCC1 Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
VOCC2 Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
VOCE1 Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
VOCE2 Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
FODAT Ø1ˆ—DØ2ˆ™Ø3ˆïØ4ˆ—
INFSO Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
METHO Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
HMPR Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
HMSE Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
THERA Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
IGRP Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
ONSET Ø1ˆ—DØ2ˆ™Ø3ˆïØ4ˆ—
PDIAG Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
DIAG1 Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
DIAG2 Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
DIAG3 Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
DIAG4 Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
DIAG5 Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
DIAG6 Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
DIAG7 Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
DFU1 Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
DFU2 Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
DFU3 Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
DFU4 Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
DFU5 Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
DFU6 Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
DFU7 Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
PAY1 Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
PAY2 Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
HPRICE Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
INCPH Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
FEEDA Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
FEEDD Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
FEEDF Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
GROOMA Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
GROOMD Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
GROOMF Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
BATHA Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
BATHD Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
BATHF Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
DUPPA Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
DUPPD Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
DUPPF Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
DLOBA Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
DLOBD Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
DLOBF Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
TOILA Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
TOILD Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
TOILF Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
BLADA Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
BLADD Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
BLADF Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
BOWLA Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
BOWLD Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
BOWLF Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
BCWCA Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
BCWCD Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
BCWCF Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
MTOIA Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
MTOID Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
MTOIF Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
TUBA Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
TUBD Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
TUBF Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
LWCA1 Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
LWCA Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
LWCD1 Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
LWCD Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
LWCF1 Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
LWCF Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
STAIRA Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
STAIRD Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
STAIRF Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
CCOM1A Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
CCOMA Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
CCOM1D Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
CCOMD Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
CCOM1F Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
CCOMF Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
EXPV1A Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
EXPVA Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
EXPV1D Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
EXPVD Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
EXPV1F Ø1ˆ—CØ2ˆ€Ø3ˆïØ4ˆ—
EXPVF Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
SOCIA Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
SOCID Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
SOCIF Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
PSOLVA Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
PSOLVD Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
PSOLVF Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
MEMA Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
MEMD Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
MEMF Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
TOT1 Ø1ˆ—NØ2ˆ™Ø3ˆïØ4ˆ—
TOT2 Ø1ˆ—NØ2ˆ™Ø3ˆïØ4ˆ—
TOT3 Ø1ˆ—NØ2ˆ™Ø3ˆïØ4ˆ—
TRANSMIT Ø1ˆ—LØ2ˆ€Ø3ˆïØ4ˆ$ #û—TEMPLATEØ"$$ #ü—FIM!#û$— TEMPLATE.DBF-— STARTfim.exeAX— STARTFIM.EXE-— patient .dbfAyX$
#ü—TEMPLATE!#û$—
LNAME Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
FNAME Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
NUMBER Ø1ˆ—CØ2ˆ™
Ø3ˆïØ4ˆ—
CODE Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
DOB Ø1ˆ—DØ2ˆ™Ø3ˆïØ4ˆ—
ADDRESS1 Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
ADDRESS2 Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
CITY Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
STATE Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
ZIP Ø1ˆ—CØ2ˆ™ Ø3ˆïØ4ˆ—
PHONE Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ$ #û—TEMPLATEØ"$$ #ü—PATIENT!#û$— TEMPLATE.DBF-— com .dbfAyX$
#ü—TEMPLATE!#û$—
DPORT Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
DBAUD Ø1ˆ—NØ2ˆ™Ø3ˆïØ4ˆ—
DPARITY Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
DSTOP Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
DWORD Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
DRXBUFFER Ø1ˆ—NØ2ˆ™Ø3ˆïØ4ˆ—
DTXBUFFER Ø1ˆ—NØ2ˆ™Ø3ˆïØ4ˆ—
DMODEM Ø1ˆ—CØ2ˆ™<Ø3ˆïØ4ˆ—
DXON Ø1ˆ—LØ2ˆ€Ø3ˆïØ4ˆ—
DXYRETRY Ø1ˆ—NØ2ˆ™Ø3ˆïØ4ˆ—
DXYCD Ø1ˆ—LØ2ˆ€Ø3ˆïØ4ˆ—
DADD3 Ø1ˆ—NØ2ˆ™Ø3ˆïØ4ˆ—
DADD4 Ø1ˆ—NØ2ˆ™Ø3ˆïØ4ˆ—
DIRQ3 Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
DIRQ4 Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ$ #û—TEMPLATEØ"$$ #ü—COM!#û$— TEMPLATE.DBF-—COMØ"¦!ïØ5‰™` Ø6‰ïØ7‰€Ø8‰™Ø9‰™'Ø:‰— AT &C1&D2çØ;‰>Ø<‰™
Ø=‰>Ø>‰™èØ?‰™óØ@‰™ØA‰™ØB‰ž5ØCˆž6ØDˆž7ØEˆž8ØFˆž9ØGˆž:ØHˆž:ØIˆž;ØJˆž<ØKˆž=ØLˆž>ØMˆž?ØNˆž@ØOˆžAØPˆžBØQˆØ5ìØ6ìØ7ìØ8ìØ9ìØ:ìØ:ìØ;ìØ<ìØRìØ>ìØ?ìØ@ìØAìØBì— dial .dbfAyXþ$
#ü—TEMPLATE!#û$—
FNAME Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
FNUM Ø1ˆ—CØ2ˆ™Ø3ˆïØ4ˆ—
FBAUD Ø1ˆ—NØ2ˆ™Ø3ˆïØ4ˆ—
FPARITY Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
FSTOP Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ—
FWORD Ø1ˆ—NØ2ˆ€Ø3ˆïØ4ˆ$ #û—TEMPLATEØ"$$ #ü—DIAL!#û$— TEMPLATE.DBF-—B&L Computer AssociatesçØS‰—Buffalo Gen Hospital StudyØT‰—1,201,886-8041ØU‰— ØV‰™` ØW‰ïØX‰€ØY‰™ØZ‰žTØ[ˆžVØ\ˆžWØ]ˆžXØ^ˆžYØ_ˆžZØ`ˆžSØ[ˆžUØ\ˆžWØ]ˆžXØ^ˆžYØ_ˆžZØ`ˆžWØ]ˆžXØ^ˆžYØ_ˆžZØ`ˆžWØ]ˆžXØ^ˆžYØ_ˆžZØ`ˆžWØ]ˆžXØ^ˆžYØ_ˆžZØ`ˆžWØ]ˆžXØ^ˆžYØ_ˆžZØ`ˆžWØ]ˆžXØ^ˆžYØ_ˆžZØ`ˆžWØ]ˆžXØ^ˆžYØ_ˆžZØ`ˆžWØ]ˆžXØ^ˆžYØ_ˆžZØ`ˆØTìØVìØSìØUìØWìØXìØYìØZì— PNUMB.NTXAyXœ™™‹—Be patient while I reindex±€¸—PATIENTØ"¦!— UPPER(LNAME)—LNAME{—NUMBER—PATNUMB{™¸—FIMØ"¦!—PNUMB—PNUMB{—PDIAG—PDIAG{—FIMØ"¦!M¥Øe‰že™OXÝØf‰Y>Øf‰/—10/01/808X!™
™
‹—?Please set the date on your computer to today's date before you±™ ™
‹— ‹—0computer does not think today is January 1,1980.±™™‹—Hit any key to continue±Æ—Press any key to continue...Œä‡Ç¡YX™ï‹™ï‹™™‹—Hit any key to continue±Æ—Press any key to continue...Œä‡Ç]™ v8X}—NÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»Œ—Nº ºŒ—Nº Functional Independence Measure (FIM) ºŒ—Nº Unregisterd Shareware Copy ºŒ—Nº ºŒ—Nº Copyright (c) 1989 Mark Jay Bucksbaum, M.D. and Stephen M. Leon ºŒ—Nº All Rights Reserved. ºŒ—Nº ºŒ—Nº ºŒ—Nº This software is distributed as "Shareware" which means that you ºŒ—Nº are granted a license to use it for evaluation purposes. If you ºŒ—Nº decide to go beyond mere evaluation, you are morally and legally ºŒ—Nº obligated to pay for a full license. ºŒ—Nº ºŒ—Nº A single user license is only $35.00. A copy of the software that ºŒ—Nº will operate on a network in a multi-user environment is only $50. ºŒ—Nº ºŒ—Nº During the start-up process you will be asked if you want an order ºŒ—Nº form printed. After you have used the program 30 times and have ºŒ—Nº more that 25 patient records, an order form will always be printed. ºŒ—Nº ºŒ—Nº HIT ANY KEY TO CONTINUE ºŒ—NÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼŒÆ—Press any key to continue...Œä‡Çï—NÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»Œ—Nº LIMITED WARRANTY AND LIABILITY ºŒ—Nº ºŒ—Nº We warrant that the disks upon which the program came are free from de- ºŒ—Nº fective materials or workmanship in normal use for 90 days from your ºŒ—Nº receipt thereof. If the disketts are defective, return them during the ºŒ—Nº limited warranty period and they will be replaced. You acknowledge that ºŒ—Nº since we can't control you choice of software or your microcomputing ºŒ—Nº habits, it is your responsibility to (a) select programs that meet your ºŒ—Nº needs; (b) make backups of your data and programs regularly; (c) choose ºŒ—Nº maintain, and match your hardware, operating system software, and other ºŒ—Nº applications software; and (d) install, use and obtain results from ºŒ—Nº the FIM database. This software is licensed "as is". We cannot ºŒ—Nº guarantee you uninterrupted service or the correction of any errors. ºŒ—Nº ºŒ—Nº EXCEPT FOR THE LIMITED WARRANTY DESCRIBED ABOVE, THERE ARE NO WARRANTIES ºŒ—Nº TO YOU OR ANY OTHER PERSON OR ENTITY FOR THE MATERIALS, EXPRESSED OR ºŒ—Nº IMPLIED, INCLUDING BUT NOT LIMITED TO THE IMPLIED WARRANTIES OF MER- ºŒ—Nº CHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. ALL SUCH WARRANTIES ºŒ—Nº ARE EXPRESSLY AND SPECIFICALLY DISCLAIMED. ºŒ—Nº ºŒ—Nº HIT ANY KEY TO CONTINUE ºŒ—NÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼŒÆ—Press any key to continue...Œä‡Çï—NÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»Œ—Nº ºŒ—Nº IN NO EVENT SHALL THE COPYRIGHT OWNERS BE RESPONSIBLE FOR ANY INDIRECT, ºŒ—Nº SPECIAL, INCIDENTAL, CONSEQUENTIAL, OR SIMILAR DAMAGES OR LOST DATA OR ºŒ—Nº PROFITS TO YOU OR ANY OTHER PERSON OR ENTITY REGARDLESS OF THE LEGAL ºŒ—Nº THEORY, EVEN IF WE HAVE BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. ºŒ—Nº ºŒ—Nº If you would like a registered copy of this software and a manual for it ºŒ—Nº and FIM scoring, please send $35 for the single user version or $50.00 ºŒ—Nº for the network version (NJ residents please add sales tax) to: ºŒ—Nº ºŒ—Nº B & L Computer Associates ºçŒ—Nº 200 Winston Drive - suite 1707 ºŒ—Nº Cliffside Park, NJ 07010 ºŒ—Nº (201) 886-1658 ºŒ—Nº ºŒ—Nº The registered version does not have the opening message screens. In ºŒ—Nº adddition, registered users can obtain support on our 4 line BBS system. ºŒ—Nº All users are encouraged to make suggestions as to how to improve the ºŒ—Nº software. ºŒ—NÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼŒ—9 HIT ANY KEY TO RETURN TO THE PROGRAMŒÆ—Press any key to continue...Œä‡Çïï™™O—ÖÄ·º½ÄÓº
€™‹—A Message From Dr. Bucksbaum±™™‹—Dear Colleague:±™™ ‹—BAs a Board Certified Rehabilitation Medicine practitioner, I know ±™™‹—Gthe importance of FIM scoring. Being a graduate Engineer with a degree±™™‹—Ain Computer Science, I also know the importance of good software.±™ ™ ‹—BPlease do try this software. It will run on any IBM type personal ±™
™‹—2computer. This software is distributed as what is±™
™7‹— called ™"†—
Shareware.†™"†—†±™ ™‹—JIt is copyright protected software where you have the option of buying it ±™ ™‹—+or just tossing it out as excess baggage. ±™™ ‹—DIf you like it, please send me a check for $35 for a license to use ±™™‹—Dthe software and a manual ($60.00 if you want a network version.) If±™™‹—Dit is not something you find useful, please pass it along. You might±™™‹—Ialso drop me a note telling me what type of software you are looking for.±™™‹—DThe shareware version is fully functional except that it does not do±™™‹—statistical analysis.±™™ ‹—?Hit P to print an order form, any other key to run the program.±Æ—Press any key to continue...ŒäØg‰Çžg—P8žg—p8XNÉØhFX ÉØi,2Y9žfX3Ç
€Øj‰Y9€ØjØjљOYiZ+™,€ÉØkF‡™ó™ÉØkF‡™¼™ÉØkF‡YÀÿÆ
€ï™™O—ÖÄ·º½ÄÓº
™™‹—A Message From Dr. Bucksbaum±™™‹—Dear Colleague:±™™ ‹—=Since you have more than 25 patient records in it, you must ±™™‹—>find some redeeming value in it. We just thought we would ±™ ™‹—*remind you that this is not free software.±™ ™ ‹—@Please be assured that except for these two messages, this soft-±™ ™‹—Eware will continue to function. However, in all fairness, since you ±™
™‹—6are apparently using it, you really should pay for it.±™™ ‹—BPlease make sure the printer is on. When it is, hit any key and I ±™™‹—will print an order form.±™™(‹—Thanks,±™™(‹—Mark Jay Bucksbaum, M.D.±Æ—Press any key to continue...Œä‡ÇÉØhFXÉØi,Y4!dÆÇK™ō— Œ—. /†Œ— Œ—Mark Jay Bucksbaum, M.D. Œ—B&L Computer Associates猍—200 Winston Drive - suite 1707Œ—Cliffside Park, NJ 07010Œ— Œ— Œ—Dear Dr. Bucksbaum: Œ— Œ—, Please RUSH the following order to me: Œ— Œ—D--------------------------------------------------------------------Œ—D Number Product Unit Price Total Price Œ—D--------------------------------------------------------------------Œ— Œ—. FIM (non-network) 35.00Œ—D--------------------------------------------------------------------Œ— Œ—. FIM (network version) 60.00Œ—D--------------------------------------------------------------------Œ— Œ—B Shipping and Handling (per US Order) 5.00 Œ—D--------------------------------------------------------------------Œ— Œ—C Sales Tax (if a New Jersey resident) Œ—D--------------------------------------------------------------------Œ— Œ—D TOTAL $ Œ—D--------------------------------------------------------------------Œ— Œ—> My check, payable to B&L Computer Associates, is enclosed.猍— Œ— SHIP TO: Œ— Œ— Œ— Œ— Œ—D--------------------------------------------------------------------Œ— Name Œ— Œ—
Œ—D--------------------------------------------------------------------Œ— Address Œ— Œ— Œ—D--------------------------------------------------------------------Œ—9 City State Zip ŒÆK2ïÅÇÝ°Y4
3dÉØF‡—fim؉—patient؉؏؏؏—E؉€Ø ‰Ø
Ø Ø Ø
ØØØØØØØØØØØØØØØØ—9AL/AK/AZ/AR/CA/CZ/CO/CT/DE/DC/FL/GA/GU/HI/ID/IL/IN/IA/KS/—;KY/LA/ME/MD/MA/MI/MN/MS/MO/MT/NE/NV/NH/NJ/NM/NY/NC/ND/OH/OK†—3/OR/PA/PR/RI/SC/SD/TN/TX/UT/VT/VA/VI/WA/WV/WI/WY/ †Ø‰>؉€¸—&file1ç>™ÉØFX~1z—LNAME}—PATNUMB}¦#N™~¦$™¸—&file2ç>™ÉØFX81z—PNUMB}—PDIAG}¦#Nšæ—pnumbËÝØ!‰ÝØ"‰Æ7Æ9ž!X÷0Æ7Æ—ONÉØ#šæØ$Ø
‰šæØ%Ø ‰— PATIENT: ž
܆—, †ž ܆Ø&‰— PATIENT: ž
܆— †ž €™׆—-†ž ™™׆—-†ž ™™׆Ø'‰™Ø‰YY~$ž €8XÎœÉØ(,)Xï™@‹—*** DELETED ***±Yï™@‹— ±€™D‹ž)±™™(ž&c™+o€o‹ž&±™™‹ž €™ח-†ž ™™׆—-†ž ™™׆±™™-‹ž*±™™E‹ž+±™™&‹ž,±YYOž,—18X™™)‹—[Yes]±Y0ž,—28X™™)‹—[No] ±Y™™)‹— ±™™*‹ž-±™™9‹ž.±™™*‹ž/±™™9‹ž0±™ ™*‹ž1±™ ™9‹ž2±™ ™‹ž3±YYŽž3—18X™ ™‹—
[First Rehab]±Ygž3—28X™ ™‹—
[Evaluation] ±Y@ž3—38X™ ™‹—
[Readmission]±Y™ ™‹—
±™ ™4‹ž4€™ח-†ž4™™׆±™ ™E‹ž5±YYXž5—18X™ ™G‹—[Male] ±Y6ž5—28X™ ™G‹—[Female]±Y™ ™G‹— ±™
™‹ž6±™
™4‹ž7±YY&ž7—18X!™
™7‹—[White] ±Yúž7—28X!™
™7‹—[Black] ±YΞ7—38X!™
™7‹—[Asian] ±Y¢ž7—48X!™
™7‹—[American Indian] ±Yvž7—58X!™
™7‹—[Other] ±YJž7—68X!™
™7‹—[Hispanic] ±Y™
™7‹— ±™™‹ž8±YY‚ž8—18X™™‹—
[Yes] ±Y^ž8—28X™™‹—
[No] ±Y:ž8—38X™™‹—
[Partial] ±Y™™‹—
±™™4‹ž9±YYО9—18X™™7‹— [Single] ±Y«ž9—28X™™7‹— [Married] ±Y†ž9—38X™™7‹— [Widowed] ±Yaž9—48X™™7‹— [Separated]±Y<ž9—58X™™7‹— [Divorced] ±Y™™7‹— ±™™
‹ž:±YYUž:—018X'™™‹—[Home] ±Y"ž:—028X'™™‹—[Board and Care] ±Yïž:—038X'™™‹—[Transitional Living] ±Y¼ž:—048X'™™‹—[Intermediate Care] ±Y‰ž:—058X'™™‹—[Skilled Nursing] ±YVž:—068X'™™‹—[Acute Unit-your facil] ±Y#ž:—078X'™™‹—[Acute Unit-other facil]±Yðž:—088X'™™‹—[Chronic Hospital] ±Y½ž:—098X'™™‹—[Rehab Facility-other] ±YŠž:—108X'™™‹—[Other] ±YWž:—118X'™™‹—[Expired] ±Y$™™‹— ±™™5‹ž;±YYUž;—018X'™™8‹—[Home] ±Y"ž;—028X'™™8‹—[Board and Care] ±Yïž;—038X'™™8‹—[Transitional Living] ±Y¼ž;—048X'™™8‹—[Intermediate Care] ±Y‰ž;—058X'™™8‹—[Skilled Nursing] ±YVž;—068X'™™8‹—[Acute Unit-your facil] ±Y#ž;—078X'™™8‹—[Acute Unit-other facil]±Yðž;—088X'™™8‹—[Chronic Hospital] ±Y½ž;—098X'™™8‹—[Rehab Facility-other] ±YŠž;—108X'™™8‹—[Other] ±YWž;—118X'™™8‹—[Expired] ±Y$™™8‹— ±™™
‹ž<±YYUž<—018X'™™‹—[Home] ±Y"ž<—028X'™™‹—[Board and Care] ±Yïž<—038X'™™‹—[Transitional Living] ±Y¼ž<—048X'™™‹—[Intermediate Care] ±Y‰ž<—058X'™™‹—[Skilled Nursing] ±YVž<—068X'™™‹—[Acute Unit-your facil] ±Y#ž<—078X'™™‹—[Acute Unit-other facil]±Yðž<—088X'™™‹—[Chronic Hospital] ±Y½ž<—098X'™™‹—[Rehab Facility-other] ±YŠž<—108X'™™‹—[Other] ±YWž<—118X'™™‹—[Expired] ±Y$™™‹— ±™™5‹ž=±YYUž=—018X'™™8‹—[Home] ±Y"ž=—028X'™™8‹—[Board and Care] ±Yïž=—038X'™™8‹—[Transitional Living] ±Y¼ž=—048X'™™8‹—[Intermediate Care] ±Y‰ž=—058X'™™8‹—[Skilled Nursing] ±YVž=—068X'™™8‹—[Acute Unit-your facil] ±Y#ž=—078X'™™8‹—[Acute Unit-other facil]±Yðž=—088X'™™8‹—[Chronic Hospital] ±Y½ž=—098X'™™8‹—[Rehab Facility-other] ±YŠž=—108X'™™8‹—[Other] ±YWž=—118X'™™8‹—[Expired] ±Y$™™8‹— ±™™‹ž>±YYâž>—18X™™‹—[Alone] ±Yºž>—28X™™‹—[Family/Relat]±Y’ž>—38X™™‹—[Friends] ±Yjž>—48X™™‹—{Attendant] ±YBž>—58X™™‹—[Other] ±Y™™‹— ±™™5‹ž?±YYâž?—18X™™9‹—[Alone) ±Yºž?—28X™™9‹—[Family/Relat]±Y’ž?—38X™™9‹—[Friends] ±Yjž?—48X™™9‹—[Attendant] ±YBž?—58X™™9‹—[Other] ±Y™™9‹— ±™™‹ž@±YYúž@—18X!™™‹—[Alone] ±YΞ@—28X!™™‹—[Family/Relatives]±Y¢ž@—38X!™™‹—[Friends] ±Yvž@—48X!™™‹—[Attendant] ±YJž@—58X!™™‹—[Other] ±Y™™‹— ±Y¨ž ™8XrœÉØA,ï™ ‹žB±YYžB—18Xï™#‹—
[Employed] ±YõžB—28Xï™#‹—
[Sheltered] ±YОB—38Xï™#‹—
[Employed] ±Y«žB—48Xï™#‹—
[Homemaker] ±Y†žB—58Xï™#‹—
[Not Working]±YažB—68Xï™#‹—
[Retired-age]±Y<žB—78Xï™#‹—
[Retired-dis]±Yï™#‹—
±ï™>‹žC±YYžC—18Xï™A‹—
[Employed] ±YõžC—28Xï™A‹—
[Sheltered] ±YОC—38Xï™A‹—
[Employed] ±Y«žC—48Xï™A‹—
[Homemaker] ±Y†žC—58Xï™A‹—
[Not Working]±YažC—68Xï™A‹—
[Retired-age]±Y<žC—78Xï™A‹—
[Retired-dis]±Yï™A‹—
±€™ ‹žD±YYŽžD—18X€™#‹—[Full time] ±YgžD—28X€™#‹—[Part time] ±Y@žD—38X€™#‹—[Adjusted load]±Y€™#‹— ±€™>‹žE±YYŽžE—18X€™A‹—[Full time] ±YgžE—28X€™A‹—[Part time] ±Y@žE—38X€™A‹—[Adjusted load]±Y€™A‹— ±™™ ‹žF±™™(‹žG±YY‚žG—18X™™*‹—
[Patient] ±Y^žG—28X™™*‹—
[Family] ±Y:žG—38X™™*‹—
[Other] ±Y™™*‹—
±™™A‹žH±YY„žH—18X™™C‹— [In person]±Y_žH—28X™™C‹— [Telephone]±Y:žH—38X™™C‹—
[Mail] ±Y™™C‹—
±™™‹žI±YYӞI—18X"™™ ‹—[Own Care] ±Y¦žI—28X"™™ ‹—[Unpaid Helper] ±YyžI—38X"™™ ‹—[Paid Attendant] ±YLžI—48X"™™ ‹—[Paid Professional)±Y™™ ‹— ±™™‹žJ±YYӞJ—18X"™™ ‹—[Own Care] ±Y¦žJ—28X"™™ ‹—[Unpaid Helper] ±YyžJ—38X"™™ ‹—[Paid Attendant] ±YLžJ—48X"™™ ‹—[Paid Professional)±Y™™ ‹— ±™™‹žK±YYdžK—18X?™™ ‹—0[None] ±YžK—28X?™™ ‹—0[Outpatient Therapy] ±YОK—38X?™™ ‹—0[Home Based Paid Therapy] ±Y†žK—48X?™™ ‹—0[Outpatient Therapy and Home Based Paid Therapy]±Y<™™ ‹—0 ±™
™‹žL±™
™E‹žM±™ ™‹žN±™™‹žO±™™‹žP±™™!‹žQ±™™,‹žR±™™<‹žS±™™G‹žT±™™‹žU±™™‹žV±™™!‹žW±™™,‹žX±™™<‹žY±™™G‹žZ±™™‹ž[±™™‹ž\±™™ ‹ž]±YYž]—018X%™™
‹—[Blue Cross] ±YО]—028X%™™
‹—[Medicare] ±YŸž]—038X%™™
‹—[Medicaid/Welfare] ±Ynž]—048X%™™
‹—[Commercial Insurance]±Y=ž]—058X%™™
‹—[HMO] ±Y ž]—068X%™™
‹—[Work Comp] ±YÛž]—078X%™™
‹—[Crippled Child Serv] ±Yªž]—088X%™™
‹—[Region Ctr Devel Dis]±Yyž]—098X%™™
‹—[State Voc Rehab] ±YHž]—108X%™™
‹—[Private Pay] ±Yž]—118X%™™
‹—[Employee Courtesy] ±Yæž]—128X%™™
‹—[Free] ±Yµž]—138X%™™
‹—[Champus] ±Y„ž]—148X%™™
‹—[Other] ±YSž]—158X%™™
‹—[None] ±Y"™™
‹— ±™™/‹ž^±YYž^—018X%™™3‹—[Blue Cross] ±YО^—028X%™™3‹—[Medicare] ±YŸž^—038X%™™3‹—[Medicaid/Welfare] ±Ynž^—048X%™™3‹—[Commercial Insurance]±Y=ž^—058X%™™3‹—[HMO] ±Y ž^—068X%™™3‹—[Work Comp] ±YÛž^—078X%™™3‹—[Crippled Child Serv] ±Yªž^—088X%™™3‹—[Region Ctr Devel Dis]±Yyž^—098X%™™3‹—[State Voc Rehab] ±YHž^—108X%™™3‹—[Private Pay] ±Yž^—118X%™™3‹—[Employee Courtesy] ±Yæž^—128X%™™3‹—[Free] ±Yµž^—138X%™™3‹—[Champus] ±Y„ž^—148X%™™3‹—[Other] ±YSž^—158X%™™3‹—[None] ±Y"™™3‹— ±™™(‹ž_±™™D‹ž`±YYOž`—18X™™F‹—[Yes]±Y0ž`—28X™™F‹—[No] ±Y™™F‹— ±Y,ž ™8X"œÉØa,™™‹žb±™™‹žc±™™%‹žd±™™:‹že±™™=‹žf±™™A‹žg±™™D‹žh±™™H‹ži±™™K‹žj±™™‹žk±™™‹žl±™™%‹žm±™™‹žn±™™‹žo±™™%‹žp±™™=‹žq±™™D‹žr±™™K‹žs±™™‹žt±™™‹žu±™™%‹žv±™ ™‹žw±™ ™‹žx±™ ™%‹žy±™
™‹žz±™
™‹ž{±™
™%‹ž|±™ ™:‹ž}±™ ™=‹ž~±™ ™A‹ž±™ ™D‹ž€±™ ™H‹ž±™ ™K‹ž‚±™
™:‹žƒ±™
™=‹ž„±™
™A‹ž…±™
™D‹ž†±™
™H‹ž‡±™
™K‹žˆ±™
™‹ž‰±™
™‹žŠ±™
™%‹ž‹±™™‹žŒ±™™‹ž±™™%‹žŽ±™™=‹ž±™™D‹ž±™™K‹ž‘±™™‹ž’±™™‹ž“±™™%‹ž”±™™=‹ž•±™™D‹ž–±™™K‹ž—±™™‹ž˜±™™‹ž™±™™%‹žš±™™=‹ž›±™™D‹žœ±™™K‹ž±™™‹žž±™™‹žŸ±™™%‹ž ±™™;‹ž¡±™™B‹ž¢±™™I‹ž£±œÉؤ,Ø¥mÆ7YYÀ ž¥ï8ž¥™ 8XU—ONÉØ#Ç7™—Confirm return to menu —YÉئFX>Ø!‰Y™ï‹œÉؤ,Y[ ž¥€8X
Éا,YI ž¥™8X
Éب,Y5 ž¥™8X€Ø ‰Y# ž¥™8X
™Ø ‰Y ž¥™8X
™Ø ‰Yû
ž¥™8XnÝØ©‰9ž©X_Éت,Ø«mÆ7YYHž«ï8ž«™ 8X=™—Confirm end edit —YÉئFX>Ø©‰Y
™ï‹Éت,Yûž«€8Xc™ vجÙ؉œÉØ(,œÉØ­,œÉØA,œÉØ®,™ vØÜÉØa,œÉد,™Ø ‰Yž«™8Xy™Ø‰YYiž €8X ™ vجÜ™ÉØ­,™ vØÃYAž ™8X ™ vجÜ™ÉØ®,™ vجÃYž ™8X
œ™Éد,Y
ž«™8X5€Ø ‰™Ø‰™ vجÜÉØ(,œÉØ­,™ vØÃYΞ«™8X7™Ø ‰™Ø‰™ vجÜÉØA,œÉØ®,™ vØÃYž«™8X'™Ø ‰™Ø‰œÉØa,œÉد,Y\ž«™8Xa€Ø‰™ vجÜÉØ(,œÉØ­,œÉØA,œÉØ®,™ vØÜÉØa,œÉد,™Ø ‰Yñž«™8Xc™Ø‰™ vجÃœÉØ(,œÉØ­,œÉØA,œÉØ®,™ vØÜÉØa,œÉد,™Ø ‰Y„ž«™8Xc™Ø‰™ vجÜÉØ(,œÉØ­,œÉØA,œÉØ®,™ vØÜÉØa,œÉد,™Ø ‰Yž«™ 8X
ÉØ°,YYüYšüYƒž¥™8X—PØ"‰œ"Éر,Ydž¥™8X
ÉØ°,YPž¥™ 8X¥Ø²‰€¸Ýس‰ÆÇ79ž³XØ€¸—ONÉØ#€™™
™N6
)Xï™@‹—*** DELETED ***±Yï™@‹— ±™™‹—Patient Information±™™‹— Last Name: ±™™,‹—First: ±™™‹—Number: ±™™.‹—DOB: ±™™‹— Address: ±™™‹—(cont): ±™ ™
‹—City: ±™ ™+‹—State: ±™ ™>‹—Zip: ±™ ™ ‹—Phone: ±™ ™,‹—Special Code (if any): ±™™‹ž$±™™3‹ž%±™™‹ž´€™ח-†ž´™™׆—-†ž´™™׆±™™3‹ž6±™™‹žµ±™™‹ž¶±™ ™‹ž·±™ ™2‹ž¸±™ ™C‹ž4€™ח-†ž4™™׆±™ ™‹ž¹±™ ™C‹žº±ÉØ»,ؼmÆ7YYªž¼ï8ž¼™8XO™—#Confirm return to main update menu —YÉئFX>س‰Y
™ï‹ÉØ»,YKž¼€8X
Éا,Y9ž¼™8X
Éب,Y%ž¼™8X²Ç7—ONÉØ#>؉ž$Ø
‰ž%Ø ‰ž6/ؽ‰žµØ‰ž¶Ø‰ž·Ø‰ž¸Ø‰ž¹Ø¾‰žºØ¿‰ž6ØÀ‰ž´ØÁ‰ž4؉ž´€™×Øɞ´™™×Øĉž´™™×Øʼnž4€™×؉ž4™™×ØƉ™™‹ž
±™™3‹ž ±™™‹žÃ—-†žÄ†—-†žÅ†±™™3‹ž½±™™‹ž±™™‹ž±™ ™‹ž±™ ™2‹ž±™ ™C‹ž—-†žÆ†±™ ™‹ž¾±™ ™C‹ž¿±™™‹—@K !XXXXXXXXXXXXXXXXXXXXXXXXØ
H™™3‹—@K !XXXXXXXXXXXXXXXXXXXØ H™™‹—@K ###ØÃH™™‹—@K ##ØÄH™™‹—@K ####!ØÅH™™3‹—(IsDateOK(mdob))— @K ##/##/##ؽK™™‹ØH™™‹ØH™ ™‹—@K !XXXXXXXXXXXXXXXXXXXØH™ ™2‹— (STATECHK())—@K !!ØK™ ™C‹— (ZIPCHECK())—@K #####ØK™ ™I‹—@K ####ØÆH™ ™‹ؾH™ ™C‹Ø¿H¢™
ÉØÊFX]ž Ø%ˆž
Ø$ˆžÃžÄ†žÅ†Ø´ˆž½Ø6ˆžصˆžضˆžØ·ˆžظˆžžÆ†Ø4ˆž¾Ø¹ˆž¿ØºˆYÉØË,žÃžÄ†žÅ†Ø̉žÌžÁuXÝ؉ž½žÀuXÝ؉žžÆ†Ø͉žÍžÂuXÝ؉žX;™¸žÌ·CX-™
ÉØÊFXžÌØ ˆžÍØ4ˆž½Ø6ˆYÉØË,€¸Yiž¼™8X—1Ø"‰œ"Éر,YJž¼™8X—2Ø"‰œ"Éر,Y+ž¼™8X
ÉØÎ,Yž¼™8X
ÉØ°,YY$ùY!ùÇ7—ONÉØ#™¸Y?ž¥™
8X
ÉØÎ,Y+ž¥™ 8X
ÉØÏ,Yž¥™ 8X
ÉØ°,YYÏYÏÇYÉØË,YÉØË,Ç7—OFFÉØ#™ vØÃÉØÐF‡Y4Ìd؃)Xï™@‹—*** DELETED ***±Yï™@‹— ±ž)Øщž €™×Ø҉ž ™™×ØӉž ™™×Øԉž ØՉž*/Ø։ž+/Ø׉ž,Ø؉ž-/Øىž./Øډž//Øۉž0/Ø܉ž1/Ø݉ž2/Øމž3Ø߉ž4€™×؉ž4™™×؉ž4ØƉž5Øà‰ž6/ؽ‰ž6ØÀ‰ž7Ø቞8Ø≞9Ø㉞:Ø䉞;Ø剞<Ø扞=Ø牞>Ø艞?Ø鉞@Øê‰Ç7€™D‹žÑ±™™‹žÒ±™™‹—-±™™‹žÓ±™™‹—-±™™‹žÔ±™™-‹žÖ±™™E‹ž×±™™&‹žØ±™™*‹žÙ±™™9‹žÚ±™™*‹žÛ±™™9‹žÜ±™ ™*‹žÝ±™ ™9‹žÞ±™ ™‹žß±™ ™4‹ž±™ ™:‹žÂ±™ ™E‹žà±™
™‹ž½±™
™4‹žá±™™‹žâ±™™4‹žã±™™
‹žä±™™5‹žå±™™
‹žæ±™™5‹žç±™™‹žè±™™5‹žé±™™‹žê±žëXC™™ ‹—4Current mode Fast Edit hit F10 to shift to Full Edit±Y@™™ ‹—4Current mode Full Edit hit F10 to shift to Fast Edit±ž€8ž™8X—ONÉØ#€™D‹—@K ###ØÑH™™‹—@K ###ØÒH™™‹—@K ##ØÓH™™‹—@K ####!ØÔH™™-‹—(IsDateOK(maddat))—
@K ##/##/####ØÖK™™E‹—(IsDateOK(mdidat))—
@K ##/##/####Ø×K¢Ç7žëXW™™&‹—(MPGINT$(' 12'))—@K #ØØK¢žØ—18X"™™*‹—(IsDateOK(mindt1))—
@K ##/##/####ØÙK™™9‹—(IsDateOK(mintr1))—
@K ##/##/####ØÚK™™*‹—(IsDateOK(mindt2))—
@K ##/##/####ØÛK™™9‹—(IsDateOK(mintr2))—
@K ##/##/####ØÜK™ ™*‹—(IsDateOK(mindt3))—
@K ##/##/####ØÝK™ ™9‹—(IsDateOK(mintr3))—
@K ##/##/####ØÞK¢Y‚—Was program interrupted™
™
—No—YesÉØìFX—2Ø؉™™&‹žØ±Y6—1Ø؉™™&‹žØ±™™*‹—(IsDateOK(mindt1))—
@K ##/##/####ØÙK™™9‹—(IsDateOK(mintr1))—
@K ##/##/####ØÚK™™*‹—(IsDateOK(mindt2))—
@K ##/##/####ØÛK™™9‹—(IsDateOK(mintr2))—
@K ##/##/####ØÜK™ ™*‹—(IsDateOK(mindt3))—
@K ##/##/####ØÝK™ ™9‹—(IsDateOK(mintr3))—
@K ##/##/####ØÞK¢žëX)™ ™‹—(MADCLA$(' 123'))—@K #ØßKY—Admission Class—First Rehab —
Evaluation— ReadmissionÉØîFØ퉞í€ÔØ߉žß—08X— Ø߉—ONÉØ#™ ™‹žß±™ ™4‹—@K #####ØH™ ™:‹—@K ####ØÂH¢žëX&™ ™E‹—(MSEX$(' 12'))—@K #ØàKYQ—Sex™™2—Male—FemaleÉØìFX —1Øà‰Y—2Øà‰—ONÉØ#™ ™E‹žà±™
™‹—(IsDateOK(mdob))—
@K ##/##/####ؽK¢žëX-™
™4‹—(MPATR$(' 123456'))—@K #ØáK¢Ys—Race—White—Black—Asian— Amer Indian—Other—HispanicÉØîFØ퉞í€ÔØ቞á—08X— Ø቙
™4‹žá±žëX*™™‹—(MLANG$(' 123'))—@K #ØâK¢Yh—English Language—Yes —No—PartialÉØîFØ퉞í€ÔØ≞â—08X— Ø≙™‹žâ±žëX-™™4‹—(MMSTAT$(' 12345'))—@K #ØãK¢Y—Marital Status—
Single —Married—Widowed— Separated—DivorcedÉØîFØ퉞í€ÔØ㉞ã—08X— Ø㉙™4‹žã±Øï™ '—Home Ø—Board and Care Ø—Transitional Living Ø—Intermediate Care Ø—Skilled Nursing Ø—Acute Unit-your facility Ø—Acute Unit-other facilityØ—Chronic Hospital Ø—Rehab Facility - other Øï™ ‰—Other Øï™
‰—Expired Øï™ ‰ž€8ž™8XÔžëXJ™™
‹—/(MSET1$(' /01/02/03/04/05/06/07/08/09/10/11'))—@K ##ØäK¢Yš—settingï™™™>— Pre Hosp Living Arrangement ÉØðFØ퉞í™
GXží™ÔØä‰Y ží€ÔØ䉞ä—08X — Ø䉞ä㙠bX
—0žä܆Ø䉙™
‹žä±žëXJ™™5‹—/(MSET2$(' /01/02/03/04/05/06/07/08/09/10/11'))—@K ##ØåK¢Yš—settingï™™™>— Admit From Living Arrangement ÉØðFØ퉞í™
GXží™ÔØå‰Y ží€ÔØ剞å—08X — Ø剞å㙠bX
—0žå܆Ø剙™5‹žå±ž™8ž™8XõžëXJ™™
‹—/(MSET3$(' /01/02/03/04/05/06/07/08/09/10/11'))—@K ##ØæK¢Y¥—settingï™™™>— Discharge Living Arrangement ÉØðFØ퉞í™ÔØ扞í™
GXží™ÔØæ‰Y ží€ÔØ扞æ—08X — Ø扞æ㙠bX
—0žæ܆Ø扙™
‹žæ±ž™8ž™8XêžëXJ™™5‹—/(MSET4$(' /01/02/03/04/05/06/07/08/09/10/11'))—@K ##ØçK¢Yš—settingï™™™>— Follow Up Living Arrangement ÉØðFØ퉞í™
GXží™ÔØç‰Y ží€ÔØ牞ç—08X — Ø牞ç㙠bX
—0žç܆Ø牙™5‹žç±6ž€8ž™8XðžëX,™™‹—(MLIV1$(' 12345'))—@K #ØèK¢Y¾—Pre Hosp Living With—Alone —Family/Relat —Friends —Attendant —Other ÉØîFØ퉞í€ÔØ艞è—08X— Ø艙™‹žè±ž™8ž™8X»žëX,™™5‹—(MLIV2$(' 12345'))—@K #ØéK¢Y‰—Discharge Living With—Alone—Family/Relatives —Friends— Attendant—OtherÉØîFØ퉞í€ÔØ鉞é—08X— Ø鉙™5‹žé±ž™8ž™8X»žëX,™™‹—(MLIV3$(' 12345'))—@K #ØêK¢Y‰—Follow Up Living With—Alone—Family/Relatives —Friends— Attendant—OtherÉØîFØ퉞í€ÔØꉞè—08X— Øꉙ™‹žê±¢žÒžÓ†žÔ†Ø̉žÌžÕuXÝ؉ž½žÀuXÝ؉žžÂ†Ø͉žÍžÆuXÝ؉™
ÉØÊFX»žÑØ)ˆžÌØ ˆžÖØ*ˆž×Ø+ˆžØØ,ˆžÙØ-ˆžÚØ.ˆžÛØ/ˆžÜØ0ˆžÝØ1ˆžÍØ4ˆžÞØ2ˆžßØ3ˆžàØ5ˆžáØ7ˆžâØ8ˆžãØ9ˆžäØ:ˆžåØ;ˆžæØ<ˆžçØ=ˆžèØ>ˆžéØ?ˆžêØ@ˆž½Ø6ˆYÉØË,žX3€¸™
ÉØÊFXžÌØ´ˆžÍØ4ˆž½Ø6ˆYÉØË,™¸Ý°Y4…d؃žBØñ‰žCØò‰žDØó‰žEØô‰žF/Øõ‰žGØö‰žHØ÷‰žIØø‰žJØù‰žKØú‰žLØû‰žM/Øü‰žNØý‰žOØþ‰žPØÿ‰žQ؉žR؉žS؉žT؉žU؉žV؉žW؉žX؉žY؉žZØ ‰ž[Ø
‰ž\Ø ‰ž]Ø ‰ž^Ø
‰ž_؉ž`؉Ç7ï™ ‹žñ±ï™>‹žò±€™ ‹žó±€™>‹žô±™™ ‹žõ±™™(‹žö±™™A‹ž÷±™™‹žø±™™‹žù±™™‹žú±™
™‹žû±™
™E‹žü±™ ™‹žý±™™‹žþ±™™!‹ž±™™<‹ž±™™‹ž±™™!‹ž±™™<‹ž±™™‹ž
±™™‹žÿ±™™,‹ž±™™G‹ž±™™‹ž±™™,‹ž±™™G‹ž ±™™‹ž ±™™ ‹ž ±™™/‹ž
±™™(‹ž±™™D‹ž±žëXC™™ ‹—4Current mode Fast Edit hit F10 to shift to Full Edit±Y@™™ ‹—4Current mode Full Edit hit F10 to shift to Fast Edit±ž€8ž™8XåžëX-ï™ ‹—(MVOCC1$(' 1234567'))—@K #ØñK¢Y²— Vocational Category Admission—Employed — Sheltered—Student— Homemaker— Not working— Retired-age—Retired-disabilityÉØîFØ퉞í€ÔØñ‰ï™ ‹žñ±ž™8ž™8XåžëX-ï™>‹—(MVOCC2$(' 1234567'))—@K #ØòK¢Y²— Vocational Category Followup —Employed — Sheltered—Student— Homemaker— Not working— Retired-age—Retired-disabilityÉØîFØ퉞í€ÔØò‰ï™>‹žò±ž€8ž™8X©žëX)€™ ‹—(MVOCE1$(' 123'))—@K #ØóK¢Yz— Vocat Effort Admission —Full time — Part time—Adjusted workloadÉØîFØ퉞í€ÔØ󉀙 ‹žó±ž™8ž™8X©žëX)€™>‹—(MVOCE2$(' 123'))—@K #ØôK¢Yz— Vocat Effort Followup —Full time — Part time—Adjusted workloadÉØîFØ퉞í€ÔØô‰€™>‹žô±—ONÉØ#ž™8ž™8XU™™ ‹—(IsDateOK(mfodat))—
@K ##/##/####ØõK¢žëX+™™(‹—(minfso$(' 123'))—@K !ØöK¢Yn—Information Source—Patient —Family—OtherÉØîFØ퉞í€ÔØö‰žö—08X— Øö‰™™(‹žö±žëX+™™A‹—(mmetho$(' 123'))—@K !Ø÷K¢Y[—Method— In person— Telephone—MailÉØîFØ퉞í€ÔØ÷‰ž÷—08X— Ø÷‰™™A‹ž÷±Ø™'—Own Care Ø€‰—Unpaid Helper Ø™‰—Paid Attendant Ø™‰—Paid Professional Ø™‰žëX+™™‹—(mhmpr$(' 1234'))—@K #ØøK¢Yh—setingï™0™™O— Primary Health Maintenance ÉØðFØ퉞í€ÔØø‰žø—08X — Øø‰™™‹žø±žëX+™™‹—(mhmse$(' 1234'))—@K #ØùK¢Yg—setingï™0™™O— Secondary Health Maintenance ÉØðFØ퉞í€ÔØù‰žù—08X— Øù‰™™‹žù±Ø™'—None Ø€‰—Outpatient Therapy Ø™‰—Home Based Paid Therapy Ø™‰—Both Ø™‰žëX,™™‹—(mthera$(' 1234'))—@K #ØúK¢Yg—seingï™0™™O— Therapy ÉØðFØ퉞í€ÔØú‰žú—08X — Øú‰™™‹žú±ž™8ž™8XÁØ™6'—Stroke Ø€‰— Left Body Involvement Ø™‰— Right Body Involvement Ø™‰— Bilateral Involvement Ø™‰— No Paresis Ø™‰—Brain Dysfunction Ø™‰— Non-Traumatic Ø™‰— Traumatic Ø™‰— Open injury Ø™ ‰— Closed injury Ø™
‰—Neurologic Cond.-Other Ø™ ‰—Spinal Cord Dysfunction Ø™ ‰— Non-Traumatic Ø™
‰— Paraplegia Ø™‰— Incomplete Ø™‰— Complete Ø™‰— Quadriplegia Ø™‰— Incomplete Ø™‰— Complete Ø™‰— Traumatic Ø™‰— Paraplegia Ø™‰— Incomplete Ø™‰— Complete Ø™‰— Quadriplegia Ø™‰— Incomplete Ø™‰— Complete Ø™‰—Amputee Ø™‰— Single Upper AE Ø™‰— Single Upper BE Ø™‰— Single Lower AK Ø™‰— Single Lower BK Ø™‰— Double AK/AK Ø™ ‰— Double AK/BK Ø™!‰— Double BK/BK Ø™"‰— Other Combinations Ø™#‰—Arthritis Ø™$‰— Rheumatoid Ø™%‰— Osteoarthritis Ø™&‰— Other Ø™'‰—Pain Syndromes Ø™(‰— Neck Pain Ø™)‰— Back Pain Ø™*‰— Extremity Pain Ø™+‰— Abdominal Pain Ø™,‰— Pelvic Pain Ø™-‰— Facial Pain Ø™.‰— Headache Ø™/‰— Other Pain Ø™0‰—Orthopaedic Conditions Ø™1‰—Cardiac Ø™2‰—Pulminary Ø™3‰—Burns Ø™4‰—Congenital Deformities Ø™5‰—Other Disabling ImpairmentØ™6‰žëX™
™‹— @K ##.###ØûH¢Yà—settinï™(™™O—[ Impairment Group Code]ÉØðFØí‰YYƒží€8X—01.000Øû‰Ykží™8X—01.100Øû‰YQží™8X—01.200Øû‰Y7ží™8X—01.300Øû‰Yží™8X—01.400Øû‰Yží™8X—02.000Øû‰Yéží™8X—02.100Øû‰YÏží™8X—02.200Øû‰Yµží™ 8X—02.210Øû‰Y›ží™
8X—02.220Øû‰Yží™ 8X—03.000Øû‰Ygží™ 8X—04.000Øû‰YMží™
8X—04.100Øû‰Y3ží™8X—04.110Øû‰Yží™8X—04.111Øû‰Yÿží™8X—04.112Øû‰Yåží™8X—04.120Øû‰YËží™8X—04.121Øû‰Y±ží™8X—04.122Øû‰Y—ží™8X—04.100Øû‰Y}ží™8X—04.210Øû‰Ycží™8X—04.211Øû‰YIží™8X—04.212Øû‰Y/ží™8X—04.220Øû‰Yží™8X—04.221Øû‰Yûží™8X—04.222Øû‰Yáží™8X—05.000Øû‰YÇží™8X—05.100Øû‰Y­ží™8X—05.200Øû‰Y“ží™8X—05.300Øû‰Yyží™8X—05.400Øû‰Y_ží™ 8X—05.500Øû‰YEží™!8X—05.600Øû‰Y+ží™"8X—05.700Øû‰Yží™#8X—05.800Øû‰Y÷ží™$8X—06.000Øû‰YÝží™%8X—06.100Øû‰YÞí™&8X—06.200Øû‰Y©ží™'8X—06.300Øû‰Yží™(8X—07.000Øû‰Yuží™)8X—07.100Øû‰Y[ží™*8X—07.200Øû‰YAží™+8X—07.300Øû‰Y'ží™,8X—07.400Øû‰Y
ží™-8X—07.500Øû‰Yóží™.8X—07.600Øû‰Yٞí™/8X—07.700Øû‰Y¿ží™08X—07.800Øû‰Y¥ží™18X—08.000Øû‰Y‹ží™28X—09.000Øû‰Yqží™38X—10.000Øû‰YWží™48X—11.000Øû‰Y=ží™58X—12.000Øû‰Y#ží™68X—13.000Øû‰Y — Øû‰—ONÉØ#™
™‹žû±™
™E‹—(IsDateOK(monset))—
@K ##/##/####ØüK™ ™‹— @K ###.##ØýH™™‹— @K ###.##ØþH™™!‹— @K ###.##ØH™™<‹— @K ###.##ØH™™‹— @K ###.##ØH™™!‹— @K ###.##ØH™™<‹— @K ###.##ØH™™‹— @K ###.##Ø
H¢ž™8ž™8X£™™‹— @K ###.##ØÿH™™,‹— @K ###.##ØH™™G‹— @K ###.##ØH™™‹— @K ###.##ØH™™,‹— @K ###.##ØH™™G‹— @K ###.##Ø H™™‹— @K ###.##Ø H¢ž™8ž™8XCØ™'—Blue Cross Ø€‰—Medicare Ø™‰—Medicaid/Welfare Ø™‰—Commercial Insurance Ø™‰—HMO Ø™‰—Workmans Compensation Ø™‰—Crippled Child Serv Ø™‰—Regional Ctr Devel Disab Ø™‰—State Voc Rehab Ø™ ‰—Private Pay Ø™
‰—Employee Courtesy Ø™ ‰—Free Ø™ ‰—Champus Ø™
‰—Other Ø™‰—None Ø™‰žëX™™ ‹—@K ##Ø H¢Y‘—settiï™(™
™F—[Primary Payment Source]ÉØðFØ퉞í™
GXží™ÔØ ‰Y ží€ÔØ ‰ž —08X — Ø ‰ž 㙠bX
—0ž Ü†Ø ‰™™ ‹ž ±žëX™™/‹—@K ##Ø
H¢Y¼—settiï™(™
™F—[Secondary Payment Source]ÉØðFØ퉞í™
GXží™ÔØ
‰Y ží€ÔØ
‰ž
—08X — Ø
‰ž
—08ž — uX —15Ø
‰ž
㙠bX
—0ž
܆Ø
‰—ONÉØ#™™/‹ž
±™™(‹— @K ######ØH¢žëX*™™D‹—(mincph$(' 12'))—@K !ØK¢YN—Include Physician™
™
—Yes—NoÉØìFX —1؉Y—2؉™™D‹ž±™
ÉØÊFXޞñØBˆžòØCˆžóØDˆžôØEˆžõØFˆžöØGˆž÷ØHˆžøØIˆžùØJˆžúØKˆžûØLˆžüØMˆžýØNˆžþØOˆžÿØPˆžØQˆžØRˆžØSˆžØTˆžØUˆžØVˆžØWˆžØXˆžØYˆž ØZˆž
Ø[ˆž Ø\ˆž Ø]ˆž
Ø^ˆžØ_ˆžØ`ˆYÉØË,Ý°Y4®d؃žb؉žc؉žd؉že؉žf؉žg؉žh؉ži؉žj؉žk؉žl؉žm؉žnØ ‰žoØ!‰žpØ"‰žqØ#‰žrØ$‰žsØ%‰žtØ&‰žuØ'‰žvØ(‰žwØ)‰žxØ*‰žyØ+‰žzØ,‰ž{Ø-‰ž|Ø.‰ž}Ø/‰ž~Ø0‰žØ1‰ž€Ø2‰žØ3‰ž‚Ø4‰žƒØ5‰ž„Ø6‰ž…Ø7‰ž†Ø8‰ž‡Ø9‰žˆØ:‰ž‰Ø;‰žŠØ<‰ž‹Ø=‰žŒØ>‰žØ?‰žŽØ@‰žØA‰žØB‰ž‘ØC‰ž’ØD‰ž“ØE‰ž”ØF‰ž•ØG‰ž–ØH‰ž—ØI‰ž˜ØJ‰ž™ØK‰žšØL‰ž›ØM‰žœØN‰žØO‰žžØP‰žŸØQ‰ž ØR‰ž¡ØS‰ž¢ØT‰ž£ØU‰—ONÉØ#Ç7™™‹ž±™™‹ž±™™‹ž ±™™‹ž&±™ ™‹ž)±™
™‹ž,±™
™‹ž;±™™‹ž>±™™‹žD±™™‹žJ±™™‹žP±™™:‹ž±™™=‹ž±™™=‹ž#±™ ™:‹ž/±™ ™=‹ž0±™
™:‹ž5±™
™=‹ž6±™™=‹žA±™™=‹žG±™™=‹žM±™™;‹žS™Ô±™™‹ž±™™‹ž±™™‹ž!±™™‹ž'±™ ™‹ž*±™
™‹ž-±™
™‹ž<±™™‹ž?±™™‹žE±™™‹žK±™™‹žQ±™™A‹ž±™™D‹ž±™™D‹ž$±™ ™A‹ž1±™ ™D‹ž2±™
™A‹ž7±™
™D‹ž8±™™D‹žB±™™D‹žH±™™D‹žN±™™B‹žT™Ô±™™%‹ž±™™%‹ž±™™%‹ž"±™™%‹ž(±™ ™%‹ž+±™
™%‹ž.±™
™%‹ž=±™™%‹ž@±™™%‹žF±™™%‹žL±™™%‹žR±™™H‹ž±™™K‹ž±™™K‹ž%±™ ™H‹ž3±™ ™K‹ž4±™
™H‹ž9±™
™K‹ž:±™™K‹žC±™™K‹žI±™™K‹žO±™™I‹žU™Ô±™™ ‹—8Hit F1 at each input item for explanation of rating code±ž€8ž™8X]™™‹ï™—@K #ØI™™‹ï™—@K #ØI™™‹ï™—@K #Ø I™™‹ï™—@K #Ø&I™ ™‹ï™—@K #Ø)I™
™‹ï™—@K #Ø,I™
™‹ï™—@K #Ø;I™™‹ï™—@K #Ø>I™™‹ï™—@K #ØDI™™‹ï™—@K #ØJI™™‹ï™—@K #ØPI™™:‹—(MLWCA1$(' WCB'))—@K !ØK™™=‹ï™—@K #ØI™™=‹ï™—@K #Ø#I™ ™:‹—(MCCOM1A$(' AVB'))—@K !Ø/K™ ™=‹ï™—@K #Ø0I™
™:‹—(MEXPV1A$(' VNB'))—@K !Ø5K™
™=‹ï™—@K #Ø6I™™=‹ï™—@K #ØAI™™=‹ï™—@K #ØGI™™=‹ï™—@K #ØMI¢žž†ž †ž&†ž)†ž,†ž;†ž>†žD†žJ†žP†ž†ž#†ž0†ž6†žA†žG†žM†ØS‰™™;‹žS™Ô±ž™8ž™8X]™™‹ï™—@K #ØI™™‹ï™—@K #ØI™™‹ï™—@K #Ø!I™™‹ï™—@K #Ø'I™ ™‹ï™—@K #Ø*I™
™‹ï™—@K #Ø-I™
™‹ï™—@K #Ø<I™™‹ï™—@K #Ø?I™™‹ï™—@K #ØEI™™‹ï™—@K #ØKI™™‹ï™—@K #ØQI™™A‹—(MLWCD1$(' WCB'))—@K !ØK™™D‹ï™—@K #ØI™™D‹ï™—@K #Ø$I™ ™A‹—(MCCOM1D$(' AVB'))—@K !Ø1K™ ™D‹ï™—@K #Ø2I™
™A‹—(MEXPV1D$(' VNB'))—@K !Ø7K™
™D‹ï™—@K #Ø8I™™D‹ï™—@K #ØBI™™D‹ï™—@K #ØHI™™D‹ï™—@K #ØNI¢žž†ž!†ž'†ž*†ž-†ž<†ž?†žE†žK†žQ†ž†ž$†ž2†ž8†žB†žH†žN†ØT‰™™B‹žT™Ô±ž™8ž™8X]™™%‹ï™—@K #ØI™™%‹ï™—@K #ØI™™%‹ï™—@K #Ø"I™™%‹ï™—@K #Ø(I™ ™%‹ï™—@K #Ø+I™
™%‹ï™—@K #Ø.I™
™%‹ï™—@K #Ø=I™™%‹ï™—@K #Ø@I™™%‹ï™—@K #ØFI™™%‹ï™—@K #ØLI™™%‹ï™—@K #ØRI™™H‹—(MLWCF1$(' WCB'))—@K !ØK™™K‹ï™—@K #ØI™™K‹ï™—@K #Ø%I™ ™H‹—(MCCOM1F$(' AVB'))—@K !Ø3K™ ™K‹ï™—@K #Ø4I™
™H‹—(MEXPV1F$(' VNB'))—@K !Ø9K™
™K‹ï™—@K #Ø:I™™K‹ï™—@K #ØCI™™K‹ï™—@K #ØII™™K‹ï™—@K #ØOI¢žž†ž"†ž(†ž+†ž.†ž=†ž@†žF†žL†žR†ž†ž%†ž4†ž:†žC†žI†žO†ØU‰™™I‹žU™Ô±™
ÉØÊFXÑžØbˆžØcˆžØdˆžØeˆžØfˆžØhˆžØgˆžØjˆžØiˆžØkˆžØlˆžØmˆž Ønˆž!Øoˆž"Øpˆž#Øqˆž$Ørˆž%Øsˆž&Øtˆž'Øuˆž(Øvˆž)Øwˆž*Øxˆž+Øyˆž,Øzˆž-Ø{ˆž.Ø|ˆž/Ø}ˆž0Ø~ˆž1؈ž2؀ˆž3؁ˆž4؂ˆž5؃ˆž6؄ˆž7؅ˆž8؆ˆž9؇ˆž:؈ˆž;؉ˆž<؊ˆž=؋ˆž>،ˆž?؍ˆž@؎ˆžA؏ˆžBؐˆžCؑˆžDؒˆžEؓˆžFؔˆžGؕˆžHؖˆžIؗˆžJؘˆžKؙˆžLؚˆžM؛ˆžN؜ˆžO؝ˆžP؞ˆžQ؟ˆžRØ ˆžSØ¡ˆžTØ¢ˆžUØ£ˆYÉØË,ƍ—Press any key to continue...Œä‡ÇÝ°Y40d؃€™‹—.UNIFORM DATA SYSTEM FOR MEDICAL REHABILITATION±€™3‹—- Facility Code: ±™Patient Number: ±™™‹—Admission Date: ±™™8‹—Dischge Date: ±™™ ™
™D6
™™
‹—Was program interrupted: ±™™‹—5If yes, please provide: Transfer Date Return Date±™™‹—1st interruption:±™™‹—2nd interruption:±™ ™‹—3rd interruption:±™ ï™™O6
™ ™‹—Admission Class: ±™ ™%‹—Home Zip Code: ±™ ™@‹—Sex: ±™
™‹— Birthdate: ±™
™$‹—Race/Ethnicity: ±™€‹—English Language: ±™™$‹—Marital Status: ±™™‹—Living Arrangement - Setting±™™‹— Pre Hosp:±™™)‹— Admit From:±™™‹—
Discharge:±™™+‹— Followup:±™Living With -Pre-Hosp:±™™*‹—
Discharge:±™™
‹— Followup:±ïRecord: ¥›
€„.A†™ԙֆ±Ý°Y4Ãd؃ïVocational Status - Admission: ±ï™4‹—
Followup: ±€ï‹—Vocational Effort - Admission: ±€™4‹—
Followup: ±™ï™™O6
™™#‹— Followup ±™™‹—Date: ±™™‹—Information Source: ±™™9‹—Method: ±™™‹—Primary Health Maintenance: ±™Secondary Health Maintenance: ±™™‹— Therapy: ±™
™‹—Impairment Group: ±™
™‹—(complete on discharge)±™
™6‹—Date of Onset: ±™ Principal Diagnosis: ±™ ™‹—+(complete on discharge - list others below)±™ ï™™O6
™
™‹—IDischarge Followup Discharge Followup Discharge Followup±™™‹—1.±™™‹—2.±™™8‹—3.±™™‹—4.±™™‹— ±™™‹—5.±™™8‹—6. ±™™‹—7.±™™‹—(Use IDC 9 Code for Diagnoses)±™™‹—Payment Source - ±™™%‹—(complete on discharge)±™ Primary: ±™™$‹— Secondary: ±™™‹—
Charges - ±™™‹—Total Rehab Hospital $ ±™™1‹—Include Physician? ±Ý°Y4vd؃ïï™™O6 €™‹—$Functional Independence Measure(FIM)±™™(ž'c™+o€o‹ž'±™™‹—Admit Disch FolUp±™™;‹— Admit Disch FolUp±™™‹— SELF CARE±™™,‹—
LOCOMOTION±™™‹—
A. Feeding±™™)‹—L. alk/wheel±™™‹— B. Grooming±™™,‹— hr,oth±™™9‹—[±™™;‹—]±™™@‹—[±™™B‹—]±™™G‹—[±™™I‹—]±™™‹—
C. Bathing±™™)‹— M. Stairs±™™‹—D. Dressing-Upper Body±™ ™‹—E: Dressing-Lower Body±™ ™,‹—
COMMUNICATION±™
™‹— F. Toileting±™
™,‹—
uditory,isual or oth ±™ ™)‹—N. Comprehens'n±™ ™9‹—[±™ ™;‹—]±™ ™@‹—[±™ ™B‹—]±™ ™G‹—[±™ ™I‹—]±™ ™‹—SPHINCTER CONTROL±™ ™,‹—erbal, onverbal, oth±™
™‹—G. Bladder Management±™
™)‹—
O. Expression±™
™9‹—[±™
™;‹—]±™
™@‹—[±™
™B‹—]±™
™G‹—[±™
™I‹—]±™™‹—H. Bowel Management±™™,‹—SOCIAL COGNITION±™™‹—MOBILITY±™™)‹—P. Social Inter.±™™‹—I. Bed,Chair,W/Chair±™™)‹—Q. Problem Solving±™™‹— J. Toilet±™™)‹— R. Memory±™™‹—K. Tub, Shower±™™3‹—Totals±Ý°Y4d— ؉— ؉— ؉™Ð؉™ Ð؉—ONÉØ€™™™?6
Ç™™ ‹—1This module allows you to prepare a data file for±™™ ‹—-transmission. Do you want to prepare a file. ±™™9‹—(MAKEFIL$"YN")—!ØK¢Æž—Y8X)™¸—&file2ç>™ÉØFXz™™ ‹—1This file can contain
ll of the records in the±™™ ‹—4database, records you have marked for ransmission±™™ ‹—6or all records xcept those marked for transmission.±™ ™‹—Please select (or uit): ±Ç™ ™.‹—(SLECT$"ATEQ")—!ØK¢Æž—QuXå™ ™ ‹—0Please provide a name for the file to be created±™ ™ ‹—%(note that .TXT will be added it it):±9ž— 8X™ ™1‹—!!!!!!!!ØH¢YÙÿž—T8XeÇ™™ ‹—2Do you want the transmitted files to be unmarked. ±™™>‹—
(UNMARK$"YN")—!ØK¢Æ™™‹—+Please be patient while I prepare the file.±YY*ž—A8X7—"$#ü—&MFNAMEç!#û¦­ #ü#û xõÿ¦#ü$Yèž—T8X——"$#ü—&MFNAMEç!#û¦­ž X#ü#û xïÿ¦#ü$ž—Y8XON97yXH—transmitĦ­eZxùÿ¦™
ÉØ
FX>Ø ˆYÉØ ,xYeZxùÿY²ÿYFž—E8X;—"$#ü—&MFNAMEç!#û¦­ž yX#ü#û xîÿ¦#ü$™™‹—You can now transmit ž܆—.TXT†±™™‹—Hit any key to continue±Æ—Press any key to continue...Œä‡ÇYÉØ ,Y4±
dÉØF‡—ONÉØ™¸—&file2ç>™ÉØFXj
z—PNUMB}—PDIAG}¦#NÇÆ7Ç€™™ ™I6 ™™
‹—;This module provides a report containing information on all±™™
‹— ‹—in patient number order. ±— ؉— ؉™™
‹—:You can select
ll patients or patients at a acility.±™™E‹— (enr$('AF'))—!ØK¢ž—F8XP™™
‹—"Please provide the Facility Code: ±9ž— 8X™™-‹—###ØH¢YÞÿ™Ð؉™Ð؉— Ø ‰™™
‹—3Do you want to select the range of admission dates.±™™>‹— (dtrg$'YN')—!Ø K¢ž —Y8X™ ™
‹—" Include admissions after: ±™
™
‹—"Include admissions no later than: ±™ ™0‹— (IsDateOK())— @K ##/##/##ØK™
™0‹— (IsDateOK())— @K ##/##/##ØK¢9žžiXS™ ™0‹— (IsDateOK())— @K ##/##/##ØK™
™0‹— (IsDateOK())— @K ##/##/##ØKY ÿ—YØ ‰—NØ ‰— Ø
‰™2Ð؉™Name of report: ±™™‹ØH¢— ؉™>Is the report caption correct - note it should not be centered±J—(again$('YN'))—!ØK¢ž—N8X™™‹ØH¢™=Ð؉žÜ؉™=žco™+؉ž€žמ†Ø‰ØìØìØì™™ ‹—Send report to printer:±™™'‹—(printer$('YN'))—!Ø K¢ž —Y8Xð9ÉØFyXâï™™™G6 ™™‹—$The Printer is not on-line and ready±™™‹—*Press ESCape to abort or ready the printer±Ç
€Ø‰Y9€ØØљOYiZ+™,€ÉØF‡™ó™ÉØF‡™¼™ÉØF‡YÀÿÆ
™ˆR؉ž™8žï8XÇ7YçYÿ™ ™‹—Send report to file: ±™ ™'‹—
(disk$('YN'))—!Ø K¢ž —Y8Xҙ
™‹—= Name of file: (.TXT will be added)±™
™#‹—AAAAAAAAØ
H¢9ž
— 8X™
™#‹—AAAAAAAAØ
H¢YÙÿ— ؉™ ™‹—Select drive to put file on ±J— (dr$('ACD'))—!ØK¢Æž—F8X_ž —Y8XC—=ctod(endat))ÀY—
RHCOD=enrcÀY9ž —Y8X.—*ADDAT<=CTOD(stdat) .AND.addat>=ctod(endat)ÀNž —Y8ž
— uXc—.ž

؉žï8ž™OX™ ؉ž
áØ
‰ž
€ž€o×Ø
‰—&dr.:çž
†—.TXT†Ø
‰— &FILENAMEç¹Çž —Y8X¡™ ™
™™G6 ™ ™‹— Preparing the printer ±™™‹—0Once printing starts - you can stop at any time ±™™‹—by hitting any key. ±ÇK™
ÅÆž —N8ž —Y8X–™ ™
™™G6 ™ ™‹— Writing the file ±™™‹—/Once writing starts - you can stop at any time ±™™‹—by hitting any key. ±Æï؉ï؉ž —Y8ž —Y8XÝ؉Y>؉—P؉9žXHï؉ž€†Ø‰— ŒžŒ— Œ—
Report of /†—. †—_ Page: †ž™ԆŒ— Discharge: †ž&™Ԇ— Followup: †ž'™ԆŒ— Œž€†Ø‰ž™†Ø‰Q؉žïOXŗ Ø(‰ž —Y8XÆž —Y8XÆK6Ç™ ™™ ™I6 ™
™
‹—%Do you want to
bandon or esume ±™
™2‹—(action$('AR'))—!Ø(K¢ž(—A8X Y*Ç7Y"ž —Y8XÇž —Y8XÇK6Æ€ÌY >؉™<؉ž™2G7yXž —Y8X2ÉØ),YþýY±ü— Œ—=-------------------------------------------------------------Œ— Œ—3 THE TOTAL NUMBER OF PATIENTS WAS ž™ïՆŒ— ŒÆž —Y8X2ƹÆKÆÀïÅYÉØ*,ÆÇÇ7Y4­dÆYÆ#Æ#Æ
Æ™—™—™—™—™—™—™—™ —™
—ÂVX€— rg+/n,w+/b,n؉—
b/n,w+/n,n؉— bg+/n,w+/b,n؉— w/n,n/w,n؉— r*/n,w+/n,n؉—
r/n,w+/n,n؉— n/rg,n/rg+,n؉Yq— w/n,n/w,n؉— w/n,n/w,n؉— w/n,n/w,n؉— w/n,n/w,n؉—
w*/n,n/w,n؉— w/n,n/w,n؉— n/w,n/w,n؉—Ø ‰—Ø
‰—Ø ‰—Ø ‰—Ø
‰—؉—؉—؉>؉ï؉—؉>؉™ ؉€™r؉™™r؉™™r؉™™r؉ÉØ,€¸—COMØ"¦!™¸—DIALØ"¦!–¸NžØ‰ž ؉ž"Ø!‰ž$Ø#‰ž&Ø%‰ž(Ø'‰ž*Ø)‰ž,Ø+‰ž.Ø-‰ž0Ø/‰ž2Ø1‰ž4Ø3‰— Ø5‰ž7Ø6‰ž9Ø8‰ž;ÜØ:‰ïØ<‰€Ø=‰—0Ø>‰—1Ø?‰™Ø@‰™ØA‰™ØB‰€ØC‰™ØD‰—NØE‰—ØF‰€ØG‰>ØH‰— ØI‰— ØJ‰ÉØK,ïØL‰ïØM‰€ØN‰ïØO‰—&yellowçº9ÝX‘ÉØ,žNžO‹—±YYWžG€8X žžCžDžBžAž@ÉØPF؉Y/žG™8Xžž@ÉØQF؉YžG™8XÉØR,ÉØSFØN‰ÉØTFØO‰ïØU‰ÉØWF™†ØV‰ÉØX,9žUï8žVÉØWFOX2QØU‰žU™8X ÝØH‰ïØU‰ÉØY,ÉØWF™
†ØV‰Y¹ÿžHX ÉØZ,>ØH‰—[YYƒžUá—D8X
ÉØ,YlžUá—P8X
ÉØ[,YUžU™8X{ÉØ\,ž—NuXfÉØ],žAXœ—SœÉØ^,YD—&blink纙Pб™File does not exist...±žÉØ_F؉YОU™8X½ÉØ\,ž—NuX¨ÉØ],žAX‰—NØE‰—&red纙Pб™File exist, Overwrite (Y/N) =>±JØEH¢™Pб™PбžEáØE‰žE—Y8Xœ—RœÉØ^,Yœ—RœÉØ^,Y žUá—R8X
œJÉØ`,YïžUá—H8X
ÉØa,YØžUá—Y8X
ÉØb,YÁžUá—T8X
ÉØc,YªžUá—C8X"—&yellow纀ØN‰ïØO‰ÉØX,Y{žUá—M8Xҙ ï™ ™OœÝÉØd,—&blue纙ߙPª±—&cyan纞:cØe‰ž:™<žeoІØ:‰™
€‹—Modem Set String:±JØ:H¢—&blink纙Pб™
Processing...±–¸ž:Ø;ˆžž:™
†ÉØfF؉žÉØ_F؉YœžUá—B8Xë™ ™ ™ ™-œÝÉØd,—&blue纙ߙPª±—&cyan纙
™ ‹—Enter Transit Buffer Size:±JØ8H™ ™ ‹—Enter Receive Buffer Size:±JØ6H¢—&blink纙Pб™
Processing...±–¸ž8Ø7ˆž6Ø9ˆžÉØgF؉ÉØK,Y¤žUá—S8X
ÉØh,YžUá—W8X
ÉØi,YvžUá—X8Xi—NØj‰™™™™œÝÉØd,—&yellow纙™‹—RETURN TO FIM? (Y/N)±JØjH¢žjáØj‰žj—Y8XY
ÉØZ,YjúžÉØgF؉—&whiteçºY4¼d—&cyan纙Pб™ AUTO ANSWER±žX2žž>ÉØkF؉>؉™AUTO ANSWER OFF±Y.žž?ÉØkF؉Ý؉™AUTO ANSWER ON±žÉØ_F؉—&yellow纙PбY4šdØqƒØpƒØoƒØnƒØmƒØlƒ—&co纞lžmžnžo6 žqX[žožm€†oØr‰žl€†Øs‰žnžl€†ožs€o†Øt‰žm€†Øu‰9žsžtbXžsžu‹žrбžs€†Øs‰YÜÿ>Øq‰Y48d™™7‹— ÛÛ ÛÛ ±™™7‹— ÛÛ ÛÛ ±™™7‹— ÛÛ ÛÛ ±™™7‹— ÛÛ ÛÛ ±™™7‹— ÜÜÜÜÛÛÜÜÜÜÛÛÜÜÜܱ™€‹—2 F I M T A L K ±™€‹—* Version 2.00±™€‹—1 Async. Communications ±™ €‹—) IMPORTANT±™ €‹—G This communications module is not intended as a substitute for a ±™ €‹—G full feature communications program. For a full featured program ±™
€‹—H we suggest you try Datastrom's Procomm Plus. The Test Drive version ±™€‹—I of Procomm Plus can be downloaded from the B&L bullein board. ç±™€‹—G The purpose of this module is to enable you to receive and transmit±™€‹—G FIM data to and from the Study Group and to contact B&L computer ç±™€‹—C Associates should you require software support. It requires you±™€‹—A have a Hayes compatible modem using Comm port 1 or 2. ±™ÉØv,—&cyan纗&blink纍™Œ™™ ‹— INITIALIZING±Y4®dï؉ž™8Xžž-ž/ÉØwF؉ž™8Xžž1ž3ÉØwF؉žïuXI—Error on swsetdev()— †ž™ïՆŒ—Press any key to continue...Œä‡žž8ž6ÉØxF؉žïuXL—Error on opencomm()— †ž™ïՆŒ—Press any key to continue...Œä‡Y­žžž!ž#ž%ÉØyF؉žž=ÉØzF؉žž:™
†ÉØfF؉žÉØ_F؉ž'Xžž=ÉØ{F؉Yžž<ÉØ{F؉ž+Xž=ÉØ|F؉Yž<ÉØ|F؉ž)ÉØ}F؉Y4jd€vØ~‰™R؉9ÝXQQØU‰žU™8XY?YžUïuXžžUÉ؀F؉žÉ؁FyXžžž~É؂FŒYªÿY4- d9ÝX! €™™™NœÝÉØd,™ߙPª±™™™™MœÝÉØd,—&yellow纙™‹—"D I A L I N G D I R E C T O R Y±™™‹—Name™І—Number†™І—Baud P S W†±–¸€L€Øƒ‰9žƒ™ bX°žƒ™ïÕ؄‰žƒ™†™‹ž„±žƒ™†™ ‹—- ±žƒ™†™ ‹ž…±žƒ™†™$‹ž†±žƒ™†™4‹ž‡—@#####±žƒ™†™?‹žˆ—@#±žƒ™†™D‹ž‰—@#±žƒ™†™I‹žŠ—@#±žƒ€†Øƒ‰€ÌYEÿ—&cyan纗 Øj‰™™ ‹—8R Revise M Manual Dialing D Delete Entry X eXxit±™Pб™Enter Choice =>±JØjH¢—&yellow纞jáØj‰YYžj—X8XYýY÷žj—R8X—&cyan纗 Øj‰™Pб™Enter Number To Revise =>±JØjH¢žjã€Gžj㙠bXžjãLž…Ø5‰™Pб™
Enter Name =>±JØ5H¢ž†ØI‰™Pб™Enter Number =>±JØIH¢—3Øj‰ž‡Ø‹‰™Pб™K1. 300 2. 1200 3. 2400 4. 4800 5. 9600 6. 19200 7. 38400 8. 56000 =>±JØjH¢žjáØj‰YYµžj—18X
™,؋‰Y žj—28X
™°؋‰Y‹žj—38X
™` ؋‰Yvžj—48X
™À؋‰Yažj—58X
™€%؋‰YLžj—68X
™K؋‰Y7žj—78X›
Àâ@؋‰Yžj—88X›
Xë@؋‰—1Øj‰žˆØŒ‰™Pб™9Parity = 1. NONE 2. ODD 3. EVEN 4. STICK 5. MSTICK =>±JØjH¢žjáØj‰YYbžj—18Xï،‰YOžj—28X€ØŒ‰Y<žj—38X
™،‰Y'žj—48X
™،‰Yžj—58X™،‰—1Øj‰ž‰Ø‰™Pб™Stop Bits = (1 or 2) =>±JØjH¢žjáØj‰YY%žj—18X€Ø‰Yžj—28X™؍‰žŠØŽ‰™Pб—8Øj‰™Word Length = (5,6,7 or 8) =>±JØjH¢žjáØj‰YYQžj—58X
™؎‰Y<žj—68X
™؎‰Y'žj—78X
™؎‰Yžj—88X™؎‰ž5؅ˆžI؆ˆž‹Ø‡ˆžŒØˆˆžØ‰ˆžŽØŠˆYÍžj—M8XϙÐØI‰—&cyan纙Pб™Enter Phone Number =>±JØIH¢žI€ÐuXtžIÜØI‰žIØJ‰ÉØ,€ï‹— Dialing žI†±ÉØSFØN‰ÉØTFØO‰žžIÉ؏F؉žÉØ_F؉žÉؐF؉Y™PбYóžj—D8X'—&cyan纗 Øj‰™Pб™Enter Number To Delete =>±JØjH¢žjã€Gžj㙠bXʙPб—NØE‰—&blink纙Are You Sure (Y/N) =>±JØEH¢žEá—Y8Xy™Pб—&blink纙Entry žj†— Deleted†±žjãL— ™ªØ…ˆ— ™ªØ†ˆ™°؇ˆï؈ˆ€Ø‰ˆ™؊ˆžÉØ_F؉YÁžjã€Gžj㙠bX¯žjãLž‡Ø‰žˆØ!‰ž‰Ø#‰žŠØ%‰žžž!ž#ž%ÉØyF؉ž†ÜØI‰žIØJ‰ÉØ,€ï‹— Dialing ž…†±ÉØSFØN‰ÉØTFØO‰žžIÉ؏F؉žÉØ_F؉žÉؐF؉YYÚöY4âdؑƒïØU‰QØU‰>ؒ‰™™™ ™EœÝÉØd,—&cyan纙™‹—Number(s) to dial:±—&yellow纙
™‹—(CR For Previous Numbers)±™(Ðؓ‰™™‹ؓH¢ž“— uXž“Ø‘‰ž‘— 8Xa—?ؔ‰—&cyan纙 ™‹—No previous numbers±žÉØ_F؉™ ™‹— ±YÄ™™™™KœÝÉØd,™ߙPª±—&yellow纙™‹—$ DIALING:±™™‹—$ PASS NUMBER:±™™‹—$ ELAPSED TIME THIS TRY:±™ ™‹—$ TIME AT START OF DIAL:±™
™‹—$ TIME AT START OF THIS CALL:±™ ™‹—$ DELAY TIME:±™ ™‹—$ PAUSE TIME:±™
™‹—$ LINKED COMMAND FILE:±™™‹—$ LAST CALL RESULT:±—&blue纙™‹™µ— †™Æ†±—&yellow纙™‹— Press ESC to Abort ±ïؕ‰™ؖ‰™ؗ‰—&cyan纙 ™*‹Ù±9ž’yXPQØU‰ž™
ÉØfF؉ž—™rÉØ_F؉ž•€†Ø•‰™™*‹™Ð±™™*‹ž‘ܱ™™*‹ž•™ïÕ±™
™*‹Ù±™ ™*‹ž–™ïÕ±™ ™*‹ž—™ïÕ±—&cyan纙™‹—D SPACE: Recycle DEL: Remove from list END: Change delay time±žž‘É؏F؉ÉØWFؘ‰ÉØWFؙ‰>ؒ‰ïؚ‰9ž™ž˜ž–†iž™ïužU™už’yXaQØU‰žU™ 8Xo™™*‹— (PAUSING)™І±™™*‹—RECYCLE±™™‹—. SPACE: Proceed to next call™І±YãžU™8X’ž–Ø›‰—&cyan纙Pб™ Enter New Delay Time In Seconds:±J—999؛H¢ž›™Ož›™diXž›Ø–‰—&cyan纙 ™*‹ž–™ïÕ±™PбžÉ؜Fؒ‰ž™Ø‰ÉØWFؙ‰ž™žOXžš€†Øš‰™™*‹žš™ïÕ±Y}þžU™8žU™8XH—&blink纙™*‹—REDIAL ABORTED±ž™
ÉØfF؉žÉØ_F؉Y_ž’X6—&blink纙™*‹—CONNECTED ±žÉØ_F؉Y ž™
ÉØfF؉žÉØ_F؉Y¨üY4Äd؟ƒ— Ø ‰YY¨žŸï8X—SUCCESSFUL Ø ‰Y„žŸ™cv8X—INVALIDPORT Ø ‰Y]žŸ™bv8X—PORTINUSE Ø ‰Y6žŸ™av8X—BUFFERTOOLARGE Ø ‰YžŸ™`v8X—INSUFFICIENTMEMORYØ ‰Y螟™_v8X—DEVICEABSENT Ø ‰YÁžŸ™^v8X—NOTINITIALIZED Ø ‰YšžŸ™]v8X—INVALIDPARAMETER Ø ‰YsžŸ™\v8X—BUFFERISFULL Ø ‰YLžŸ™[v8X—BUFFERISEMPTY Ø ‰Y%žŸ™Zv8X—PARAMETERCOUNT Ø ‰YþžŸ™Yv8X—TIMEOUT Ø ‰YמŸ™Xv8X—USERABORT Ø ‰Y°žŸ™Wv8X—DOSDISKERROR Ø ‰Y‰žŸ™Vv8X—NOCARRIER Ø ‰YbžŸ™Uv8X—LOSTCARRIER Ø ‰Y;žŸ™Tv8X—NOINITIALNAK Ø ‰YžŸ™Sv8X—NOREMOTERESPONSE Ø ‰Y힟™Rv8X—REMOTEUSERABORT Ø ‰YÆžŸ™Qv8X—NOMORERETRIES Ø ‰YŸžŸ™Pv8X—BLOCKFRAMEERROR Ø ‰YxžŸ™Ov8X—SHORTBLOCK Ø ‰YQžŸ™Nv8X—BLOCKSEQUENCEERRORØ ‰Y*žŸ™Mv8X—CHECKSUMERROR Ø ‰YžŸ™Mv8X—CHECKSUMERROR Ø ‰YܞŸ™Lv8X—TERMINATORREACHED Ø ‰YµžŸ™Kv8X—MAXLENGTHREACHED Ø ‰YŽžŸ™Jv8X—WANTSCONTINUOUSFEEØ ‰YgžŸ™Iv8X—CRCERROR Ø ‰Y@žŸ™Hv8X—IRQINUSE Ø ‰Y—UNKNOWNRESOLVE Ø ‰Y4ÐdØ¢ƒØ¡ƒØ ƒ—&yellowçºYYž —X8X™€Ø£‰—XMODEMØ ‰Y힠—Y8X™Ø£‰—YMODEMØ ‰Y˞ —A8XÀ—&yellowçºïØN‰ïØO‰ž¡—S8XK€Ø¤‰žNžO‹—±žž¢ž¤ž@ÉØ¥F؉ÉØSFØN‰ÉØTFØO‰ÉØX,YñYR€Ø¤‰™
ئ‰žNžO‹—±žž¢ž¤ž@ž¦ÉاF؉ÉØSFØN‰ÉØTFØO‰ÉØX,YœÉب,—&blink纙™<‹ž ±œ¢ÉØ©,—&yellow纙™<‹ž±ž¡—S8Xhž¢ž£ÉØ«Fت‰žªž£rج‰ž¢žž£ÉØ®FØ­‰™™<‹ž¬™ïÕ±™™<‹žª™ïÕ±œ­Éد,™™<‹ž
±ž —X8X3ž¡—S8Xžž¢ÉØ°F؉Yžž¢ÉرF؉Y0ž¡—S8Xžž¢ÉزF؉Yžž¢ÉسF؉œÉ؞,™™<‹ž ±ž¡—R8žï8X>ž¢ž£ÉØ«Fت‰žªž£rج‰™™<‹ž¬™ïÕ±™™<‹žª™ïÕ±™ŒžÉØ_F؉Y4sd—&blue纙ߙPª±™<Ð؉—&cyan纙Pб™Enter Filename =>±JØH¢žÜ؉™PбY4Þd—&blue纙ߙPª±—&cyan纗1Øj‰™Pб™$1. XMODEM 2. YMODEM 3. ASCII =>±JØjH¢—&yellowçºYYJžj—18X —X؉Y4žj—28X —Y؉Yžj—38X —A؉Y—N؉Øjì™PбY4Ôd—&cyan纙Pб™
DISCONNECTING±žÉØ´F؉žÉØ_F؉žž>ÉصF؉žÉØ_F؉žÉ؜FXNžž<ÉضF؉ÉØWF™†Ø·‰9žÉ؜Fž·ÉØWFOXYãÿžž=ÉضF؉™PбY4#dYYFžG€8X— TTY ظ‰Y/žG™8X— ANSIظ‰YžG™8X — CUSTظ‰—Term =ž¸†Ø¸‰—" ESC-F1 for Main Menu —PORT = †ž€†€ïՆ— | †ž™ïՆ— | †ž!€ïՆ— | †ž#€ïՆ— | †ž%€ïՆ— | †ž¸†Ø¹‰ž¹cغ‰ž¹™PžºoІع‰—&highbar纞LžM‹ž¹±—&yellowçºY4KdØ»ƒÉØWFž»†Ø˜‰ïØU‰9ÝX$QØU‰žUïuXYž˜ÉØWFiXYY×ÿY4+dؼƒž¼X
—.T.ØF‰Y
—.F.ØF‰Y4¢d€ï™™%œÝÉØd,—&yellow纙™‹— Main Menu±™™‹—Esc F1 (Main Menu)±™™‹—Esc D (Dialing Directory)±™™‹—Esc P (System Parameters)±™™‹—Esc PgUp (Upload File)±™™‹—Esc PgDn (Download File)±™™‹— Esc R (Redial Last Number)±™ ™‹—Esc T (Terminal Mode)±™
™‹—Esc H (Hang-Up Phone)±™ ™‹— Esc Y (Toggle Auto Answer)±™ ™‹—Esc C (Clear Screen)±™
™‹— Esc M (Modem Setup String)±™™‹—!Esc B (Setup TX/RX Buffers)±™™‹—"Esc S (System Configuration)±™™‹—Esc W (System Watchdog)±™™‹—Esc X (eXit Program)±Y4_dÉØ¿FUؾ‰ÉØÁFUØÀ‰žÀ™
iXž¾€ï՗.†—0†žÀ€ïÕ†Ø ‰Yž¾€ï՗.†žÀ™ïÕ†Ø ‰Y4$d™ï™™%œÝÉØd,—&yellow纙™‹— Port ž€†™ïՆ±™™‹— Baud ž™ïՆ±™™‹— Parity ž!™ïՆ±™™‹— Stop ž#™ïՆ±™ ™‹— Word ž%™ïՆ±™
™‹— Transit Buffer ž8™ïՆ±™ ™‹— Receive Buffer ž6™ïՆ±ž'X
—YES؉Y
— NO؉™ ™‹— XON/XOFF ž†±™
™‹— X/Y MODEM Retries ž)™ïՆ±ž+X
—YES؉Y
— NO؉™™‹— X/Y MODEM CD Check ž†±™™‹—Base I/O Address Port 3 ž-™ïՆ±™™‹— IRQ Port 3 ž/™ïՆ±™™‹—Base I/O Address Port 4 ž1™ïՆ±™™‹— IRQ Port 4 ž3™ïՆ±™<ÉØv,Y4Ãdž؉9ÝX°€ï™
™œÝÉØd,—&blue纙ߙPª±—&yellow纙Pб™™‹— System Menu±™™‹— 1. COM Port±™™‹— 2. Baud Rate±™™‹— 3. Parity±™™‹— 4. Stop Bits±™™‹—5. Word Length±™™‹—6. XON/XOFF Flow Control±™ ™‹—7. X/Y MODEM Error Retries±™
™‹—8. X/Y MODEM CARRIER Detect±™ ™‹—9. Save Changes (EXIT)±—&cyan纗 Øj‰™Enter Choice =>±JØjH¢žjáØj‰YYžj—18X…—1Øj‰™Pб™$1. COM1 2. COM2 3. COM3 4. COM4 =>±JØjH¢YY3žj—18Xï؉Y žj—28X€Ø‰Y
žj—38X}™Ø‰™Pб™Enter COM3 Base I/O Address =>±J—99999Ø-H¢™Pб™Enter COM3 IRQ =>±J—9Ø/H¢Y…žj—48Xz™Ø‰™Pб™Enter COM4 Base I/O Address =>±J—99999Ø1H¢™Pб™Enter COM4 IRQ =>±J—9Ø3H¢Yxžj—28X6—3Øj‰™Pб™K1. 300 2. 1200 3. 2400 4. 4800 5. 9600 6. 19200 7. 38400 8. 56000 =>±JØjH¢žjáØj‰YYµžj—18X
™,؉Y žj—28X
™°Ø‰Y‹žj—38X
™` ؉Yvžj—48X
™À؉Yažj—58X
™€%؉YLžj—68X
™K؉Y7žj—78X›
Àâ@؉Yžj—88X›
Xë@؉Y7žj—38Xї1Øj‰™Pб™9Parity = 1. NONE 2. ODD 3. EVEN 4. STICK 5. MSTICK =>±JØjH¢žjáØj‰YYbžj—18XïØ!‰YOžj—28X€Ø!‰Y<žj—38X
™Ø!‰Y'žj—48X
™Ø!‰Yžj—58X™Ø!‰Y[žj—48Xs—1Øj‰™Pб™Stop Bits = (1 or 2) =>±JØjH¢žjáØj‰YY%žj—18X€Ø#‰Yžj—28X™Ø#‰YÝžj—58X¥—8Øj‰™Pб™Word Length = (5,6,7 or 8) =>±JØjH¢žjáØj‰YYQžj—58X
™Ø%‰Y<žj—68X
™Ø%‰Y'žj—78X
™Ø%‰Yžj—88X™Ø%‰Y-žj—68Xg™Pб—NØE‰™&XON/XOFF Flow Control Enabled (Y/N) =>±JØEH¢žEá—Y8XÝØ'‰Y>Ø'‰Y»žj—78X9™Pб™X/Y MODEM Retries =>±J—999Ø)H¢Ywžj—88Xj™Pб—NØE‰™)X/Y Modem CARRIER Detect Enabled (Y/N) =>±JØEH¢žEá—Y8XÝØ+‰Y>Ø+‰Yžj—98X÷™Pб—NØE‰—&blink纙Save Changes To Disk (Y/N) =>±JØEH¢žEá—Y8XY–¸™Pб™Saving Entry...±žØ ˆž!Ø"ˆž#Ø$ˆž%Ø&ˆž'Ø(ˆž)Ø*ˆž+Ø,ˆ™Pб—&blink纙
Processing...±žÂÉØgF؉ÉØK,YYK÷Y4Èd—&blue纙ߙPª±—&cyan纗1Øj‰™Pб™1. TTY 2. ANSI 3. CUSTOM =>±JØjH¢—&yellowçºYY:žj—18X€ØG‰Y'žj—28X
™ØG‰Yžj—38X™ØG‰™PбØjìY4ídØÞÙ+UØĉžÄïOXžÃžÄ™roØɞÙ<+UØʼnžÅïOXžÃžÅ™<roØɞÃUؘ‰žÄ™ bX—0žÄ€ïՆØƉY žÄ™ïÕØƉžÅ™ bX—0žÅ€ïՆØljY žÅ™ïÕØljž˜™ bX—0ž˜€ïՆØȉY ž˜™ïÕØȉžÆ—:†žÇ†—.†žÈ†Ø
‰Y4ød™™(™™OœÝÉØd,—&yellow纙™,‹— PROTOCOL: ±™™,‹— FILE NAME: ±™™,‹— FILE SIZE: ±™™,‹—BLOCKS IN FILE: ±™™,‹— TRANSFER TIME: ±™™,‹— LAST ERROR: ±™
™,‹—Press Ctrl-X To Abort...±Y4‹dØɃžÉÜØɉžÉcØʉ>Øˉï؃‰9žËyXTžÊï8XÝØˉYAžÉžÊ€×ؒ‰ž’—\8XÝØˉžÉžÊ€†žƒ×ØɉYžƒ€†Øƒ‰žÊ€oØʉY¤ÿžÉ؉Y4d™
Ø̉€™™™œÝÉØd,—&blue纙ߙPª±—&cyan纙žÌ‹—
CHECKLSTAT() ±™žÌ‹—
CHECKMSTAT() ±™žÌ‹—
CHECKRING() ±™žÌ‹—
GETRINGCNT() ±™žÌ‹—
STATUSBI() ±™žÌ‹—
STATUSCD() ±™žÌ‹—
STATUSCTS() ±™ žÌ‹—
STATUSDSR() ±™
žÌ‹—
STATUSFE() ±™ žÌ‹—
STATUSOR() ±™ žÌ‹—
STATUSPE() ±™
žÌ‹—
STATUSRI() ±™žÌ‹—
SWFLOWSTAT() ±™žÌ‹—
RXFULL() ±™žÌ‹—
RXOVFLOW() ±™žÌ‹—
RXSTAT() ±™žÌ‹—
TXFREE() ±™žÌ‹—
RXFREE() ±™žÌ‹—
TXFULL() ±ïØU‰€Ø͉™Pб™%Enter Delay Time Between Loop Pass =>±J—99ØÍH¢™Pб—&blink纙"Press Any Key To Exit Watch Dog...±9ÝXf—&white纞ÉØÏFØΉœÎÉØF,™žÌ™†‹žF±žÎX¹—&red纙žÌ™†‹žF±žÉØÐF؉œÉØF,™žÌ™†‹žF±žÉØÑF؉œÉØF,™
žÌ™†‹žF±žÉØÒF؉œÉØF,™ žÌ™†‹žF±žÉØÓF؉œÉØF,™ žÌ™†‹žF±—&white纞ÉØÕFØԉœÔÉØF,™žÌ™†‹žF±žÔX°—&yellow纙žÌ™†‹žF±žÉØÖF؉œÉØF,™žÌ™†‹žF±™žÌ™†‹žÉØ×F™ïÕ±žÉØØF؉œÉØF,™žÌ™†‹žF±žÉØÙF؉œÉØF,™ žÌ™†‹žF±—&yellow纞ÉØØF؉œÉØF,™žÌ™†‹žF±žÉØÚF؉œÉØF,™
žÌ™†‹žF±—&white纙žÌ™†‹žÉØÛF™ïÕ±žÉØÜF؉œÉØF,™žÌ™†‹žF±žÉØÝF؉œÉØF,™žÌ™†‹žF±™žÌ™†‹žÉØÞF™ïÕ±™žÌ™†™o‹žÉØßF™ïÕ±™žÌ™†™o‹žÉØàF™ïÕ±žÉØáF؉œÉØF,™žÌ™†‹žF±QØU‰žUïuXY$ÉØWFžÍ†Ø˜‰9ž˜ÉØWFOXYîÿY•üY4 dµØ
‰Y4 dž
´Y4Ðd—fim؉—patient؉€¸—&file1ç>™ÉØFXz—LNAME}—PATNUMB}¦#N™~¦$™¸—&file2ç>™ÉØFXJz—PNUMB}—PDIAG}¦#Nšæ—pnumbËØ™€'Ø™€'—&file1-> LNAMEçØ€‰—&file1-> FNAMEçØ™‰—
&file1-> CODEçØ™‰—
&file1-> CITYçØ™‰—&file1-> STATEçØ™‰— &file2-> ZIPçØ™‰—&file2-> RHCODçØ™‰—&file2-> PNUMBçØ™‰—&file2-> ADDATçØ™ ‰—&file2-> DIDATçØ™
‰—&file2-> PGINTçØ™ ‰—&file2-> INDT1çØ™ ‰—&file2-> INTR1çØ™
‰—&file2-> INDT2çØ™‰—&file2-> INTR2çØ™‰—&file2-> INDT3çØ™‰—&file2-> INTR3çØ™‰—&file2-> ADCLAçØ™‰— &file2-> SEXçØ™‰— &file2-> DOBçØ™‰—
&file2-> PATRçØ™‰—
&file2-> LANGçØ™‰—&file2-> MSTATçØ™‰—
&file2-> SET1çØ™‰—
&file2-> SET2çØ™‰—
&file2-> SET3çØ™‰—
&file2-> SET4çØ™‰—
&file2-> LIV1çØ™‰—
&file2-> LIV2çØ™‰—
&file2-> LIV3çØ™‰—&file2-> VOCC1çØ™‰—&file2-> VOCC2çØ™ ‰—&file2-> VOCE1çØ™!‰—&file2-> VOCE2çØ™"‰—&file2-> FODATçØ™#‰—&file2-> INFSOçØ™$‰—&file2-> METHOçØ™%‰—
&file2-> HMPRçØ™&‰—
&file2-> HMSEçØ™'‰—&file2-> THERAçØ™(‰—
&file2-> IGRPçØ™)‰—&file2-> ONSETçØ™*‰—&file2-> PDIAGçØ™+‰—&file2-> DIAG1çØ™,‰—&file2-> DIAG2çØ™-‰—&file2-> DIAG3çØ™.‰—&file2-> DIAG4çØ™/‰—&file2-> DIAG5çØ™0‰—&file2-> DIAG6çØ™1‰—&file2-> DIAG7çØ™2‰—
&file2-> DFU1çØ™3‰—
&file2-> DFU2çØ™4‰—
&file2-> DFU3çØ™5‰—
&file2-> DFU4çØ™6‰—
&file2-> DFU5çØ™7‰—
&file2-> DFU6çØ™8‰—
&file2-> DFU7çØ™9‰—
&file2-> PAY1çØ™:‰—
&file2-> PAY2çØ™;‰—&file2-> HPRICEçØ™<‰—&file2-> INCPHçØ™=‰—&file2-> FEEDAçØ™>‰—&file2-> GROOMAçØ™?‰—&file2-> BATHAçØ™@‰—&file2-> DUPPAçØ™A‰—&file2-> DLOBAçØ™B‰—&file2-> TOILAçØ™C‰—&file2-> BLADAçØ™D‰—&file2-> BOWLAçØ™E‰—&file2-> BCWCAçØ™F‰—&file2-> MTOIAçØ™G‰—
&file2-> TUBAçØ™H‰—&file2-> LWCA1çØ™I‰—
&file2-> LWCAçØ™J‰—&file2-> STAIRAçØ™K‰—&file2-> CCOM1AçØ™L‰—&file2-> CCOMAçØ™M‰—&file2-> EXPV1AçØ™N‰—&file2-> EXPVAçØ™O‰—&file2-> SOCIAçØ™P‰—&file2-> PSOLVAçØ™Q‰—
&file2-> MEMAçØ™R‰—
&file2-> TOT1çØ™S‰—&file2-> FEEDDçØ™T‰—&file2-> GROOMDçØ™U‰—&file2-> BATHDçØ™V‰—&file2-> DUPPDçØ™W‰—&file2-> DLOBDçØ™X‰—&file2-> TOILDçØ™Y‰—&file2-> BLADDçØ™Z‰—&file2-> BOWLDçØ™[‰—&file2-> BCWCDçØ™\‰—&file2-> MTOIDçØ™]‰—
&file2-> TUBDçØ™^‰—&file2-> LWCD1çØ™_‰—
&file2-> LWCDçØ™`‰—&file2-> STAIRDçØ™a‰—&file2-> CCOM1DçØ™b‰—&file2-> CCOMDçØ™c‰—&file2-> EXPV1DçØ™d‰—&file2-> EXPVDçØ™e‰—&file2-> SOCIDçØ™f‰—&file2-> PSOLVDçØ™g‰—
&file2-> MEMDçØ™h‰—
&file2-> TOT2çØ™i‰—&file2-> FEEDFçØ™j‰—&file2-> GROOMFçØ™k‰—&file2-> BATHFçØ™l‰—&file2-> DUPPFçØ™m‰—&file2-> DLOBFçØ™n‰—&file2-> TOILFçØ™o‰—&file2-> BLADFçØ™p‰—&file2-> BOWLFçØ™q‰—&file2-> BCWCFçØ™r‰—&file2-> MTOIFçØ™s‰—
&file2-> TUBFçØ™t‰—&file2-> LWCF1çØ™u‰—
&file2-> LWCFçØ™v‰—&file2-> STAIRFçØ™w‰—&file2-> CCOM1FçØ™x‰—&file2-> CCOMFçØ™y‰—&file2-> EXPV1FçØ™z‰—&file2-> EXPVFçØ™{‰—&file2-> SOCIFçØ™|‰—&file2-> PSOLVFçØ™}‰—
&file2-> MEMFçØ™~‰—
&file2-> TOT3çØ™‰—&file2-> TRANSMITçØ™€‰— Last NameØ€‰—
First NameØ™‰—CodeØ™‰—CityØ™‰—StateØ™‰—Zip CodeØ™‰—
Facility CodeØ™‰—Patient NumberØ™‰—Admission DateØ™ ‰—Discharge DateØ™
‰—Program Interrupted (Y/N)Ø™ ‰—First Transfer DateØ™ ‰—First Return DateØ™
‰—Second Transfer DateØ™‰—Second Return dateØ™‰—Third Transfer DateØ™‰—Third Return DateØ™‰—Amdmission ClassØ™‰—SexØ™‰—
Date of BirthØ™‰—RaceØ™‰—LanguageØ™‰—Marital StatusØ™‰—Liv Setting - Pre-HospØ™‰—Liv Setting-Admit FromØ™‰—Liv Setting-DischargeØ™‰—Liv Setting-FollowupØ™‰—Liv With - Pre HospØ™‰—Liv With - DischargeØ™‰—Liv With - FollowupØ™‰—Voc Status - AdmisØ™‰—Voc Status - FollowupØ™ ‰—Voc Effort - AdmisØ™!‰—Voc Effort - FollowupØ™"‰—
Followup DateØ™#‰—Followup Info SourceØ™$‰—Followup MethodØ™%‰—Primary Health MaintØ™&‰—Secondary Health MaintØ™'‰—TherapyØ™(‰—Impairment GroupØ™)‰—
Date of OnsetØ™*‰—Principal DiagnosisØ™+‰—Discharge DIag 1Ø™,‰—Discharge Diag 2Ø™-‰—Discharge Diag 3Ø™.‰—Discharge Diag 4Ø™/‰—Discharge Diag 5Ø™0‰—Discharge Diag 6Ø™1‰—Discharge Diag 7Ø™2‰—Followup Diag 1Ø™3‰—Followup Diag 2Ø™4‰—Followup Diag 3Ø™5‰—Followup Diag 4Ø™6‰—Followup Diag 5Ø™7‰—Followup Diag 6Ø™8‰—Followup Diag 7Ø™9‰—Primary Payment SourceØ™:‰—Secondary Pay SourceØ™;‰—Payments to HospitalØ™<‰—Payments Include MDØ™=‰—Feeding - AdmitØ™>‰—Grooming - AdmitØ™?‰—Bathing - AdmitØ™@‰—Dressing Up Body - AdmitØ™A‰—Dress - Lower Body-AdmitØ™B‰—Toileting - AdmitØ™C‰—Bladder - AdmitØ™D‰—Bowel Mgmt - AdmitØ™E‰—Mobility - Bed - AdmitØ™F‰—Toilet - AdmitØ™G‰—Tub, Shower - AdmitØ™H‰—Locomotion - W/W/B - AdmØ™I‰—Locomotion - AdmitØ™J‰—Stairs - AdmitØ™K‰—Comprehension-A/V/B-AdmØ™L‰—Comprehension - AdmitØ™M‰—Expression -V/N/B-AdmØ™N‰—Expression-AdmitØ™O‰—Social Inter - AdmitØ™P‰—Problem Solve - AdmitØ™Q‰—Memory - AdmitØ™R‰—
Total - AdmitØ™S‰—Feeding - DischØ™T‰—Grooming - DischØ™U‰—Bathing - DischØ™V‰—Dressing Up Body - DischØ™W‰—Dress - Lower Body-DischØ™X‰—Toileting - DischØ™Y‰—Bladder - DischØ™Z‰—Bowel Mgmt - DischØ™[‰—Mobility - Bed - DischØ™\‰—Toilet - DischØ™]‰—Tub, Shower - DischØ™^‰—Locomotion - W/W/B - DisØ™_‰—Locomotion - DischØ™`‰—Stairs - DischØ™a‰—Comprehension-A/V/B-DisØ™b‰—Comprehension - DischØ™c‰—Expression -V/N/B-DisØ™d‰—Expression-DischØ™e‰—Social Inter - DischØ™f‰—Problem Solve - DischØ™g‰—Memory - DischØ™h‰—
Total - DischØ™i‰—Feeding - FollowupØ™j‰—Grooming - FollowØ™k‰—Bathing - FollowupØ™l‰—Dressing Up Body - FolØ™m‰—Dress - Lower Body-FolØ™n‰—Toileting - FollowupØ™o‰—Bladder - FollowupØ™p‰—Bowel Mgmt - FollowupØ™q‰—Mobility - Bed - FolØ™r‰—Toilet - FollowupØ™s‰—Tub, Shower - FolØ™t‰—Locomotion - W/W/B - FolØ™u‰—Locomotion - FollowØ™v‰—Stairs - FollowupØ™w‰—Comprehension-A/V/B-FolØ™x‰—Comprehension - FollowØ™y‰—Expression -V/N/B-FolØ™z‰—Expression-FollowupØ™{‰—Social Inter - FolØ™|‰—Problem Solve - FolØ™}‰—Memory - FollowupØ™~‰—Total - FollowupØ™‰—
Transmit FileØ™€‰™€žžÉØF‡YÉØ ,YÉØ ,Y4Z4dÉØFXI4Æ™ÅÇK— Œ—0 B & L Computer Associates猍—/ 200 Winston Drive - 1707Œ—/ Cliffside Park, NJ 07010Œ— Œ— Œ—JStructure for database: PATIENT.DBF Œ—JField Field Name Width Œ—J 1 LNAME C 25 Last Name Œ—J 2 FNAME C 20 First Name Œ—J 3 NUMBER C 10 SS Number Œ—J 4 CODE C 2 Code Œ—J 5 DOB D 8 Date of Birth Œ—J 6 ADDRESS1 C 30 Address Œ—J 7 ADDRESS2 C 30 Address (2) Œ—J 8 CITY C 20 City Œ—J 9 STATE C 2 State Œ—J 10 ZIP C 9 Zip Œ—J 11 PHONE C 20 Phone Œ—J Œ—J Œ—J Œ—J Œ—JStructure for database: FIM.DBF Œ—JField Field Name Width Coding Question No. Œ—J 1 RHCOD C 3 Facility Code 1. Œ—J 2 PNUMB C 10 Patient Number 2. Œ—J 3 ADDAT D 8 Admission Date 3. Œ—J 4 DIDAT D 8 Discharge Date 4. Œ—J 5 PGINT C 1 Program Interrupted (Y/N) 5. Œ—J 6 INDT1 D 8 First Transfer Date 5.a. Œ—J 7 INTR1 D 8 First Return Date 5.b. Œ—J 8 INDT2 D 8 Second Transfer Date 5.c. Œ—J 9 INTR2 D 8 Second Return Date 5.d. Œ—J 10 INDT3 D 8 Third Transfer Date 5.e. Œ—J 11 INTR3 D 8 Third Return Date 5.f. Œ—J 12 ADCLA C 1 Admission Class 6. Œ—J 13 ZIP C 9 Zip Code (home) 7. Œ—J 14 DOB D 8 Date of Birth 8. Œ—J 15 SEX C 1 Sex 9. Œ—J 16 PATR C 1 Race/Ethnicity 10. Œ—J 17 LANG C 1 English Language 11. Œ—J 18 MSTAT C 1 Marital Status 12. Œ—J 19 SET1 C 2 Liv Setting - Pre-Hosp 13.a. - item 1 Œ—J 20 SET2 C 2 Liv Setting-Admit From 13.a. - item 2 Œ—J 21 SET3 C 2 Liv Setting-Discharge 13.a. - item 3 Œ—J 22 SET4 C 2 Liv Setting-Followup 13.a. - item 4 Œ—J 23 LIV1 C 1 Liv With - Pre Hosp 13.b. - item 1 Œ—J 24 LIV2 C 1 Liv With - Discharge 13.b. - item 2 Œ—J 25 LIV3 C 1 Liv With - Followup 13.b. - item 3 Œ—J 26 VOCC1 C 1 Voc Status - Admis 14.a. - item 1 Œ—J 27 VOCC2 C 1 Voc Status - Followup 14.a. - item 2 Œ—J 28 VOCE1 C 1 Voc Effort - Admis 14.b. - item 1 Œ—J 29 VOCE2 C 1 Voc Effort - Followup 14.b. - item 2 Œ— Œ—* Page 1Œ— Œ2— Œ—0 B & L Computer Associates猍—/ 200 Winston Drive - 1707Œ—/ Cliffside Park, NJ 07010Œ— Œ— Œ—VStructure for database: FIM (continued) Œ—JField Field Name Width Coding Question No. Œ—J 30 FODAT D 8 Followup Date 15.a. Œ—J 31 INFSO C 1 Followup Info Source 15.b. Œ—J 32 METHO C 1 Followup Method 15.c. Œ—J 33 HMPR C 1 Primary Health Maint 15.d. - item 1 Œ—J 34 HMSE C 1 Secondary Health Maint 15.d. - item 2 Œ—J 35 THERA C 1 Therapy 15.e. Œ—J 36 IGRP C 6 Impairment Group 16. Œ—J 37 ONSET D 8 Date of Onset 17. Œ—J 38 PDIAG C 6 Principal Diagnosis 18. Œ—J 39 DIAG1 C 6 Discharge Diag 1 19.1 - item 1 Œ—J 40 DIAG2 C 6 Discharge Diag 2 19.2 - item 1 Œ—J 41 DIAG3 C 6 Discharge Diag 3 19.3 - item 1 Œ—J 42 DIAG4 C 6 Discharge Diag 4 19.4 - item 1 Œ—J 43 DIAG5 C 6 Discharge Diag 5 19.5 - item 1 Œ—J 44 DIAG6 C 6 Discharge Diag 6 19.6 - item 1 Œ—J 45 DIAG7 C 6 Discharge Diag 7 19.7 - item 1 Œ—J 46 DFU1 C 6 Followup Diag 1 19.1 - item 2 Œ—J 47 DFU2 C 6 Followup Diag 2 19.2 - item 2 Œ—J 48 DFU3 C 6 Followup Diag 3 19.3 - item 2 Œ—J 49 DFU4 C 6 Followup Diag 4 19.4 - item 2 Œ—J 50 DFU5 C 6 Followup Diag 5 19.5 - item 2 Œ—J 51 DFU6 C 6 Followup Diag 6 19.6 - item 2 Œ—J 52 DFU7 C 6 Followup Diag 7 19.7 - item 2 Œ—J 53 PAY1 C 2 Primary Payment Source 20.a. Œ—J 54 PAY2 C 2 Secondary Pay Source 20.b. Œ—J 55 HPRICE C 6 Payments to Hospital 21.a. Œ—J 56 INCPH C 1 Payments Include MD 21.b. Œ—J 57 FEEDA N 1 Feeding - Admit 22.A. - admit Œ—J 58 FEEDD N 1 Feeding - Discharge 22.A. - disch Œ—J 59 FEEDF N 1 Feeding - Followup 22.A. - follow Œ—J 60 GROOMA N 1 Grooming - Admit 22.B. - admit Œ—J 61 GROOMD N 1 Grooming - Discharge 22.B. - disch Œ—J 62 GROOMF N 1 Grooming - Followup 22.B. - follow Œ—J 63 BATHA N 1 Bathing - Admit 22.C. - admit Œ—J 64 BATHD N 1 Bathing - Discharge 22.C. - disch Œ—J 65 BATHF N 1 Bathing - Followup 22.C. - follow Œ—J 66 DUPPA N 1 Dressing - Upper Body - Admit 22.D. - admit Œ—J 67 DUPPD N 1 Dressing - Upper Body - Disch 22.D. - disch Œ—J 68 DUPPF N 1 Dressing - Upper Body - Follow 22.D. - follow Œ—J 69 DLOBA N 1 Dressing - Lower Body - Admit 22.E. - admit Œ—J 70 DLOBD N 1 Dressing - Lower Body - Disch 22.E. - disch Œ—J 71 DLOBF N 1 Dressing - Lower Body - Follow 22.E. - follow Œ—J 72 TOILA N 1 Toileting - Admit 22.F. - admit Œ—J 73 TOILD N 1 Toileting - Discharge 22.F. - disch Œ—J 74 TOILF N 1 Toileting - Followup 22.F. - follow Œ—J 75 BLADA N 1 Bladder Management - Admit 22.G. - admit Œ—J 76 BLADD N 1 Bladder Management - Disch 22.G. - disch Œ—J 77 BLADF N 1 Bladder Management - Follow 22.G. - follow Œ— Œ—* Page 2Œ— Œ2— Œ—0 B & L Computer Associates猍—/ 200 Winston Drive - 1707Œ—/ Cliffside Park, NJ 07010Œ— Œ— Œ—VStructure for database: FIM (continued) Œ—JField Field Name Width Coding Question No. Œ—J 78 BOWLA N 1 Bowel Management - Admit 22.H. - admit Œ—J 79 BOWLD N 1 Bowel Management - Discharge 22.H. - disch Œ—J 80 BOWLF N 1 Bowel Management - Followup 22.H. - follow Œ—J 81 BCWCA N 1 Transfer Bed/Chair - Admit 22.I. - admit Œ—J 82 BCWCD N 1 Transfer Bed/Chair - Disch 22.I. - disch Œ—J 83 BCWCF N 1 Transfer Bed/Chair - Follow 22.I. - follow Œ—J 84 MTOIA N 1 Toilet - Admission 22.J. - admit Œ—J 85 MTOID N 1 Comprehension-A/V/B-Fol 22.J. - disch Œ—J 86 MTOIF N 1 Comprehension - Follow 22.J. - follow Œ—J 87 TUBA N 1 Tub, Shower - Admit 22.K. - admit Œ—J 88 TUBD N 1 Tub, Shower - Discharge 22.K. - disch Œ—J 89 TUBF N 1 Tub, Shower - Followup 22.K. - follow Œ—J 90 LWCA1 C 1 Locomotion - type - Admit 22.L. - admit Œ—J 91 LWCA N 1 Locomotion - score - Admit 22.L. - admit Œ—J 92 LWCD1 C 1 Locomotion - type - Disch 22.L. - disch Œ—J 93 LWCD N 1 Locomotion - score - Disch 22.L. - disch Œ—J 94 LWCF1 C 1 Locomotion - type - Follow 22.L. - follow Œ—J 95 LWCF N 1 Locomotion - score - Follow 22.L. - follow Œ—J 96 STAIRA N 1 Stairs - Admission 22.M. - admit Œ—J 97 STAIRD N 1 Stairs - Discharge 22.M. - admit Œ—J 98 STAIRF N 1 Stairs - Followup 22.M. - admit Œ—J 99 CCOM1A C 1 Comprehension - type - Admit 22.N. - admit Œ—J 100 CCOMA N 1 Comprehension - score - Admit 22.N. - admit Œ—J 101 CCOM1D C 1 Comprehension - type - Disch 22.N. - disch Œ—J 102 CCOMD N 1 Comprehension - score - Disch 22.N. - disch Œ—J 103 CCOM1F C 1 Comprehension - type - Follow 22.N. - follow Œ—J 104 CCOMF N 1 Comprehension - score - Follow 22.N. - follow Œ—J 105 EXPV1A C 1 Expression - type - Admit 22.O. - admit Œ—J 106 EXPVA N 1 Expression - score - Admit 22.O. - admit Œ—J 107 EXPV1D C 1 Expression - type - Disch 22.O. - disch Œ—J 108 EXPVD N 1 Expression - score - Disch 22.O. - disch Œ—J 109 EXPV1F C 1 Expression - type - Followup 22.O. - follow Œ—J 110 EXPVF N 1 Expression - score - Followup 22.O. - follow Œ—J 111 SOCIA N 1 Social Interaction - Admit 22.P. - admit Œ—J 112 SOCID N 1 Social Interaction - Disch 22.P. - disch Œ—J 113 SOCIF N 1 Social Interaction - Follow 22.P. - follow Œ—J 114 PSOLVA N 1 Problem Solving - Admission 22.Q. - admit Œ—J 115 PSOLVD N 1 Problem Solving - Discharge 22.Q. - disch Œ—J 116 PSOLVF N 1 Problem Solving - Followup 22.Q. - follow Œ—J 117 MEMA N 1 Memory - Admission 22.R. - admit Œ—J 118 MEMD N 1 Memory - Discharge 22.R. - disch Œ—J 119 MEMF N 1 Memory - Followup 22.R. - follow Œ—J 120 TOT1 N 3 Total - Admission Œ—J 121 TOT2 N 3 Total - Discharge Œ—J 122 TOT3 N 3 Total - Followup Œ—J 123 TRANSMIT L 1 Transmit file Œ— Œ—* Page 3Œ— Œ— Œ2— Œ—0 B & L Computer Associates猍—/ 200 Winston Drive - 1707Œ—/ Cliffside Park, NJ 07010Œ— Œ— Œ— Œ—F To participate in the Uniform Data System for Medical Rehabilitation Œ—E Data Management, sponsored by the State University of New York at Œ— Buffalo, you should contact: Œ— Œ—; UDS Data Mgt. Service, 82 Farber Hall, SUNY, Main Street, Œ—4 Buffalo, New York 14214. Telephone (716) 831-2076. Œ— Œ—C B&L has no direct or indirect relationship or affiliation with the猍—) State University of New York at Buffalo.Œ— Œ— Œ— Œ—% SOFTWARE SUPPORTŒ—B Registered users of this software can obtain software support by Œ—@ contacting B&L Computer Associates by mail, phone or by modem.猍—A Support phone number is (201) 886-1658. FAX (201) 886-0751. The Œ—@ support BBS is (201) 886-8041 1200-9600 baud. Please have yourŒ—4 serial number available. It is on the program disk.Œ— Œ— Œ— Œ— Œ2ÆKïÅÇY4Í
dÇïï™ ™O6
€™
‹—>This program maintains 2 database files. At some time you may ±™™
‹—>find it necessary to remove all of the records that have been ±™™
‹—=marked for deletion and store them in a backup file. After ±™™
‹—Ayou purge a file, the old data file should be moved to a special ±™™
‹— backup area.±— ؉™™
‹—2Shall we purge the

atient file, the im file ±™™
‹—or shall we just uit.±™™&‹—!ØH¢9ž—PFQ
ï8X™™&‹—!ØH¢YÜÿYYÑž—P8Xx— PATNTBAK.DBFAX̙
™‹—'You already have a PATIENT backup file.±™ ™‹—7You must move it to another area before we can proceed.±™ ™‹—PLEASE HIT ANY KEY TO CONTINUE±Æ—Press any key to continue...Œä‡ÇY–—PATIENTݙÉØFXâz™
™‹—'Purging PATIENT file. Please be patient±Ø ¦­ )X€Øxôÿ¦™ ™ ‹—Creating database called ±™ ™,‹—PATNTBAK.DBF with ž™ïՆ— records.†±™ ™ ‹—3Copying deleted records from main file to new file.±$#ü—PATNTBAK!#û¦­)X#ü#û xñÿ¦#ü$™
™ ‹—!Copying main file and reindexing.±™™ ‹—,Please be patient as this will take a while.±$#ü—TEMP!#û¦­)yX#ü#û xðÿ¦#ü$— OLDPATNT.DBFAX— OLDPATNT.DBF-— PATIENT.DBF— OLDPATNT.DBF-—TEMP.DBF— PATIENT.DBF-—PATIENTݙÉØF‡™™
‹—,We are going to index to all of the indexes.±— UPPER(LNAME)—LNAME{—NUMBER—PATNUMB{™™‹—PLEASE HIT ANY KEY TO CONTINUE±Æ—Press any key to continue...Œä‡ÇYœ™™
‹—)Gee - the PATIENT file was not available.±™™
‹—,Someone else must be using it. You are going±™™
‹—#to have to reindex it later. Sorry.±YNž—F8XC—
FIMBAK.DBFAXș
™‹—#You already have a FIM backup file.±™ ™‹—7You must move it to another area before we can proceed.±™ ™‹—PLEASE HIT ANY KEY TO CONTINUE±Æ—Press any key to continue...Œä‡ÇYj—FIMݙÉØFX¾z™
™‹—#Purging FIM file. Please be patient±Ø ¦­ )X€Øxôÿ¦™ ™ ‹—Creating database called ±™ ™,‹—FIMBAK.DBF with ž™ïՆ— records.†±™ ™ ‹—3Copying deleted records from main file to new file.±$#ü—FIMBAK!#û¦­)X#ü#û xñÿ¦#ü$™
™ ‹—!Copying main file and reindexing.±™™ ‹—,Please be patient as this will take a while.±$#ü—TEMP!#û¦­)yX#ü#û xðÿ¦#ü$—
OLDFIM.DBFAX—
OLDFIM.DBF-—FIM.DBF—
OLDFIM.DBF-—TEMP.DBF—FIM.DBF-—FIMݙÉØF‡™™
‹—,We are going to index to all of the indexes.±—PNUMB—PNUMB{—PDIAG—PDIAG{™™‹—PLEASE HIT ANY KEY TO CONTINUE±Æ—Press any key to continue...Œä‡ÇY˜™™
‹—%Gee - the FIM file was not available.±™™
‹—,Someone else must be using it. You are going±™™
‹—#to have to reindex it later. Sorry.±Y4úd™™
‹—,We are going to index to all of the indexes.±™™
‹—-The PATIENT file is the first one we will do.±—PATIENTݙÉØFXl™™
‹—0Please be patient as this takes a little time...±— UPPER(LNAME)—LNAME{—NUMBER—PATNUMB{Yœ™™
‹—)Gee - the PATIENT file was not available.±™™
‹—,Someone else must be using it. You are going±™™
‹—#to have to reindex it later. Sorry.±™™
‹—"Now to the FIM database and index.±—FIMݙÉØFX&—PNUMB—PNUMB{—PDIAG—PDIAG{Y˜™ ™
‹—%Gee - the FIM file was not available.±™
™
‹—,Someone else must be using it. You are going±™ ™
‹—#to have to reindex it later. Sorry.±™™‹—+All done ... please hit any key to continue±Æ—Press any key to continue...Œä‡ÇY4

  3 Responses to “Category : Science and Education
Archive   : FIM100.ZIP
Filename : FIM.OVL

  1. Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!

  2. This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.

  3. But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/