Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Fields |  Found Entries |  All
Print Page as PDF
Global: ^AUTTAREA

Package: Utility Tables

Global: ^AUTTAREA


Information

FileMan FileNo FileMan Filename Package
9999999.21 AREA Utility Tables

Description

Directly Accessed By Routines, Total: 139

Package Total Routines
IHS GPRA Information System 71 BGP0DAR    BGP0DAR9    BGP0DARO    BGP0DCHA    BGP0DGPA    BGP0DHEA    BGP0EOA    BGP1DADB
BGP1DAR    BGP1DAR9    BGP1DARO    BGP1DCHA    BGP1DGPA    BGP1DHEA    BGP1EOA    BGP2DADB
BGP2DAR    BGP2DAR9    BGP2DARO    BGP2DCHA    BGP2DGPA    BGP2DHEA    BGP2EOA    BGP3DADB
BGP3DAR    BGP3DAR9    BGP3DARA    BGP3DARH    BGP3DARO    BGP3DGPA    BGP4DADB    BGP4DAR
BGP4DAR9    BGP4DARA    BGP4DARO    BGP4DGPA    BGP4DHEA    BGP5DADB    BGP5DAR    BGP5DARO
BGP5DGPA    BGP5DHEA    BGP6DADB    BGP6DAR    BGP6DARO    BGP6DCHA    BGP6DGPA    BGP6DHEA
BGP7DADB    BGP7DAR    BGP7DAR8    BGP7DARO    BGP7DCHA    BGP7DGPA    BGP7DHEA    BGP8DADB
BGP8DAR    BGP8DAR9    BGP8DARO    BGP8DCHA    BGP8DGPA    BGP8DHEA    BGP8EOA    BGP9DAR
BGP9DAR9    BGP9DARO    BGP9DCHA    BGP9DGPA    BGP9DHEA    BGP9EOA    BGPDAREA    
Contract Health Management Information System 24 ACHS    ACHS3PP1    ACHS3PP3    ACHS3PPA    ACHS3PPC    ACHSA4    ACHSA44    ACHSCPTG
ACHSDF1    ACHSDSTL    ACHSEOB1    ACHSEOB2    ACHSHLG    ACHSOCM    ACHSOCV2    ACHSPCC1
ACHSPCC3    ACHSPCC4    ACHSPDC1    ACHSUD    ACHSUF    ACHSVAR    ACHSWFRS    DOCUMENT
Commitment Register 15 ACRFAS    ACRFDC    ACRFDOCN    ACRFDRCL    ACRFFF3    ACRFFF4    ACRFFF5    ACRFPAYE
ACRFPPR    ACRFSOF1    ACRFTR    ACRFUFMR    ACRPAPT    ACRPLCD    ACRPPUR    
Patient Care Component Reports 7 APCL1AP    APCL1HP    APCL2AP    APCL8AP    APCLAAP    APCLDM5    APCLRPLP    
Alcohol Chemical Dependency 3 ACDWAREA    ACDWASF    ACDWUTL    
IHS Patient Registration 3 AGSAMPG    AGTX0    AGTXALL    
Mental Health Social Services 2 AMHRP2P    AMHRP3P    
NCR Financial System 2 AFSHEX1    AFSLSNXT    
Supply 2 ASUAUARE    ASULARST    
Aberdeen GPRA Report 1 CIMGAGP    
Diabetes Registry 1 BDMDM5    
IBM DDPS Record Consolidation 1 AIBCVT00    
IHS Dental System 1 ADEFPC    
Immunization Tracking 1 BISITE1    
Kernel 1 ^DIC(4    
Referred Care Information System 1 BMCRR23P    
Table Maintenance 1 AUMSCBT    
Third Party Billing 1 ABMDE1X1    

Accessed By FileMan Db Calls, Total: 29

Package Total Routines
Table Maintenance 24 AUM41011    AUM41031    AUM61021    AUM91102    AUM91112    AUM91151    AUM93041    AUM93051
AUM93061    AUM93071    AUM93081    AUM93101    AUM93121    AUM94021    AUM94031    AUM94051
AUM94061    AUM94071    AUM94081    AUM94121    AUM95031    AUMSCBT    AUMUPD3    AUMUPDT
Alcohol Chemical Dependency 1 ACDWAREA    
IHS Patient Registration 1 AGACAL    
IHS RPMS CHR System 1 BCHDCOMM    
Patient Care Component Reports 1 APCL1H    
iCare 1 BQI11PST    

Pointed To By FileMan Files, Total: 13

Package Total FileMan Files
Utility Tables 5 ACCOUNTING POINT(#9999999.69)[1]    COMMUNITY(#9999999.05)[.06]    LOCATION(#9999999.06)[.04]    RPMS RESERVATION(#9999999.47)[.04, .05]    SERVICE UNIT(#9999999.22)[.02]    
Commitment Register 4 ARMS 1099 PAYER(#9002198.3)[.01]    ARMS STANDARD ITEM(#9002195)[#9002195.02(.01)]    FMS PURCHASING OFFICE(#9002199.4)[.1]    FMS SYSTEM DEFAULTS(#9002199.2)[.01]    
Alcohol Chemical Dependency 1 CDMIS AREA CATEGORIES(#9002174.6)[#9002174.61(.01)]    
Contract Health Management Information System 1 CHS SERVICE DELIVERY AREA(#9002073.3)[.02]    
IHS RPMS CHR System 1 CHR PROGRAMS(#90002.51)[.02]    
Third Party Billing 1 3P UFMS INSURER TYPE/BUDGET ACTIVITY(#9002274.41)[.05]    

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
  • DELETE TEST:  .01,0)= I 1
  • CROSS-REFERENCE:  9999999.21^B
    1)= S ^AUTTAREA("B",$E(X,1,30),DA)=""
    2)= K ^AUTTAREA("B",$E(X,1,30),DA)
.02 CODE 0;2 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>2!($L(X)<2)!'(X?2N) X I $D(X),$D(^AUTTAREA("C",X)),'$D(^AUTTAREA("C",X,DA)) K X W:'$D(ZTQUEUED) " Already used! "
  • LAST EDITED:  MAY 19, 1993
  • HELP-PROMPT:  ANSWER MUST BE 2 CHARACTERS IN LENGTH
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  9999999.21^C
    1)= S ^AUTTAREA("C",$E(X,1,30),DA)=""
    2)= K ^AUTTAREA("C",$E(X,1,30),DA)
.03 PREFIX/REGION 0;3 SET
************************REQUIRED FIELD************************
  • 'A' FOR ALASKA;
  • 'B' FOR BILLINGS;
  • 'C' FOR GREAT PLAINS;
  • 'D' FOR BEMIDJI;
  • 'H' FOR HEADQUARTERS;
  • 'L' FOR CALIFORNIA;
  • 'N' FOR NAVAJO;
  • 'O' FOR OKLAHOMA;
  • 'Q' FOR ALBUQUERQUE;
  • 'U' FOR NASHVILLE;
  • 'X' FOR PHOENIX;
  • 'P' FOR PORTLAND;
  • 'S' FOR TUCSON;

  • LAST EDITED:  DEC 05, 2014
  • HELP-PROMPT:  ENTER PREFIX, SAME CHARACTER AS WAS USED IN PCIS
.04 CAN NUMBER PREFIX 0;4 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>3!($L(X)<3) X
  • LAST EDITED:  FEB 10, 1987
  • HELP-PROMPT:  ANSWER MUST BE 3 CHARACTERS IN LENGTH
.05 INACTIVE DATE 0;5 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:X<1 X
  • LAST EDITED:  MAY 17, 2013
  • HELP-PROMPT:  Enter date this Area code was inactivated (mm/dd/yyyy).
  • CROSS-REFERENCE:  ^^TRIGGER^9999999.21^.06
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^AUTTAREA(D0,0)):^(0),1:"") S X=$P(Y(1),U,6),X=X S DIU=X K Y S X=DIV S X="I" S DIH=$G(^AUTTAREA(DIV(0),0)),DIV=X S $P(^(0),U,6)=DIV,DIH=9999999.21,DIG=.06 D ^DICR
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^AUTTAREA(D0,0)):^(0),1:"") S X=$P(Y(1),U,6),X=X S DIU=X K Y S X="" S DIH=$G(^AUTTAREA(DIV(0),0)),DIV=X S $P(^(0),U,6)=DIV,DIH=9999999.21,DIG=.06 D ^DICR
    CREATE VALUE)= S X="I"
    DELETE VALUE)= @
    FIELD)= INACTIVE FLAG
.06 INACTIVE FLAG 0;6 SET
  • 'I' FOR INACTIVE;

  • LAST EDITED:  MAY 17, 2013
  • DESCRIPTION:  
    SERVES AS AN 'INACTIVE' FLAG TO DISPLAY AS AN IDENTIFIER FOR USE BY DATA ENTRY STAFF.
    WRITE AUTHORITY:  ^
    UNEDITABLE
  • NOTES:  TRIGGERED by the INACTIVE DATE field of the AREA File
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Fields |  Found Entries |  All