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 |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Global: ^DGAM(345

Package: Registration

Global: ^DGAM(345


Information

FileMan FileNo FileMan Filename Package
42.7 AMIS 345&346 Registration

Description

Directly Accessed By Routines, Total: 10

Package Total Routines
Registration 8 DESCRIPTION (VERSIONED)    DGANHD    DGANHD1    DGANHD2    DGANHD3    DGANHD4    DGGECS    ^DGAM(345
Interim Management Support 1 ECTS345    
Pharmacy Benefits Management 1 PSUUD6    

Accessed By FileMan Db Calls, Total: 3

Package Total Routines
Registration 2 DGANHD    DGANHD3    
Interim Management Support 1 ECTS345    

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
Kernel 1 NEW PERSON(#200)[#42.702(99.1)]    
Registration 1 MEDICAL CENTER DIVISION(#40.8)[#42.702(.01)]    

Fields, Total: 2

Field # Name Loc Type Details
.01 MONTH/YR 0;1 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X I $D(X) X $S($E(X,6,7)'="00":"K X W !,""Do not enter day of month""",X>DT:"K X W !,""Must be in past""",1:"") I $D(X) S DINUM=X
  • LAST EDITED:  OCT 24, 1985
  • DESCRIPTION:  
    Month and year the AMIS 345 and AMIS 346 (NHCU and DOM) reports have been generated for. These reports cannot be generated until after the last day of reporting cycle.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  42.7^B
    1)= S ^DGAM(345,"B",$E(X,1,30),DA)=""
    2)= K ^DGAM(345,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  42.7^ALST^MUMPS
    1)= K ^DGAM(345,"ALST") X "S DG1=X F %=X:0 S %=$N(^DGAM(345,%)) Q:%'>0 S DG1=%" S ^DGAM(345,"ALST",DG1)="" K DG1
    2)= K ^DGAM(345,"ALST") X "S DG1=0 F %=0:0 S %=$N(^DGAM(345,%)) Q:%'>0 S:%'=DA DG1=%" S:DG1 ^DGAM(345,"ALST",DG1)="" K DG1
10 SEGMENT SE;0 SET Multiple #42.701 42.701

  • DESCRIPTION:  
    Segment number is the number of the AMIS assigned per VA Manual MP6, Part VI, Supp. 1.2. AMIS 345 is for NHCU statistics and AMIS 346 is for Domiciliary statistics.

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #4598
  • Pharmacy Benefits Management
  • SEGMENT (42.701).
    Access:

    SEGMENT (.01).
    Access: Direct Global Read & w/Fileman

    DIVISION (42.702).
    Access:

    DIVISION (.01).
    Access: Direct Global Read & w/Fileman

    PATIENT DAYS OF CARE (16).
    Access: Direct Global Read & w/Fileman

    External References

    Name Field # of Occurrence
    ^%DT .01+1

    Global Variables Directly Accessed

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

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> %DT .01+1*
    >> DA .01(XREF 1S), .01(XREF 1K)
    DG1 .01(XREF 2S), .01(XREF 2K)
    >> DINUM .01+1*
    DT .01+1
    X .01+1*!, .01(XREF 1S), .01(XREF 1K)
    >> Y .01+1
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Local Variables  | All