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

AUM81D.m

Go to the documentation of this file.
AUM81D ;IHS/ASDST/DMJ,SDR,GTH - ICD 9 CODES FOR FY 2007 ; [ 08/18/2003   4:01 PM ]
 ;;8.1;TABLE MAINTENANCE;;SEP 17,2007
 ;
ICD9PNEW ;;ICD OPERATION/PROCEDURE, NEW PROCEDURE CODES: CODE NUMBER(#.01)^OPERATION/PROCEDURE(#4)^DESCRIPTION(#10)^Use with Sex(#9.5)^MDC(#80.12)-DRG(#80.12,1-6) (multiples are separated by "~"
 ;;00.19^DISRUPTION OF BBBD^Disruption of blood brain barrier via infusion [BBBD]
 ;;00.94^INTRA-OPERATIVE NEUROPHYSIOLOGIC MONITORING^Intra-operative neurophysiologic monitoring
 ;;01.10^INTRACRANIAL PRESSURE MONITORING^Intracranial pressure monitoring
 ;;01.16^INTRACRANIAL OXYGEN MONITORING^Intracranial oxygen monitoring
 ;;01.17^BRAIN TEMPERATURE MONITORING^Brain temperature monitoring
 ;;07.83^THORACOSCOPIC PART EXCIS THYMU^Thoracoscopic partial excision of thymus^^1-40,41,42~4-163,164,165~10-628,629,630~16-802,803,804~17-820,821,822,826,827,828~21-907,908,909~24-957,958,959
 ;;07.84^THORACOSCOPIC TOT EXCIS THYMUS^Thoracoscopic total excision of thymus^^1-40,41,42~4-163,164,165~10-628,629,630~16-802,803,804~17-820,821,822,826,827,828~21-907,908,909~24-957,958,959
 ;;07.95^THORACOSCOPIC INCISION  THYMUS^Thoracoscopic incision of thymus^^1-40,41,42~4-163,164,165~10-628,629,630~16-802,803,804~17-820,821,822,826,827,828~21-907,908,909~24-957,958,959
 ;;07.98^OTH UNSPEC THORACOSCOPIC THYMUS^Other and unspecified thoracoscopic operations on thymus^^1-40,41,42~4-163,164,165~10-628,629,630~16-802,803,804~17-820,821,822,826,827,828~21-907,908,909~24-957,958,959
 ;;32.20^THORACOSCOPIC EXCIS LESION LUNG^Thoracoscopic excision of lesion or tissue of lung^^4-163,164,165~17-820,821,822,826,827,828~21-907,908,909~24-957,958,959
 ;;32.30^THORACOSCOP SEGMT RESECT LUNG^Thoracoscopic segmental resection of lung^^4-163,164,165~17-820,821,822,826,827,828~21-907,908,909~24-957,958,959
 ;;32.39^OTH UNSPEC SEGMT RESECT LUNG^Other and unspecified segmental resection of lung^^4-163,164,165~17-820,821,822,826,827,828~21-907,908,909~24-957,958,959
 ;;32.41^THORACOSCOPIC LOBECTOMY LUNG^Thoracoscopic lobectomy of lung^^4-163,164,165~21-907,908,909~24-957,958,959
 ;;32.49^OTHER LOBECTOMY OF LUNG^Other lobectomy of lung^^4-163,164,165~21-907,908,909~24-957,958,959
 ;;32.50^THORACOSCOPIC PNEUMONECTOMY^Thoracoscopic pneumonectomy^^4-163,164,165~21-907,908,909~24-957,958,959
 ;;32.59^OTH AND UNSPEC PNEUMONECTOMY^Other and unspecified pneumonectomy^^4-163,164,165~21-907,908,909~24-957,958,959
 ;;33.20^THORACOSCOPIC LUNG BIOPSY^Thoracoscopic lung biopsy^^4-166,167,168~5-264~8-515,516,517~11-673,674,675~7-823,824,825,829,830
 ;;34.06^THORACOSCOPIC DRAIN PLEURA CAV^Thoracoscopic drainage of pleural cavity^^4-166,167,168
 ;;34.20^THORACOSCOPIC PLEURAL BIOPSY^Thoracoscopic pleural biopsy^^4-166,167,168
 ;;34.52^THORACOSCOPIC DECORTICA LUNG^Thoracoscopic decortication of lung^^4-163,164,165~17-820,821,822,826,827,828~21-907,908,909~24-957,958,959
 ;;50.13^TRANSJUGULAR LIVER BIOPSY^Transjugular liver biopsy
 ;;50.14^LAPAROSCOPIC LIVER BIOPSY^Laparoscopic liver biopsy^^6-356,357,358~7-420,421,422~9-579,580,581~11-673,674,675~16-802,803,804~17-820,821,822,826,827,828~21-907,908,909~24-957,958,959
 ;;70.53^REPAIR CYSTOCEL AND RECTOCELE^Repair of cystocele and rectocele with graft or prosthesis^^6-329,330,331~11-653,654,655~13-748
 ;;70.54^REPAIR CYSTOCELE WITH GRAFT^Repair of cystocele with graft or prosthesis^^11-662,663,664~13-748
 ;;70.55^REPAIR OF RECTOCELE WITH GRAFT OR PROSTHESIS^Repair of rectocele with graft or prosthesis^^6-329,330,331~13-748
 ;;70.63^VAGINAL CONSTRUCTION W GRAFT ^Vaginal construction with graft or prosthesis^F^13-748
 ;;70.64^VAGINAL RECONSTRUCTION W GRAFT^Vaginal reconstruction with graft or prosthesis^F^13-748~21-907,908,909~24-957,958,959~
 ;;70.78^VAGINAL SUSPENS FIXAT W GRAFT^Vaginal suspension and fixation with graft or prosthesis^F^11-662,663,664~13-748
 ;;70.93^OTH OPER CUL-DE-SAC W GRAFT^Other operations on cul-de-sac with graft or prosthesis^F^13-746,747
 ;;70.94^INSERTION OF BIOLOGICAL GRAFT^Insertion of biological graft
 ;;70.95^INSERTION OF SYNTHETIC GRAFT ^Insertion of synthetic graft or prosthesis
 ;;84.80^INSERT OR REPLACE INTERSPINOUS PROCESS DEVICE(S)^Insertion or replacement of interspinous process device(s)^^1-28,29,30~8-490~21-907,908,909~24-957,958,959
 ;;84.81^REVISION INTERSPINOUS PROCESS^Revision of interspinous process device(s)^^8-515,516,517~21-907,908,909~24-957,958,959
 ;;84.82^INSERT REPLMT PEDICLE-BASE DYN^Insertion or replacement of pedicle-based dynamic stabilization device(s)^^1-28,29,30~8-490~21-907,908,909~24-957,958,959
 ;;84.83^REVISION PEDICLE-BASED DYNAMI^Revision of pedicle-based dynamic stabilization device(s)^^8-515,516,517~21-907,908,909~24-957,958,959
 ;;84.84^INSERT OR REPLACEMT OF FACET^Insertion or replacement of facet replacement device(s)^^1-28,29,30~8-490~21-907,908,909~24-957,958,959
 ;;84.85^REVISION OF FACET REPLACEMENT DEVICE(S)^Revision of facet replacement device(s)^^8-515,516,517~21-907,908,909~24-957,958,959
 ;;88.59^INTRAOPERAT FLUORESCENCE VASCU^Intra-operative fluorescence vascular angiography
 ;;92.41^INTRA-OPERAT ELECTRON RADIATIO^Intra-operative electron radiation therapy
 ;;END
ICD9DINA ;;ICD 9 DIAGNOSIS, INACTIVE CODES: CODE NUMBER(#.01)^DESCRIPTION(#10)^INACTIVE DATE(#102)
 ;;233.3^Carcinoma in situ, other and unspecified female genital organs^OCT 1, 2007
 ;;255.4^Corticoadrenal insufficiency Polyglandular activity in multiple endocrine adenomatosis^OCT 1, 2007
 ;;258.0^Polyglandular activity in multiple endocrine adenomatosis^OCT 1, 2007
 ;;284.8^Other specified aplastic anemias^OCT 1, 2007
 ;;359.2^Myotonic disorders^OCT 1, 2007
 ;;364.8^Other disorders of iris and ciliary body^OCT 1, 2007
 ;;389.2^Mixed conductive and sensorineural hearing loss^OCT 1, 2007
 ;;624.0^Dystrophy of vulva^OCT 1, 2007
 ;;787.2^Dysphagia^OCT 1, 2007
 ;;789.5^Ascites^OCT 1, 2007
 ;;999.3^Complications of medical care, not elsewhere classified, Other infection^OCT 1, 2007
 ;;V17.4^FAMILY HISTORY OF OTHER CARDIVASCULAR DISEASES^OCT 1, 2007
 ;;V18.1^FAMILY HISTORY OF OTHER ENDOCRINE AND METABOLIC DISEASES^OCT 1, 2007
 ;;V26.4^PROCREATIVE MANAGEMENT, GENERAL COUNSELING AND ADVICE^OCT 1, 2007
 ;;V26.8^OTHER SPECIFIED PROCREATIVE MANAGEMENT^OCT 1, 2007
 ;;V68.0^ISSUE OF MEDICAL CERTIFICATES^OCT 1, 2007
 ;;V84.8^GENETICE SUSCEPTIBILITY OT OTHER DISEASE^OCT 1, 2007
 ;;END
 ;
ICD9OINA ;;ICD 9 DIAGNOSIS, OTHER INACTIVATED CODES: CODE NUMBER(#.01)^DESCRIPTION(#10)^INACTIVE DATE(#102)
 ;;END
PRNT ;
 S U="^"
 W !," CODE",?10,"DIAGNOSIS",!?10,"DESCRIPTION",!," -----",?10,"-----------"
 NEW X,Y,P2,P3
 F X=1:1 S Y=$P($T(ICD9NEW+X),";;",3),P2=$P(Y,U,2),P3=$P(Y,U,3) Q:Y="END"  W !," ",$P(Y,U,1),?10,$S($L(P3):P3,1:P2),!?10,P2
 Q