Global: ^BLRCHGPL

FileMan FileNo	FileMan Filename	Package
90475.2	LAB PROV LOC CHANGE	IHS Changes To Lab

FileMan FileNo

FileMan Filename

Package

90475.2

LAB PROV LOC CHANGE

Package	Total	FileMan Files
Kernel	1	NEW PERSON(#200)[#90475.21(.01), #90475.21(1), #90475.21(3), #90475.22(3)]
Scheduling	1	HOSPITAL LOCATION(#44)[#90475.22(.01), #90475.22(1)]

Package

Total

FileMan Files

Fields, Total: 3

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	ACCESSION	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X` LAST EDITED: `JUN 16, 2005` HELP-PROMPT: `Answer must be 3-30 characters in length.` DESCRIPTION: Accession String CROSS-REFERENCE: `90475.2^B` 1)= S ^BLRCHGPL("B",$E(X,1,30),DA)="" 2)= K ^BLRCHGPL("B",$E(X,1,30),DA)
1	OLD PROVIDER	1;0	POINTER Multiple #90475.21	90475.21
2	OLD LOCATION	2;0	POINTER Multiple #90475.22	90475.22

ACCESSION

0;1

FREE TEXT

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

CROSS-REFERENCE: 90475.2^B

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

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

1 OLD PROVIDER 1;0 POINTER Multiple #90475.21 90475.21

2 OLD LOCATION 2;0 POINTER Multiple #90475.22 90475.22