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

Package: Medicine

ANATOMY(#697)-->697.02

Sub-Field: 697.02


Information

Parent File Name Number Package
ANATOMY(#697) PROCEDURE NAME 697.02 Medicine

Details

Field # Name Loc Type Details
.01 PROCEDURE NAME 0;1 FREE TEXT

  • INPUT TRANSFORM:  I $D(X) N DO,DIC,DIX,Y S DIC="^MCAR(697.2,",DIC(0)="QEZ" D ^DIC S:+Y'=-1 X=$P(Y,U,2) K:+Y<0 X
  • LAST EDITED:  AUG 20, 1997
  • HELP-PROMPT:  Enter name of Procedure to match that in the Procedure/Subspecialty File.
  • DESCRIPTION:  
    This is a "free-text" pointer to the Procedure/Subspecialty File (#697.2).
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  697.02^B
    1)= S ^MCAR(697,DA(1),2,"B",$E(X,1,30),DA)=""
    2)= K ^MCAR(697,DA(1),2,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  697^D
    1)= S ^MCAR(697,"D",$E(X,1,30),DA(1),DA)=""
    2)= K ^MCAR(697,"D",$E(X,1,30),DA(1),DA)
    This cross-reference allow looks-up on procedure name.
Info |  Details |  All