Sub-Field: 70.11

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

Details

Field # Name Loc Type 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.`

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

Customize PDF page

Package: Radiology Nuclear Medicine

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

Sub-Field: 70.11

Information

Details