Global: ^ABSPF(9002313.89

FileMan FileNo	FileMan Filename	Package
9002313.89	ABSP ERROR CODES	Pharmacy Point of Sale

FileMan FileNo

FileMan Filename

Package

9002313.89

ABSP ERROR CODES

Package	Total	Routines
Pharmacy Point of Sale	1	ABSPOSQ3

Package

Total

Routines

Fields, Total: 2

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	Code	0;1	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>99999)!(X<1)!(X?.E1"."1N.N) X S:$D(X) DINUM=X` LAST EDITED: `APR 13, 1995` HELP-PROMPT: `Type a Number between 1 and 99999, 0 Decimal Digits` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `9002313.89^B` 1)= S ^ABSPF(9002313.89,"B",$E(X,1,30),DA)="" 2)= K ^ABSPF(9002313.89,"B",$E(X,1,30),DA)
.02	Description	0;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>70!($L(X)<1) X` LAST EDITED: `JUN 23, 1995` HELP-PROMPT: `Answer must be 1-70 characters in length.`

Code

0;1

NUMBER

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

CROSS-REFERENCE: 9002313.89^B

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

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

Description

0;2

FREE TEXT