Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: RMPRN62

RMPRN62.m

Go to the documentation of this file. 
  1. RMPRN62 ;Hines OIFO/HNC -NPPD CALCULATIONS ;02/14/98
  1.  ;;3.0;PROSTHETICS;**31,39,48,50,57,70,84,91,103,134,144,153,159,164,169**;Feb 09, 1996;Build 4
  1.  ;
  1.  ; ODJ - patch 50 - 7/28/00 - add line label REP to mark start of repair lines.
  1.  ; HNC - patch 57 - 4/5/01 - add Dental Implant
  1.  ;
  1.  ; AAC - Patch 84 - 02-25-04; additions, deletions and change descriptions for Groups and lines
  1.  ; AAC - patch 84 - add new lines 100 H,100 I,400 H,900 N,910 B,R10 A,R10 B,R10 C,R60 D.
  1.  ; AAC - patch 84 - change desc -100 D,100 G,900 I,900 J,R20 B,R20 C,R91 F.
  1.  ;
  1.  ; AAC - Patch 91 - 06/23/04 -  NPPD line R10, no longer used, but keep in display as historical listing.
  1.  ;
  1.  ; AAC - Patch 103 - 01/17/05 - NPPD Categories/lines - New and Repair
  1.  ;
  1.  ; AAC - Patch 134 - 01/25/07 - NPPD Categories/lines - New and Repair
  1.  ;
  1.  ; AAC - patch 144 - 03/03/08 - NPPD Categories/lines - New and Repair
  1.  ;
  1.  ; AAC - patch 159 - 05/01/10 - NPPD Categories/lines - New and Repair
  1.  ;
  1.  ; AAC - patch 164 - 01/24/11 - NPPD Categories/lines - New and Repair
  1.  ;
  1.  ; AAC - patch 169 - 01/11/12 - NPPD Categories/lines - New
  1.  ;
  1.  ;build array or tmp
  1. DES ;description of line numbers
  1.  ;;100 A;MOTORIZED
  1.  ;;100 A1;SCOOTERS
  1.  ;;100 B;MANUAL CUSTOM
  1.  ;;100 C;STANDARD
  1.  ;;100 D;WC ACCESSORIES
  1.  ;;100 E;CUSHION
  1.  ;;100 F;CUSHION CUSTOM
  1.  ;;100 G;LIFTS(INCLUDES WC,SCOOTERS)
  1.  ;;100 H;NSC VAN MOD
  1.  ;;100 I;SCOOTER ACCESSORIES
  1.  ;;200 A;LEG IPOP
  1.  ;;200 B;LEG TEM
  1.  ;;200 C;LEG PART FOOT
  1.  ;;200 E;LEG SYMES
  1.  ;;200 F;LEG B/K
  1.  ;;200 G;LEG A/O
  1.  ;;200 H;LEG A/K
  1.  ;;200 I;LEG COMPONENT
  1.  ;;300 A;ARM B/E
  1.  ;;300 B;ARM A/E
  1.  ;;300 C;* NO LONGER USED *
  1.  ;;300 D;ARM A/O
  1.  ;;300 E;TERMINAL DEVICES
  1.  ;;300 F;EXT PWR ARM A/O EXT PWR TRM D
  1.  ;;400 A;ORTHOSIS ANKLE
  1.  ;;400 B;ORTHOSIS LEG AK
  1.  ;;400 C;ORTHOSIS, SPINAL
  1.  ;;400 D;ORTHOSIS AL/OTH
  1.  ;;400 E;COMP HOSE/BURN GARMENT
  1.  ;;400 F;ORTHOSIS, KNEE
  1.  ;;400 G;* NO LONGER USED *
  1.  ;;400 H;ORTHOSIS,WHO
  1.  ;;400 X;ORTHOSIS UNKNOWN
  1.  ;;500 A;FOOT ORTHOSIS/INSERTS/ARCH SUPPORTS
  1.  ;;500 B;SHOE NON CUSTOM
  1.  ;;500 C;SHOE CUSTOM
  1.  ;;500 D;* NO LONGER USED *
  1.  ;;500 E;* NO LONGER USED *
  1.  ;;500 F;* NO LONGER USED *
  1.  ;;600 1;EYEGLASSES PR
  1.  ;;600 A;* NO LONGER USED *
  1.  ;;600 B;HEAR AID & ACCESS
  1.  ;;600 C;AID FOR BLIND
  1.  ;;600 D;CONT LENS, EA.
  1.  ;;600 E;EAR INSERT/MOLD
  1.  ;;600 F;ASSIST LISTEN DEVICES
  1.  ;;600 G;SPEECH DEVICES
  1.  ;;700 A;EYE
  1.  ;;700 B;FACIAL
  1.  ;;700 C;BODY, OTHER
  1.  ;;700 D;BREAST PROSTHESIS
  1.  ;;800 A;OXYGEN EQP
  1.  ;;800 B;OXYGEN CONCEN
  1.  ;;800 C;MOVED TO REPAIR
  1.  ;;800 D;OXYGEN, SUPPLIES
  1.  ;;800 E;MOVED TO REPAIR
  1.  ;;800 F;VENTILATOR, A/O
  1.  ;;800 G;RESPIRATORY EQUIPMENT
  1.  ;;800 H;RESPIRATORY SUPPLIES
  1.  ;;900 A;WALKING AIDS
  1.  ;;900 B;PATIENT LIFT
  1.  ;;900 C;BED HOSP STD
  1.  ;;900 D;BED HOSP SPEC
  1.  ;;900 E;MATTRESS STAN
  1.  ;;900 F;MATTRESS SPEC
  1.  ;;900 G;BED, ACCESSORIES
  1.  ;;900 H;ENVIRON CONTR
  1.  ;;900 I;HOME SAFETY EQUIPMENT
  1.  ;;900 J;INSTALLATION/LABOR
  1.  ;;900 K;MED EQP AL/OTH
  1.  ;;900 L;RECREATIONAL EQUIPMENT
  1.  ;;900 M;COMPUTER EQUIP
  1.  ;;900 N;TELEHEALTH
  1.  ;;900 O;EXERCISE EQUIPMENT
  1.  ;;900 P;WOMENS HEALTH
  1.  ;;910 A;MED SUP AL/OTH
  1.  ;;910 B;BATTERIES
  1.  ;;920 A;HOME DIAL EQP
  1.  ;;920 B;HOME DIAL SUP
  1.  ;;930 A;MOD VANS
  1.  ;;930 B;ADAPT EQP AL/OTH
  1.  ;;940 A;HISA SC
  1.  ;;940 B;HISA NSC
  1.  ;;960 A; H&N ALL OTHER
  1.  ;;960 A1; H&N INTRAOCULAR LENS
  1.  ;;960 A2; H&N HEAD
  1.  ;;960 A3; H&N NECK
  1.  ;;960 A4; H&N EYES A/O
  1.  ;;960 B; ABDOMEN ALL OTHER
  1.  ;;960 B1; ABDOMEN STENT
  1.  ;;960 B2; ABDOMEN MESH
  1.  ;;960 B3; ABDOMEN CATHETER
  1.  ;;960 C; UE ALL OTHER
  1.  ;;960 C1; UE ARM
  1.  ;;960 C2; UE SHOULDER
  1.  ;;960 C3; UE HAND
  1.  ;;960 D; LE ALL OTHER
  1.  ;;960 D1; LE HIP
  1.  ;;960 D2; LE KNEE
  1.  ;;960 D3; LE FOOT
  1.  ;;960 E; THORACIC ALL OTHER
  1.  ;;960 E1; THOR PACEMAKER/LEADS
  1.  ;;960 E2; THOR ICD/LEADS
  1.  ;;960 E3; THOR STENTS
  1.  ;;960 E4; THOR VALVES
  1.  ;;960 F; DENTAL IMPLANTS
  1.  ;;960 G; ALL SCRWS,PLTS,ANCRS,ETC.
  1.  ;;960 X; SI UNKNOWNS(ALL)
  1.  ;;970 A; BIOLOGICAL IMPLANTS 
  1.  ;;999 A;AL/OTH ITEMS
  1.  ;;999 P1;PEDS DME
  1.  ;;999 P2;ALL OTHER PEDS
  1.  ;;999 X;HCPCS NOT GRP
  1.  ;;999 Z;NO HCPCS
  1. REP ;;R10;* NO LONGER USED *
  1.  ;;R10 A;WHEELCHAIR
  1.  ;;R10 B;LIFTS
  1.  ;;R10 C;NSC VAN MOD
  1.  ;;R20 A;LEG A/K
  1.  ;;R20 B;* NO LONGER USED *
  1.  ;;R20 C;LEG B/K
  1.  ;;R20 D;LEG ALL OTHER 
  1.  ;;R30;ART ARM,TOTAL
  1.  ;;R40;ORTHOSIS TOTAL
  1.  ;;R50 A;ORTH SHOE ALL
  1.  ;;R50 B;SHOE MOD
  1.  ;;R50 C;A/O ITEM SERV
  1.  ;;R60 A;AID FOR BLIND
  1.  ;;R60 B;EYEGLASS RPR
  1.  ;;R60 C;HEAR AID & ACCESS
  1.  ;;R60 D;ASSISTIVE LISTENING DEVICES
  1.  ;;R60 E;VOICE SYNTHESIZER
  1.  ;;R70;HOME DIAL EQU
  1.  ;;R80 A;PATIENT LIFTS
  1.  ;;R80 B;REPAIR TO ECU
  1.  ;;R80 C;MED EQUIP A/O
  1.  ;;R80 D;HME DELIVERY/PU
  1.  ;;R80 E;TELEHEALTH
  1.  ;;R80 F;COMPUTERS
  1.  ;;R90;ALL OTHER
  1.  ;;R90 A;RECREATIONAL EQUIPMENT
  1.  ;;R90 B;TRAINING
  1.  ;;R91 A;CONCENTRATOR
  1.  ;;R91 B;VENTILATOR
  1.  ;;R91 C;EQUIPMENT A/O
  1.  ;;R91 D;SERVICE VISIT
  1.  ;;R91 E;COMPRESSED O2
  1.  ;;R91 F;LIQUID O2(LBS)
  1.  ;;R91 G;LIQUID DELIVERY SYSTEM
  1.  ;;R91 H;RESPIRATORY EQUIP
  1.  ;;R92 A;VAN MODS
  1.  ;;R92 B;AUTO ADPT EQUIP
  1.  ;;R99 A;SHIPPING
  1.  ;;R99 B;NONRESPONSE
  1.  ;;R99 P;MISC PEDS
  1.  ;;R99 X;HCPCS NOT GRP
  1.  ;;R99 Z;NO HCPCS
  1.  ;;END