Routine: AUTTFIPS

Information

AUTTFIPS ;IHS/SET/GTH - FIPS CODES EXTRINSICS ; [ 01/03/2003 10:48 AM ]

Source file <AUTTFIPS.m>

Package	Total	Call Graph
VA Fileman	2	(,IX)^DIC $$GET1^DIQ

Name	Comments	DBIA/ICR reference
ST(X)	;PEP;Return FIPS code for X=2-letter-State-designator. ; e.g.: S State_FIPS=$$ST^AUTTFIPS("AZ") ; The lookup failed if +State_FIPS = 0 ;
CT(AUT)	;PEP;AUT=IEN of ^AUTTCTY(. Return 3-digit FIPS for County. ; IEN is used assuming RPMS applications will have IEN. ; e.g.: S County_FIPS=$$CT^AUTTFIPS(4) ; The lookup failed if +County_FIPS = 0 ;

FileNo	Call Tags
^DIC(5 - [#5]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^AUTTCTY - [#9999999.23]	CT+6

Name	Field # of Occurrence
^(0	CT+6