Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: DGYLPOST

Package: Registration

Routine: DGYLPOST


Information

DGYLPOST ;ALB/CAW;Update VA Admitting Regulation/HL7 file;8/10/94<<= NOT VERIFIED >

Source Information

Source file <DGYLPOST.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 3 FILE^DICN  ^DIE  ENALL^DIK  

Entry Points

Name Comments DBIA/ICR reference
INDEX ; Reindex VA ADMITTING REGULATION file
EN ;
HL7 ; Update HL7 version and segment files
HL7713
ENQ
INIT ;Place active codes in an array
CLEAN ;Clean up existing entries; add new if doesn't exit
NEW ;Add new entry
INACT ;Inactivate entry
ADM ;List of active VA ADMITTING REGULATIONS
NMCHG ;Change the name of codes
MESA ;Message to add new entry

External References

Name Field # of Occurrence
FILE^DICN NEW+9, HL7+4, HL7713+1
^DIE NMCHG+4, NMCHG+6, CLEAN+8, HL7+6, HL7713+3
ENALL^DIK INDEX+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Adding entries to the VA ADMITTING REGULATION (43.4) file."
  • Line Location: NEW+4
Function Call: WRITE
  • Prompt: !?8,"...adding "_$P(ADM(DGI),U)_" to file..."
  • Line Location: MESA+1
Routine Call
  • DIE
  • Line Location:
    • NMCHG+4
    • NMCHG+6
    • CLEAN+8
    • HL7+6
    • HL7713+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(43.4 - [#43.4] Classic Fileman Calls
^HL(770 - [#770] Classic Fileman Calls
^HL(771.3 - [#771.3] Classic Fileman Calls
^HL(771.5 - [#771.5] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(43.4 - [#43.4] NMCHG+3, NMCHG+5, CLEAN+4, CLEAN+6, CLEAN+9, INACT+3, INACT+4*, INACT+5*
^HL(770 - [#770] HL7+5
^HL(771.3 - [#771.3] HL7713
^HL(771.5 - [#771.5] HL7+3

Label References

Name Line Occurrences
CLEAN EN+4
HL7 EN+7
HL7713 HL7+3
INACT CLEAN+5, CLEAN+9
INDEX EN+6
INIT EN+2
MESA NEW+9
NEW EN+5
NMCHG EN+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADM ENQ!
ADM( INIT+2*, CLEAN+5, CLEAN+7, CLEAN+10!, NEW+5, NEW+7, NEW+8, MESA+1
DA NMCHG+2~, NMCHG+4*, NMCHG+6*, CLEAN+2~, CLEAN+7*, HL7+2~, HL7+5*, HL7+6, HL7713+1*, HL7713+2*
DD HL7+4!, HL7713+1!
DGA CLEAN+2~, CLEAN+3*, CLEAN+6*, CLEAN+7, CLEAN+9*, INACT+2, INACT+3
DGA1 CLEAN+2~, INACT+2*, INACT+3*, INACT+4, INACT+5*
DGC INIT+1~, INIT+2*
DGI INIT+1~, INIT+2*, NMCHG+2~, NMCHG+3*, NMCHG+4, NMCHG+5*, NMCHG+6, CLEAN+2~, CLEAN+3*, CLEAN+4*
, CLEAN+5, CLEAN+6, CLEAN+7, CLEAN+9, CLEAN+10, INACT+3, INACT+5, NEW+2~, NEW+3*, NEW+5*
, NEW+7, NEW+8, MESA+1
DIC NEW+2~, NEW+6*, HL7+2~, HL7+4*, HL7713+1*, HL7713+2
DIC("DR" NEW+8*
DIC(0 NEW+6*, HL7+4*, HL7713+1*
DIE NMCHG+2~, NMCHG+4*, NMCHG+6*, CLEAN+2~, CLEAN+7*, HL7+2~, HL7+6*, HL7713+2*
DIK INDEX+1~, INDEX+2*
DIK(1 INDEX+2*
DLAYGO NEW+2~, NEW+6*, HL7+2~, HL7+4*, HL7713+1*
DO HL7+4!, HL7713+1!
DR NMCHG+2~, NMCHG+4*, NMCHG+6*, CLEAN+2~, CLEAN+7*, HL7+6*, HL7713+2*
HLVER HL7+2~, HL7+3*, HL7+5*
U INIT+2, CLEAN+7, INACT+4, INACT+5, NEW+7, NEW+8, MESA+1
X NEW+2~, NEW+7*, HL7+2~, HL7+4*, HL7713+1*
Y NEW+2~, HL7+2~, HL7+5, HL7+6, HL7713+1, HL7713+2

Marked Items

Name Field # of Occurrence
$T(ADM+DGI INIT+2
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All