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

Package: Scheduling

Routine: SCRPW1


Information

SCRPW1 ;RENO/KEITH - Review of Scheduling/Outpatient Encounter/Visit file relationships ; 03 Aug 98 10:56 AM

Source Information

Source file <SCRPW1.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
VA Fileman 6 ^%DT  NOW^%DTC  ^DIC  FILE^DID  EN^DIQ  ^DIR  
Kernel 2 $$S^%ZTLOAD  EN^XUTMDEVQ  
Scheduling 2 DISP0^SCRPW23  ($$XY,END,TITL)^SCRPW50  
Registration 1 (DEM,KVA)^VADPT  

Entry Points

Name Comments DBIA/ICR reference
DISP
H1
HDR
TOENC
TOEHX
MVSIT
STOP ;Check for stop task request
DT
OENC
APPT
ASK ;Ask for patient
MVFP1
TERR
VSIT
END
TOERR
START
OENC1(SDOENC,SDTY)
OENCC
MVFP
OEPR
EXIT
VSIT1(SDVSIT,SDTY)

External References

Name Field # of Occurrence
^%DT DT
NOW^%DTC START+1
$$S^%ZTLOAD STOP+1
^DIC ASK+2
FILE^DID MVSIT+2
EN^DIQ OEPR+9, DISP, APPT, APPT+2, OENC1, OENCC, VSIT1, MVFP1, TOENC, TOENC+1
, TOEHX+1
^DIR DT+4, END, HDR
DISP0^SCRPW23 START
$$XY^SCRPW50 START+2, H1
END^SCRPW50 EXIT
TITL^SCRPW50 ASK+1
DEM^VADPT START+1
KVA^VADPT EXIT+1
EN^XUTMDEVQ DT+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: DT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: DT+6
Function Call: WRITE
  • Prompt: $$XY^SCRPW50(IOF,1,0)
  • Condition for execution: $E(IOST)="C"
  • Line Location: START+2
Function Call: WRITE
  • Prompt: !,"------------------------- *** SCHEDULING DATABASE *** --------------------------",!,"==> REGISTRATION/DISPOSITION DATA -- "
  • Line Location: START+2
Function Call: WRITE
  • Prompt: !,"==> APPOINTMENT DATA -- "
  • Line Location: START+4
Function Call: WRITE
  • Prompt: !,"-------------------- *** OUTPATIENT ENCOUNTER DATABASE *** ---------------------",!,"==> OUTPATIENT ENCOUNTER DATA -- "
  • Line Location: OEPR+1
Function Call: WRITE
  • Prompt: !,"----------------------- *** VISIT TRACKING DATABASE *** ------------------------",!,"==> VISIT DATA -- "
  • Line Location: OEPR+4
Function Call: WRITE
  • Prompt: !,"------------------------- *** PATIENT PROBLEM LIST *** -------------------------",!
  • Line Location: OEPR+8
Function Call: WRITE
  • Prompt: !
  • Line Location: OEPR+9
Function Call: WRITE
  • Prompt: "REVIEW OF SCHEDULING/PCE/PROBLEM LIST DATA",!,"Patient: ",SDPNAM,?44,"SSN: ",SDSSN
  • Line Location: H1+1
Function Call: WRITE
  • Prompt: !,"Encounter date: ",SDENC,!,"Date printed: ",SDPNOW,?(74-$L(SDPAGE)),"PAGE: ",SDPAGE,!,SDLINE
  • Line Location: H1+2
Function Call: WRITE
  • Prompt: !,"PATIENT file info:",!
  • Line Location: DISP+0
Function Call: WRITE
  • Prompt: !,"PATIENT file info:",!
  • Line Location: APPT+0
Function Call: WRITE
  • Prompt: !,"HOSPITAL LOCATION file info:",!
  • Line Location: APPT+2
Function Call: WRITE
  • Prompt: !,"OUTPATIENT ENCOUNTER file """_SDTY_""" record #"_SDOENC_":",!
  • Line Location: OENC1+0
Function Call: WRITE
  • Prompt: !,"OUTPATIENT CLASSIFICATION file info:",!
  • Line Location: OENCC+0
Function Call: WRITE
  • Prompt: !,"VISIT file """_SDTY_""" record #"_SDVSIT_":",!
  • Line Location: VSIT1+0
Function Call: WRITE
  • Prompt: !,SDFNAM," file info:",!
  • Line Location: MVFP1+0
Function Call: WRITE
  • Prompt: !,"TRANSMITTED OUTPATIENT ENCOUNTER info:",!
  • Line Location: TOENC+0
Function Call: WRITE
  • Prompt: !,"DELETED OUTPATIENT ENCOUNTER info:",!
  • Line Location: TOENC+1
Function Call: WRITE
  • Prompt: !,"TRANSMITTED OUTPATIENT ENCOUNTER ERROR info:",!
  • Line Location: TOERR+0
Function Call: WRITE
  • Prompt: !,"ACRP TRANSMISSION HISTORY info:",!
  • Line Location: TOEHX+0
Function Call: WRITE
  • Prompt: !?4,"Error Code: ",$P($G(^SD(409.76,SDERR,0)),U)," ",$P($G(^SD(409.76,SDERR,1)),U)
  • Line Location: TERR+0
Routine Call
  • DIC
  • Line Location:
    • ASK+2
Routine Call
  • DIR
  • Line Location:
    • DT+4
    • END
    • HDR

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls
^SDD(409.42 - [#409.42] Classic Fileman Calls
^SCE - [#409.68] Classic Fileman Calls
^SD(409.73 - [#409.73] Classic Fileman Calls
^SD(409.74 - [#409.74] Classic Fileman Calls
^SD(409.77 - [#409.77] Classic Fileman Calls
^AUPNVSIT - [#9000010] Classic Fileman Calls
^AUPNPROB - [#9000011] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPROB("AC" OEPR+9
^AUPNVSIT - [#9000010] VSIT
^AUPNVSIT("AA" OEPR+6
^AUPNVSIT("AD" VSIT+2
^DD("DD" DT, START+1
^DPT - [#2] START+3, START+5
^SC - [#44] APPT+1
^SCE - [#409.68] OENC
^SCE("ADFN" OEPR+2
^SCE("APAR" OENC+2
^SD(409.73 - [#409.73] TOENC, TOENC+1
^SD(409.75 - [#409.75] TOERR, TOERR+1
^SD(409.76 - [#409.76] TERR
^SD(409.77 - [#409.77] TOEHX, TOEHX+1
^SDD(409.42 - [#409.42] OENCC

Label References

Name Line Occurrences
APPT START+5
ASK DT+6
DISP START+3
DT DT
END OEPR+3
EXIT ASK+2, DT, DT+4, DT+6, START+4, START+6, OEPR, OEPR+3, OEPR+7, OEPR+9
, OEPR+10
H1 START+2
HDR START+4, OEPR, OEPR+3, OEPR+7, OEPR+9, DISP, APPT, APPT+2, OENC1, OENCC
, VSIT1, MVFP1, TOENC, TOENC+1, TOERR, TOEHX, TOEHX+1, TERR
MVFP MVSIT+2
MVFP1 MVFP
MVSIT VSIT1
OENC OEPR+2
OENC1 OENC+1, OENC+2
OENCC OENC1
STOP H1
TERR TOERR+1
TOEHX TOENC+2
TOENC OENC1
TOERR TOENC+2
VSIT OEPR+6
VSIT1 VSIT+1, VSIT+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% START+1, EXIT+1!
%DT DT!*, EXIT+1!
%DT("A" DT*
DA OEPR+9*, EXIT!, DISP*, APPT*, APPT+2*, OENC1*, OENCC*, VSIT1*, MVFP1*, TOENC*
, TOENC+1*, TOEHX+1*
DFN ASK+2*, START+3, START+5, OEPR+2, OEPR+6, OEPR+9, EXIT!, DISP, APPT, APPT+1
DIC ASK+2*, OEPR+9*, EXIT!, DISP*, APPT*, APPT+2*, OENC1*, OENCC*, VSIT1*, MVFP1*
, TOENC*, TOENC+1*, TOEHX+1*
DIC(0 ASK+2*
DIR DT+1!, END~, EXIT+1!, HDR~
DIR("?" DT+1*, DT+2*, DT+3*
DIR("A" DT+1*
DIR("B" DT+1*
DIR(0 DT+1*, END*, HDR*
DR OEPR+9*, EXIT!, DISP*, APPT*, APPT+2*, OENC1*, OENCC*, VSIT1*, MVFP1*, TOENC*
, TOENC+1*, TOEHX+1*
DTOUT ASK+2, DT, DT+4, EXIT!
DUOUT ASK+2, DT+4, EXIT!
IOF START+2, H1
IOSL START+4, OEPR, OEPR+3, OEPR+7, OEPR+9, DISP, APPT, APPT+2, OENC1, OENCC
, VSIT1, MVFP1, TOENC, TOENC+1, TOERR, TOEHX, TOEHX+1, TERR
IOST START, START+2, END, HDR, H1
SDBDT DT*, START+1, START+3, START+5, OEPR+2, OEPR+6, EXIT!
SDCHI EXIT+1!, OENC+2*, VSIT+2*
SDCLP EXIT!, APPT+1*, APPT+2
SDDAY START+1*, START+3*, START+5*, OEPR+2*, OEPR+5*, OEPR+6*, EXIT!, DISP, APPT, APPT+1
, APPT+2
SDDOENC EXIT+1!, TOENC+1*
SDEDT DT*, START+3, START+5, OEPR+2, OEPR+5, EXIT!
SDENC DT*, EXIT+1!, H1+2
SDEOENC EXIT+1!, TOERR+1*
SDERR EXIT+1!, TOERR+1*, TERR
SDFMT DT+4*, OEPR+3, EXIT+1!
SDFNAM EXIT!, MVSIT~, MVSIT+2*, MVFP1
SDFOUND START+1*, START+3*, START+4*, START+5*, START+6, OEPR*, OEPR+2*, OEPR+3*, OEPR+6*, OEPR+7*
, OEPR+9*, OEPR+10, EXIT!
SDID MVSIT~, MVSIT+2!
SDID("GLOBAL NAME" , MVSIT+2
SDID("NAME" MVSIT+2
SDLINE START+1*, EXIT!, H1+2
SDLOC START+5*, EXIT!, APPT+1, APPT+2
SDOEHX EXIT+1!, TOEHX+1*
SDOENC OEPR+2*, EXIT!, OENC, OENC+1, OENC+2, OENC1~, OENCC, TOENC
SDOENCC EXIT+1!, OENCC*
SDOUT START+1*, START+3, START+4, START+5, START+6, OEPR, OEPR+2, OEPR+3, OEPR+6, OEPR+7
, OEPR+9, OEPR+10, END, EXIT+1!, HDR*, H1, DISP, STOP+1*, APPT, APPT+2
, OENC+2, OENC1, OENCC, VSIT+2, VSIT1, MVSIT+2, MVFP, MVFP1, TOENC, TOENC+1
, TOERR, TOERR+1, TOEHX, TOEHX+1, TERR
SDPAGE START+1*, EXIT+1!, HDR, H1, H1+2*
SDPAR EXIT+1!, OENC*, OENC+1, VSIT*, VSIT+1
SDPNAM ASK+2*, EXIT!, H1+1
SDPNOW START+1*, EXIT!, H1+2
SDSSN START+1*, EXIT!, H1+1
SDTOENC EXIT+1!, TOENC*, TOENC+1, TOERR, TOERR+1, TOEHX, TOEHX+1
SDTY EXIT+1!, OENC+1*, OENC1~, VSIT+1*, VSIT1~
SDVBASE MVSIT~, MVSIT+1*, MVSIT+2
SDVFGL EXIT!, MVSIT~, MVSIT+2*, MVFP, MVFP1
SDVFR EXIT!, MVFP*, MVFP1
SDVN MVSIT~, MVSIT+2*
SDVSIT OEPR+6*, EXIT!, VSIT, VSIT+1, VSIT+2, VSIT1~, MVFP
U ASK+2, DT, START+1, START+5, APPT+1, OENC, VSIT, TOENC+1, TOERR+1, TERR
>> VADM(2 START+1
X DT, EXIT+1!
Y ASK+2, DT, DT+4, DT+5*, START+1*, EXIT!, HDR
ZTDESC DT+6*, EXIT+1!
>> ZTQUEUED STOP+1
ZTRTN DT+6*, EXIT+1!
ZTSAVE DT+6, EXIT+1!
ZTSAVE( DT+5*
>> ZTSTOP STOP+1*
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