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 |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: DVBAB6

Package: Automated Medical Information Exchange

Routine: DVBAB6


Information

DVBAB6 ;ALB/DJS - CAPRI PENDING 2507 REQUEST REPORT ; 9/8/21 3:59pm

Source Information

Source file <DVBAB6.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Automated Medical Information Exchange 2 (ELAPSED,SORT)^DVBAB5  $$RSTAT^DVBCUTL8  
VA FileMan 2 $$EXTERNAL^DILFD  GETS^DIQ  
Kernel 1 $$FMTE^XLFDT  
Registration 1 DEM^VADPT  

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: 2

Package Total Caller Graph
Automated Medical Information Exchange 2 DVBAB 2507 PENDING REPORT  DVBAB PENDING C&P REPORT  

Entry Points

Name Comments DBIA/ICR reference
STRT(MSG,DVBCSORT,RSTAT,ERDAYS,OLDAYS,ADIVNUM,ELTYP,DVBADLMTR,ROFILTER) ;
; MSG=DATA Passed back from RPC to GUI;(.MSG,"A","NR",1,1,7613,"W",0,0)
SETUP
HEAD
HEADRND ; Print non-delimited output header
HEADRD ; Print delimited output header
DATA ; Sort data records
EXIT
PRINT ; print 2507 request data
ITEMS
ITEMSND
ITEMSD
PRINTD ; Print delimited format output on report
NXT ;F DA(1)=0:0 S DA(1)=$O(^TMP($J,JX,PNAM,DFN,DA(1))) Q:DA(1)="" D PRINT I $D(OUT) S DA(1)="",PNAM="ZZZZ",JX=$S($A(JX)>57:PNAM,1:9999999),DONE="YES"
TST
TST1
CLAIMTYP ;THE CLAIM TYPE OF A 2507 REQUEST
SPEC ;SPECIAL CONSIDERATION(S) FOR A 2507 REQUEST
REROUTE ;REROUTE INFO FOR A 2507 REQUEST

External References

Name Field # of Occurrence
$$EXTERNAL^DILFD PRINT+12, TST1+6, TST1+12, REROUTE+9, REROUTE+10
GETS^DIQ CLAIMTYP+5
ELAPSED^DVBAB5 PRINT+9
SORT^DVBAB5 DATA+2
$$RSTAT^DVBCUTL8 PRINT+11
DEM^VADPT PRINTD+4
$$FMTE^XLFDT SETUP+1, PRINT+23, PRINTD+6

Used in RPC

RPC Name Call Tags
DVBAB 2507 PENDING REPORT STRT
DVBAB PENDING C&P REPORT STRT

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DVB(396.3 - [#396.3] EXTERNAL^DILFD,  GETS^DIQ
396.34 EXTERNAL^DILFD
^DVB(396.4 - [#396.4] EXTERNAL^DILFD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] STRT+11, PRINT+2
^DIC(4 - [#4] ITEMS+2
^DIC(4.2 - [#4.2] PRINT+8, TST1+8, TST1+14
^DPT - [#2] PRINT+4, PRINT+5, PRINT+6, PRINT+7
^DVB(396.1 - [#396.1] HEAD
^DVB(396.25 - [#396.25] SPEC+12
^DVB(396.3 - [#396.3] DATA+2, PRINT+2, PRINT+3, PRINT+8, PRINT+11, PRINT+12, PRINT+25, ITEMS, ITEMS+2, PRINTD+3
, CLAIMTYP+2, SPEC+3, SPEC+8, SPEC+10, SPEC+11, REROUTE+4, REROUTE+8, REROUTE+9, REROUTE+10
^DVB(396.4 - [#396.4] TST, TST1+1, TST1+2
^DVB(396.5 - [#396.5] TST1+3
^DVB(396.6 - [#396.6] TST
^TMP("CAPRI" SETUP!, HEADRND+2*, HEADRND+3*, HEADRND+4*, HEADRND+5*, HEADRND+6*, HEADRND+7*, HEADRD+2*, HEADRD+3*, HEADRD+4*
, HEADRD+5*, DATA+10*, EXIT*, EXIT+1, PRINT+8*, PRINT+16*, PRINT+17*, PRINT+18*, PRINT+19*, PRINT+20*
, PRINT+21*, PRINT+22*, PRINT+23*, PRINT+24*, PRINT+27*, PRINT+28*, PRINT+29*, PRINT+30*, PRINT+31*, PRINT+32*
, ITEMSND*, ITEMSND+1*, ITEMSND+2*, TST1+5*, TST1+6*, TST1+8*, TST1+13*, TST1+14*, TST1+15*
^TMP($J SETUP!, DATA+5, DATA+7, DATA+8, DATA+9, EXIT+2!, NXT+1
^VA(200 - [#200] ITEMS+1, ITEMSD

Label References

Name Line Occurrences
CLAIMTYP PRINT+26, TST1+11
DATA HEAD+1, HEAD+2
HEADRD HEAD+2
HEADRND HEAD+1
ITEMS PRINT+15
ITEMSD ITEMS+4
ITEMSND ITEMS+3
NXT DATA+9
PRINT DATA+5, NXT+1
PRINTD PRINT+15
REROUTE PRINT+26, TST1+11
SPEC PRINT+26, TST1+11
TST ITEMSND, ITEMSD+2
TST1 TST

Naked Globals

Name Field # of Occurrence
^(0 HEAD, PRINT+2, PRINT+3, PRINT+8, ITEMS+1, ITEMSD, TST, TST1+8, TST1+14
^(1 PRINT+2
^(4 PRINT+25

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADIV EXIT+2!, PRINT+2*, PRINT+16, PRINTD+5
ADIVNUM STRT~, STRT+11*, PRINT+2
CNUM EXIT+2!, PRINT+7*, PRINT+22, PRINTD+6
DA EXIT+3!, TST*, TST1+1, TST1+2
DA(1 DATA+5*, PRINT+2, PRINT+3, PRINT+8, PRINT+11, PRINT+12, PRINT+25, ITEMS, ITEMS+2, PRINTD+3
, NXT+1*, TST, CLAIMTYP+2, CLAIMTYP+5, CLAIMTYP+6, SPEC+3, SPEC+8, SPEC+10, SPEC+11, REROUTE+4
, REROUTE+8, REROUTE+9, REROUTE+10
DFN DATA+2*, DATA+5*, DATA+9*, EXIT+3!, PRINT+4, PRINT+5, PRINT+6, PRINT+7, NXT+1
DONE SETUP+1*, DATA+10*, EXIT+1, EXIT+3!
DT SETUP+1
DVBAA EXIT+4!, SPEC+8*, SPEC+14
DVBADLMTR STRT~, STRT+12*, HEAD+1, HEAD+2, HEADRD+3, HEADRD+4, HEADRD+5, EXIT+3!, PRINT+8, PRINT+15
, ITEMS+3, ITEMS+4, ITEMSD+1, PRINTD+4, PRINTD+5, PRINTD+6, TST1+4, TST1+10, TST1+13
DVBCCNT SETUP+1*, DATA+10, EXIT+3!, ITEMSND+3*, ITEMSD+2*
DVBCDT EXIT+3!
DVBCDT(0 SETUP+1*, HEAD
DVBCELL EXIT+4!, PRINT+5*, PRINT+20, TST1+13
DVBCHDR SETUP+2*, EXIT+3!
DVBCNT EXIT+4!, SPEC+10*, SPEC+13*, SPEC+14
DVBCSORT STRT~, SETUP+2, DATA+5, DATA+6, PRINT+2
DVBCTW EXIT+4!, PRINT+29, TST1+13, CLAIMTYP+1*, CLAIMTYP+6*
DVBEMA EXIT+4!, PRINT+6*, PRINT+21, TST1+13
DVBINC REROUTE+6!, REROUTE+7*, REROUTE+8*, REROUTE+9, REROUTE+10
DVBRRF PRINT+27, TST1+13, REROUTE+3*, REROUTE+6!, REROUTE+9*
DVBRRT PRINT+28, TST1+13, REROUTE+3*, REROUTE+6!, REROUTE+10*
DVBSC EXIT+4!, SPEC+10*, SPEC+11, SPEC+12, SPEC+14
DVBSCN EXIT+4!, SPEC+11*, SPEC+12
DVBSCNS EXIT+4!
DVBSCW EXIT+4!, SPEC+1!
DVBSCW( SPEC+12*, SPEC+14*, SPEC+15
DVBSCWA EXIT+4!, PRINT+30, TST1+13, SPEC+2*, SPEC+15*
DVBX EXIT+4!, SPEC+15*
EDAYS EXIT+3!, PRINT+24, PRINTD+6
ELTYP STRT~
ERDAYS STRT~
EXAMRECRD DATA+3~, EXIT+3!, ITEMSD+1*, PRINTD+5*, PRINTD+6*, TST1+13
HEAD HEAD*, HEADRND+2, HEADRD+2, EXIT+3!
HEAD2 EXIT+3!
JX DATA+7*, DATA+8, DATA+9, EXIT+2!, NXT+1
MSG STRT~, EXIT*, EXIT+1*
MSG("396.32" CLAIMTYP+6
MSGCNT SETUP+1*, HEADRND+2*, HEADRND+3*, HEADRND+4*, HEADRND+5*, HEADRND+6*, HEADRND+7*, HEADRD+2*, HEADRD+3, HEADRD+4
, HEADRD+5, HEADRD+6*, DATA+10, EXIT, EXIT+2!, PRINT+8*, PRINT+16*, PRINT+17*, PRINT+18*, PRINT+19*
, PRINT+20*, PRINT+21*, PRINT+22*, PRINT+23*, PRINT+24*, PRINT+27*, PRINT+28*, PRINT+29*, PRINT+30*, PRINT+31*
, PRINT+32*, ITEMSND*, ITEMSND+1*, ITEMSND+2*, TST1+5, TST1+6, TST1+7*, TST1+8*, TST1+13, TST1+14
, TST1+15, TST1+16*
NODATA HEAD*, EXIT, EXIT+2!, ITEMS*
OLDAYS STRT~
OUT EXIT+3!
OWNDOM EXIT+3!, PRINT+8*, PRINTD+2
PG SETUP+1*, EXIT+2!
PNAM DATA+5*, DATA+8*, DATA+9, EXIT+3!, PRINT+18, PRINTD+5, NXT+1
PRINT TST!
PROCDT HEAD*, HEADRND+3, HEADRD+2, EXIT+2!
PRTNM EXIT+2!, TST*, TST1+5, TST1+12*, TST1+13
RDATE EXIT+2!, PRINT+3*
RDATE1 EXIT+2!, PRINT+3*, PRINT+23, PRINTD+6
REQDA DATA+2*, EXIT+2!
REQSTR EXIT+2!, ITEMS*, ITEMS+1, ITEMSD
ROFILTER STRT~, STRT+12*, HEADRD+3, EXIT+3!, PRINTD+5
RONAME EXIT+2!, ITEMS+2*, ITEMSND, ITEMSD+1
RONUM EXIT+3!, PRINTD+3*, PRINTD+5
RSTAT STRT~
SSN EXIT+2!, PRINT+4*, PRINT+19, PRINTD+4*, PRINTD+6
STATUS EXIT+2!, PRINT+11*, PRINT+12*, PRINT+17, PRINTD+5
STSAT EXIT+2!
TRNSFIN SETUP+1*, EXIT+2!, PRINT+8*, PRINTD+2*, PRINTD+6
TST EXIT+2!, TST*
TSTA1 EXIT+2!, TST1*, TST1+1*, TST1+3*, TST1+6, TST1+12
TSTAT EXIT+2!, TST*, TST1+6, TST1+8, TST1+12*, TST1+13, TST1+14
U HEAD, PRINT+2, PRINT+3, PRINT+4, PRINT+5, PRINT+6, PRINT+7, PRINT+8, PRINT+11, PRINT+12
, ITEMS, ITEMS+1, ITEMS+2, ITEMSD, PRINTD+3, PRINTD+4, TST, TST1+1, TST1+2, TST1+3
, TST1+8, TST1+14, SPEC+8, SPEC+11, REROUTE+9, REROUTE+10
VADM EXIT+3!
VADM(1 PRINTD+4
VADM(2 PRINTD+4
X STRT+11*, EXIT+3!, PRINT+25*, TST1+2*, TST1+8*, TST1+14*
XX EXIT+3!, PRINT+11*
ZS EXIT+3!
ZZZ EXIT+3!, ITEMS+1*, ITEMSND, ITEMSD*, ITEMSD+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All