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 |  ICR |  Found Entries |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Global: ^DIC(35

Package: Registration

Global: ^DIC(35


Information

FileMan FileNo FileMan Filename Package
35 OTHER FEDERAL AGENCY Registration

Description

Directly Accessed By Routines, Total: 5

Package Total Routines
Registration 4 ^DIC(35    DGENUPL1    DGRP7    VAFHLZPD    
Remote Order Entry System 1 RMPFDD2    

Accessed By FileMan Db Calls, Total: 1

Package Total Routines
Registration 1 DG53688P    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Registration 1 PATIENT(#2)[.309]    

Fields, Total: 4

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:  NAME MUST BE 3-30 CHARACTERS LONG & NOT BEGIN WITH PUNCTUATION
  • DESCRIPTION:  
    This field contains the name of a federal agency other than the Department of Veterans Affairs where a patient seen in the VA may be employed.
  • CROSS-REFERENCE:  35^B
    1)= S ^DIC(35,"B",$E(X,1,30),DA)=""
    2)= K ^DIC(35,"B",$E(X,1,30),DA)
1 ABBREVIATION 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
  • LAST EDITED:  DEC 05, 2005
  • HELP-PROMPT:  ANSWER MUST BE 1-10 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This field contains an abbreviation for this federal agency. On outputs and other displays where the entire name of the federal agency may not fit, this abbreviation may appear instead.
  • CROSS-REFERENCE:  35^C
    1)= S ^DIC(35,"C",$E(X,1,30),DA)=""
    2)= K ^DIC(35,"C",$E(X,1,30),DA)
    This cross reference will allow look-ups on the abbreviation field.
2 ELIGIBILITY CODE NUMBER 0;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 0 AND 99
  • DESCRIPTION:  
    Enter in this field the internal entry number of the MAS ELIGIBILITY CODE under which a patient receiving care from this federal agency may be entitled.
3 ENTRY TYPE 0;4 SET
  • 'C' FOR COUNTRY;
  • 'A' FOR OTHER AGENCY;

  • DESCRIPTION:  
    Enter the type of federal agency. If the entry is a country, enter C. If the entry is another federal agency, enter A.

Found Entries, Total: 17

NAME: AUSTRALIA    NAME: CANADA    NAME: CIVIL SERVICE COMMISSION    NAME: CZECHOSLOVAKIA    NAME: DEPARTMENT OF COMMERCE    NAME: DEPARTMENT OF DEFENSE    NAME: FEDERAL AVIATION ADMIN.    NAME: FRANCE    
NAME: NEW ZEALAND    NAME: OFFICE OF ECONOMIC OPPURTUNITY    NAME: OFFICE OF EMPLOYEE'S COMP.    NAME: PEACE CORPS    NAME: POLAND    NAME: SOUTH AFRICA    NAME: SOVIET UNION    NAME: UK GRT BRITAIN AND N. IRELAND    
NAME: VETERANS ADMINISTRATION    

ICR, Total: 3

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #604
  • Remote Order Entry System
  • ICR #793
  • Mental Health
  • ICR #3829
  • Accounts Receivable
  • ABBREVIATION (1).
    Access: Direct Global Read & w/Fileman

    Global Variables Directly Accessed

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

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

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