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

MDPOST1.m

Go to the documentation of this file.
  1. MDPOST1 ; HOIFO/NCA/DP - Build CP DEFINITION file (#702.01) - Optional Post Init ; [12-04-2002 13:06]
  1. ;;1.0;CLINICAL PROCEDURES;;Apr 01, 2004
  1. INITPF ; [Procedure] Build Procedure File
  1. NEW MD,MDADD,MDFDA,MDPROC,MDSKIP
  1. W !,"This option will populate your CP PROCEDURE DEFINITION file"
  1. W !,"with data."
  1. D:$O(^MDS(702.01,0))
  1. .W !!,$C(7),"NOTICE: You already have a procedure file with data."
  1. .W !,"This option will not over-write existing data, it"
  1. .W !,"will only add procedures not in your current file."
  1. W !!,"Continue with loading" S %=2 D YN^DICN Q:%'=1
  1. W !!,"Loading..."
  1. S (MDADD,MDSKIP)=0
  1. F MD=1:1 S MDPROC=$P($T(PROCDAT+MD),";;",2) Q:MDPROC="**END**" D
  1. .W !,MDPROC,"..."
  1. .I $D(^MDS(702.01,"B",MDPROC)) D Q
  1. ..W "Already in file, skipped." S MDSKIP=MDSKIP+1
  1. .Q:$D(^MDS(702.01,"B",MDPROC))
  1. .S MDFDA(702.01,"+1,",.01)=MDPROC
  1. .S MDFDA(702.01,"+1,",.09)=0
  1. .D UPDATE^DIE("","MDFDA","")
  1. .S MDADD=MDADD+1
  1. .W "Added."
  1. W !!,"Finished."
  1. W !,"Procedures Added: ",MDADD
  1. W !,"Procedures Skipped: ",MDSKIP
  1. Q
  1. ;
  1. PROCDAT ; [Data Module] Procedure names as released with Version 1.0
  1. ;;ABD PARACENTESIS: FOLLOWUP
  1. ;;ABD PARACENTESIS: INITIAL
  1. ;;ABLATION OF AV NODE FUNCTION
  1. ;;AICD INTER/CONDITION
  1. ;;AIRWAY RESISTANCE
  1. ;;ANO BIOPSY
  1. ;;ANO CONTROL BLEEDING
  1. ;;ANO DIAGNOSTIC (BRUSHINGS)
  1. ;;ANO HOT BIOPSY(IES)
  1. ;;ANO SINGLE TUMOR (HOT/BICAP)
  1. ;;ANOSCOPY
  1. ;;ARRHYTHMIA INDUCTION BY PACING
  1. ;;ARTERIAL BLOOD GASES
  1. ;;ARTERIAL CANNULATION
  1. ;;ARTERIAL PUNCTURE
  1. ;;ARTHROC.ASPIR.INJ.INT.JT.BUR
  1. ;;ARTHROC.ASPIR.INJ.MAJ.JT.BUR
  1. ;;ARTHROCENT.ASPIR.INJ.SM.JT.BUR
  1. ;;ASPIRATION
  1. ;;BIOPSY
  1. ;;BIOPSY LUNG, PERCUTANEOUS NDL
  1. ;;BIOPSY, PLEURA
  1. ;;BONE MARROW
  1. ;;BONE MARROW INTERPRETATION
  1. ;;BRONC DIAGNOSTIC W/BAL
  1. ;;BRONC W/BRONC WASHING
  1. ;;BRONC W/TRANSBRONC LUNG BX
  1. ;;BRONCHIAL BRUSH
  1. ;;BRONCHOSCOPY W/BRONCH BIOPSY
  1. ;;BRONCHOSCOPY W/WANG NEEDLE
  1. ;;BRONCHOSCOPY, LASER
  1. ;;BRONCHOSCOPY, STENT PLACEMENT
  1. ;;BRONCHOSCOPY, THERAPEUTIC
  1. ;;BRONCOSCOPY/FB REMOVAL
  1. ;;C&P EXAM
  1. ;;CARDIAC CATHETERIZATION
  1. ;;CARDIAC REHAB W/O ECG MON
  1. ;;CARDIAC REHAB/W ECG MON
  1. ;;CARDIOPULMONARY REHABILITATION
  1. ;;CARDIOVERSION, ELECTIVE
  1. ;;CENTRAL VENOUS CANNULATION
  1. ;;CHEMOTHERAPY
  1. ;;COL ABL (OTHR THAN SNARE/BI)
  1. ;;COL BIOPSY
  1. ;;COL CONTROL HEM.
  1. ;;COL DIAGNOSTIC (BRUSHINGS)
  1. ;;COL HOT BIOPSY(IES)
  1. ;;COL REMOVAL FB
  1. ;;COL SNARE
  1. ;;COLONOSCOPY
  1. ;;COMPREHENSIVE EP EVALUATION
  1. ;;CPAP/BIPAP VENTILATION
  1. ;;DIALYSIS PROCEDURES, HEMO
  1. ;;DIALYSIS TRAINING/COMPLETE
  1. ;;DIFFUSION
  1. ;;DILUTION STUDIES FOR CO MEAS
  1. ;;ECG
  1. ;;ECG (EKG), RHYTHM STRIP
  1. ;;ECG 12 LEAD
  1. ;;ECG 24 HOUR HOLTER MONITOR
  1. ;;ECG MONITORING
  1. ;;ECG WITH INTERPRETATION
  1. ;;ECG, EVENT RECORDER
  1. ;;ECG, RHYTHM TRACING
  1. ;;ECG, SIGNAL AVERAGE
  1. ;;ECHO
  1. ;;ECHO TRANSESOPHOGEAL SINGLE PL
  1. ;;ECHO, 2D M-MODE
  1. ;;ECHO, DOPPLER COLOR FLOW
  1. ;;ECHO, DOPPLER, COMPLETE
  1. ;;ECHO, TRANSESOPHOGEAL
  1. ;;ECHO, TRANSESOPHOGEAL BIPLANE
  1. ;;ECHO, TRANSTHORACIC
  1. ;;EGD
  1. ;;EGD ABL (OTH THAN SNARE/BI)
  1. ;;EGD BAND LIGATION
  1. ;;EGD BIOPSY
  1. ;;EGD DIAGNOSTIC (BRUSHINGS)
  1. ;;EGD DILATION BALLOON
  1. ;;EGD DILATION WIRE
  1. ;;EGD FOREIGN BODY
  1. ;;EGD HOT BIOPSY(IES) / BICAP
  1. ;;EGD INJECTION / SCLEROSIS
  1. ;;EGD SNARE/SINGLE
  1. ;;EGD TUBE/STENT
  1. ;;EKG, ROUTINE (12 LEADS)
  1. ;;ENDO OF BOWEL POUCH W/ BIOPSY
  1. ;;ENDOMYOCARDIAL BIOPSY
  1. ;;ENDOSCOPIC ULTRASOUND
  1. ;;ENDOSCOPIC ULTRASOUND, BIOPSY
  1. ;;ENDOSCOPY OF BOWEL POUCH
  1. ;;ENDOTRACHEAL INTUBATION
  1. ;;ENTEROSCOPY
  1. ;;EP EVAL OF CARDIO/DEFIB LEADS
  1. ;;EP EVAL OF CARDIOVERTER/DEFIB
  1. ;;EP EVAL W/ ARRHYTHMIA INDUCT
  1. ;;EP EVAL W/ L ATRIAL RECORD
  1. ;;EP EVAL W/ L VENTRIC RECORD
  1. ;;EP FOLLOWUP STUDY W/PACING
  1. ;;EP STUDY
  1. ;;EPICARDIAL/ENDOCARDIAL MAPPING
  1. ;;ERCP
  1. ;;ERCP ABL (OTHR THAN SN/BI)
  1. ;;ERCP BALLOON DILATION
  1. ;;ERCP BIOPSY
  1. ;;ERCP DEST STONES
  1. ;;ERCP DIAGNOSTIC (BRUSHINGS)
  1. ;;ERCP DRAIN, TUBE
  1. ;;ERCP INSERTION OF TUBE/STENT
  1. ;;ERCP PRESSURE OF ODDI
  1. ;;ERCP REM STONES
  1. ;;ERCP RMV FB OR CHG OF TUBE
  1. ;;ERCP SPHINCTEROTOMY
  1. ;;ES ABLATION (OTHER)
  1. ;;ES BAND LIGATION
  1. ;;ES BIOPSY
  1. ;;ES CONTROL BLEEDING
  1. ;;ES DIAGNOSTIC ENDO (BRUSHINGS)
  1. ;;ES DILATION (BALLOON)
  1. ;;ES DILATION (WIRE)
  1. ;;ES HOT BIOPSY(IES)
  1. ;;ES INJECTION / SCLEROSIS
  1. ;;ES INSERTION TUBE/STENT
  1. ;;ES REMOVAL FB
  1. ;;ES SNARE
  1. ;;ESOPHAGEAL DILATION
  1. ;;ESOPHAGEAL MOTILITY STUDY
  1. ;;ESOPHAGEAL RECORDING
  1. ;;ESOPHAGUS
  1. ;;ETT
  1. ;;ETT W/ O2 CONSUMPTION
  1. ;;ETT W/ THALLIUM SCAN
  1. ;;EXAM,SYNOVIAL FLUID CRYSTALS
  1. ;;EXCERCISE CHALLENGE
  1. ;;FINE NEEDLE ASPIRATION
  1. ;;FLEX SIG
  1. ;;FLOW VOLUME LOOP
  1. ;;FLX ABLATION (OTHER)
  1. ;;FLX BIOPSY
  1. ;;FLX CONTROL HEM.
  1. ;;FLX DECOMPRESS VOLVULUS
  1. ;;FLX DIAGNOSTIC (BRUSHINGS)
  1. ;;FLX HOT BIOPSY(IES)
  1. ;;FLX REMOVAL FB
  1. ;;FLX SNARE
  1. ;;FRC
  1. ;;FT CHANGE OF G TUBE
  1. ;;FT EGD FOR PEG PLACEMENT
  1. ;;FT PERC PLACEMENT OF G TUBE
  1. ;;FT REPOS TUBE THRU DUODENUM
  1. ;;FT SM INT ENDO CONV G-J TUBE
  1. ;;FT SM INT ENDO J TUBE PLACE
  1. ;;HEART RATE VAR. ANALYSIS
  1. ;;HEMODIALYSIS, ONE EVAL
  1. ;;HEMODIALYSIS, REPEATED EVAL.
  1. ;;HOLTER
  1. ;;I & D /DEBRIDEMENT
  1. ;;ICD IMPLANTATION
  1. ;;ICD INTERROGATION
  1. ;;ILEOSCOPY THROUGH STOMA
  1. ;;ILEOSCOPY W/ BIOPSY
  1. ;;INFUSION 1-8 HRS.
  1. ;;INFUSION TO 1 HR.
  1. ;;INJ FOR ANGIOGRAPHY
  1. ;;INJ FOR AV BYPASS GRAFTS
  1. ;;INJ TENDON/LIGAMENT/CYST
  1. ;;INJECTION, CARDIAC CATH
  1. ;;INTRA-ATRIAL PACING
  1. ;;INTRA-ATRIAL RECORDING
  1. ;;INTRAVENTRICULAR PACING
  1. ;;INTRODUCTION OF NEEDLE/CATH
  1. ;;IV FLUID THERAPY
  1. ;;IV INFUSION
  1. ;;IV PUSH
  1. ;;IV THER. 1-8 HRS.
  1. ;;IV THER. UP TO 1 HR.
  1. ;;LASER SURGERY (NOT YAG)
  1. ;;LEFT HEART CATHETERIZATIION
  1. ;;LEFT VENTRICULAR RECORDING
  1. ;;LIVER BIOPSY
  1. ;;LUNG COMPLIANCE
  1. ;;MECHANICAL VENTILATION
  1. ;;METHACHOLINE CHALLENGE
  1. ;;MONITOR W/ REVIEW & REPORT
  1. ;;OVER GUIDE WIRE
  1. ;;PACEMAKE IMPLANTATION
  1. ;;PACEMAKER
  1. ;;PACEMAKER FOLLOW UP
  1. ;;PACEMAKER, RHYTHM STRIP
  1. ;;PARACENTESIS
  1. ;;PERIPH BLOOD SMEAR INTERPRET
  1. ;;PHLEBOTOMY
  1. ;;PLACE CATHETER IN VEIN, HEMO
  1. ;;PLEURODESIS
  1. ;;PNEU BALLOON (30MM+) ACHALASIA
  1. ;;PROC ABLATION (OTHER)
  1. ;;PROC BIOPSY
  1. ;;PROC CONTROL BLEEDING
  1. ;;PROC DIAGNOSTIC (BRUSHINGS)
  1. ;;PROC DILATION
  1. ;;PROC HOT BIOPSY(IES)
  1. ;;PROC REMOVAL FB
  1. ;;PROC SNARE
  1. ;;PROC TUMORS, MULT (HOT/SN/BI)
  1. ;;PROCTOSCOPY
  1. ;;PROGRAMMED STIMULATION/PACING
  1. ;;PSEUDOFOLLICULAR SCAN
  1. ;;PULMONARY ARTERY CATHETER
  1. ;;PULMONARY FUNCTION INTERPRET
  1. ;;PULMONARY PROCEDURES
  1. ;;PULSE OXIMETRY MULTIPLE REHAB
  1. ;;PULSE OXIMETRY SINGLE REHAB
  1. ;;PULSE OXIMETRY, MULTIPLE
  1. ;;RHEUMATOLOGY PROCEDURES
  1. ;;RIGHT HEART CATHETERIZATION
  1. ;;RIGHT VENTRICULAR RECORDING
  1. ;;RT & LT HEART CATHETERS
  1. ;;SB ENDO W/ABLATION
  1. ;;SB ENDO W/BLEEDING CONTROL
  1. ;;SB ENDO W/FB REMOVAL
  1. ;;SB ENDO W/HOT BIOPSIES
  1. ;;SB ENDO W/INCL ILEUM
  1. ;;SB ENDO W/INCL ILEUM,BIOPSY
  1. ;;SB ENDO W/INCL ILEUM,BLD CONT
  1. ;;SB ENDO W/TUMORS (SNARE)
  1. ;;SCREENING, MAMMOGRAM
  1. ;;SCREENS AND INJ, ANTI-COAG
  1. ;;SLOW VITAL CAPACITY
  1. ;;SMALL BOWEL ENDOSCOPY
  1. ;;SMALL BOWEL ENDOSCOPY,BIOPSY
  1. ;;SOUND/BOUGIE;SINGLE/MULT
  1. ;;SPIROMETRY
  1. ;;SPIROMETRY, PRE & POST
  1. ;;STO ABLATION
  1. ;;STO BIOPSY
  1. ;;STO CONTROL HEM.
  1. ;;STO DIAG/BRUSHING
  1. ;;STO FOREIGN BODY
  1. ;;STO HOT BIOPSY(IES)
  1. ;;STO SNARE
  1. ;;STOMA
  1. ;;STRESS TEST, ECHO IMAGING
  1. ;;STRESS TEST, EXER (NON-IMAGE)
  1. ;;STRESS TEST, NUCLEAR IMAGING
  1. ;;SUBCUT./IM
  1. ;;SYMPTOM LIMITED EXERCISE TEST
  1. ;;THORACENTESIS
  1. ;;THORACIC GAS VOLUME
  1. ;;THORACOSTOMY
  1. ;;THRESHOLD TEST (DUAL)
  1. ;;THRESHOLD TEST (SGL)
  1. ;;TILT TABLE TEST FOR SYNCOPE
  1. ;;TRANS. BLOOD
  1. ;;TRANS. INDWELL. VEN. ACC. CARE
  1. ;;TRANS. THERAPEUTIC APHERESIS
  1. ;;TRANSFUSION
  1. ;;VENIPUNCTURE (ROUTINE), HEMO
  1. ;;**END**