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

Package: Scheduling

Routine: SCRPW7


Information

SCRPW7 ;RENO/KEITH - Patient Encounter List ; 15 Jul 98 02:38PM

Source Information

Source file <SCRPW7.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Scheduling 4 DISP0^SCRPW23  ($$XY,END,SUBT,TITL)^SCRPW50  $$STX^SCRPW8  $$GETOE^SDOE  
VA Fileman 4 ^%DT  NOW^%DTC  ^DIC  ^DIR  
Kernel 2 $$S^%ZTLOAD  EN^XUTMDEVQ  

Entry Points

Name Comments DBIA/ICR reference
DISP
END
HDR
COTS(SDOE)
STOP ;Check for stop task request
PEL
QUE
FDT
LDT
ASK
EXIT
WAIT

External References

Name Field # of Occurrence
^%DT FDT, LDT
NOW^%DTC PEL
$$S^%ZTLOAD STOP+1
^DIC ASK+1
^DIR END, WAIT+1
DISP0^SCRPW23 PEL
$$XY^SCRPW50 HDR
END^SCRPW50 EXIT
SUBT^SCRPW50 ASK+3
TITL^SCRPW50 ASK
$$STX^SCRPW8 COTS+2
$$GETOE^SDOE PEL+1
EN^XUTMDEVQ QUE+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$C(7),"This patient has no encounters on file.",!
  • Line Location: ASK+2
Function Call: WRITE
  • Prompt: !
  • Line Location: FDT+0
Function Call: WRITE
  • Prompt: " ",Y
  • Line Location: FDT+0
Function Call: WRITE
  • Prompt: " ",Y
  • Line Location: FDT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: LDT+0
Function Call: WRITE
  • Prompt: " ",Y
  • Line Location: LDT+0
Function Call: WRITE
  • Prompt: " ",Y
  • Line Location: LDT+0
Function Call: WRITE
  • Prompt: !!,$C(7),"Ending date must be after beginning date!",!
  • Line Location: LDT+1
Function Call: WRITE
  • Prompt: " ",Y
  • Line Location: LDT+2
Function Call: WRITE
  • Prompt: !
  • Line Location: QUE+1
Function Call: WRITE
  • Prompt: !!?(IOM-$L(X)\2),X,!
  • Line Location: PEL+2
Function Call: WRITE
  • Prompt: SDLINE
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !?(IOM-32/2),"<*> PATIENT ENCOUNTER LIST <*>",!,SDLINE,!,"Date range: ",SDPBDA," to ",SDPEDA,?(IOM-$L(SDPNOW)),SDPNOW
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,"Patient: ",SDPTNA,?40,"SSN: ",SDPTSN,?(IOM-6-$L(SDPAGE)),"Page: ",SDPAGE,!,SDLINE
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,Y,?30,SDL,!?5,"#",SDOE,?15,SDT,?35,SDS
  • Line Location: DISP+1
Function Call: WRITE
  • Prompt: " - ",SDS1
  • Condition for execution: $L(SDS1)
  • Line Location: DISP+1
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+1
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+1
Routine Call
  • DIC
  • Line Location:
    • ASK+1
Routine Call
  • DIR
  • Line Location:
    • END
    • WAIT+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" FDT, FDT+1, LDT, LDT+2, PEL, DISP+1
^SC - [#44] DISP, COTS+1
^SCE("ADFN" ASK+2, FDT, PEL+1
^SD(409.63 - [#409.63] DISP

Label References

Name Line Occurrences
$$COTS DISP+1
ASK ASK+2, QUE+1
DISP PEL+1
EXIT ASK+1, FDT, LDT
FDT FDT+1
HDR PEL+1, WAIT, WAIT+2
LDT FDT, LDT+1, LDT+2
QUE LDT
STOP HDR+1
WAIT DISP+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% PEL, EXIT!
%DT ASK~, FDT*
%DT("A" FDT*, LDT*
%DT(0 FDT*
%H EXIT!
%I EXIT!
DIC ASK~, ASK+1*
DIC(0 ASK+1*
DIR END~, WAIT+1!
DIR(0 END*, WAIT+1*
DT LDT
DTOUT ASK+1, FDT, LDT, EXIT!
DUOUT ASK+1, EXIT!
IOF HDR
IOM PEL, PEL+2, HDR+1, HDR+2
IOSL DISP+1
IOST PEL, END
SDBDT FDT*, FDT+1*, LDT+1, PEL+1, EXIT!
SDCT PEL*, PEL+1*, PEL+2, EXIT!
SDDT PEL*, PEL+1*, EXIT!, DISP+1
SDEDT LDT*, LDT+2*, QUE*, PEL, EXIT!
SDI EXIT!, DISP+1*
SDL EXIT!, DISP*, DISP+1
SDLINE PEL*, EXIT!, HDR+1, HDR+2
SDOE PEL+1*, EXIT!, DISP+1, COTS~, COTS+2
SDOE0 PEL+1*, EXIT!, DISP, COTS, COTS+1, COTS+2
SDOUT PEL*, PEL+1, END, EXIT!, STOP+1*, HDR+1, DISP+1, WAIT+1*
SDP PEL*, EXIT!, HDR, HDR+1, DISP+1, WAIT
SDPAGE PEL*, EXIT!, HDR, HDR+1, HDR+2*
SDPBDA FDT*, FDT+1*, EXIT!, HDR+1
SDPEDA LDT*, LDT+2*, EXIT!, HDR+1
SDPNOW PEL*, EXIT!, HDR+1
SDPT ASK+1*, ASK+2, FDT, PEL+1, EXIT!
SDPTNA ASK+1*, EXIT!, HDR+2
SDPTSN ASK+1*, EXIT!, HDR+2
SDS EXIT!, DISP*, DISP+1, COTS+2
SDS1 EXIT!, DISP+1*
SDT EXIT!, DISP*, DISP+1
U ASK+1, FDT, LDT, DISP, COTS, COTS+1, COTS+2
X FDT, LDT, QUE*, PEL+2*, EXIT!
Y ASK+1, FDT*, FDT+1, LDT*, LDT+1, LDT+2, PEL*, EXIT!, DISP+1*, WAIT+1
, WAIT+2
Y(0 ASK+1
>> ZTQUEUED STOP+1
ZTSAVE QUE~, QUE+1
ZTSAVE( QUE*
>> 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