Global: ^AZSLPCTL

FileMan FileNo	FileMan Filename	Package
2100000	PCIS DOWNLOAD CONTROL	IHS PCIS Download

Fields, Total: 4

Field #	Name	Loc	Type	Details
.01	PCIS RID	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>3!($L(X)<3)!'(X?3N)!(X'?.ANP) X` HELP-PROMPT: `ANSWER MUST BE 3 NUMERIC CHARACTERS IN LENGTH` CROSS-REFERENCE: `2100000^B` 1)= S ^AZSLPCTL("B",$E(X,1,30),DA)="" 2)= K ^AZSLPCTL("B",$E(X,1,30),DA)
.02	SUBR LENGTH	0;2	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>154)!(X<12)!(X?.E1"."1N.N) X` HELP-PROMPT: `TYPE A WHOLE NUMBER BETWEEN 12 AND 154`
.03	SUBR COUNT	0;3	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>12)!(X<1)!(X?.E1"."1N.N) X` HELP-PROMPT: `TYPE A WHOLE NUMBER BETWEEN 1 AND 12`
1101	FILEMAN FILE,FIELD	11;0	Multiple #2100000.11	2100000.11