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 |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Global: ^DIC(31

Package: HINQ

Global: ^DIC(31


Information

FileMan FileNo FileMan Filename Package
31 DISABILITY CONDITION HINQ

Description

Directly Accessed By Routines, Total: 38

Package Total Routines
Registration 9 DGENUPL2    DGOVBC2    DGPMVBUR    DGPTUTL1    DGRP11    DGRPDB    DGRRPSEE    DGYMF31A
VAFHLZRD    
Scheduling 8 SCRPW63    SDCO23    SDPPAT1    SDROUT2    SDSCAPI    SDSCEDT    SDSCRPT2    SDWLRP3
Outpatient Pharmacy 7 PSOARCLT    PSOARCTG    PSOCPE    PSODEM    PSOORUT2    PSORX1    PSOTPRX1    
Integrated Billing 5 IB20PT87    IB20PT8B    IBERS2    IBTOAT2    IBTRED01    
Order Entry Results Reporting 3 ORWIB    ORWPCE    ORWPT    
Automated Information Collection System 1 IBDFN    
Beneficiary Travel 1 DGBT1    
HINQ 1 ^DIC(31    
Health Summary 1 GMTSDEM    
IHS Changes To Pharmacy 1 APSPMED2    
Lab Service 1 LRBEBA3    

Accessed By FileMan Db Calls, Total: 3

Package Total Routines
Scheduling 2 SDM4    SDWLSC    
Registration 1 DGENRDUA    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Registration 1 VA PATIENT(#2)[#2.04(.01)]    

Fields, Total: 3

Field # Name Loc Type Details
.01 NAME 0;1

  • INPUT TRANSFORM:  K:$L(X)>30!X!($L(X)<4)!'(X'?1P.E) X
  • HELP-PROMPT:  NAME MUST BE 4-30 CHARACTERS LONG & NOT BEGIN WITH PUNCTUATION
  • DELETE TEST:  .01,0)= I 1
  • CROSS-REFERENCE:  31^B
    1)= S @(DIC_"""B"",X,DA)=""""")
    2)= K @(DIC_"""B"",X,DA)")
1 ABBREVIATION 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<4) X
  • HELP-PROMPT:  ANSWER MUST BE 4-30 CHARACTERS IN LENGTH
2 DX CODE 0;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 0 AND 9999
  • CROSS-REFERENCE:  31^C
    1)= S ^DIC(31,"C",X,DA)=""
    2)= K ^DIC(31,"C",X,DA)

ICR, Total: 7

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #142
  • PROSTHETICS
  • CLINICAL PROCEDURES
  • VistA Integration Adapter
    		•  NAME (.01).
    Access: Read w/Fileman
    ICR #412
  • Automated Medical Information Exchange
    		•
    ICR #603
  • REMOTE ORDER/ENTRY SYSTEM
    		•
    ICR #658
  • INTEGRATED BILLING
  • QUASAR
  • Automated Information Collection System
  • OUTPATIENT PHARMACY
  • VISUAL IMPAIRMENT SERVICE TEAM
  • LAB SERVICE
    		•  NAME (.01).
    Access: Direct Global Read & w/Fileman

    SENSITIVE CONDITION PRINT NAME (3).
    Access: Direct Global Read & w/Fileman
    ICR #733
  • Automated Medical Information Exchange
  • SCHEDULING
  • REGISTRATION
  • VIRTUAL PATIENT RECORD
    		•  NAME (.01).
    Access: Direct Global Read & w/Fileman

    DX CODE (2).
    Access: Direct Global Read & w/Fileman

    RELATED ICD9 CODES (20;.01).
    Access: Direct Global Read & w/Fileman

    ICD9 MATCH (20;.02).
    Access: Direct Global Read & w/Fileman
    ICR #792
  • MENTAL HEALTH
    		•
    ICR #2967
  • ORDER ENTRY/RESULTS REPORTING
  • HEALTH SUMMARY
  • CONSULT/REQUEST TRACKING
    		•  NAME (.01).
    Access: Direct Global Read & w/Fileman

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DIC(31 - [#31] 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 2(XREF 1S), 2(XREF 1K)
    >> DIC .01(XREF 1S), .01(XREF 1K)
    U ID2+1
    X .01+1!, 1+1!, 2+1!, 2(XREF 1S), 2(XREF 1K)
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Fields |  ICR |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All