Global: ^APCHREMU

FileMan FileNo	FileMan Filename	Package
9001008.5	HEALTH SUMMARY REMINDER UPDATE	Uncategorized

FileMan FileNo

FileMan Filename

Package

9001008.5

HEALTH SUMMARY REMINDER UPDATE

Package	Total	Routines
Patient Care Component	1	BJPC2P11

Package

Total

Routines

Fields, Total: 2

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>50!($L(X)<3)!'(X'?1P.E) X I '$D(^APCHSURV("AL",X)) W !!,"NO GO" K X` LAST EDITED: `APR 22, 2014` HELP-PROMPT: `Answer must be 3-30 characters in length.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `9001008.5^B` 1)= S ^APCHREMU("B",$E(X,1,30),DA)="" 2)= K ^APCHREMU("B",$E(X,1,30),DA)
1100	TEXT	11;0	WORD-PROCESSING #9001008.511

NAME

0;1

FREE TEXT

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

INPUT TRANSFORM: K:$L(X)>50!($L(X)<3)!'(X'?1P.E) X I '$D(^APCHSURV("AL",X)) W !!,"NO GO" K X
LAST EDITED: APR 22, 2014
HELP-PROMPT: Answer must be 3-30 characters in length.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

CROSS-REFERENCE: 9001008.5^B

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

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

1100 TEXT 11;0 WORD-PROCESSING #9001008.511