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: 70.1

Package: Radiology Nuclear Medicine

RAD/NUC MED PATIENT(#70)-->70.02-->70.03-->70.1

Sub-Field: 70.1


Information

Parent File Name Number Package
70.03 PROCEDURE MODIFIERS 70.1 Radiology Nuclear Medicine

Details

Field # Name Loc Type Details
.01 PROCEDURE MODIFIERS 0;1 POINTER TO PROCEDURE MODIFIERS FILE (#71.2) PROCEDURE MODIFIERS(#71.2)

  • INPUT TRANSFORM:  S DIC("S")="X ^DD(70.1,.01,9.2)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
    9.2 = N RASERIES I $D(^RAMIS(71.2,"AB",(+$$ITYPE^RASITE(+$P($G(^RADPT(D0,"DT",D1,"P",D2,0)),U,2))),+Y)),$S('$G(RASERIES):1,$P(^RAMIS(71.2,+Y,0),U,2)="":1,1:0)
  • LAST EDITED:  AUG 05, 1999
  • HELP-PROMPT:  Enter any appropriate procedure modifiers for this exam.
  • DESCRIPTION:  
    This field points to the 'PROCEDURE MODIFIERS' file (#71.2) to give details and further describe this exam. Modifier examples include, 'LEFT', 'RIGHT', 'BILATERAL', 'OPERATING ROOM',and 'PORTABLE' exams.
  • SCREEN:  S DIC("S")="X ^DD(70.1,.01,9.2)"
  • EXPLANATION:  Only procedure modifiers with the appropriate imaging type can be selected. In addition, if the procedure is 'SERIES', it must not have AMIS CREDIT INDICATOR
    SOURCE OF DATA: RECEPTIONIST
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  70.1^B
    1)= S ^RADPT(DA(3),"DT",DA(2),"P",DA(1),"M","B",$E(X,1,30),DA)=""
    2)= K ^RADPT(DA(3),"DT",DA(2),"P",DA(1),"M","B",$E(X,1,30),DA)
    3)= DO NOT DELETE
    Regular B cross-reference used for look-up.
Info |  Details