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.09

Package: Radiology Nuclear Medicine

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

Sub-Field: 70.09


Information

Parent File Name Number Package
70.03 SECONDARY INTERPRET'G RESIDENT 70.09 Radiology Nuclear Medicine

Details

Field # Name Loc Type Details
.01 SECONDARY INTERPRET'G RESIDENT 0;1 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • INPUT TRANSFORM:  S DIC("S")="I $$SCRN^RAUTL8(.DA,""R"",+Y,""SEC""),$$S^RAUTL8" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  APR 28, 1997
  • HELP-PROMPT:  Enter name of resident who is NOT the Primary Interpreting Resident and NOT a Secondary Interpreting Resident whose name has already been entered.
  • DESCRIPTION:  This field points to the "NEW PERSON" file (#200) to indicate the names of other Residents in addition to the Primary Interpreting Resident who interpreted the images of this exam. Secondary Interpreting Residents
    cannot be the same as the Primary Interpreting Resident, must have resident classification, 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,""R"",+Y,""SEC""),$$S^RAUTL8"
  • EXPLANATION:  Only active interpreting resident physicians may be selected
    SOURCE OF DATA:   SYSTEM GENERATED
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  70^ARES^MUMPS
    1)= S RADA=$P(^RADPT(DA(3),"DT",DA(2),"P",DA(1),0),"^",17) I RADA K RAKILL S RASET="",RAXREF="ARES",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="ARES",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 'ARES' cross reference used during the on-line verification process to determine the reports that a specific interpreting resident needs to verify.
  • CROSS-REFERENCE:  70.09^B
    1)= S ^RADPT(DA(3),"DT",DA(2),"P",DA(1),"SRR","B",$E(X,1,30),DA)=""
    2)= K ^RADPT(DA(3),"DT",DA(2),"P",DA(1),"SRR","B",$E(X,1,30),DA)
    3)= DO NOT DELETE
    Regular B cross-reference used for look-up.
2 TYPE OF ACTION 0;2 SET
************************REQUIRED FIELD************************
  • 'E' FOR EXAM ENTRY;
  • 'R' FOR REGISTER;
  • 'M' FOR MODIFY ENTRY;

  • LAST EDITED:  NOV 21, 1984
  • DESCRIPTION:  
    This field contains the type of action that was performed on this pre-registered exam.  Available types are: 'E' for EXAM ENTRY, 'R' for REGISTER, and 'M' for MODIFY ENTRY.
    SOURCE OF DATA:   SYSTEM GENERATED
    UNEDITABLE
3 COMPUTER USER 0;3 POINTER TO NEW PERSON FILE (#200)
************************REQUIRED FIELD************************
NEW PERSON(#200)

  • LAST EDITED:  FEB 16, 1997
  • DESCRIPTION:  
    This field points to the 'USER' file (#3) to indicate the person doing the processing at the time the action was taken on this pre-registered exam record.
    SOURCE OF DATA:   SYSTEM GENERATED
    UNEDITABLE
Info |  Details |  All