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

ADE6P252.m

Go to the documentation of this file. 
  1. ADE6P252 ;IHS/OIT/GAB - ADE6.0 PATCH 25 [ 11/13/2013  2:35 PM ]
  1.  ;;6.0;ADE*6.0*25;;Nov 14, 2013;Build 4
  1.  ;;ADA Code Update
  1.  ;;Modification of Code
  1. MODCDT5 ;EP
  1.  D UPDATE^ADEUPD25(9999999.31,".01,,.02",1101,"?+1,","MODADA^ADE6P252","SETX^ADE6P252")
  1.  Q
  1.  ;
  1. SETX ;EP
  1.  I $G(ADERPEAT) D  Q:ADERPEAT
  1.  .S:ADERPEAT=1 ADECURX=ADEX,ADERPEAT=2
  1.  .S ADEN=$O(^AUTTADA("B",ADEN)) I ADEN'?1N.N!(ADEN]ADEEND) S ADERPEAT=0,ADEX=ADECURX,ADEN="" Q
  1.  .S ADEX=ADESVX,$P(ADEX,U)=ADEN,ADERPEAT=2
  1.  Q:ADEDONE
  1.  I $P(ADEX,U)["-" D  Q:'ADERPEAT
  1.  .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)
  1.  .S ADEN=$O(^AUTTADA("B",ADEN)) I ADEN'?1N.N!(ADEN]ADEEND) S ADERPEAT=0,ADEN="" Q
  1.  .S $P(ADEX,U)=ADEN
  1.  I 'ADERPEAT S ADEN=$P($P(ADEX,U),"D",2),$P(ADEX,U)=ADEN
  1.  S $P(ADEX,U,3)=$TR($P(ADEX,U,3),"abcdefghijklmnopqrstuvwxyz","ABCDEFGHIJKLMNOPQRSTUVWXYZ")
  1.  S:ADERPEAT ADESVX=ADEX
  1.  Q
  1.  ;
  1. MODADA ;  Code^Nomenclature    /   Descriptor on next line
  1.  ;;D0350^^oral/facial photographic images obtained intraorally or extraorally
  1.  ;;D2950^^core buildup, including any pins when required
  1.  ;;Refers to building up of coronal structure when there is insufficient retention 
  1.  ;;for a separate extracoronal restorative procedure.  A core buildup is not a filler
  1.  ;;to eliminate any undercut, box form, or concave irregularity in a preparation.
  1.  ;;D3351^^apexification/recalcification - initial visit (apical closure/calcific repair of perforations, root resorption, pulp space disinfection, etc.)
  1.  ;;Includes opening tooth, preparation of canal spaces, first placement of medication 
  1.  ;;and necessary radiographs.  (This procedure may include first phase of complete root 
  1.  ;;canal therapy.)
  1.  ;;D3352^^apexification/recalcification - interim medication replacement (apical closure/calcific repair of perforations, root resorption, pulp space disinfection, etc.)
  1.  ;;For visits in which the intra-canal medication is replaced with new medication.  
  1.  ;;Includes any necessary radiographs.
  1.  ;;D3410^^apicoectomy - anterior
  1.  ;;For surgery on root of anterior tooth.  Does not include placement of retrograde filling material.
  1.  ;;D3421^^apicoectomy - bicuspid (first root)
  1.  ;;For surgery on one root of a bicuspid.  Does not include placement of retrograde filling material. If more than one root is treated, see D3426.
  1.  ;;D3425^^apicoectomy - molar (first root)
  1.  ;;For surgery on one root of a molar tooth.  Does not include placement of retrograde 
  1.  ;;filling material. If more than one root is treated, see D3426.
  1.  ;;D3426^^apicoectomy (each additional root)
  1.  ;;Typically used for bicuspids and molar surgeries when more than one root is treated 
  1.  ;;during the same procedure.  This does not include retrograde filling material placement.
  1.  ;;D4263^^bone replacement graft - first site in quadrant
  1.  ;;This procedure involves the use of grafts to stimulate periodontal regeneration when 
  1.  ;;the disease process has led to a deformity of the bone.  This procedure does not include 
  1.  ;;flap entry and closure, wound debridement, osseous contouring, or the placement of 
  1.  ;;biologic materials to aid in osseous tissue regeneration or barrier membranes.  
  1.  ;;Other separate procedures delivered concurrently are documented with their own codes.
  1.  ;;D4264^^bone replacement graft - each additional site in quadrant
  1.  ;;This procedure involves the use of grafts to stimulate periodontal regeneration 
  1.  ;;when the disease process has led to a deformity of the bone. This procedure does 
  1.  ;;not include flap entry and closure, wound debridement, osseous contouring, or the 
  1.  ;;placement of biologic materials to aid in osseous tissue regeneration or barrier 
  1.  ;;membranes. This procedure is performed concurrently with one or more bone replacement
  1.  ;;grafts to document the number of sites involved.
  1.  ;;D4920^^unscheduled dressing change (by someone other than treating dentist or their staff)
  1.  ;;D5991^^vesiculobullous disease medicament carrier
  1.  ;;A custom fabricated carrier that covers the teeth and alveolar mucosa, or alveolar 
  1.  ;;mucosa alone, and is used to deliver prescription medicaments for treatment of 
  1.  ;;immunologically mediated vesiculobullous disease.
  1.  ;;D6010^^surgical placement of implant body: endosteal implant
  1.  ;;D6080^^implant maintenance procedures when prostheses are removed and reinserted, including cleansing of prostheses and abutments
  1.  ;;This procedure includes active debriding of the implant(s) and examination of all 
  1.  ;;aspects of the implant system(s), including the occlusion and stability of the 
  1.  ;;superstructure.  The patient is also instructed in thorough daily cleansing of 
  1.  ;;the implant(s).  This is not a per implant code, and is indicated for implant 
  1.  ;;supported fixed prostheses.
  1.  ;;D7950^^osseous, osteoperiosteal, or cartilage graft of the mandible or maxilla - autogenous or nonautogenous, by report
  1.  ;;This procedure is for ridge augmentation or reconstruction to increase height, 
  1.  ;;width and/or volume of residual alveolar ridge.  It includes obtaining graft 
  1.  ;;material.  Placement of a barrier membrane, if used, should be reported separately.
  1.  ;;D7953^^bone replacement graft for ridge preservation - per site 
  1.  ;;Graft is placed in an extraction or implant removal site at the time of the 
  1.  ;;extraction or removal to preserve ridge integrity (e.g., clinically indicated 
  1.  ;;in preparation for implant reconstruction or where alveolar contour is critical 
  1.  ;;to planned prosthetic reconstruction).  Does not include obtaining graft material.  
  1.  ;;Membrane, if used should be reported separately.
  1.  ;;D7955^^repair of maxillofacial soft and/or hard tissue defect
  1.  ;;Reconstruction of surgical, traumatic, or congenital defects of the facial bones, 
  1.  ;;including the mandible, may utilize graft materials in conjunction with soft tissue 
  1.  ;;procedures to repair and restore the facial bones to form and function.  This does 
  1.  ;;not include obtaining the graft and these procedures may require multiple surgical 
  1.  ;;approaches.  This procedure does not include edentulous maxilla and mandibular 
  1.  ;;reconstruction for prosthetic considerations.
  1.  ;;D8693^^rebonding or recementing of fixed retainers
  1.  ;;D0363^^cone beam - three-dimensional image reconstruction using existing data, includes multiple images
  1.  ;;D3354^^pulpal regeneration - (completion of regenerative treatment in an immature permanent tooth with a necrotic pulp); does not include final restoration
  1.  ;;Includes removal of intra-canal medication and procedures necessary to regenerate 
  1.  ;;continued root development and necessary radiographs.  This procedure includes 
  1.  ;;placement of a seal at the coronal portion of the root canal system.  Conventional 
  1.  ;;root canal treatment is not performed.
  1.  ;;D5860^^overdenture - complete, by report
  1.  ;;Describe and document procedures as performed.  Other separate procedures may be 
  1.  ;;required concurrent to D5860.
  1.  ;;D5861^^overdenture - partial, by report
  1.  ;;Describe and document procedures as performed.  Other separate procedures may be 
  1.  ;;required concurrent to D5861.
  1.  ;;***END***