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

Package: Scheduling

Routine: SDPBP


Information

SDPBP ; BP-IOFO/OWAIN ; Pharmacy Benefits Print. ; ; Compiled November 13, 2003 09:55:19

Source Information

Source file <SDPBP.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA FileMan 4 (,DD)^%DT  (,NOW)^%DTC  $$GET1^DIQ  ^DIR  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
Registration 2 DEM^VADPT  $$SITE^VASITE  
Outpatient Pharmacy 1 SCH^PSOTPCAN  

Entry Points

Name Comments DBIA/ICR reference
CPAIR(SDCL0)
DIV(SDCL0) ;Get facility division name and number
EN ;
END ;
DEV ;
SUMMARY ;
; In - INSTX, IOSL
; Out - TRSA, TDAYS
EN0 ; Inquire date range.
RESCHED(DFN,SDAPDTT,SDCL,SDST,SDNAPDT) ; Search for a subsequent appointment at the same clinic.
; 0 - no rescheduled appointment
; 1 - cancelled by patient and rescheduled
; 2 - no-show and rescheduled
INIT(SDSS) ;
HEAD20 ;
HEAD21 ;
BUILD(NAME,SSN,SDCL,SDST,SDCAPDTT,SDNEAPT) ;
HEAD10 ;

External References

Name Field # of Occurrence
^%DT EN0+3, EN0+7
DD^%DT EN+3, EN+29, EN+30, EN+54, BUILD+5, BUILD+7, HEAD10+7, HEAD10+9
^%DTC EN+28, EN+49, EN+50, BUILD+4
NOW^%DTC EN+5
^%ZIS DEV+1, DEV+3
^%ZISC END+1
^%ZTLOAD DEV+9
$$GET1^DIQ EN+24, EN+31, EN+55, BUILD+11
^DIR EN0+10, EN+102, HEAD10+2
SCH^PSOTPCAN EN+4
DEM^VADPT EN+11
$$SITE^VASITE DIV+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!?47,"********** NO DATA TO PRINT **********"
  • Line Location: EN+66
Function Call: WRITE
  • Prompt: !?8,"Deferred Number of Days: ",$P(REC,U,6)
  • Line Location: EN+83
Function Call: WRITE
  • Prompt: !!!?21,"********** NO DATA TO PRINT **********"
  • Line Location: EN+96
Function Call: WRITE
  • Prompt: !!,"Overall average time between appointments : ",$S(TRSA=0:$J(TDAYS,2),1:$J(TDAYS/TRSA,2))
  • Line Location: EN+97
Function Call: WRITE
  • Prompt: !
  • Line Location: SUMMARY+9
Function Call: WRITE
  • Prompt: ?41,+$G(^TMP($J,"SDOUT",INSTX,"CAN"))
  • Line Location: SUMMARY+11
Function Call: WRITE
  • Prompt: ?52,RSA
  • Line Location: SUMMARY+12
Function Call: WRITE
  • Prompt: ?62,+$G(^TMP($J,"SDOUT",INSTX,"RSP"))
  • Line Location: SUMMARY+13
Function Call: WRITE
  • Prompt: ?71,$S(RSA=0:"0.00",1:$J(DAYS/RSA,"",2))
  • Line Location: SUMMARY+14
Function Call: WRITE
  • Prompt: @IOF,!?IOM-$L(SDTTL)\2,SDTTL
  • Line Location: HEAD10+5
Function Call: WRITE
  • Prompt: ?122,"Page : "_PAGE
  • Line Location: HEAD10+6
Function Call: WRITE
  • Prompt: !?IOM-$L(SDTTL)\2,SDTTL
  • Line Location: HEAD10+11
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD10+12
Function Call: WRITE
  • Prompt: !?89,"Cancelled",?103,"Reason for",?120,"New/Closest"
  • Line Location: HEAD20+1
Function Call: WRITE
  • Prompt: !,"Patient",?38,"SSN",?52,"Clinic",?89,"Appt. Date",?103,"Cancellation",?120,"Appt. Date"
  • Line Location: HEAD20+2
Function Call: WRITE
  • Prompt: !,"=======",?38,"===",?52,"======",?89,"==========",?103,"============",?120,"==========="
  • Line Location: HEAD20+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: HEAD21+1
Function Call: WRITE
  • Prompt: ?41,"Appts",?52,"Appts",?62,"Patients",?71,"Ave time"
  • Line Location: HEAD21+3
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD21+4
Function Call: WRITE
  • Prompt: ?41,"Cancelled",?52,"Deferred",?62,"Deferred",?71,"/appts"
  • Line Location: HEAD21+6
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD21+7
Function Call: WRITE
  • Prompt: ?41,"=========",?52,"========",?62,"========",?71,"========"
  • Line Location: HEAD21+9
Function Call: WRITE
  • Prompt: !,"Please try later!"
  • Line Location: DEV+3
Function Call: WRITE
  • Prompt: !
  • Line Location: END+1
Routine Call
  • DIR
  • Line Location:
    • EN0+10
    • EN+102
    • HEAD10+2
Routine Call
  • %ZIS
  • Line Location:
    • DEV+1
    • DEV+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(4 - [#4] GET1^DIQ
^SC - [#44] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] DIV+8
^DIC(40.7 - [#40.7] CPAIR+3, CPAIR+4
^DPT - [#2] EN+14, EN+15, EN+17, RESCHED+5, RESCHED+8
^SC - [#44] EN+18
^TMP($J EN+7, EN+9, EN+31*, EN+34*, EN+35*, EN+36*, EN+43, EN+55*, EN+59*, EN+66
, EN+69, EN+73, EN+75, EN+77, EN+79, EN+95, EN+100!, SUMMARY+6, SUMMARY+7, SUMMARY+11
, SUMMARY+13, BUILD+10, BUILD+11*, INIT+3!, END+2!

Label References

Name Line Occurrences
$$CPAIR EN+19
$$DIV EN+22
$$RESCHED EN+25
DEV EN0+14
EN DEV+11
END DEV+3, DEV+4
HEAD10 EN+65, EN+70, EN+80, EN+87, EN+93, SUMMARY+8
HEAD20 EN+67, EN+70, EN+80
HEAD21 EN+88, EN+93, SUMMARY+8
INIT EN+2
SUMMARY EN+88, EN+95

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT EN0+1!, EN0+2*, EN0+4!, EN0+6*
%DT("A" EN0+2*, EN0+6*
%DT(0 EN0+5*
%ZIS DEV+1!*
CAN EN+92~, EN+95*
CTR EN+1~, EN+3*, EN+69, EN+70, EN+73, EN+80, EN+95, EN+101, SUMMARY+8, HEAD10+2*
DAYS EN+16~, EN+28*, EN+31, EN+36, SUMMARY+4~, SUMMARY+7*, SUMMARY+14, BUILD+1~, BUILD+2*, BUILD+4*
, BUILD+11
DFN EN+1~, EN+8*, EN+9*, EN+14, EN+15, EN+17, EN+25, EN+31, EN+43, EN+55
, EN+74*, EN+75*, EN+77, EN+79, RESCHED~, RESCHED+5, RESCHED+8
DIR EN0+11!
DIR("?" EN0+9*
DIR("A" EN0+10*
DIR("B" EN0+10*
DIR(0 EN0+10*, EN+102*, HEAD10+2*
>> DIRUT HEAD10+2
>> EDT EN0+8*, EN+15, HEAD10+9
INST EN+1~, EN+22*, EN+23, EN+24, EN+26, EN+27, EN+31, EN+33, EN+34, EN+35
, EN+36, EN+41*, EN+43*, EN+45, EN+46, EN+55, EN+58*, EN+59*, SUMMARY+10, BUILD+1~
, BUILD+10, BUILD+11
INST( EN+24*, EN+31, EN+34, EN+35, EN+36, EN+43, EN+55, EN+59
INST(0 EN+23*
INSTX EN+68*, EN+69*, EN+71, EN+73, EN+75, EN+77, EN+79, EN+92~, EN+94*, EN+95*
, SUMMARY+5, SUMMARY+6, SUMMARY+7, SUMMARY+11, SUMMARY+13
IO("Q" DEV+4!
IOF HEAD10+5
IOM HEAD10+5, HEAD10+11, DEV+2*
ION DEV+1
IOP DEV+1!, DEV+3*!
IOSL EN+70, EN+80, EN+87, SUMMARY+8
IOST EN+102, HEAD10+2
LINE EN+1~, EN+70, EN+71*, EN+80, EN+82*, EN+83*, EN+87, SUMMARY+8, SUMMARY+15*, HEAD10+13*
, HEAD20+4*, HEAD21+10*
MAXLEN EN+1~
NAME EN+1~, EN+6*, EN+7*, EN+9, EN+31, EN+43, EN+55, EN+72*, EN+73*, EN+75
, EN+77, EN+79, EN+81, BUILD~, BUILD+10, BUILD+11
PAGE EN+1~, EN+63*, HEAD10+1*, HEAD10+2, HEAD10+6
POP DEV+1!, DEV+3
REC EN+78~, EN+79*, EN+80, EN+81, EN+83
RESCHED EN+10~, EN+25*, EN+26, EN+32
RESCHED( EN+27*, EN+33*, EN+59
RSA SUMMARY+4~, SUMMARY+6*, SUMMARY+12, SUMMARY+14
SDAP0 EN+16~, EN+17*, EN+21
>> SDAPDT EN+76*, EN+77*, EN+79
SDAPDTT EN+10~, EN+14*, EN+15*, EN+17, EN+25, EN+26, EN+28, EN+29, EN+31, EN+32
, EN+44*, EN+47*, EN+48*, EN+51*, EN+53, EN+54, EN+55, BUILD+4, RESCHED~, RESCHED+5
, RESCHED+8*
>> SDAPDTT0 EN+29*, EN+31, EN+46*, EN+47, EN+48, EN+49, EN+51
>> SDAPDTT1 EN+45*, EN+47, EN+48, EN+50, EN+51
SDCAPDTT BUILD~, BUILD+3, BUILD+5*, BUILD+11
>> SDCDTT EN+21*
SDCL EN+1~, EN+3*, EN+17*, EN+18, EN+25, EN+26, EN+31, BUILD~, BUILD+11, RESCHED~
, RESCHED+8
SDCL0 EN+16~, EN+18*, EN+19, EN+22, CPAIR~, CPAIR+3, CPAIR+4, DIV~, DIV+2, DIV+6
SDCP EN+16~, EN+19*, EN+20
SDCUTOFD EN+1~, EN+3*, HEAD21+2
SDCUTOFF EN+1~, EN+3*, EN+32
SDDIO DEV+1*, DEV+3!, DEV+4!
SDHOLD DIV+2~, DIV+3*, DIV+4*, DIV+5, DIV+6*, DIV+7, DIV+8*, DIV+9
SDI INIT+1~, INIT+2*
SDII INIT+1~, INIT+2*
SDIVV DIV+2~*, DIV+4
SDNAPDT EN+16~, EN+25, EN+28, EN+30*, EN+31, RESCHED~, RESCHED+5*, RESCHED+7*, RESCHED+8*
SDNEAPT EN+54*, EN+55, BUILD~, BUILD+4, BUILD+7*, BUILD+11
SDOK RESCHED+4~, RESCHED+7*, RESCHED+8*, RESCHED+9
SDSS EN+1~, EN+2, INIT~
SDSS( EN+20, INIT+2*
SDST EN+16~, EN+21*, EN+25, EN+31, BUILD~, BUILD+11, RESCHED~, RESCHED+5, RESCHED+6, RESCHED+9
>> SDSUMM EN0+13*, EN+64, EN+91, SUMMARY+10, HEAD10+4, HEAD10+6, HEAD21+2, HEAD21+5, HEAD21+8, DEV+2
>> SDT EN0+5*, EN+14, HEAD10+7
>> SDTTL HEAD10+3*, HEAD10+4*, HEAD10+5, HEAD10+8*, HEAD10+10*, HEAD10+11
SDX CPAIR+2~, CPAIR+3*, CPAIR+4*, CPAIR+5*, CPAIR+6
SEL EN+10~
SEL( EN+26*, EN+43, EN+45, EN+46, EN+55
SSN EN+10~, EN+12*, EN+13, EN+31, EN+42*, EN+55, BUILD~, BUILD+11
SSNP EN+10~, EN+12*, EN+42
TDAYS EN+1~, EN+63*, EN+97, SUMMARY+7*
TODAY EN+1~, EN+5*, EN+45, EN+46, EN+49, EN+50
TRSA EN+1~, EN+63*, EN+97, SUMMARY+6*
U EN+21, EN+31, EN+55, EN+80, EN+81, EN+83, BUILD+11, RESCHED+5, RESCHED+8, CPAIR+3
, CPAIR+4, DIV+2
>> UNQ BUILD+10*, BUILD+11
>> VADM(2 EN+12
X EN+5, EN+28, EN+49, EN+51, EN+92~, EN+94*, EN+96, SUMMARY+5*, SUMMARY+10, BUILD+4
>> X0 EN+49*, EN+51
>> X1 EN+28*, EN+49*, EN+50*, BUILD+4*
>> X2 EN+28*, EN+49*, EN+50*, BUILD+4*
Y EN0+3, EN0+5!, EN0+7, EN0+8, EN0+12, EN0+13, EN+3*, EN+29*, EN+30*, EN+54*
, BUILD+5*, BUILD+7*, HEAD10+7*, HEAD10+8, HEAD10+9*, HEAD10+10
>> ZTDESC DEV+5*
ZTDTH DEV+4!, DEV+5*
ZTIO DEV+4!
>> ZTQUEUED END+1
>> ZTREQ END+1*
>> ZTRTN DEV+5*
ZTSAVE DEV+4!
ZTSAVE("EDT" DEV+7*
ZTSAVE("SDSUMM" DEV+8*
ZTSAVE("SDT" DEV+6*
ZTSK DEV+1!, DEV+4!, DEV+9!
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 |  All