Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Print Page as PDF

Sub-Field: 6925.0164

Package: Engineering

CONSTRUCTION PROJECT(#6925)-->6925.0164

Sub-Field: 6925.0164

Information

Parent File	Name	Number	Package
CONSTRUCTION PROJECT(#6925)	CITATIONS	6925.0164	Engineering

Details

Field #	Name	Loc	Type	Details
.01	CITATION NAME	0;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>25!($L(X)<3) X` LAST EDITED: `DEC 24, 1992` HELP-PROMPT: `Answer must be 3-25 characters in length.` DESCRIPTION: `This field contains the name of any citations associated with a project. (eg. JCAHO citations)` CROSS-REFERENCE: `6925.0164^B` `1)= S ^ENG("PROJ",DA(1),21,"B",$E(X,1,30),DA)=""` `2)= K ^ENG("PROJ",DA(1),21,"B",$E(X,1,30),DA)`
2	DATE	0;3	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:3990000X)!(X>DT) X` LAST EDITED: `DEC 24, 1992` HELP-PROMPT: `Enter a current or past Date (year range 1970-2099)` DESCRIPTION: `This field contains the date the citation was issued.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
3	CITING AUTHORITY	0;4	POINTER TO REGULATORY AGENCY FILE (#7335.7)	**********************REQUIRED FIELD********************** REGULATORY AGENCY(#7335.7) LAST EDITED: `DEC 24, 1992` HELP-PROMPT: `Enter the Agency that issued the Citation` DESCRIPTION: `This field contains a pointer to the Regulatory Agency File (#7335.7).`
4	PAGE	0;5	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>5!($L(X)<1) X` LAST EDITED: `DEC 24, 1992` HELP-PROMPT: `Answer must be 1-5 characters in length.` DESCRIPTION: `This field contains the page number in the citing agency's report that contains the citation.`
5	OFFICIALS NAME	0;6	FREE TEXT	INPUT TRANSFORM: `K:X[""""!$A(X)=45 X I $D(X) S:X?.E1L.E X=$TR(X,"abcdefghijklmnopqrstuvwxyz","ABCDEFGHIJKLMNOPQRSTUVWXYZ") K:$L(X)>30!($L(X)<3)!(X'?1U.UP1","0.1" "1U.UP) X` LAST EDITED: `JUN 27, 1995` HELP-PROMPT: `Answer must be 3-30 characters in length (i.e. LAST,FIRST)` DESCRIPTION: `This field contains the name of the official issuing the citation.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
6	OFFICIALS TITLE	0;7	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>25!($L(X)<1) X` LAST EDITED: `DEC 24, 1992` HELP-PROMPT: `Answer must be 1-25 characters in length.` DESCRIPTION: `This field contains the title of the official issuing the citation.`
8	CORRECTION >50% PROJECT SCOPE	0;8	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `JAN 21, 1993` HELP-PROMPT: `Answer 'Y' if correction of citation is greater than 50% of this project's scope` DESCRIPTION: `This field is a set of codes (Yes or No) used to determine if correction of the citation is greater than 50% of the project scope. The field is used to determine if prioritization points will be awarded for NRM and` `Minor/Minor Misc. programs.`