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

Package: Radiology Nuclear Medicine

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

Sub-Field: 70.11


Information

Parent File Name Number Package
70.03 SECONDARY INTERPRETING STAFF 70.11 Radiology Nuclear Medicine

Details

Field # Name Loc Type Details
.01 SECONDARY INTERPRETING STAFF 0;1 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • INPUT TRANSFORM:  S DIC("S")="I $$SCRN^RAUTL8(.DA,""S"",+Y,""SEC""),$$SSR^RAUTL8" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  APR 28, 1997
  • HELP-PROMPT:  Enter name of staff who is NOT the Primary Interpreting Staff and NOT a Secondary Interpreting Staff whose name has already been entered.
  • DESCRIPTION:  This field points to the 'NEW PERSON' file (#200) to indicate the names of other interpreting Staff in addition to the Primary Interpreting Staff who interpreted images of this exam. Secondary Interpreting Staff
    must be classified as 'staff' and must have access to at least one imaging location with an imaging type matching that of the exam.
  • SCREEN:  S DIC("S")="I $$SCRN^RAUTL8(.DA,""S"",+Y,""SEC""),$$SSR^RAUTL8"
  • EXPLANATION:  Only active interpreting staff physicians may be selected
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  70.11^B
    1)= S ^RADPT(DA(3),"DT",DA(2),"P",DA(1),"SSR","B",$E(X,1,30),DA)=""
    2)= K ^RADPT(DA(3),"DT",DA(2),"P",DA(1),"SSR","B",$E(X,1,30),DA)
    3)= DO NOT DELETE
    Regular B cross-reference used for look-up.
  • CROSS-REFERENCE:  70^ASTF^MUMPS
    1)= S RADA=$P(^RADPT(DA(3),"DT",DA(2),"P",DA(1),0),"^",17) I RADA K RAKILL S RASET="",RAXREF="ASTF",RARAD=X D:$S('$D(^RARPT(RADA,0)):0,$P(^(0),U,5)="V":0,1:1) XREF1^RAUTL2 K RASET,RAXREF,RARAD
    2)= S RADA=$P(^RADPT(DA(3),"DT",DA(2),"P",DA(1),0),"^",17) I RADA K RASET S RAKILL="",RAXREF="ASTF",RARAD=X D:$S('$D(^RARPT(RADA,0)):0,$P(^(0),U,5)="V":0,1:1) XREF1^RAUTL2 K RAKILL,RAXREF,RARAD
    This cross reference sets the 'ASTF' cross reference in the Rad/Nuc Med Reports file (#74). The 'ASTF' cross reference is used during the on-line verification process to determine the reports that a specific
    interpreting staff needs to verify.
Info |  Details |  All