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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: DVBAUTL7

Package: Automated Medical Information Exchange

Routine: DVBAUTL7


Information

DVBAUTL7 ;ALB/GTS;UTILITY ROUTINE;12/6/94

Source Information

Source file <DVBAUTL7.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 2 ^DIC  ^DIE  
Automated Medical Information Exchange 1 WR^DVBAUTL4  
Kernel 1 $$FMTE^XLFDT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Automated Medical Information Exchange 3 DVBADXFR  DVBAUTL2  DVBAUTL8  

Entry Points

Name Comments DBIA/ICR reference
SEL7131() ;** Select a 7131 request
CHECK ;** Check 7131 for a pending report
INITRPT(DVBAIEN) ;** Set nodes for division updates on 7131
SETDR ;** Set DR string for 7131 division/tran date field updates
CLEARDR ;** Set DR string to clear 7131 division/tran date fields (7131 edit)
REQDT ;** Output 7131 date for DIC("W")
FILE ;** Update 7131 record - Called from DVBADXFR
RPTNMS ;
9 ;;Notice of Discharge
11 ;;Hospital Summary
13 ;;Certificate (21-day)
15 ;;Other/Exam (Review Remarks)
17 ;;Special Report
19 ;;Competency Report
21 ;;VA Form 21-2680
23 ;;Asset Information
7 ;;Admission Report
28 ;;Beginning Date Care
26 ;;OPT Treatment Report (Date Range)

External References

Name Field # of Occurrence
^DIC SEL7131+5
^DIE FILE+54
WR^DVBAUTL4 CHECK+12
$$FMTE^XLFDT REQDT+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?35,$S($P(^(2),U,10)="L":"Activity Date: ",$P(^(2),U,10)="A":"Admission Date: ",1:""),DVBADTE
  • Line Location: REQDT+10
Routine Call
  • DIC
  • Line Location:
    • SEL7131+5
Routine Call
  • DIE
  • Line Location:
    • FILE+54

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DVB(396 - [#396] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] INITRPT+31
^DVB(396 - [#396] CHECK+6, CHECK+8, INITRPT+8, INITRPT+9, INITRPT+10, INITRPT+23, INITRPT+24, INITRPT+25, INITRPT+28, INITRPT+29
, REQDT+2

Label References

Name Line Occurrences
CHECK SEL7131+6
SETDR FILE+10, FILE+14, FILE+18, FILE+22, FILE+26, FILE+30, FILE+34, FILE+38, FILE+42, FILE+46
, FILE+50

Naked Globals

Name Field # of Occurrence
^(2 REQDT+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA FILE+53*, FILE+55!
DIC SEL7131+3*, SEL7131+7!
DIC("W" SEL7131+4*
DIC(0 SEL7131+3*
DIE FILE+52*, FILE+55!
DIVNUM INITRPT+7~, INITRPT+30*, INITRPT+31, INITRPT+32, INITRPT+33
DR SETDR+1*, SETDR+2*, CLEARDR+1*, CLEARDR+2*, FILE+51, FILE+55!
DVBA0 INITRPT+7~, INITRPT+8*
DVBA6 INITRPT+7~, INITRPT+9*, INITRPT+10*, INITRPT+30
DVBADIV INITRPT+7~, INITRPT+31*, INITRPT+32*, INITRPT+33
DVBADTE REQDT+1~, REQDT+5*, REQDT+9*, REQDT+10
DVBADTWK REQDT+1~, REQDT+2*, REQDT+3, REQDT+4*, REQDT+5, FILE+1~, FILE+2*, FILE+3*, FILE+4
DVBAIEN INITRPT~, INITRPT+8, INITRPT+9, INITRPT+10, INITRPT+23, INITRPT+24, INITRPT+25, INITRPT+28, INITRPT+29
DVBAOPEN CHECK+1!, CHECK+4, CHECK+6*, CHECK+8*, CHECK+9, CHECK+10, CHECK+14!
>> DVBARPT( INITRPT+33*, FILE+6, FILE+8, FILE+12, FILE+16, FILE+20, FILE+24, FILE+28, FILE+32, FILE+36
, FILE+40, FILE+44, FILE+48
>> DVBATDT FILE+2, FILE+3, FILE+4
DVBATIME REQDT+1~, REQDT+3*, REQDT+6, REQDT+7*, REQDT+8*, REQDT+9
DVBAX CHECK+2~, CHECK+3*, CHECK+5, CHECK+6, CHECK+7, CHECK+8, INITRPT+7~, INITRPT+12*, INITRPT+16, INITRPT+17
, INITRPT+18, INITRPT+19, INITRPT+20, INITRPT+21, INITRPT+22, INITRPT+23, INITRPT+24, INITRPT+25, INITRPT+26, INITRPT+30
, REQDT+1~, REQDT+7*, FILE+1~, FILE+5*, FILE+6, FILE+7, FILE+8, FILE+11, FILE+12, FILE+15
, FILE+16, FILE+19, FILE+20, FILE+23, FILE+24, FILE+27, FILE+28, FILE+31, FILE+32, FILE+35
, FILE+36, FILE+39, FILE+40, FILE+43, FILE+44, FILE+47, FILE+48
>> FLDDIV SETDR+1, SETDR+2, CLEARDR+1, CLEARDR+2, FILE+9*, FILE+13*, FILE+17*, FILE+21*, FILE+25*, FILE+29*
, FILE+33*, FILE+37*, FILE+41*, FILE+45*, FILE+49*
>> FLDDTE SETDR+1, SETDR+2, CLEARDR+1, CLEARDR+2, FILE+9*, FILE+13*, FILE+17*, FILE+21*, FILE+25*, FILE+29*
, FILE+33*, FILE+37*, FILE+41*, FILE+45*, FILE+49*
PAR1 CHECK+13!
PAR2 CHECK+13!
>> REQDA FILE+53
>> REQDIV SETDR+1, SETDR+2, FILE+8*, FILE+12*, FILE+16*, FILE+20*, FILE+24*, FILE+28*, FILE+32*, FILE+36*
, FILE+40*, FILE+44*, FILE+48*
>> REQDTE SETDR+1, SETDR+2, FILE+4*
RPTNME INITRPT+7~, INITRPT+14*, INITRPT+15*, INITRPT+33
RPTSEL INITRPT+7~, INITRPT+25*, INITRPT+28*, INITRPT+29*, INITRPT+33
RPTSTAT INITRPT+7~, INITRPT+23*, INITRPT+24*, INITRPT+33
SELPCE INITRPT+7~, INITRPT+18*, INITRPT+19*, INITRPT+20*, INITRPT+21*, INITRPT+22*, INITRPT+24*, INITRPT+25, INITRPT+27*, INITRPT+28
, INITRPT+29
SUBSCPT INITRPT+7~, INITRPT+11*, INITRPT+13*, INITRPT+33
U CHECK+6, CHECK+8, INITRPT+23, INITRPT+24, INITRPT+25, INITRPT+28, INITRPT+29, INITRPT+30, INITRPT+31, REQDT+2
, REQDT+10, FILE+6, FILE+8, FILE+12, FILE+16, FILE+20, FILE+24, FILE+28, FILE+32, FILE+36
, FILE+40, FILE+44, FILE+48
VAR CHECK+13!
VAR(1 CHECK+11*
X SEL7131+7!
Y SEL7131+1!, SEL7131+2, SEL7131+6, SEL7131+8, CHECK+6, CHECK+8, CHECK+9!, REQDT+2

Marked Items

Name Field # of Occurrence
$T(@DVBAX INITRPT+14
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All