Global: ^AZSLPERR

FileMan FileNo	FileMan Filename	Package
2100001	PCIS DOWNLOAD ERROR	IHS PCIS Download

Fields, Total: 6

Field #	Name	Loc	Type	Details
.001	NTH ENTRY		NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999999)!(X<1)!(X?.E1"."1N.N) X` HELP-PROMPT: `TYPE A WHOLE NUMBER BETWEEN 1 AND 999999`
.01	PCIS PID	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>9!($L(X)<9)!'(X'?1P.E)!(X'?.ANP) X` HELP-PROMPT: `ANSWER MUST BE 9 CHARACTERS IN LENGTH` UNEDITABLE CROSS-REFERENCE: `2100001^B` 1)= S ^AZSLPERR("B",$E(X,1,30),DA)="" 2)= K ^AZSLPERR("B",$E(X,1,30),DA)
.02	PCIS RID	0;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>3!($L(X)<3)!'(X?3N) X` HELP-PROMPT: `ANSWER MUST BE 3 CHARACTERS IN LENGTH` UNEDITABLE CROSS-REFERENCE: `2100001^C` 1)= S ^AZSLPERR("C",$E(X,1,30),DA)="" 2)= K ^AZSLPERR("C",$E(X,1,30),DA)
.03	PCIS SUBR	0;3	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>156!($L(X)<3)!'(X?1""""1E.E1"""") X` HELP-PROMPT: `ANSWER MUST BE 3-156 CHARACTERS IN LENGTH, INCLUDES BRACKETING "'S`
.04	REPROCESS FLAG	0;4	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>1!($L(X)<1)!'(X?1"Y") X` HELP-PROMPT: `ANSWER MUST BE "Y" OR NULL` CROSS-REFERENCE: `2100001^AC` 1)= S ^AZSLPERR("AC",$E(X,1,30),DA)="" 2)= K ^AZSLPERR("AC",$E(X,1,30),DA)
1101	FILEMAN FILE,FIELD	11;0	Multiple #2100001.11	2100001.11