Global: ^ACHSEOBM

FileMan FileNo	FileMan Filename	Package
9002076	CHS EOBR MESSAGES	Contract Health Management Information System

FileMan FileNo

FileMan Filename

Package

9002076

CHS EOBR MESSAGES

Package	Total	Routines
Contract Health Management Information System	3	ACHSEOB2 ACHSEOB8 ACHSEOBM

Package	Total	Routines
Contract Health Management Information System	1	ACHSEOBM

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	EOBR MESSAGE NUMBER	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>4!($L(X)<4)!'(X'?1P.E) X` HELP-PROMPT: `Answer must be 4 characters in length.` DESCRIPTION: EOBR MESSAGE NUMBER 4 CHAR CROSS-REFERENCE: `9002076^B` 1)= S ^ACHSEOBM("B",$E(X,1,30),DA)="" 2)= K ^ACHSEOBM("B",$E(X,1,30),DA)
.02	DATE LAST UPDATED	0;2	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JUN 11, 1992` HELP-PROMPT: `MUST BE IN DATE FORMAT` DESCRIPTION: ENTER DATE OF LAST UPDATE
1	MESSAGE TEXT	1;0	WORD-PROCESSING #9002076.01	DESCRIPTION: ENTER MESSAGE TEXT

EOBR MESSAGE NUMBER

0;1

FREE TEXT

************************REQUIRED FIELD************************

CROSS-REFERENCE: 9002076^B

1)= S ^ACHSEOBM("B",$E(X,1,30),DA)=""

2)= K ^ACHSEOBM("B",$E(X,1,30),DA)

DATE LAST UPDATED

0;2

DATE

MESSAGE TEXT

1;0

WORD-PROCESSING #9002076.01

Name	Field # of Occurrence
^%DT	.02+1

Name	Line Occurrences (* Changed, ! Killed)
^ACHSEOBM("B"	.01(XREF 1S), .01(XREF 1K)

Information