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 |  Pointer To FileMan Files |  Fields |  Found Entries |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^DIC(45.81

Package: Registration

Global: ^DIC(45.81


Information

FileMan FileNo FileMan Filename Package
45.81 STATION TYPE Registration

Description

Directly Accessed By Routines, Total: 10

Package Total Routines
Registration 10 *SUFFIXES    DG53145P    DG53819D    DGPT10S1    DGPTAE    DGPTDD    DGPTSUF    DGYUPOST
^DIC(45.81    SUFFIX PTR    

Accessed By FileMan Db Calls, Total: 2

Package Total Routines
Registration 2 DGPTX1    DGYUPOST    

Pointed To By FileMan Files, Total: 2

Package Total FileMan Files
Registration 2 SOURCE OF ADMISSION(#45.1)[#45.11(.01)]    CATEGORY OF BENEFICIARY(#45.82)[#45.821(.01)]    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
Registration 1 FACILITY SUFFIX(#45.68)[#45.813(.01)]    

Fields, Total: 4

Field # Name Loc Type Details
.01 NUMBER 0;1 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<10)!(X?.E1"."1N.N) X I $D(X) S DINUM=X
  • LAST EDITED:  MAY 22, 1990
  • HELP-PROMPT:  Enter the number of the station type between 10 and 99.
  • DESCRIPTION:  
    This field contains a station type. Valid station type are numbers between '10' and '99'.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  45.81^B
    1)= S ^DIC(45.81,"B",$E(X,1,30),DA)=""
    2)= K ^DIC(45.81,"B",$E(X,1,30),DA)
2 NAME 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<3) X
  • HELP-PROMPT:  Enter the station type name, 3-40 characters.
  • DESCRIPTION:  
    This field contains the station type name.
  • CROSS-REFERENCE:  45.81^C
    1)= S ^DIC(45.81,"C",$E(X,1,30),DA)=""
    2)= K ^DIC(45.81,"C",$E(X,1,30),DA)
10 *SUFFIXES SU;0 Multiple #45.811 45.811

  • LAST EDITED:  JUN 23, 1995
  • DESCRIPTION:  This multiple is no longer in use and has been starred for deletion. It will be removed in a future release of the PIMS (MAS) package. Previously, this multiple contained the suffixes assigned to various stations or
    facilities. It has been replaced by the Suffix Ptr field (#.01) of the Suffix Ptr multiple (#45.813) which is a pointer to the Facility Suffix file (#45.68). The Facility Suffix file is a table file which contains the
    suffixes, effective date(s), and active/inactive flag(s).
50 SUFFIX PTR S;0 POINTER Multiple #45.813 45.813

Found Entries, Total: 19

NUMBER: 10    NUMBER: 11    NUMBER: 20    NUMBER: 21    NUMBER: 22    NUMBER: 23    NUMBER: 24    NUMBER: 25    
NUMBER: 26    NUMBER: 27    NUMBER: 30    NUMBER: 31    NUMBER: 32    NUMBER: 33    NUMBER: 40    NUMBER: 41    
NUMBER: 42    NUMBER: 98    NUMBER: 99    

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(45.81 - [#45.81] .01(XREF 1S), .01(XREF 1K), 2(XREF 1S), 2(XREF 1K)

Naked Globals

Name Field # of Occurrence
^("0" ID2+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA .01(XREF 1S), .01(XREF 1K), 2(XREF 1S), 2(XREF 1K)
>> DINUM .01+1*
U ID2+1
X .01+1!, .01(XREF 1S), .01(XREF 1K), 2+1!, 2(XREF 1S), 2(XREF 1K)
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All