ADE6P175 ;IHS/OIT/ENM - ADE6.0 PATCH 17 [ 03/26/2007 9:29 AM ]
;;6.0;ADE;**17**;JAN 29, 2007
;
MODCDT5 ;EP
D UPDATE^ADEUPD7(9999999.31,".01,,.02",1101,"?+1,","MODADA^ADE6P175","SETX^ADE6P175")
;D UPDATE^ADEUPD7(9999999.31,".01,,.02",1101,"?+1,","MODADA^ADE6P173","SETX^ADE6P175")
;D MODEDT ;IHS/ENM NO NEED TO RUN THIS LINE IN P17
Q
;
MODEDT ;EP Modify DENTAL CODE EDIT GROUP and Reindex DENTAL EDIT file
;D UPDATE^ADEUPD7(9002007.91,".01,1",,"?+1,","EDITX^ADE6P175","SETEDX^ADE6P175")
;D REINDX
;
Q
SETEDX ;
S ADEN=$P(ADEX,U)
Q
;
EDITX ;Data for DENTAL CODE EDIT GROUP modifications
Q
;;PRIMARY TOOTH PROCEDURES^2121|2930|3230
;;
;;***END***
Q
;
REINDX ;EP Kill and Re-index AC, AD AND B Cross References on DENTAL EDIT file
;
N DIK
K ^ADEDIT("AC"),^ADEDIT("AD"),^ADEDIT("B")
S DIK="^ADEDIT("
D IXALL^DIK
Q
;
SETX ;EP
I $G(ADERPEAT) D Q:ADERPEAT
.S:ADERPEAT=1 ADECURX=ADEX,ADERPEAT=2
.S ADEN=$O(^AUTTADA("B",ADEN)) I ADEN'?1N.N!(ADEN]ADEEND) S ADERPEAT=0,ADEX=ADECURX,ADEN="" Q
.S ADEX=ADESVX,$P(ADEX,U)=ADEN,ADERPEAT=2
Q:ADEDONE
I $P(ADEX,U)["-" D Q:'ADERPEAT
.S ADERPEAT=1,ADESVX=ADEX,ADESTART=$P($P($P(ADEX,U),"-"),"D",2),ADEEND=$P($P($P(ADEX,U),"-",2),"D",2),ADEN=$O(^AUTTADA("B",ADESTART),-1)
.S ADEN=$O(^AUTTADA("B",ADEN)) I ADEN'?1N.N!(ADEN]ADEEND) S ADERPEAT=0,ADEN="" Q
.S $P(ADEX,U)=ADEN
I 'ADERPEAT S ADEN=$P($P(ADEX,U),"D",2),$P(ADEX,U)=ADEN
S $P(ADEX,U,3)=$TR($P(ADEX,U,3),"abcdefghijklmnopqrstuvwxyz","ABCDEFGHIJKLMNOPQRSTUVWXYZ")
S:ADERPEAT ADESVX=ADEX
Q
;
MODADA ;
;;D4265^65^biologic materials to aid in soft and osseous tissue regeneration^
;;Biologic materials may be used alone or with other regenerative substrates
;;such as bone and barrier membranes, depending upon their formulation and
;;the presentation of the periodontal defect. This procedure does not include
;;surgical entry and closure, wound debridement, osseous contouring, or the
;;placement of graft materials and/or barrier membranes. Other separate
;;procedures may be required concurrent to D4265 and should be reported using
;;their own unique codes.
;;D4266^57^guided tissue regeneration - resorbable barrier, per site^
;;A membrane is placed over the root surfaces or defect area following surgical
;;exposure and debridement. The mucoperiosteal flaps are then adapted over
;;the membrane and sutured. The membrane is placed to exclude epithelium and
;; gingival connective tissue from the healing wound. This procedure may require
;;subsequent surgical procedures to correct the gingival contours. Guided tissue
;; regeneration may also be carried out in conjunction with bone replacement
;;grafts or to correct deformities resulting from inadequate faciolingual bone width
;; in an edentulous area. When guided tissue regeneration is used in association
;; with a tooth, each site on a specific tooth should be reported separately. Other
;; separate procedures may be required concurrent to D4266 and should be
;;reported using their own unique codes. Definition for the term "site" precedes
;; code D4210.
;;D4267^87^guided tissue regeneration - nonresorbable barrier, per site (includes membrane removal)^
;;This procedure is used to regenerate lost or injured periodontal tissue by
;; directing differential tissue responses. A membrane is placed over the root
;;surfaces or defect area following surgical exposure and debridement. The
;;mucoperiosteal flaps are then adapted over the membrane and sutured.
;;This procedure does not include flap entry and closure, wound debridement,
;;osseous contouring, bone replacement grafts, or the placement of biologic
;;materials to aid in osseous tissue regeneration. The membrane is placed to
;;exclude epithelium and gingival connective tissue from the healing wound.
;;This procedure requires subsequent surgical procedures to remove the
;;membranes and/or to correct the gingival contours. Guided tissue regeneration
;;may be used in conjunction with bone replacement grafts or to correct
;;deformities resulting from inadequate faciolingual bone width in an edentulous
;;area. When guided tissue regeneration is used in association with a tooth,
;;each site on a specific tooth should be reported separately with this code.
;;When no tooth is present, each site should be reported separately. Other
;;separate procedures may be required concurrent to D4267 and should be
;;reported using their own unique codes. Definition for the term "site"
;;precedes code D4210.
;;D6970^81^post and core in addition to fixed partial denture retainer, indirectly fabricated^
;;Post and core are custom fabricated as a single unit.
;;D6976^55^each additional indirectly fabricated post - same tooth^
;;To be used with D6970.
;;D7310^94^alveoloplasty in conjunction with extractions four or more teeth or tooth spaces, per quadrant^
;;Usually in preparation for a prosthesis.
;;D7320^98^alveoloplasty not in conjunction with extractions four or more teeth or tooth spaces, per quadrant^
;;No extractions performed in an edentulous area. See D7310 if teeth are being
;;extracted concurrently with the alveoplasty.
;;D7944^34^osteotomy - segmented or subapical^
;;Report by range of tooth numbers within segment.
;;D7950^112^osseous, osteoperiosteal, or cartilage graft of the mandible or maxilla - autogenous or nonautogenous, by report^
;;This code may be used for ridge augmentation or reconstruction to increase
;;height, width and/or volume or residual alveolar ridge. It includes obtaining
;;autograft and/or allograft material. Placement of a barrier membrane, if used,
;; should be reported separately.
;;D7953^55^bone replacement graft for ridge preservation per site^
;;Osseous autograft, allograft or non-osseous graft is placed in an extraction
;;site at the time of the extraction to preserve ridge integrity (e.g., clinically
;;indicated in preparation for implant reconstruction or where alveolar contour
;;is critical to planned prosthetic reconstruction). Membrane, if used should
;;be reported separately.
;;7955^54^repair of maxillofacial soft and/or hard tissue defect^
;;Reconstruction of surgical, traumatic, or congenital defects of the facial
;;bones, including the mandible, may utilize autograft, allograft, or alloplastic
;; materials in conjunction with soft tissue procedures to repair and restore
;;the facial bones to form and function. This does not include obtaining the
;;graft and these procedures may require multiple surgical approaches.
;;This procedure does not include edentulous maxilla and mandibular
;;reconstruction for prosthetic considerations. See code D7950.
;;D9310^109^consultation - diagnostic service provided by dentist or physician other than requesting dentist or physician^
;;A patient encounter with a practitioner whose opinion or advice regarding
;;evaluation and/or management of a specific problem; may be requested by
;;another practitioner or appropriate source. The consultation includes an
;;oral evaluation. The consulted practitioner may initiate diagnostic and/or
;;therapeutic services.
;;D9610^50^therapeutic parenteral drug, single administration^
;;Includes single administration of antibiotics, steroids, anti-inflammatory
;;drugs, or other therapeutic medications. This code should not be used
;;to report administration of sedative, anesthetic or reversal agents.
;;D9951^29^occlusal adjustment - limited^
;;May also be known as equilibration; reshaping the occlusal surfaces of
;;teeth to create harmonious contact relationships between the maxillary
;;and mandibular teeth. Presently includes discing/odontoplasty/enamoplasty.
;; Typically reported on a "per visit" basis. This should not be reported when
;;the procedure only involves bite adjustment in the routine post-delivery care
;;for a direct/indirect restoration or fixed/removable prosthodontics.
;;
;;***END***
ADE6P175 ;IHS/OIT/ENM - ADE6.0 PATCH 17 [ 03/26/2007 9:29 AM ]
+1 ;;6.0;ADE;**17**;JAN 29, 2007
+2 ;
MODCDT5 ;EP
+1 DO UPDATE^ADEUPD7(9999999.31,".01,,.02",1101,"?+1,","MODADA^ADE6P175","SETX^ADE6P175")
+2 ;D UPDATE^ADEUPD7(9999999.31,".01,,.02",1101,"?+1,","MODADA^ADE6P173","SETX^ADE6P175")
+3 ;D MODEDT ;IHS/ENM NO NEED TO RUN THIS LINE IN P17
+4 QUIT
+5 ;
MODEDT ;EP Modify DENTAL CODE EDIT GROUP and Reindex DENTAL EDIT file
+1 ;D UPDATE^ADEUPD7(9002007.91,".01,1",,"?+1,","EDITX^ADE6P175","SETEDX^ADE6P175")
+2 ;D REINDX
+3 ;
+4 QUIT
SETEDX ;
+1 SET ADEN=$PIECE(ADEX,U)
+2 QUIT
+3 ;
EDITX ;Data for DENTAL CODE EDIT GROUP modifications
+1 QUIT
+2 ;;PRIMARY TOOTH PROCEDURES^2121|2930|3230
+3 ;;
+4 ;;***END***
+5 QUIT
+6 ;
REINDX ;EP Kill and Re-index AC, AD AND B Cross References on DENTAL EDIT file
+1 ;
+2 NEW DIK
+3 KILL ^ADEDIT("AC"),^ADEDIT("AD"),^ADEDIT("B")
+4 SET DIK="^ADEDIT("
+5 DO IXALL^DIK
+6 QUIT
+7 ;
SETX ;EP
+1 IF $GET(ADERPEAT)
Begin DoDot:1
+2 IF ADERPEAT=1
SET ADECURX=ADEX
SET ADERPEAT=2
+3 SET ADEN=$ORDER(^AUTTADA("B",ADEN))
IF ADEN'?1N.N!(ADEN]ADEEND)
SET ADERPEAT=0
SET ADEX=ADECURX
SET ADEN=""
QUIT
+4 SET ADEX=ADESVX
SET $PIECE(ADEX,U)=ADEN
SET ADERPEAT=2
End DoDot:1
IF ADERPEAT
QUIT
+5 IF ADEDONE
QUIT
+6 IF $PIECE(ADEX,U)["-"
Begin DoDot:1
+7 SET ADERPEAT=1
SET ADESVX=ADEX
SET ADESTART=$PIECE($PIECE($PIECE(ADEX,U),"-"),"D",2)
SET ADEEND=$PIECE($PIECE($PIECE(ADEX,U),"-",2),"D",2)
SET ADEN=$ORDER(^AUTTADA("B",ADESTART),-1)
+8 SET ADEN=$ORDER(^AUTTADA("B",ADEN))
IF ADEN'?1N.N!(ADEN]ADEEND)
SET ADERPEAT=0
SET ADEN=""
QUIT
+9 SET $PIECE(ADEX,U)=ADEN
End DoDot:1
IF 'ADERPEAT
QUIT
+10 IF 'ADERPEAT
SET ADEN=$PIECE($PIECE(ADEX,U),"D",2)
SET $PIECE(ADEX,U)=ADEN
+11 SET $PIECE(ADEX,U,3)=$TRANSLATE($PIECE(ADEX,U,3),"abcdefghijklmnopqrstuvwxyz","ABCDEFGHIJKLMNOPQRSTUVWXYZ")
+12 IF ADERPEAT
SET ADESVX=ADEX
+13 QUIT
+14 ;
MODADA ;
+1 ;;D4265^65^biologic materials to aid in soft and osseous tissue regeneration^
+2 ;;Biologic materials may be used alone or with other regenerative substrates
+3 ;;such as bone and barrier membranes, depending upon their formulation and
+4 ;;the presentation of the periodontal defect. This procedure does not include
+5 ;;surgical entry and closure, wound debridement, osseous contouring, or the
+6 ;;placement of graft materials and/or barrier membranes. Other separate
+7 ;;procedures may be required concurrent to D4265 and should be reported using
+8 ;;their own unique codes.
+9 ;;D4266^57^guided tissue regeneration - resorbable barrier, per site^
+10 ;;A membrane is placed over the root surfaces or defect area following surgical
+11 ;;exposure and debridement. The mucoperiosteal flaps are then adapted over
+12 ;;the membrane and sutured. The membrane is placed to exclude epithelium and
+13 ;; gingival connective tissue from the healing wound. This procedure may require
+14 ;;subsequent surgical procedures to correct the gingival contours. Guided tissue
+15 ;; regeneration may also be carried out in conjunction with bone replacement
+16 ;;grafts or to correct deformities resulting from inadequate faciolingual bone width
+17 ;; in an edentulous area. When guided tissue regeneration is used in association
+18 ;; with a tooth, each site on a specific tooth should be reported separately. Other
+19 ;; separate procedures may be required concurrent to D4266 and should be
+20 ;;reported using their own unique codes. Definition for the term "site" precedes
+21 ;; code D4210.
+22 ;;D4267^87^guided tissue regeneration - nonresorbable barrier, per site (includes membrane removal)^
+23 ;;This procedure is used to regenerate lost or injured periodontal tissue by
+24 ;; directing differential tissue responses. A membrane is placed over the root
+25 ;;surfaces or defect area following surgical exposure and debridement. The
+26 ;;mucoperiosteal flaps are then adapted over the membrane and sutured.
+27 ;;This procedure does not include flap entry and closure, wound debridement,
+28 ;;osseous contouring, bone replacement grafts, or the placement of biologic
+29 ;;materials to aid in osseous tissue regeneration. The membrane is placed to
+30 ;;exclude epithelium and gingival connective tissue from the healing wound.
+31 ;;This procedure requires subsequent surgical procedures to remove the
+32 ;;membranes and/or to correct the gingival contours. Guided tissue regeneration
+33 ;;may be used in conjunction with bone replacement grafts or to correct
+34 ;;deformities resulting from inadequate faciolingual bone width in an edentulous
+35 ;;area. When guided tissue regeneration is used in association with a tooth,
+36 ;;each site on a specific tooth should be reported separately with this code.
+37 ;;When no tooth is present, each site should be reported separately. Other
+38 ;;separate procedures may be required concurrent to D4267 and should be
+39 ;;reported using their own unique codes. Definition for the term "site"
+40 ;;precedes code D4210.
+41 ;;D6970^81^post and core in addition to fixed partial denture retainer, indirectly fabricated^
+42 ;;Post and core are custom fabricated as a single unit.
+43 ;;D6976^55^each additional indirectly fabricated post - same tooth^
+44 ;;To be used with D6970.
+45 ;;D7310^94^alveoloplasty in conjunction with extractions four or more teeth or tooth spaces, per quadrant^
+46 ;;Usually in preparation for a prosthesis.
+47 ;;D7320^98^alveoloplasty not in conjunction with extractions four or more teeth or tooth spaces, per quadrant^
+48 ;;No extractions performed in an edentulous area. See D7310 if teeth are being
+49 ;;extracted concurrently with the alveoplasty.
+50 ;;D7944^34^osteotomy - segmented or subapical^
+51 ;;Report by range of tooth numbers within segment.
+52 ;;D7950^112^osseous, osteoperiosteal, or cartilage graft of the mandible or maxilla - autogenous or nonautogenous, by report^
+53 ;;This code may be used for ridge augmentation or reconstruction to increase
+54 ;;height, width and/or volume or residual alveolar ridge. It includes obtaining
+55 ;;autograft and/or allograft material. Placement of a barrier membrane, if used,
+56 ;; should be reported separately.
+57 ;;D7953^55^bone replacement graft for ridge preservation per site^
+58 ;;Osseous autograft, allograft or non-osseous graft is placed in an extraction
+59 ;;site at the time of the extraction to preserve ridge integrity (e.g., clinically
+60 ;;indicated in preparation for implant reconstruction or where alveolar contour
+61 ;;is critical to planned prosthetic reconstruction). Membrane, if used should
+62 ;;be reported separately.
+63 ;;7955^54^repair of maxillofacial soft and/or hard tissue defect^
+64 ;;Reconstruction of surgical, traumatic, or congenital defects of the facial
+65 ;;bones, including the mandible, may utilize autograft, allograft, or alloplastic
+66 ;; materials in conjunction with soft tissue procedures to repair and restore
+67 ;;the facial bones to form and function. This does not include obtaining the
+68 ;;graft and these procedures may require multiple surgical approaches.
+69 ;;This procedure does not include edentulous maxilla and mandibular
+70 ;;reconstruction for prosthetic considerations. See code D7950.
+71 ;;D9310^109^consultation - diagnostic service provided by dentist or physician other than requesting dentist or physician^
+72 ;;A patient encounter with a practitioner whose opinion or advice regarding
+73 ;;evaluation and/or management of a specific problem; may be requested by
+74 ;;another practitioner or appropriate source. The consultation includes an
+75 ;;oral evaluation. The consulted practitioner may initiate diagnostic and/or
+76 ;;therapeutic services.
+77 ;;D9610^50^therapeutic parenteral drug, single administration^
+78 ;;Includes single administration of antibiotics, steroids, anti-inflammatory
+79 ;;drugs, or other therapeutic medications. This code should not be used
+80 ;;to report administration of sedative, anesthetic or reversal agents.
+81 ;;D9951^29^occlusal adjustment - limited^
+82 ;;May also be known as equilibration; reshaping the occlusal surfaces of
+83 ;;teeth to create harmonious contact relationships between the maxillary
+84 ;;and mandibular teeth. Presently includes discing/odontoplasty/enamoplasty.
+85 ;; Typically reported on a "per visit" basis. This should not be reported when
+86 ;;the procedure only involves bite adjustment in the routine post-delivery care
+87 ;;for a direct/indirect restoration or fixed/removable prosthodontics.
+88 ;;
+89 ;;***END***