Global: ^BIADDIN

FileMan FileNo	FileMan Filename	Package
9002084.82	BI TABLE ADD INFO ITEMS	Immunization Tracking

FileMan FileNo

FileMan Filename

Package

9002084.82

BI TABLE ADD INFO ITEMS

Package	Total	Routines
Immunization Tracking	2	BIDU BIDUVLS2

Package

Total

Routines

BIDU BIDUVLS2

Fields, Total: 3

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	ITEM NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>70!($L(X)<3)!'(X'?1P.E) X` LAST EDITED: `MAY 28, 2009` HELP-PROMPT: `Answer must be 3-70 characters in length` CROSS-REFERENCE: `9002084.82^B` 1)= S ^BIADDIN("B",$E(X,1,30),DA)="" 2)= K ^BIADDIN("B",$E(X,1,30),DA) CROSS-REFERENCE: `9002084.82^U^MUMPS` 1)= D UPXREF^BIUTL5(X,"^BIADDIN(") 2)= D KUPXREF^BIUTL5(X,"^BIADDIN(")
.02	NUMBER	0;2	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>30)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `MAY 20, 2009` HELP-PROMPT: `Type a Number between 0 and 30, 0 Decimal Digits`
.03	Short Name	0;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` LAST EDITED: `MAY 28, 2009` HELP-PROMPT: `Answer must be 1-20 characters in length.`

ITEM NAME

0;1

FREE TEXT

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

CROSS-REFERENCE: 9002084.82^B

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

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

CROSS-REFERENCE: 9002084.82^U^MUMPS

1)= D UPXREF^BIUTL5(X,"^BIADDIN(")

2)= D KUPXREF^BIUTL5(X,"^BIADDIN(")

NUMBER

0;2

NUMBER

Short Name

0;3

FREE TEXT