Sub-Field: 741.15

Parent File	Name	Number	Package
741.01	ACTION	741.15	Occurrence Screen

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	ACTION	0;1	POINTER TO QA OCCURRENCE ACTION FILE (#741.7)	QA OCCURRENCE ACTION(#741.7) INPUT TRANSFORM: `S DIC("S")="D EN7^QAOSDDUT" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` OUTPUT TRANSFORM: `S:+Y(0) Y=$P(^QA(741.7,+Y(0),0),"^")_" "_$P(^(0),"^",3)` LAST EDITED: `MAY 01, 1991` HELP-PROMPT: `Enter the recommended Action(s).` DESCRIPTION: `This is the action this reviewer has determined should be taken. Multiple actions may be entered.` SCREEN: `S DIC("S")="D EN7^QAOSDDUT"` EXPLANATION: `Authorized Actions determined by Review Level` CROSS-REFERENCE: `741.15^B` `1)= S ^QA(741,DA(2),"REVR",DA(1),2,"B",$E(X,1,30),DA)=""` `2)= K ^QA(741,DA(2),"REVR",DA(1),2,"B",$E(X,1,30),DA)`

ACTION

0;1

POINTER TO QA OCCURRENCE ACTION FILE (#741.7)

INPUT TRANSFORM: S DIC("S")="D EN7^QAOSDDUT" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
OUTPUT TRANSFORM: S:+Y(0) Y=$P(^QA(741.7,+Y(0),0),"^")_" "_$P(^(0),"^",3)
LAST EDITED: MAY 01, 1991
HELP-PROMPT: Enter the recommended Action(s).
DESCRIPTION:
This is the action this reviewer has determined should be taken. Multiple actions may be entered.
SCREEN: S DIC("S")="D EN7^QAOSDDUT"
EXPLANATION: Authorized Actions determined by Review Level
CROSS-REFERENCE: 741.15^B
1)= S ^QA(741,DA(2),"REVR",DA(1),2,"B",$E(X,1,30),DA)=""
2)= K ^QA(741,DA(2),"REVR",DA(1),2,"B",$E(X,1,30),DA)