Global: ^AUTTOCRG

FileMan FileNo	FileMan Filename	Package
9999999.67	OBJECT CLASS REPORT GRP	Utility Tables

Package	Total	FileMan Files
Utility Tables	1	OBJECT/SUB-OBJECT(#9999999.59)[.04]

Fields, Total: 5

Field #	Name	Loc	Type	Details
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E) X` HELP-PROMPT: `NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION` DELETE TEST: `.01,0)= I 1` CROSS-REFERENCE: `9999999.67^B` 1)= S ^AUTTOCRG("B",$E(X,1,30),DA)="" 2)= K ^AUTTOCRG("B",$E(X,1,30),DA)
.02	ALPHA COLLATING	0;2	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>4!($L(X)<1) X` HELP-PROMPT: `ANSWER MUST BE 1-4 CHARACTERS IN LENGTH` CROSS-REFERENCE: `9999999.67^AC` 1)= S ^AUTTOCRG("AC",$E(X,1,30),DA)="" 2)= K ^AUTTOCRG("AC",$E(X,1,30),DA)
.03	OBJECT CLASS REFERENCE	0;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>4!($L(X)<4) X` LAST EDITED: `JUL 25, 1989` HELP-PROMPT: `ANSWER MUST BE 4 CHARACTERS IN LENGTH`
1	CATEGORY	0;3	SET	'A' FOR PERSONNEL; 'E' FOR OTHER OPERATING ACCOUNTS; 'I' FOR SUPPLIES; 'M' FOR EQUIPMENT; 'Q' FOR LAND/STRUCTURES; 'U' FOR GRANTS; 'W' FOR INTEREST PENALTY; CROSS-REFERENCE: `9999999.67^CAT` 1)= S ^AUTTOCRG("CAT",$E(X,1,30),DA)="" 2)= K ^AUTTOCRG("CAT",$E(X,1,30),DA)
10	AMOUNT BUDGETED	AB;1	NUMBER	INPUT TRANSFORM: `S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>999999)!(X<0) X` LAST EDITED: `JUL 22, 1988` HELP-PROMPT: `Type a Dollar Amount between 0 and 999999, 2 Decimal Digits` CROSS-REFERENCE: `9999999.67^AB` 1)= S ^AUTTOCRG("AB",$E(X,1,30),DA)="" 2)= K ^AUTTOCRG("AB",$E(X,1,30),DA)