Global: ^AUPMOD

FileMan FileNo	FileMan Filename	Package
8100001	PLESSEY MODEM CONTROL	Uncategorized

Fields, Total: 6

Field #	Name	Loc	Type	Details
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X` HELP-PROMPT: `ANSWER MUST BE 3-30 CHARACTERS IN LENGTH` CROSS-REFERENCE: `8100001^B` 1)= S ^AUPMOD("B",$E(X,1,30),DA)="" 2)= K ^AUPMOD("B",$E(X,1,30),DA)
.02	PROMPT	0;2	SET	**********************REQUIRED FIELD********************** 'N' FOR NO; 'Y' FOR YES;
.03	PROGRAMMER ACCESS CODE	0;3	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>10!($L(X)<3) X` HELP-PROMPT: `ANSWER MUST BE 3-10 CHARACTERS IN LENGTH`
.04	TELEPHONE NUMBER	0;4	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>12)!(X<5)!(X?.E1"."1N.N) X` HELP-PROMPT: `ENTER THE TELEPHONE NUMBER OF THE COMMUNICATION LINK EX (85057661900)`
.05	PORT NUMBER	0;5	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X` HELP-PROMPT: `ENTER THE PORT NUMBER`
.06	UCI	0;6	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>3!($L(X)<3) X` HELP-PROMPT: `ANSWER MUST BE 3 CHARACTERS IN LENGTH`