RMPRN62 ;Hines OIFO/HNC -NPPD CALCULATIONS ;02/14/98
;;3.0;PROSTHETICS;**31,39,48,50,57,70,84,91,103,134,144,153,159,164,169**;Feb 09, 1996;Build 4
;
; ODJ - patch 50 - 7/28/00 - add line label REP to mark start of repair lines.
; HNC - patch 57 - 4/5/01 - add Dental Implant
;
; AAC - Patch 84 - 02-25-04; additions, deletions and change descriptions for Groups and lines
; AAC - patch 84 - add new lines 100 H,100 I,400 H,900 N,910 B,R10 A,R10 B,R10 C,R60 D.
; AAC - patch 84 - change desc -100 D,100 G,900 I,900 J,R20 B,R20 C,R91 F.
;
; AAC - Patch 91 - 06/23/04 - NPPD line R10, no longer used, but keep in display as historical listing.
;
; AAC - Patch 103 - 01/17/05 - NPPD Categories/lines - New and Repair
;
; AAC - Patch 134 - 01/25/07 - NPPD Categories/lines - New and Repair
;
; AAC - patch 144 - 03/03/08 - NPPD Categories/lines - New and Repair
;
; AAC - patch 159 - 05/01/10 - NPPD Categories/lines - New and Repair
;
; AAC - patch 164 - 01/24/11 - NPPD Categories/lines - New and Repair
;
; AAC - patch 169 - 01/11/12 - NPPD Categories/lines - New
;
;build array or tmp
DES ;description of line numbers
;;100 A;MOTORIZED
;;100 A1;SCOOTERS
;;100 B;MANUAL CUSTOM
;;100 C;STANDARD
;;100 D;WC ACCESSORIES
;;100 E;CUSHION
;;100 F;CUSHION CUSTOM
;;100 G;LIFTS(INCLUDES WC,SCOOTERS)
;;100 H;NSC VAN MOD
;;100 I;SCOOTER ACCESSORIES
;;200 A;LEG IPOP
;;200 B;LEG TEM
;;200 C;LEG PART FOOT
;;200 E;LEG SYMES
;;200 F;LEG B/K
;;200 G;LEG A/O
;;200 H;LEG A/K
;;200 I;LEG COMPONENT
;;300 A;ARM B/E
;;300 B;ARM A/E
;;300 C;* NO LONGER USED *
;;300 D;ARM A/O
;;300 E;TERMINAL DEVICES
;;300 F;EXT PWR ARM A/O EXT PWR TRM D
;;400 A;ORTHOSIS ANKLE
;;400 B;ORTHOSIS LEG AK
;;400 C;ORTHOSIS, SPINAL
;;400 D;ORTHOSIS AL/OTH
;;400 E;COMP HOSE/BURN GARMENT
;;400 F;ORTHOSIS, KNEE
;;400 G;* NO LONGER USED *
;;400 H;ORTHOSIS,WHO
;;400 X;ORTHOSIS UNKNOWN
;;500 A;FOOT ORTHOSIS/INSERTS/ARCH SUPPORTS
;;500 B;SHOE NON CUSTOM
;;500 C;SHOE CUSTOM
;;500 D;* NO LONGER USED *
;;500 E;* NO LONGER USED *
;;500 F;* NO LONGER USED *
;;600 1;EYEGLASSES PR
;;600 A;* NO LONGER USED *
;;600 B;HEAR AID & ACCESS
;;600 C;AID FOR BLIND
;;600 D;CONT LENS, EA.
;;600 E;EAR INSERT/MOLD
;;600 F;ASSIST LISTEN DEVICES
;;600 G;SPEECH DEVICES
;;700 A;EYE
;;700 B;FACIAL
;;700 C;BODY, OTHER
;;700 D;BREAST PROSTHESIS
;;800 A;OXYGEN EQP
;;800 B;OXYGEN CONCEN
;;800 C;MOVED TO REPAIR
;;800 D;OXYGEN, SUPPLIES
;;800 E;MOVED TO REPAIR
;;800 F;VENTILATOR, A/O
;;800 G;RESPIRATORY EQUIPMENT
;;800 H;RESPIRATORY SUPPLIES
;;900 A;WALKING AIDS
;;900 B;PATIENT LIFT
;;900 C;BED HOSP STD
;;900 D;BED HOSP SPEC
;;900 E;MATTRESS STAN
;;900 F;MATTRESS SPEC
;;900 G;BED, ACCESSORIES
;;900 H;ENVIRON CONTR
;;900 I;HOME SAFETY EQUIPMENT
;;900 J;INSTALLATION/LABOR
;;900 K;MED EQP AL/OTH
;;900 L;RECREATIONAL EQUIPMENT
;;900 M;COMPUTER EQUIP
;;900 N;TELEHEALTH
;;900 O;EXERCISE EQUIPMENT
;;900 P;WOMENS HEALTH
;;910 A;MED SUP AL/OTH
;;910 B;BATTERIES
;;920 A;HOME DIAL EQP
;;920 B;HOME DIAL SUP
;;930 A;MOD VANS
;;930 B;ADAPT EQP AL/OTH
;;940 A;HISA SC
;;940 B;HISA NSC
;;960 A; H&N ALL OTHER
;;960 A1; H&N INTRAOCULAR LENS
;;960 A2; H&N HEAD
;;960 A3; H&N NECK
;;960 A4; H&N EYES A/O
;;960 B; ABDOMEN ALL OTHER
;;960 B1; ABDOMEN STENT
;;960 B2; ABDOMEN MESH
;;960 B3; ABDOMEN CATHETER
;;960 C; UE ALL OTHER
;;960 C1; UE ARM
;;960 C2; UE SHOULDER
;;960 C3; UE HAND
;;960 D; LE ALL OTHER
;;960 D1; LE HIP
;;960 D2; LE KNEE
;;960 D3; LE FOOT
;;960 E; THORACIC ALL OTHER
;;960 E1; THOR PACEMAKER/LEADS
;;960 E2; THOR ICD/LEADS
;;960 E3; THOR STENTS
;;960 E4; THOR VALVES
;;960 F; DENTAL IMPLANTS
;;960 G; ALL SCRWS,PLTS,ANCRS,ETC.
;;960 X; SI UNKNOWNS(ALL)
;;970 A; BIOLOGICAL IMPLANTS
;;999 A;AL/OTH ITEMS
;;999 P1;PEDS DME
;;999 P2;ALL OTHER PEDS
;;999 X;HCPCS NOT GRP
;;999 Z;NO HCPCS
REP ;;R10;* NO LONGER USED *
;;R10 A;WHEELCHAIR
;;R10 B;LIFTS
;;R10 C;NSC VAN MOD
;;R20 A;LEG A/K
;;R20 B;* NO LONGER USED *
;;R20 C;LEG B/K
;;R20 D;LEG ALL OTHER
;;R30;ART ARM,TOTAL
;;R40;ORTHOSIS TOTAL
;;R50 A;ORTH SHOE ALL
;;R50 B;SHOE MOD
;;R50 C;A/O ITEM SERV
;;R60 A;AID FOR BLIND
;;R60 B;EYEGLASS RPR
;;R60 C;HEAR AID & ACCESS
;;R60 D;ASSISTIVE LISTENING DEVICES
;;R60 E;VOICE SYNTHESIZER
;;R70;HOME DIAL EQU
;;R80 A;PATIENT LIFTS
;;R80 B;REPAIR TO ECU
;;R80 C;MED EQUIP A/O
;;R80 D;HME DELIVERY/PU
;;R80 E;TELEHEALTH
;;R80 F;COMPUTERS
;;R90;ALL OTHER
;;R90 A;RECREATIONAL EQUIPMENT
;;R90 B;TRAINING
;;R91 A;CONCENTRATOR
;;R91 B;VENTILATOR
;;R91 C;EQUIPMENT A/O
;;R91 D;SERVICE VISIT
;;R91 E;COMPRESSED O2
;;R91 F;LIQUID O2(LBS)
;;R91 G;LIQUID DELIVERY SYSTEM
;;R91 H;RESPIRATORY EQUIP
;;R92 A;VAN MODS
;;R92 B;AUTO ADPT EQUIP
;;R99 A;SHIPPING
;;R99 B;NONRESPONSE
;;R99 P;MISC PEDS
;;R99 X;HCPCS NOT GRP
;;R99 Z;NO HCPCS
;;END
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HRMPRN62 5034 printed Nov 22, 2024@17:45:05 Page 2
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
+2 ;
+3 ; ODJ - patch 50 - 7/28/00 - add line label REP to mark start of repair lines.
+4 ; HNC - patch 57 - 4/5/01 - add Dental Implant
+5 ;
+6 ; AAC - Patch 84 - 02-25-04; additions, deletions and change descriptions for Groups and lines
+7 ; AAC - patch 84 - add new lines 100 H,100 I,400 H,900 N,910 B,R10 A,R10 B,R10 C,R60 D.
+8 ; AAC - patch 84 - change desc -100 D,100 G,900 I,900 J,R20 B,R20 C,R91 F.
+9 ;
+10 ; AAC - Patch 91 - 06/23/04 - NPPD line R10, no longer used, but keep in display as historical listing.
+11 ;
+12 ; AAC - Patch 103 - 01/17/05 - NPPD Categories/lines - New and Repair
+13 ;
+14 ; AAC - Patch 134 - 01/25/07 - NPPD Categories/lines - New and Repair
+15 ;
+16 ; AAC - patch 144 - 03/03/08 - NPPD Categories/lines - New and Repair
+17 ;
+18 ; AAC - patch 159 - 05/01/10 - NPPD Categories/lines - New and Repair
+19 ;
+20 ; AAC - patch 164 - 01/24/11 - NPPD Categories/lines - New and Repair
+21 ;
+22 ; AAC - patch 169 - 01/11/12 - NPPD Categories/lines - New
+23 ;
+24 ;build array or tmp
DES ;description of line numbers
+1 ;;100 A;MOTORIZED
+2 ;;100 A1;SCOOTERS
+3 ;;100 B;MANUAL CUSTOM
+4 ;;100 C;STANDARD
+5 ;;100 D;WC ACCESSORIES
+6 ;;100 E;CUSHION
+7 ;;100 F;CUSHION CUSTOM
+8 ;;100 G;LIFTS(INCLUDES WC,SCOOTERS)
+9 ;;100 H;NSC VAN MOD
+10 ;;100 I;SCOOTER ACCESSORIES
+11 ;;200 A;LEG IPOP
+12 ;;200 B;LEG TEM
+13 ;;200 C;LEG PART FOOT
+14 ;;200 E;LEG SYMES
+15 ;;200 F;LEG B/K
+16 ;;200 G;LEG A/O
+17 ;;200 H;LEG A/K
+18 ;;200 I;LEG COMPONENT
+19 ;;300 A;ARM B/E
+20 ;;300 B;ARM A/E
+21 ;;300 C;* NO LONGER USED *
+22 ;;300 D;ARM A/O
+23 ;;300 E;TERMINAL DEVICES
+24 ;;300 F;EXT PWR ARM A/O EXT PWR TRM D
+25 ;;400 A;ORTHOSIS ANKLE
+26 ;;400 B;ORTHOSIS LEG AK
+27 ;;400 C;ORTHOSIS, SPINAL
+28 ;;400 D;ORTHOSIS AL/OTH
+29 ;;400 E;COMP HOSE/BURN GARMENT
+30 ;;400 F;ORTHOSIS, KNEE
+31 ;;400 G;* NO LONGER USED *
+32 ;;400 H;ORTHOSIS,WHO
+33 ;;400 X;ORTHOSIS UNKNOWN
+34 ;;500 A;FOOT ORTHOSIS/INSERTS/ARCH SUPPORTS
+35 ;;500 B;SHOE NON CUSTOM
+36 ;;500 C;SHOE CUSTOM
+37 ;;500 D;* NO LONGER USED *
+38 ;;500 E;* NO LONGER USED *
+39 ;;500 F;* NO LONGER USED *
+40 ;;600 1;EYEGLASSES PR
+41 ;;600 A;* NO LONGER USED *
+42 ;;600 B;HEAR AID & ACCESS
+43 ;;600 C;AID FOR BLIND
+44 ;;600 D;CONT LENS, EA.
+45 ;;600 E;EAR INSERT/MOLD
+46 ;;600 F;ASSIST LISTEN DEVICES
+47 ;;600 G;SPEECH DEVICES
+48 ;;700 A;EYE
+49 ;;700 B;FACIAL
+50 ;;700 C;BODY, OTHER
+51 ;;700 D;BREAST PROSTHESIS
+52 ;;800 A;OXYGEN EQP
+53 ;;800 B;OXYGEN CONCEN
+54 ;;800 C;MOVED TO REPAIR
+55 ;;800 D;OXYGEN, SUPPLIES
+56 ;;800 E;MOVED TO REPAIR
+57 ;;800 F;VENTILATOR, A/O
+58 ;;800 G;RESPIRATORY EQUIPMENT
+59 ;;800 H;RESPIRATORY SUPPLIES
+60 ;;900 A;WALKING AIDS
+61 ;;900 B;PATIENT LIFT
+62 ;;900 C;BED HOSP STD
+63 ;;900 D;BED HOSP SPEC
+64 ;;900 E;MATTRESS STAN
+65 ;;900 F;MATTRESS SPEC
+66 ;;900 G;BED, ACCESSORIES
+67 ;;900 H;ENVIRON CONTR
+68 ;;900 I;HOME SAFETY EQUIPMENT
+69 ;;900 J;INSTALLATION/LABOR
+70 ;;900 K;MED EQP AL/OTH
+71 ;;900 L;RECREATIONAL EQUIPMENT
+72 ;;900 M;COMPUTER EQUIP
+73 ;;900 N;TELEHEALTH
+74 ;;900 O;EXERCISE EQUIPMENT
+75 ;;900 P;WOMENS HEALTH
+76 ;;910 A;MED SUP AL/OTH
+77 ;;910 B;BATTERIES
+78 ;;920 A;HOME DIAL EQP
+79 ;;920 B;HOME DIAL SUP
+80 ;;930 A;MOD VANS
+81 ;;930 B;ADAPT EQP AL/OTH
+82 ;;940 A;HISA SC
+83 ;;940 B;HISA NSC
+84 ;;960 A; H&N ALL OTHER
+85 ;;960 A1; H&N INTRAOCULAR LENS
+86 ;;960 A2; H&N HEAD
+87 ;;960 A3; H&N NECK
+88 ;;960 A4; H&N EYES A/O
+89 ;;960 B; ABDOMEN ALL OTHER
+90 ;;960 B1; ABDOMEN STENT
+91 ;;960 B2; ABDOMEN MESH
+92 ;;960 B3; ABDOMEN CATHETER
+93 ;;960 C; UE ALL OTHER
+94 ;;960 C1; UE ARM
+95 ;;960 C2; UE SHOULDER
+96 ;;960 C3; UE HAND
+97 ;;960 D; LE ALL OTHER
+98 ;;960 D1; LE HIP
+99 ;;960 D2; LE KNEE
+100 ;;960 D3; LE FOOT
+101 ;;960 E; THORACIC ALL OTHER
+102 ;;960 E1; THOR PACEMAKER/LEADS
+103 ;;960 E2; THOR ICD/LEADS
+104 ;;960 E3; THOR STENTS
+105 ;;960 E4; THOR VALVES
+106 ;;960 F; DENTAL IMPLANTS
+107 ;;960 G; ALL SCRWS,PLTS,ANCRS,ETC.
+108 ;;960 X; SI UNKNOWNS(ALL)
+109 ;;970 A; BIOLOGICAL IMPLANTS
+110 ;;999 A;AL/OTH ITEMS
+111 ;;999 P1;PEDS DME
+112 ;;999 P2;ALL OTHER PEDS
+113 ;;999 X;HCPCS NOT GRP
+114 ;;999 Z;NO HCPCS
REP ;;R10;* NO LONGER USED *
+1 ;;R10 A;WHEELCHAIR
+2 ;;R10 B;LIFTS
+3 ;;R10 C;NSC VAN MOD
+4 ;;R20 A;LEG A/K
+5 ;;R20 B;* NO LONGER USED *
+6 ;;R20 C;LEG B/K
+7 ;;R20 D;LEG ALL OTHER
+8 ;;R30;ART ARM,TOTAL
+9 ;;R40;ORTHOSIS TOTAL
+10 ;;R50 A;ORTH SHOE ALL
+11 ;;R50 B;SHOE MOD
+12 ;;R50 C;A/O ITEM SERV
+13 ;;R60 A;AID FOR BLIND
+14 ;;R60 B;EYEGLASS RPR
+15 ;;R60 C;HEAR AID & ACCESS
+16 ;;R60 D;ASSISTIVE LISTENING DEVICES
+17 ;;R60 E;VOICE SYNTHESIZER
+18 ;;R70;HOME DIAL EQU
+19 ;;R80 A;PATIENT LIFTS
+20 ;;R80 B;REPAIR TO ECU
+21 ;;R80 C;MED EQUIP A/O
+22 ;;R80 D;HME DELIVERY/PU
+23 ;;R80 E;TELEHEALTH
+24 ;;R80 F;COMPUTERS
+25 ;;R90;ALL OTHER
+26 ;;R90 A;RECREATIONAL EQUIPMENT
+27 ;;R90 B;TRAINING
+28 ;;R91 A;CONCENTRATOR
+29 ;;R91 B;VENTILATOR
+30 ;;R91 C;EQUIPMENT A/O
+31 ;;R91 D;SERVICE VISIT
+32 ;;R91 E;COMPRESSED O2
+33 ;;R91 F;LIQUID O2(LBS)
+34 ;;R91 G;LIQUID DELIVERY SYSTEM
+35 ;;R91 H;RESPIRATORY EQUIP
+36 ;;R92 A;VAN MODS
+37 ;;R92 B;AUTO ADPT EQUIP
+38 ;;R99 A;SHIPPING
+39 ;;R99 B;NONRESPONSE
+40 ;;R99 P;MISC PEDS
+41 ;;R99 X;HCPCS NOT GRP
+42 ;;R99 Z;NO HCPCS
+43 ;;END
