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  | All
Print Page as PDF
Routine: DVBARSBD

Package: Automated Medical Information Exchange

Routine: DVBARSBD


Information

DVBARSBD ;ALB/RPM - CAPRI 2507 REQUEST STATUS BY DT RANGE REPORT ; 01/24/12

Source Information

Source file <DVBARSBD.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 4 CHK^DIE  $$EXTERNAL^DILFD  ($$GET1,GETS)^DIQ  ^DIWP  
Automated Medical Information Exchange 1 $$RSTAT^DVBCUTL8  
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: 1

Package Total Caller Graph
Automated Medical Information Exchange 1 DVBAB82  

Entry Points

Name Comments DBIA/ICR reference
REQSTAT(DVBSDAT,DVBEDAT,DVBRSTAT,DVBDELIM,DVBNODT) ;entry for request status by dt range
D
END ;Clean up local variables
GETRECS(SDAT,EDAT,RSTAT,CNT) ;collect 2507 REQUEST record matches, when DVBNODT=0 means not ignoring the date range
CANFLD ;
SETFLDS(DVBIEN,DVBFLDS) ;build field array in external format
DELIMHDR(EXSDAT,EXEDAT,EXSTAT) ;output delimited format header
; Input:
; EXSDAT - start date (external format)
; EXEDAT - end date (external format)
; EXSTAT - request status (external format)
; GRE ; added re-route status information to the report
DELIM ;output delimited format
PLAINHDR(EXSDAT,EXEDAT,EXSTAT)
PLAIN ;output plain text format
GETRECSN(RSTAT,DVBCNT) ;collect 2507 REQUEST status matches and ignore date range
CLAIMTYP ;THE CLAIM TYPE OF A 2507 REQUEST
SPEC ;SPECIAL CONSIDERATION(S) FOR A 2507 REQUEST
GETRRDAT ;GRE Input=IEN , get re-route date, to and from site and re-route status

External References

Name Field # of Occurrence
CHK^DIE REQSTAT+33
$$EXTERNAL^DILFD GETRRDAT+7, GETRRDAT+9, GETRRDAT+14
$$GET1^DIQ SETFLDS+68, SETFLDS+71, PLAIN+29
GETS^DIQ SETFLDS+44, CLAIMTYP+5
^DIWP PLAIN+34
$$RSTAT^DVBCUTL8 GETRECS+19
DEM^VADPT SETFLDS+46
$$FMTE^XLFDT REQSTAT+26, REQSTAT+27, SETFLDS+52, SETFLDS+53, SETFLDS+54, SETFLDS+55, GETRRDAT+8, GETRRDAT+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "NO DATA FOUND"
  • Line Location: D+1
Function Call: WRITE
  • Prompt: !,DVBREQH
  • Line Location: DELIM+8
Function Call: WRITE
  • Prompt: !,DVBREQL2
  • Line Location: DELIM+12
Function Call: WRITE
  • Prompt: !,DVBREQL3
  • Line Location: DELIM+15
Function Call: WRITE
  • Prompt: !,"Date Range: "_EXSDAT_" - "_EXEDAT
  • Line Location: PLAINHDR+17
Function Call: WRITE
  • Prompt: !,"Request Status: ",EXSTAT
  • Line Location: PLAINHDR+18
Function Call: WRITE
  • Prompt: !,"-----------------------------------------------------------------------------------------------"
  • Line Location: PLAINHDR+19
Function Call: WRITE
  • Prompt: !,DVBLINE
  • Line Location: PLAIN+12
Function Call: WRITE
  • Prompt: !,"SSN:",?14,$P(DVBREQ,U,2)
  • Line Location: PLAIN+13
Function Call: WRITE
  • Prompt: !,"PATIENT NAME:",?14,$E($P(DVBREQ,U,3),1,20)
  • Line Location: PLAIN+14
Function Call: WRITE
  • Prompt: !,"REQUEST DT:",?14,$P(DVBREQ,U,4)
  • Line Location: PLAIN+15
Function Call: WRITE
  • Prompt: !,"DT RELEASED:",?14,$P(DVBREQ,U,5)
  • Line Location: PLAIN+16
Function Call: WRITE
  • Prompt: !,"DT PRINTED:",?14,$P(DVBREQ,U,6)
  • Line Location: PLAIN+17
Function Call: WRITE
  • Prompt: !,"STATUS:",?14,$P(DVBREQ,U,7)
  • Line Location: PLAIN+18
Function Call: WRITE
  • Prompt: !,"DT CANCELED:",?14,$P(DVBREQ,U,8)
  • Line Location: PLAIN+19
Function Call: WRITE
  • Prompt: !,"CLAIM TYPE: ",DVBCTW
  • Line Location: PLAIN+21
Function Call: WRITE
  • Prompt: !,"SPECIAL CONSIDERATION(S):",DVBSCWA
  • Line Location: PLAIN+22
Function Call: WRITE
  • Prompt: !,"RE-ROUTE DATE:",RRDATE
  • Line Location: PLAIN+23
Function Call: WRITE
  • Prompt: !,"RE-ROUTE FROM SITE:",RRFRMSITE
  • Line Location: PLAIN+24
Function Call: WRITE
  • Prompt: !,"RE-ROUTE TO SITE:",RRTOSITE
  • Line Location: PLAIN+25
Function Call: WRITE
  • Prompt: !,"CANCELLATION REASON:",?14,DVBCNRS
  • Line Location: PLAIN+30
Function Call: WRITE
  • Prompt: !,"CANCELLATION COMMENTS:",?14
  • Line Location: PLAIN+34
Routine Call
  • DIE
  • Line Location:
    • REQSTAT+33

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DVB(396.25 - [#396.25] SPEC+12
^DVB(396.3 - [#396.3] GETRECS+16, GETRECS+17, GETRECS+19, GETRECSN+14, GETRECSN+16, CLAIMTYP+2, SPEC+8, SPEC+9, SPEC+10, SPEC+11
, GETRRDAT+2, GETRRDAT+6, GETRRDAT+7, GETRRDAT+8, GETRRDAT+9, GETRRDAT+11, GETRRDAT+12, GETRRDAT+13, GETRRDAT+14
^DVB(396.4 - [#396.4] SETFLDS+65, SETFLDS+66, SETFLDS+67, SETFLDS+69, SETFLDS+73, PLAIN+26, PLAIN+27, PLAIN+28, PLAIN+32, PLAIN+34
^TMP("DVBREQ" REQSTAT+25!, END+3!, GETRECS+25*, GETRECS+26*, GETRECS+33*, GETRECS+34*, GETRECS+35*, GETRECS+36*, GETRECS+37*, DELIM+9
, DELIM+10, DELIM+11, DELIM+13, DELIM+14, PLAIN+8, PLAIN+9, PLAIN+10, GETRECSN+21*, GETRECSN+22*, GETRECSN+29*
, GETRECSN+30*, GETRECSN+31*, GETRECSN+32*, GETRECSN+33*, GETRECSN+41*
^TMP("DVBREQH" END+3!, DELIMHDR+6*, DELIMHDR+7*, DELIMHDR+8*, DELIMHDR+9*, DELIMHDR+10*, DELIM+6, DELIM+7
^TMP("DVBREQN" REQSTAT+25!, GETRECSN+37, GETRECSN+39, GETRECSN+41
^TMP("DVBREQX" GETRECS+24*
^UTILITY($J PLAIN+33!

Label References

Name Line Occurrences
$$SETFLDS GETRECS+22, GETRECSN+18
CANFLD GETRECS+30, GETRECSN+26
CLAIMTYP SETFLDS+57, PLAIN+20
DELIM D+4
DELIMHDR REQSTAT+42, REQSTAT+45
GETRECS REQSTAT+46
GETRECSN REQSTAT+43
GETRRDAT SETFLDS+57, PLAIN+11
PLAIN D+3
PLAINHDR D+3
SPEC SETFLDS+57, PLAIN+20

Naked Globals

Name Field # of Occurrence
^( PLAIN+34

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CHGDAT GETRECS+11~, GETRECS+15*, GETRECS+16*, GETRECS+17, GETRECSN+36*, GETRECSN+37*, GETRECSN+39, GETRECSN+41
CNT GETRECS~, GETRECS+16*, GETRECS+23*, GETRECS+24, GETRECS+25, GETRECS+26, GETRECS+27*, GETRECS+33, GETRECS+34, GETRECS+35
, GETRECS+36, GETRECS+37, GETRECS+38*, GETRECSN+36*, GETRECSN+40*, GETRECSN+41
DFN SETFLDS+31~, SETFLDS+45*
DIWF END+1!, END+2!, PLAIN+34*
DIWL END+1!, END+2!, PLAIN+34*
DIWR END+1!, END+2!, PLAIN+34*
DVBAA END+3!, SPEC+9*, SPEC+14
DVBAD REQSTAT+36*, END+1!, END+2!, GETRECS+24, GETRECS+28, GETRECS+33, GETRECS+34, GETRECS+35, GETRECS+36, GETRECS+37
, DELIMHDR+9, DELIMHDR+10, GETRECSN+20, GETRECSN+24, GETRECSN+29, GETRECSN+30, GETRECSN+31, GETRECSN+32, GETRECSN+33
DVBAI SETFLDS+38~, SETFLDS+73*, SETFLDS+74*
DVBALAST SETFLDS+37~, SETFLDS+73*, SETFLDS+74
DVBARS REQSTAT+12~, REQSTAT+33
DVBARS(0 REQSTAT+34
DVBAX END+1!, END+2!, SETFLDS+39~, SETFLDS+71*
DVBAY END+1!, END+2!, SETFLDS+67*, PLAIN+28*
DVBCNRS END+1!, PLAIN+29*, PLAIN+30
DVBCNT REQSTAT+14~, REQSTAT+35*, REQSTAT+43, REQSTAT+46, D, DELIMHDR+6*, DELIMHDR+7*, DELIMHDR+8*, DELIMHDR+9, DELIMHDR+10*
, GETRECSN~, GETRECSN+14*, GETRECSN+21, GETRECSN+22, GETRECSN+23*, GETRECSN+29, GETRECSN+30, GETRECSN+31, GETRECSN+32, GETRECSN+33
, GETRECSN+34*, SPEC+10*, SPEC+13*, SPEC+14
DVBCT END+2!
DVBCTN END+2!
DVBCTW END+2!, SETFLDS+58, PLAIN+21, CLAIMTYP+1*, CLAIMTYP+6*
DVBDAT SETFLDS+32~
DVBDAT( SETFLDS+45, SETFLDS+51, SETFLDS+52, SETFLDS+53, SETFLDS+54, SETFLDS+55, SETFLDS+56, SETFLDS+77
DVBDELIM REQSTAT~, REQSTAT+36, REQSTAT+42, REQSTAT+45, D+3, D+4, SETFLDS+50
DVBEDAT REQSTAT~, REQSTAT+27, REQSTAT+46, SETFLDS+67, PLAIN+28
DVBERR REQSTAT+13~
DVBEXAM END+1!
DVBFLDS SETFLDS~, SETFLDS+40!
DVBFLDS("CANCOM" SETFLDS+64*, SETFLDS+73*, SETFLDS+74*
DVBFLDS("CANDT" SETFLDS+55*
DVBFLDS("CANRS" SETFLDS+64*, SETFLDS+68*
DVBFLDS("DVBCTW" SETFLDS+58*
DVBFLDS("DVBSCWA" SETFLDS+59*
DVBFLDS("IEN" SETFLDS+48*
DVBFLDS("IEN4" SETFLDS+64*, SETFLDS+70*
DVBFLDS("IREQDT" SETFLDS+77*
DVBFLDS("NM" SETFLDS+49*
DVBFLDS("PRTDT" SETFLDS+54*
DVBFLDS("RELDT" SETFLDS+53*
DVBFLDS("REQDT" SETFLDS+52*
DVBFLDS("RO" SETFLDS+56*
DVBFLDS("RRDTE" SETFLDS+60*
DVBFLDS("RRLOC" SETFLDS+62*
DVBFLDS("RRSTE" SETFLDS+61*
DVBFLDS("RS" SETFLDS+51*
DVBFLDS("SS" SETFLDS+50*
DVBI DELIM+2~, DELIM+6*, DELIM+7, PLAIN+4~, PLAIN+7*, PLAIN+8*, PLAIN+9, PLAIN+10
DVBI2 END+1!, END+2!, DELIM+9*, DELIM+10, DELIM+11, DELIM+13, DELIM+14
DVBI22 END+4!, DELIM+13*, DELIM+14
DVBIEN GETRECS+12~, GETRECS+16*, GETRECS+17*, GETRECS+19, GETRECS+22, GETRECS+25, GETRECS+26, GETRECS+33, GETRECS+34, GETRECS+35
, GETRECS+36, GETRECS+37, SETFLDS~, SETFLDS+43, SETFLDS+48, SETFLDS+65, DELIM+10*, DELIM+11, DELIM+13, DELIM+14
, PLAIN+9*, PLAIN+10, PLAIN+26, GETRECSN+11~, GETRECSN+15*, GETRECSN+16*, GETRECSN+18, GETRECSN+21, GETRECSN+22, GETRECSN+29
, GETRECSN+30, GETRECSN+31, GETRECSN+32, GETRECSN+33, GETRECSN+38*, GETRECSN+39*, GETRECSN+41, CLAIMTYP+2, CLAIMTYP+5, CLAIMTYP+6
, SPEC+8, SPEC+9, SPEC+10, SPEC+11, GETRRDAT+2, GETRRDAT+6, GETRRDAT+7, GETRRDAT+8, GETRRDAT+9, GETRRDAT+11
, GETRRDAT+12, GETRRDAT+13, GETRRDAT+14
DVBIEN4 END+1!, END+2!, SETFLDS+36~, SETFLDS+65*, SETFLDS+66, SETFLDS+67, SETFLDS+68, SETFLDS+69, SETFLDS+70, SETFLDS+71
, SETFLDS+73, PLAIN+26*, PLAIN+27, PLAIN+28, PLAIN+29, PLAIN+32, PLAIN+34
DVBIENS SETFLDS+33~, SETFLDS+43*, SETFLDS+44, SETFLDS+45, SETFLDS+51, SETFLDS+52, SETFLDS+53, SETFLDS+54, SETFLDS+55, SETFLDS+56
, SETFLDS+77
DVBLINE REQSTAT+23~, REQSTAT+29*, PLAIN+12
DVBNODT REQSTAT~, REQSTAT+39
DVBREQ DELIM+3~, PLAIN+5~, PLAIN+10*, PLAIN+13, PLAIN+14, PLAIN+15, PLAIN+16, PLAIN+17, PLAIN+18, PLAIN+19
DVBREQH END+4!, DELIM+7*, DELIM+8
DVBREQL2 END+4!, DELIM+11*, DELIM+12
DVBREQL3 END+4!, DELIM+14*, DELIM+15
DVBRO GETRECSN+13~, GETRECSN+14*, GETRECSN+16
DVBRSLT SETFLDS+34~, SETFLDS+42*, SETFLDS+78*, SETFLDS+79
DVBRSTAT REQSTAT~, REQSTAT+30*, REQSTAT+31, REQSTAT+33, REQSTAT+43, REQSTAT+46
DVBSC END+2!, SPEC+10*, SPEC+11, SPEC+12, SPEC+14
DVBSCC END+2!
DVBSCN END+2!, SPEC+11*, SPEC+12
DVBSCNS END+3!
DVBSCW END+2!, SPEC+1!
DVBSCW( SPEC+12*, SPEC+14*, SPEC+15
DVBSCWA END+2!, SETFLDS+59, PLAIN+22, SPEC+2*, SPEC+15*
DVBSDAT REQSTAT~, REQSTAT+26, REQSTAT+46, SETFLDS+67, PLAIN+28
DVBSTAT GETRECS+13~, GETRECS+19*, GETRECS+20
DVBX END+1!, END+2!, CANFLD+2*, CANFLD+3*, CANFLD+4, SPEC+3~, SPEC+15*
DVBXCNT END+1!, END+2!, GETRECS+23*, GETRECS+24, GETRECS+25, GETRECS+27*, SETFLDS+63*, SETFLDS+64, SETFLDS+68, SETFLDS+70
, SETFLDS+73, SETFLDS+74, SETFLDS+76*, GETRECSN+19*, GETRECSN+21, GETRECSN+23*
EDAT GETRECS~, GETRECS+16
EXEDAT REQSTAT+11~, REQSTAT+27*, REQSTAT+41*, REQSTAT+42, REQSTAT+45, D+3, DELIMHDR~, DELIMHDR+7, PLAINHDR~, PLAINHDR+17
EXSDAT REQSTAT+10~, REQSTAT+26*, REQSTAT+40*, REQSTAT+42, REQSTAT+45, D+3, DELIMHDR~, DELIMHDR+7, PLAINHDR~, PLAINHDR+17
EXSTAT REQSTAT+9~, REQSTAT+31*, REQSTAT+34*, REQSTAT+42, REQSTAT+45, D+3, DELIMHDR~, DELIMHDR+8, PLAINHDR~, PLAINHDR+18
FLD GETRECS+14~, GETRECS+21!, GETRECS+22, GETRECSN+12~, GETRECSN+17!, GETRECSN+18
FLD("CANCOM" GETRECS+24, GETRECS+25, GETRECS+31*, GETRECS+35, CANFLD+4, GETRECSN+21, GETRECSN+27*, GETRECSN+31
FLD("CANDT" GETRECS+24, GETRECS+25, GETRECS+34, GETRECSN+21, GETRECSN+30
FLD("CANRS" GETRECS+24, GETRECS+25, GETRECS+31*, GETRECS+35, CANFLD+4, GETRECSN+21, GETRECSN+27*, GETRECSN+31
FLD("DVBCTW" GETRECS+26, GETRECS+35, GETRECSN+22, GETRECSN+31
FLD("DVBSCWA" GETRECS+26, GETRECS+36, GETRECSN+22, GETRECSN+32
FLD("IEN" GETRECS+24, GETRECS+25, GETRECSN+21
FLD("IEN4" GETRECS+30, CANFLD+3, GETRECSN+26
FLD("NM" GETRECS+24, GETRECS+25, GETRECS+33, GETRECSN+21, GETRECSN+29
FLD("PRTDT" GETRECS+24, GETRECS+25, GETRECS+33, GETRECSN+21, GETRECSN+29
FLD("RELDT" GETRECS+24, GETRECS+25, GETRECS+33, GETRECSN+21, GETRECSN+29
FLD("REQDT" GETRECS+24, GETRECS+25, GETRECS+33, GETRECSN+21, GETRECSN+29
FLD("RO" GETRECS+24, GETRECS+25, GETRECS+34, GETRECSN+21, GETRECSN+30
FLD("RRDTE" GETRECS+36, GETRECSN+32
FLD("RRLOC" GETRECS+32*, GETRECS+36, GETRECSN+28*, GETRECSN+33
FLD("RRSTE" GETRECS+32*, GETRECS+37, GETRECSN+28*, GETRECSN+32
FLD("RS" GETRECS+24, GETRECS+25, GETRECS+34, GETRECSN+21, GETRECSN+30
FLD("SS" GETRECS+24, GETRECS+25, GETRECS+33, GETRECSN+21, GETRECSN+29
IO DELIM+5, PLAINHDR+15, PLAIN+6
LINE END+1!, END+2!, PLAIN+34*
MSG END+4!
MSG("396.32" CLAIMTYP+6
RC1 CANFLD+1~, CANFLD+4*, CANFLD+5*, CANFLD+7, CANFLD+9*
RCC END+4!, GETRECS+29*, GETRECS+31, CANFLD+9*, CANFLD+10*, CANFLD+12*, GETRECSN+25*, GETRECSN+27
RCR END+4!, GETRECS+29*, GETRECS+31, CANFLD+8*, CANFLD+11*, GETRECSN+25*, GETRECSN+27
RRCC CANFLD+1~
RRCC( CANFLD+7*, CANFLD+9
RRCR CANFLD+1~
RRCR( CANFLD+6*, CANFLD+8
RRDATE REQSTAT+17~, REQSTAT+28*, GETRECS+26, SETFLDS+41*, SETFLDS+60, PLAIN+23, GETRRDAT+1*, GETRRDAT+4!, GETRRDAT+8*
RRFRMSITE REQSTAT+19~, REQSTAT+28*, END+4!, GETRECS+26, SETFLDS+41*, SETFLDS+61, PLAIN+24, GETRRDAT+1*, GETRRDAT+4!, GETRRDAT+7*
RRIENINC REQSTAT+16~, REQSTAT+28*, GETRRDAT+4!, GETRRDAT+5*, GETRRDAT+6*, GETRRDAT+7, GETRRDAT+8, GETRRDAT+9, GETRRDAT+11, GETRRDAT+12
, GETRRDAT+13, GETRRDAT+14
RRSTAT REQSTAT+22~, REQSTAT+28*, GETRRDAT+4!, GETRRDAT+14*
RRSTATDTE REQSTAT+21~, REQSTAT+28*, GETRRDAT+1*, GETRRDAT+4!, GETRRDAT+13*
RRSTATINC REQSTAT+20~, REQSTAT+28*, GETRRDAT+4!, GETRRDAT+5*, GETRRDAT+10*, GETRRDAT+11*, GETRRDAT+12, GETRRDAT+13, GETRRDAT+14
RRTOSITE REQSTAT+18~, REQSTAT+28*, GETRECS+26, SETFLDS+41*, SETFLDS+62, PLAIN+25, GETRRDAT+1*, GETRRDAT+4!, GETRRDAT+9*
RS1 CANFLD+1~, CANFLD+4*, CANFLD+5*, CANFLD+6, CANFLD+8*
RSTAT GETRECS~, GETRECS+20, GETRECSN~, GETRECSN+14, GETRECSN+16
SDAT GETRECS~, GETRECS+15
U GETRECS+19, GETRECS+24, GETRECS+25, GETRECS+26, SETFLDS+50, SETFLDS+73, PLAIN+13, PLAIN+14, PLAIN+15, PLAIN+16
, PLAIN+17, PLAIN+18, PLAIN+19, GETRECSN+21, GETRECSN+22, SPEC+9, SPEC+11, GETRRDAT+7, GETRRDAT+8, GETRRDAT+9
, GETRRDAT+13, GETRRDAT+14
VADM SETFLDS+35~
VADM(1 SETFLDS+47, SETFLDS+49
VADM(2 SETFLDS+50
WP SETFLDS+71!
WP( SETFLDS+74
WP(1 SETFLDS+73
X END+1!, END+2!, PLAIN+34*
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  | All