Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details |  All
Print Page as PDF
Sub-Field: 90245.09

Package: IHS GPRA Information System

BGP AREA AUTOMATED GPRA PARAMS(#90245)-->90245.09

Sub-Field: 90245.09


Information

Parent File Name Number Package
BGP AREA AUTOMATED GPRA PARAMS(#90245) FACILITY 90245.09 IHS GPRA Information System

Details

Field # Name Loc Type Details
.01 FACILITY 0;1 POINTER TO LOCATION FILE (#9999999.06) LOCATION(#9999999.06)

  • LAST EDITED:  MAY 08, 2012
  • CROSS-REFERENCE:  90245.09^B
    1)= S ^BGPGP1PM(DA(1),9,"B",$E(X,1,30),DA)=""
    2)= K ^BGPGP1PM(DA(1),9,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  ^^TRIGGER^90245.09^.02
    1)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA,DIV(1)=D1 S Y(1)=$S($D(^BGPGP1PM(D0,9,D1,0)):^(0),1:"") S X=$P(Y(1),U,2),X=X S DIU=X K Y X ^DD(90245.09,.01,1,2,1.1) X ^DD(90245.09,.01,1,2,1.4)
    1.1)= S X=DIV S I(1,0)=$G(D1),I(0,0)=$G(D0),D0=DIV S:'D0!'$D(^AUTTLOC(+D0,0)) D0=-1 S Y(101)=$S($D(^AUTTLOC(D0,0)):^(0),1:"") S X=$P(Y(101),U,10) S D0=I(0,0) S D1=I(1,0)
    1.4)= S DIH=$G(^BGPGP1PM(DIV(0),9,DIV(1),0)),DIV=X S $P(^(0),U,2)=DIV,DIH=90245.09,DIG=.02 D ^DICR
    2)= Q
    CREATE VALUE)= #.01:ASUFAC INDEX
    DELETE VALUE)= NO EFFECT
    FIELD)= #.02
.02 ASUFAC 0;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<100000)!(X?.E1"."1N.N) X
  • LAST EDITED:  SEP 08, 2011
  • HELP-PROMPT:  Type a Number between 100000 and 999999, 0 Decimal Digits
  • NOTES:  TRIGGERED by the FACILITY field of the FACILITY sub-field of the BGP AREA AUTOMATED GPRA PARAMS File
  • CROSS-REFERENCE:  90245.09^C
    1)= S ^BGPGP1PM(DA(1),9,"C",$E(X,1,30),DA)=""
    2)= K ^BGPGP1PM(DA(1),9,"C",$E(X,1,30),DA)
.03 ACTIVE 0;3 SET
  • '0' FOR INACTIVE;
  • '1' FOR ACTIVE;

  • LAST EDITED:  SEP 08, 2011
.04 IP ADDRESS 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
  • LAST EDITED:  OCT 31, 2011
  • HELP-PROMPT:  Answer must be 1-20 characters in length.
.05 GENERIC LISTENER PORT 0;5 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  OCT 31, 2011
  • HELP-PROMPT:  The port the generic listener is running on at the facility. Type a Number between 0 and 999999999, 0 Decimal Digits
Info |  Details |  All