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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: SCRPV1

Package: Scheduling

Routine: SCRPV1


Information

SCRPV1 ; bp/djb - PCMM Inconsistency Rpt - Main ; 8/25/99 9:52am

Source Information

Source file <SCRPV1.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Scheduling 4 $$TEAM^SCMCMU  ^SCRPV1A  ^SCRPV1B  LIST^SCRPV1B1  
Kernel 1 EN^XUTMDEVQ  
MailMan 1 ^XMD  
VA FileMan 1 ^DIR  

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
Scheduling 1 SD53P177  

Entry Points

Name Comments DBIA/ICR reference
EN ;
TOP ;
EXIT ; Cleanup and Exit
RUN ;Gather the data and print the report.
DEVICE() ; Select output device.
ASKTM() ; Ask user to select teams.
; A = All Teams
; S = Select Teams
; Return: 0,A, or S.
GETTM ;Allow the user to select multiple teams.
ASKMODE() ; Which report type to run: BRIEF or DETAIL.
; B = Brief
; DP = Detailed by PATIENT
; DT = Detailed by TEAM
; Return: 0,B, or D.
IEN ;Call here to include the 404.43 IEN on the right side of the
MAIL(SCDUZ) ; Queue report as a MailMan Message.
MAILPOS ;Print POSITION error counts only.
MAILPT ;Print PATIENT error counts only.
SET(TXT) ;Build message array

External References

Name Field # of Occurrence
^DIR ASKTM+18, ASKMODE+15
$$TEAM^SCMCMU GETTM+9
^SCRPV1A RUN+8, MAIL+12
^SCRPV1B MAILPOS+22, MAILPT+22, RUN+9
LIST^SCRPV1B1 RUN+5
^XMD MAIL+21
EN^XUTMDEVQ DEVICE+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "Please wait..."
  • Line Location: RUN+6
Function Call: WRITE
  • Prompt: !,"This report may take a long time to run."
  • Line Location: DEVICE+5
Function Call: WRITE
  • Prompt: !,"Queuing is recommended.",!
  • Line Location: DEVICE+6
Function Call: WRITE
  • Prompt: @IOF,!?COL,"PCMM INCONSISTENCY REPORT"
  • Line Location: ASKTM+10
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: ASKTM+11
Function Call: WRITE
  • Prompt: !!,"T E A M S"
  • Line Location: ASKTM+12
Function Call: WRITE
  • Prompt: !
  • Line Location: GETTM+9
Function Call: WRITE
  • Prompt: !!,"R E P O R T T Y P E"
  • Line Location: ASKMODE+8
Routine Call
  • DIR
  • Line Location:
    • ASKTM+18
    • ASKMODE+15

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SCTM(404.51 - [#404.51] GETTM+10
^TMP("PCMM PATIENT" RUN+2!, RUN+11!, MAIL+4!, MAIL+23!, MAILPT+4, MAILPT+6, MAILPT+8, MAILPT+15
^TMP("PCMM POSITION" RUN+3!, RUN+12!, MAIL+5!, MAIL+24!, MAILPOS+4, MAILPOS+6, MAILPOS+8, MAILPOS+15
^TMP("SCMSG" MAIL+6!, MAIL+25!, SET+1*

Label References

Name Line Occurrences
$$ASKMODE TOP+9
$$ASKTM TOP+5
$$DEVICE TOP+11
EN IEN+7
EXIT TOP+5
GETTM TOP+6
MAILPOS MAIL+13
MAILPT MAIL+14
SET MAIL+9, MAILPOS+11, MAILPOS+12, MAILPOS+13, MAILPOS+14, MAILPOS+16, MAILPOS+18, MAILPOS+27, MAILPT+11, MAILPT+12
MAILPT+13, MAILPT+14, MAILPT+16, MAILPT+18, MAILPT+27
TOP TOP+6, TOP+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% GETTM+5~
%XX DEVICE+2~
%Y GETTM+5~
%Y1 GETTM+5~
%ZHFN DEVICE+2~
C GETTM+5~
CNT GETTM+4~, MAIL+1~, MAIL+8*, SET+1, SET+2*
COL ASKTM+6~, ASKTM+9*, ASKTM+10
DDH GETTM+5~
DFN MAILPT+1~, MAILPT+5*, MAILPT+6*, MAILPT+8
DFNNAM MAILPT+1~, MAILPT+3*, MAILPT+4*, MAILPT+6, MAILPT+8
DIR ASKTM+5~, ASKMODE+6~
DIR("?" ASKTM+15*, ASKTM+16*, ASKTM+17*, ASKMODE+12*, ASKMODE+13*, ASKMODE+14*
DIR("A" ASKTM+14*, ASKMODE+10*
DIR("B" ASKMODE+11*
DIR(0 ASKTM+13*, ASKMODE+9*
DIROUT ASKTM+5~, ASKMODE+6~
DIRUT ASKTM+5~, ASKTM+19, ASKMODE+6~, ASKMODE+16
DT GETTM+9
DTOUT ASKTM+5~, ASKMODE+6~
DUOUT ASKTM+5~, ASKMODE+6~
ERROR MAILPOS+1~, MAILPT+1~
ERROR( MAILPOS+9*, MAILPOS+20, MAILPOS+27
ERROR("PT" MAILPT+9*, MAILPT+20, MAILPT+27
IOF ASKTM+10
IOM ASKTM+8, ASKTM+9
IOST RUN+6
LINE ASKTM+6~, ASKTM+8*, ASKTM+11
ND GETTM+4~, GETTM+10*, GETTM+11
NUM MAILPOS+1~, MAILPOS+3*, MAILPOS+4*, MAILPOS+6, MAILPOS+8, MAILPOS+9, MAILPOS+19*, MAILPOS+20*, MAILPOS+21, MAILPT+1~
MAILPT+7*, MAILPT+8*, MAILPT+9, MAILPT+19*, MAILPT+20*, MAILPT+21*, MAILPT+27
NUM1 MAILPOS+1~, MAILPOS+21*, MAILPOS+27
POP DEVICE+1~, DEVICE+14
POS MAILPOS+1~, MAILPOS+7*, MAILPOS+8*
QUE DEVICE+2~
QUIT EN+1~, TOP+2*, MAIL+1~
RESULT EN+1~, TOP+11*, MAIL+1~
SCDUZ MAIL~, MAIL+18
SCESEQ GETTM+5~
SCIEN IEN+5~, IEN+6*
SCLSEQ GETTM+5~
SCMODE EN+1~, TOP+1!, TOP+9*
SCN GETTM+5~
SCPOS EN+1~
SCTM EN+1~, TOP+1!, TOP+6, GETTM+7!, GETTM+8*, GETTM+15*
SCTM( GETTM+13, GETTM+14*
SCTYPE EN+1~, TOP+1!, MAIL+1~
SCTYPE("TM" TOP+5*, TOP+6, TOP+9, RUN+5, DEVICE+4, MAIL+11*
SCX DEVICE+1~
TM MAILPOS+1~, MAILPOS+5*, MAILPOS+6*, MAILPOS+8
TMI GETTM+4~, GETTM+9*, GETTM+10, GETTM+13, GETTM+14
TMN GETTM+4~, GETTM+11*, GETTM+12
TXT MAILPOS+1~, MAILPOS+22*, MAILPOS+24*, MAILPOS+25, MAILPOS+26*, MAILPOS+27, MAILPT+22*, MAILPT+24*, MAILPT+25, MAILPT+26*
MAILPT+27, SET~, SET+1
U GETTM+11
X ASKTM+5~, GETTM+5~, ASKMODE+6~
XMDUZ MAIL+2~, MAIL+16*, MAIL+17
XMSUB MAIL+2~, MAIL+19*
XMTEXT MAIL+2~, MAIL+20*
XMY MAIL+2~
XMY( MAIL+17*, MAIL+18*
Y ASKTM+5~, ASKTM+19, ASKMODE+6~, ASKMODE+16
ZTDESC DEVICE+1~, DEVICE+9*, DEVICE+13
>> ZTQUEUED RUN+6
ZTRTN DEVICE+1~, DEVICE+8*, DEVICE+13
ZTSAVE DEVICE+1~, DEVICE+13
ZTSAVE("SC*" DEVICE+10*
ZTSAVE("SCTM(" DEVICE+12*
ZTSAVE("SCTYPE(" DEVICE+11*

Marked Items

Name Field # of Occurrence
$T(TXT+NUM1^SCRPV1B MAILPOS+22
$T(TXT+NUM^SCRPV1B MAILPT+22
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All