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 |  Local Variables  | All
Print Page as PDF
Routine: DVBA8861

Package: Automated Medical Information Exchange

Routine: DVBA8861


Information

DVBA8861 ;ALB/DJS - STATUS REPORT OF 8861 REQUESTS FOR MEDICAL SERVICES, CHAPTER 31 ; 8/8/12 4:48pm

Source Information

Source file <DVBA8861.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 3 NOW^%DTC  CHK^DIE  GETS^DIQ  
Kernel 2 ($$FMDIFF,$$FMTE)^XLFDT  $$NS^XUAF4  
Registration 2 DEM^VADPT  $$SITE^VASITE  
Scheduling 1 $$SDAPI^SDAMA301  

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
STATRPT(BDATE,EDATE,RORPT,DVBSTAT,DLMTR)
FINDRECS(BDAT,EDAT,RORPT,DVBSTAT,CNT) ; find record matches
SETFLDS(REQIEN,REQFLDS)
ERR() ; Process error message.
DLMTHDR(EXBDAT,EXEDAT,EXSTAT)
PRTDLMT ; output delimited format details
DLM ; write delimited detail data
DLMTOTL ; print totals in delimited format
HEADER(EXBDAT,EXEDAT,EXSTAT)
PRINTND ; output plain format details
ND1 ; write plain detail data
NDTOTAL ; print plain format totals section
KILL

External References

Name Field # of Occurrence
NOW^%DTC SETFLDS+36
CHK^DIE STATRPT+21
GETS^DIQ SETFLDS+38, SETFLDS+56, SETFLDS+62
$$SDAPI^SDAMA301 SETFLDS+70
DEM^VADPT SETFLDS+44
$$SITE^VASITE STATRPT+33
$$FMDIFF^XLFDT SETFLDS+51, SETFLDS+53, SETFLDS+74, SETFLDS+80
$$FMTE^XLFDT STATRPT+17, STATRPT+18, SETFLDS+49, SETFLDS+65, SETFLDS+73
$$NS^XUAF4 STATRPT+34, SETFLDS+41, PRTDLMT+7, PRINTND+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "NO DATA FOUND"
  • Line Location: STATRPT+31
Function Call: WRITE
  • Prompt: "8861 Request for Medical Services, Chapter 31 Status Report"
  • Line Location: DLMTHDR+7
Function Call: WRITE
  • Prompt: !,"Date Range: "_EXBDAT_" - "_EXEDAT
  • Line Location: DLMTHDR+8
Function Call: WRITE
  • Prompt: !,"Regional Office: ",ROREPRT," for site: ",SITE
  • Line Location: DLMTHDR+9
Function Call: WRITE
  • Prompt: !,"Request Status: ",EXSTAT
  • Line Location: DLMTHDR+10
Function Call: WRITE
  • Prompt: !,"DateReceived^ReqStat^PatientName^SSN^POCName^POCLocation^PendDays^CnclDays^Consults^ApptDays^ApptDate^ConsultDate"
  • Line Location: DLMTHDR+11
Function Call: WRITE
  • Prompt: !!!," Regional Office: "
  • Line Location: PRTDLMT+7
Function Call: WRITE
  • Prompt: REGOPRT,!?20
  • Line Location: PRTDLMT+7
Function Call: WRITE
  • Prompt: REGOPRT,!?20
  • Line Location: PRTDLMT+7
Function Call: WRITE
  • Prompt: !
  • Line Location: DLM+3
Function Call: WRITE
  • Prompt: !,^TMP("VOCREQ",$J,REGOFF,RSTAT,NM,VOCG)
  • Line Location: DLM+9
Function Call: WRITE
  • Prompt: !!,"Avg Days^Avg Days^New^Pending^Cancelled^Complete",!
  • Line Location: DLMTOTL+8
Function Call: WRITE
  • Prompt: "Totals for R.O.^Pending^Complete^Requests^Requests^Requests^Requests^Totals",!
  • Line Location: DLMTOTL+9
Function Call: WRITE
  • Prompt: ROREPRT_"^"_AVGPEND_"^"_AVGCMPL_"^"_$G(CNT("N"))_"^"_$G(CNT("P"))_"^"_$G(CNT("X"))_"^"_$G(CNT("C"))_"^"_REQCNT
  • Line Location: DLMTOTL+10
Function Call: WRITE
  • Prompt: "8861 Request for Medical Services, Chapter 31 Status Report"
  • Line Location: HEADER+7
Function Call: WRITE
  • Prompt: !,"Date Range: ",EXBDAT," - ",EXEDAT
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: !,"Regional Office: ",ROREPRT," for site: ",SITE
  • Line Location: HEADER+9
Function Call: WRITE
  • Prompt: !,"Request Status: ",EXSTAT
  • Line Location: HEADER+10
Function Call: WRITE
  • Prompt: !!,"Date",?17,"Patient",?43,"POC",?59,"POC",?78,"Pend",?83,"Canc",?88,"Comp",?93,"Consult",?109,"Appt Appt",?122,"Consult"
  • Line Location: HEADER+11
Function Call: WRITE
  • Prompt: !,"Received",?9,"Status",?17,"Name",?38,"SSN",?43,"Name",?59,"Location"
  • Line Location: HEADER+12
Function Call: WRITE
  • Prompt: ?78,"Days",?83,"Days",?88,"Days",?93,"Service",?109,"Days Date",?122,"Date"
  • Line Location: HEADER+13
Function Call: WRITE
  • Prompt: !!!," Regional Office: "
  • Line Location: PRINTND+7
Function Call: WRITE
  • Prompt: REGOPRT,!?20
  • Line Location: PRINTND+7
Function Call: WRITE
  • Prompt: REGOPRT,!?20
  • Line Location: PRINTND+7
Function Call: WRITE
  • Prompt: !
  • Line Location: ND1+3
Function Call: WRITE
  • Prompt: !,REQDT,?10,REQSTAT,?15,PATIENT,?38,SSN1,?43,POCNM,?59,POCLOC
  • Line Location: ND1+12
Function Call: WRITE
  • Prompt: ?78,$J(PENDING,3)
  • Line Location: ND1+13
Function Call: WRITE
  • Prompt: ?83,$J(CANCEL,3)
  • Line Location: ND1+14
Function Call: WRITE
  • Prompt: ?88,$J(COMPLETE,3)
  • Line Location: ND1+15
Function Call: WRITE
  • Prompt: ?93,CNSTOSVC
  • Line Location: ND1+16
Function Call: WRITE
  • Prompt: ?109,$J(APPTDAYS,2)
  • Line Location: ND1+17
Function Call: WRITE
  • Prompt: ?113,APPTDT,?122,CNSLDT
  • Line Location: ND1+18
Function Call: WRITE
  • Prompt: !!!?27,"Avg Days",?37,"Avg Days",?46,"New",?56,"Pending",?66,"Cancelled",?77,"Complete"
  • Line Location: NDTOTAL+9
Function Call: WRITE
  • Prompt: !?3,"Totals for R.O.",?27,"Pending",?37,"Complete",?46,"Requests",?56,"Requests",?66,"Requests",?77,"Requests",?87,"Totals"
  • Line Location: NDTOTAL+10
Function Call: WRITE
  • Prompt: !!?2,ROREPRT,?30,AVGPEND,?41,AVGCMPL,?49,$G(CNT("N")),?59,$G(CNT("P")),?70,$G(CNT("X")),?80,$G(CNT("C")),?88,REQCNT,!
  • Line Location: NDTOTAL+11
Routine Call
  • DIE
  • Line Location:
    • STATRPT+21

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GMR(123 - [#123] GETS^DIQ
^DVB(396.9 - [#396.9] CHK^DIE,  GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DVB(396.9 - [#396.9] FINDRECS+13, FINDRECS+15, FINDRECS+17
^TMP("VOCREQ" STATRPT+16!, STATRPT+37!, FINDRECS+21*, FINDRECS+22*, PRTDLMT+6, DLM+2, DLM+3, DLM+5, DLM+7, DLM+8*
DLM+9, PRINTND+6, ND1+2, ND1+3, ND1+5, ND1+7, ND1+8
^TMP($J SETFLDS+68!, SETFLDS+71, SETFLDS+75!, ERR+3, ERR+5, ERR+7, ERR+9

Label References

Name Line Occurrences
$$ERR SETFLDS+70
$$SETFLDS FINDRECS+19
DLM PRTDLMT+8, PRTDLMT+9
DLMTHDR STATRPT+36
DLMTOTL STATRPT+36
FINDRECS STATRPT+27
HEADER STATRPT+35
KILL STATRPT+38
ND1 PRINTND+8, PRINTND+9
NDTOTAL STATRPT+35
PRINTND STATRPT+35
PRTDLMT STATRPT+36

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
APPTARY SETFLDS+31~, SETFLDS+70, KILL+2!
APPTARY("FLDS" SETFLDS+69*
APPTARY("SORT" SETFLDS+69*
APPTARY(1 SETFLDS+69*
APPTARY(4 SETFLDS+69*
APPTCNT SETFLDS+32~, SETFLDS+70*, SETFLDS+71
APPTDAYS SETFLDS+74*, ND1+11*, ND1+17, KILL+2!
APPTDT SETFLDS+71*, SETFLDS+73, SETFLDS+74, ND1+11*, ND1+18, KILL+2!
APPTDT1 SETFLDS+33~, SETFLDS+71*, SETFLDS+72, KILL+2!
APPTERR SETFLDS+70*, ERR+1~, ERR+2*, ERR+4*, ERR+6*, ERR+8*, ERR+10*, ERR+11, KILL+2!
ARRAY SETFLDS+58, KILL+2!
AVGCMPL STATRPT+23*, DLMTOTL+6*, DLMTOTL+10, NDTOTAL+6*, NDTOTAL+11, KILL+2!
AVGPEND STATRPT+23*, DLMTOTL+6*, DLMTOTL+10, NDTOTAL+6*, NDTOTAL+11, KILL+2!
BDAT FINDRECS~
BDATE STATRPT~, STATRPT+17, STATRPT+27, FINDRECS+14, FINDRECS+15
CANCEL SETFLDS+35*, SETFLDS+53*, ND1+11*, ND1+14, KILL+2!
CANCLDT SETFLDS+53*, KILL+2!
CNSLDT SETFLDS+57*, SETFLDS+64*, SETFLDS+69, SETFLDS+80, ND1+11*, ND1+18, KILL+2!
CNSLERR SETFLDS+63, KILL+2!
CNSLIENS SETFLDS+59*, SETFLDS+61*, SETFLDS+62, SETFLDS+64, SETFLDS+65, SETFLDS+66, KILL+2!
CNSLT SETFLDS+72*, KILL+2!
CNSLTLNK SETFLDS+72*, KILL+2!
CNSLTS SETFLDS+28~, KILL+2!
CNSLTS(123 SETFLDS+64, SETFLDS+65, SETFLDS+66
CNSTOSVC ND1+11*, ND1+16, KILL+3!
CNT FINDRECS~, FINDRECS+20*, FINDRECS+21, FINDRECS+22
CNT( STATRPT+24*, DLM+10*, ND1+9*
CNT("C" DLMTOTL+6, DLMTOTL+10, NDTOTAL+6, NDTOTAL+11
CNT("N" DLMTOTL+10, NDTOTAL+11
CNT("P" DLMTOTL+6, DLMTOTL+10, NDTOTAL+6, NDTOTAL+11
CNT("X" DLMTOTL+10, NDTOTAL+11
COMPLETE ND1+11*, ND1+15, KILL+3!
COMPLTDT SETFLDS+51*, KILL+3!
CONIENS SETFLDS+59*, SETFLDS+60*, SETFLDS+61, SETFLDS+72, KILL+3!
DAYS2CMP SETFLDS+35*, SETFLDS+51*, KILL+3!
DFN SETFLDS+23~, SETFLDS+43*, SETFLDS+69, SETFLDS+71
DLMTR STATRPT~, STATRPT+35, STATRPT+36
DONE FINDRECS+12*, FINDRECS+15*, KILL+3!
DONE2 FINDRECS+12*, FINDRECS+17*, KILL+3!
DVBCNARR SETFLDS+27~, SETFLDS+58, KILL+3!
DVBCNARR( SETFLDS+60, SETFLDS+61, SETFLDS+72
DVBREQ SETFLDS+24~, KILL+3!
DVBREQ( SETFLDS+39, SETFLDS+40, SETFLDS+43, SETFLDS+48, SETFLDS+51, SETFLDS+53, SETFLDS+54
DVBRS STATRPT+12~, STATRPT+21, KILL+3!
DVBRS(0 STATRPT+22
DVBSTAT STATRPT~, STATRPT+19, STATRPT+21, STATRPT+27, FINDRECS~, FINDRECS+13, PRTDLMT+8, PRTDLMT+9, PRINTND+8, PRINTND+9
KILL+3!
EDAT FINDRECS~
EDATE STATRPT~, STATRPT+18, STATRPT+27, FINDRECS+15
EXBDAT STATRPT+9~, STATRPT+17*, STATRPT+35, STATRPT+36, DLMTHDR~, DLMTHDR+8, HEADER~, HEADER+8
EXEDAT STATRPT+10~, STATRPT+18*, STATRPT+35, STATRPT+36, DLMTHDR~, DLMTHDR+8, HEADER~, HEADER+8
EXSTAT STATRPT+11~, STATRPT+19*, STATRPT+22*, STATRPT+35, STATRPT+36, DLMTHDR~, DLMTHDR+10, HEADER~, HEADER+10
FLDS FINDRECS+10~, FINDRECS+18!, FINDRECS+19, SETFLDS+30~
FLDS("APPTDAYS" FINDRECS+22
FLDS("APPTDT" FINDRECS+22
FLDS("CANCEL" FINDRECS+21
FLDS("CNSLDT" FINDRECS+22
FLDS("CNSTOSVC" FINDRECS+22
FLDS("COMPLETE" FINDRECS+22
FLDS("NM" FINDRECS+21
FLDS("PENDING" FINDRECS+21
FLDS("POCLOC" FINDRECS+21
FLDS("POCNM" FINDRECS+21
FLDS("REQDT" FINDRECS+21
FLDS("REQSTAT" FINDRECS+21
FLDS("SS" FINDRECS+21
I PRTDLMT+7*, PRINTND+7*, KILL+3!
LN ND1+10*, KILL+3!
NM FINDRECS+21, FINDRECS+22, SETFLDS+46*, DLM+4*, DLM+5*, DLM+7, DLM+8, DLM+9, ND1+4*, ND1+5*
ND1+7, ND1+8, KILL+3!
PATIENT ND1+10*, ND1+12, KILL+3!
PENDING SETFLDS+35*, SETFLDS+80*, ND1+11*, ND1+13, KILL+3!
POCLOC ND1+10*, ND1+12, KILL+3!
POCNM ND1+10*, ND1+12, KILL+3!
REGOFF PRTDLMT+2~, PRTDLMT+5*, PRTDLMT+6*, PRTDLMT+7, DLM+2, DLM+3, DLM+5, DLM+7, DLM+8, DLM+9
PRINTND+2~, PRINTND+5*, PRINTND+6*, PRINTND+7, ND1+2, ND1+3, ND1+5, ND1+7, ND1+8
REGOPRT PRTDLMT+7*, PRINTND+7*, KILL+3!
REQCNT STATRPT+14~, STATRPT+23*, STATRPT+27, STATRPT+30, DLMTOTL+10, NDTOTAL+7*, NDTOTAL+11
REQDT FINDRECS+14*, FINDRECS+15*, FINDRECS+17, SETFLDS+74, ND1+10*, ND1+12, KILL+4!
REQERR STATRPT+13~
REQESTDT SETFLDS+48*, SETFLDS+49, SETFLDS+51, SETFLDS+53, KILL+4!
REQFLDS SETFLDS~
REQFLDS("APPTDAYS" SETFLDS+55*, SETFLDS+74*
REQFLDS("APPTDT" SETFLDS+55*, SETFLDS+73*
REQFLDS("CANCEL" SETFLDS+52*, SETFLDS+53*
REQFLDS("CNSLDT" SETFLDS+55*, SETFLDS+65*
REQFLDS("CNSTOSVC" SETFLDS+55*, SETFLDS+66*
REQFLDS("COMPLETE" SETFLDS+50*, SETFLDS+51*
REQFLDS("NM" SETFLDS+46*
REQFLDS("PENDING" SETFLDS+79*, SETFLDS+80*
REQFLDS("POCLOC" SETFLDS+41*, SETFLDS+42*
REQFLDS("POCNM" SETFLDS+39*
REQFLDS("REQDT" SETFLDS+49*
REQFLDS("REQSTAT" SETFLDS+54*
REQFLDS("SS" SETFLDS+47*
REQIEN FINDRECS+9~, FINDRECS+16*, FINDRECS+17*, FINDRECS+19, SETFLDS~, SETFLDS+37
REQIENS SETFLDS+37*, SETFLDS+38, SETFLDS+39, SETFLDS+40, SETFLDS+43, SETFLDS+48, SETFLDS+51, SETFLDS+53, SETFLDS+54, SETFLDS+56
KILL+4!
REQRSLT SETFLDS+26~, SETFLDS+35*, SETFLDS+40*, SETFLDS+82*, SETFLDS+83
REQSTAT SETFLDS+25~, ND1+10*, ND1+12
RGNLOFC STATRPT+33*, KILL+4!
RO FINDRECS+21, FINDRECS+22, SETFLDS+40*, SETFLDS+41, SETFLDS+42*, KILL+4!
RO4RPT STATRPT+34*, PRTDLMT+7*, PRINTND+7*, KILL+4!
ROREPRT STATRPT+33*, STATRPT+34*, DLMTHDR+9, DLMTOTL+10, HEADER+9, NDTOTAL+11, KILL+4!
RORPT STATRPT~, STATRPT+27, STATRPT+33, STATRPT+34, FINDRECS~, SETFLDS+40, PRTDLMT+7, PRINTND+7
ROSTANM SETFLDS+41*, KILL+4!
RPTSTAT FINDRECS+21, FINDRECS+22, SETFLDS+81*, PRTDLMT+9, PRINTND+9, KILL+4!
RQSTDT FINDRECS+15*, KILL+4!
RSTAT PRTDLMT+8*, PRTDLMT+9*, DLM+2, DLM+3, DLM+5, DLM+7, DLM+8, DLM+9, DLM+10, PRINTND+8*
PRINTND+9*, ND1+2, ND1+3, ND1+5, ND1+7, ND1+8, ND1+9, KILL+4!
SITE STATRPT+33*, DLMTHDR+9, HEADER+9, KILL+4!
SSN ND1+10*, KILL+4!
SSN1 ND1+10*, ND1+12, KILL+4!
STAT STATRPT+24*, FINDRECS+12*, FINDRECS+13*, FINDRECS+15, FINDRECS+17, SETFLDS+51, SETFLDS+52, SETFLDS+53, SETFLDS+80, SETFLDS+81
KILL+4!
TODAY SETFLDS+36*, SETFLDS+80, KILL+4!
TOTCMPL STATRPT+23*, SETFLDS+51*, DLMTOTL+6, NDTOTAL+6, KILL+4!
TOTPEND STATRPT+23*, SETFLDS+80*, DLMTOTL+6, NDTOTAL+6, KILL+4!
U STATRPT+33, STATRPT+34, FINDRECS+21, FINDRECS+22, SETFLDS+41, SETFLDS+72, PRTDLMT+7, DLM+8, PRINTND+7, ND1+10
ND1+11
VADM SETFLDS+29~
VADM(1 SETFLDS+45, SETFLDS+46
VADM(2 SETFLDS+47
VOCG PRTDLMT+3~, DLM+6*, DLM+7*, DLM+8, DLM+9, PRINTND+3~, ND1+6*, ND1+7*, ND1+8
VOCREC ND1+8*, ND1+10, ND1+11, KILL+4!
X SETFLDS+36, KILL+4!
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 |  Local Variables  | All