Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details
Print Page as PDF
Sub-Field: 699.01

Package: Medicine

ENDOSCOPY/CONSULT(#699)-->699.01

Sub-Field: 699.01


Information

Parent File Name Number Package
ENDOSCOPY/CONSULT(#699) LOCATION EVALUATED 699.01 Medicine

Details

Field # Name Loc Type Details
.01 LOCATION EVALUATED 0;1 POINTER TO ANATOMY FILE (#697) ANATOMY(#697)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^MCAR(697,""D"",$G(MCARGNAM,U),+Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUL 30, 1992
  • HELP-PROMPT:  CHOOSE ONLY ANATOMIC LOCATIONS ASSOCIATED WITH THIS PROCEDURE.
  • DESCRIPTION:  
    This field identifies field records the anatomical location evaluated and records findings for the location evaluated.
  • TECHNICAL DESCR:  
    ORDER ENTRY TYPE: UNKNOWN
  • SCREEN:  S DIC("S")="I $D(^MCAR(697,""D"",$G(MCARGNAM,U),+Y))"
  • EXPLANATION:  Choose Anatomic Locations that apply only to the procedure
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  699.01^B
    1)= S ^MCAR(699,DA(1),30,"B",$E(X,1,30),DA)=""
    2)= K ^MCAR(699,DA(1),30,"B",$E(X,1,30),DA)
2 GROSS 0;3 POINTER TO GROSS FILE (#699.55) GROSS(#699.55)

  • INPUT TRANSFORM:  S DIC(0)="E",DIC("S")="I $D(^MCAR(699.55,""C"",$G(MCARGNUM,U),+Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  OCT 10, 1990
  • HELP-PROMPT:  Enter a descriptor of the findings from anatomical location.
  • DESCRIPTION:  
    This field identifies a descriptor of the findings on the anatomical location.
  • TECHNICAL DESCR:  
    ORDER ENTRY TYPE: UNKNOWN
  • SCREEN:  S DIC("S")="I $D(^MCAR(699.55,""C"",$G(MCARGNUM,U),+Y))"
  • EXPLANATION:  CHOOSE GROSS THAT APPLIES ONLY TO PROCEDURE
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
3 MODIFIER 1;0 POINTER Multiple #699.13 699.13

  • DESCRIPTION:  
    This field identifies a multiple adjective used to modify the Gross descriptor.
  • SCREEN:  S DIC("S")="I $D(^MCAR(699.57,""C"",$G(MCARGNUM,U),+Y))"
  • EXPLANATION:  CHOOSE ONLY MODIFIERS APPLICABLE TO PROCEDURE
4 MEASUREMENT 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
  • LAST EDITED:  OCT 10, 1990
  • HELP-PROMPT:  Enter Value and Unit. 1-15 Characters, e.g. 3mm,12 mm wide, 3x4 mm
  • DESCRIPTION:  
    This field identifies the size of the Gross finding (Ex: 4 cm; 4x3 cm; 4 cm high,etc.)
  • TECHNICAL DESCR:  
    ORDER ENTRY TYPE: UNKNOWN
5 TECHNIQUE 2;0 POINTER Multiple #699.15 699.15

  • DESCRIPTION:  
    This field identifies subfield indicates the technique(s) used to evaluate the anatomical location.
  • SCREEN:  S DIC("S")="I $D(^MCAR(699.6,""C"",$G(MCARGNUM,U),+Y))"
  • EXPLANATION:  CHOOSE ONLY TECHNIQUES THAT ARE APPLICABLE TO THE PROCEDURE
6 IMPRESSION 0;6 POINTER TO MEDICAL DIAGNOSIS/ICD CODES FILE (#697.5) MEDICAL DIAGNOSIS/ICD CODES(#697.5)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^MCAR(697.5,""A.""_$G(MCARGNAM,U),$P(^MCAR(697.5,+Y,0),U),+Y))",(D,MCDF)="A."_$G(MCARGNAM,U) D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  OCT 24, 1991
  • HELP-PROMPT:  Enter summary of findings for the location evaluation to assist with diagnosis.
  • DESCRIPTION:  
    This field identifies findings for the location evaluated. It then is placed on the list of possible diagnoses.
  • TECHNICAL DESCR:  
    ORDER ENTRY TYPE: UNKNOWN
  • SCREEN:  S DIC("S")="I $D(^MCAR(697.5,""A.""_$G(MCARGNAM,U),$P(^MCAR(697.5,+Y,0),U),+Y))",(D,MCDF)="A."_$G(MCARGNAM,U)
  • EXPLANATION:  CHOOSE ONLY ENTRIES APPLICABLE TO THE PROCEDURE
  • EXECUTABLE HELP:  Q:$D(DJJ) N DO S X="?",DIC(0)="X",DIC="^MCAR(697.5,",D="A."_MCARGNAM D MIX^DIC1
  • CROSS-REFERENCE:  699.01^AC^MUMPS
    1)= Q
    2)= D:$D(^MCAR(699,DA(1),27,"B",X)) EN1^MCARGD
    This X-Ref will delete a secondary diagnosis if the Impression is deleted and it had been entered as a secondary diagnosis.
10 VIDEO FRAME NUMBER 3;0 Multiple #699.02 699.02

  • DESCRIPTION:  
    This field identifies is not being used at the present time.
11 STENT TYPE 4;1 POINTER TO ENDOSCOPIC DEVICE FILE (#699.7) ENDOSCOPIC DEVICE(#699.7)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=""ST""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 11, 1991
  • HELP-PROMPT:  Enter Type of Stent used, pointer to Endoscopic Device File (#699.7).
  • DESCRIPTION:  
    This field identifies the type of stent used if INSERTION OF STENT is entered as a technique. Used for GI Endoscopies.
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)=""ST"""
  • EXPLANATION:  Choose Stent
12 STENT SIZE (FR) 4;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  OCT 10, 1990
  • HELP-PROMPT:  Type a Number between 0 and 9999, 0 Decimal Digits
  • DESCRIPTION:  
    This field identifies the size of stent used if INSERTION OF STENT is entered as a technique. Used for GI Endoscopies.
13 STENT LENGTH (mm) 4;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>6)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  OCT 10, 1990
  • HELP-PROMPT:  Type a Number between 1 and 6, 0 Decimal Digits
  • DESCRIPTION:  
    This field identifies the length of the stent used in millimeters if INSERTION OF STENT is entered as a technique. Used for GI Endoscopies.
14 SPHINCTEROTOME USED 4;4 POINTER TO ENDOSCOPIC DEVICE FILE (#699.7) ENDOSCOPIC DEVICE(#699.7)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=""SP""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 11, 1991
  • HELP-PROMPT:  Enter type of Sphincterotome, pointer to Endoscopic Device File (#699.7).
  • DESCRIPTION:  
    This field identifies the type of sphincterotome used if SPHINCTEROTOMY is entered as a technique. Used for GI Endoscopies.
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)=""SP"""
  • EXPLANATION:  Choose Sphincterotome
15 INCISION SIZE 4;5 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99.99)!(X<0)!(X?.E1"."3N.N) X
  • LAST EDITED:  OCT 10, 1990
  • HELP-PROMPT:  Type a Number between 0 and 99.99, 2 Decimal Digits
  • DESCRIPTION:  
    This field identifies the length of the incision made if SPHINCTEROTOMY is entered as a technique. Used for GI Endoscopies.
16 SAVARY BOUGIE DIAMETER 4;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<3) X
  • LAST EDITED:  JAN 11, 1991
  • HELP-PROMPT:  Answer must be 3-15 characters in length.
  • DESCRIPTION:  
    This field identifies the diameter of the savary bougie used if DILATION BY SAVARY BOUGIE is entered as a technique. Used for GI procedures.
17 HEATER PROBE: DURATION 4;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<3) X
  • LAST EDITED:  JAN 11, 1991
  • HELP-PROMPT:  Answer must be 3-20 characters in length.
  • DESCRIPTION:  
    This field identifies the length of time a heater probe is used if HEATER PROBE COAGULA- TION is entered as a technique. Used for GI procedures.
18 HEATER PROBE: POWER 4;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<3) X
  • LAST EDITED:  JAN 11, 1991
  • HELP-PROMPT:  Answer must be 3-15 characters in length.
  • DESCRIPTION:  
    This field identifies the power of the heater probe used if HEATER PROBE COAGULATION is entered as a technique. Used for GI procedures.
19 GASTROSTOMY TUBE USED 4;9 POINTER TO ENDOSCOPIC DEVICE FILE (#699.7) ENDOSCOPIC DEVICE(#699.7)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=""G""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 11, 1991
  • HELP-PROMPT:  Enter type of Gastrostomy Tube, pointer to Endoscopic Device File (#699.7).
  • DESCRIPTION:  
    This field identifies the specific tube used if GASTROSTOMY TUBE INSERTED is entered as a technique. Used for GI procedures.
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)=""G"""
  • EXPLANATION:  Choose Gastrostomy Tube
20 JEJUNOSTOMY TUBE INSERTED 4;10 POINTER TO ENDOSCOPIC DEVICE FILE (#699.7) ENDOSCOPIC DEVICE(#699.7)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=""J""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 11, 1991
  • HELP-PROMPT:  Enter Jejunostomy Tube (if used), pointer to Endoscopic Device File (#699.7).
  • DESCRIPTION:  
    This field identifies the specific tube used if JEJUNOSTOMY TUBE INSERTED is entered as a technique. Used for GI procedures.
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)=""J"""
  • EXPLANATION:  Choose Jejunostomy Tube
Info |  Details