Sub-Field: 120.8563

Parent File	Name	Number	Package
ADVERSE REACTION REPORTING(#120.85)	REPORT SOURCE	120.8563	Adverse Reaction Tracking

Parent File

Name

Number

Package

REPORT SOURCE

120.8563

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	SOURCE	0;1	SET	'f' FOR FOREIGN; 'h' FOR HEALTH PROFESSIONAL; 's' FOR STUDY; 'l' FOR LITERATURE; 'c' FOR CONSUMER; LAST EDITED: `JUN 17, 1992` DESCRIPTION: This is the actual source of the report. CROSS-REFERENCE: `120.8563^B` 1)= S ^GMR(120.85,DA(1),63,"B",$E(X,1,30),DA)="" 2)= K ^GMR(120.85,DA(1),63,"B",$E(X,1,30),DA) FIELD INDEX: `AHDR (#294) MUMPS R ACTION` Short Descr: Send data to HDR Description: Send data to HDR when entries are added or edited in this multiple. Set Logic: Q:$D(DIU(0)) D SETOB^GMRAHDR Kill Logic: Q:$D(DIU(0)) D KILLOB^GMRAHDR Whole Kill: Q X(1): SOURCE (120.8563,.01) (forwards)

SOURCE

0;1

SET

DESCRIPTION:

This is the actual source of the report.

CROSS-REFERENCE: 120.8563^B

1)= S ^GMR(120.85,DA(1),63,"B",$E(X,1,30),DA)=""

2)= K ^GMR(120.85,DA(1),63,"B",$E(X,1,30),DA)

FIELD INDEX: AHDR (#294) MUMPS R ACTION

Short Descr:  Send data to HDR

Description:  Send data to HDR when entries are added or edited in this multiple.

Set Logic:  Q:$D(DIU(0))  D SETOB^GMRAHDR

Kill Logic:  Q:$D(DIU(0))  D KILLOB^GMRAHDR

Whole Kill:  Q

X(1):  SOURCE  (120.8563,.01)  (forwards)