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

Package: Scheduling

Routine: SDSCRP


Information

SDSCRP ;ALB/JAM - Restricted Stop Code Nonconforming Clinic Report; 07/24/03

Source Information

Source file <SDSCRP.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 4 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  $$FMTE^XLFDT  
VA Fileman 2 YX^%DTC  ^DIR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Scheduling 2 SD CLN STOP CODE REP  SD53P568  

Entry Points

Name Comments DBIA/ICR reference
EN ;foreground entry point
END
HDR ;Header for data from file #44
PROCESS ;background entry point
PRN ;print line
SCCHK(SCIEN,TYP) ;check stop code against file 40.7; var INACT added SD*547
PAGE ;

External References

Name Field # of Occurrence
YX^%DTC PROCESS+4
^%ZIS EN+11
HOME^%ZIS EN+14
^%ZISC END
^%ZTLOAD EN+14
^DIR EN+7, PAGE+4
$$FMTE^XLFDT SCCHK+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !!,?25,$S(CNTX:CNTX,1:"NO")_" PROBLEM CLINICS FOUND."
  • Line Location: PROCESS+22
Function Call: WRITE
  • Prompt: !,IEN,?8,$E(NAM,1,28),?37,PSCN,?46,SSCN,?57,STR
  • Line Location: PRN+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: SDRDT,?73,"Page: ",SDPG,!
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?18,"NON-CONFORMING CLINICS STOP CODE REPORT",!,?32
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: $S(SDPCF="A":"Active",SDPCF="I":"Inactive",1:"All")_" Clinics",!
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,"HOSPITAL LOCATION FILE (#44) - (Use Set up a Clinic [SDBUILD]"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: " menu option to",!,?32,"make corrections)"
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !!,?37,"PRIMARY",?46,"SECONDARY",?57,"REASON FOR"
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !?8,$S(SDPCF="B":"CLINIC NAME",1:""),?37,"STOP",?46,"CREDIT",?57,"NON"
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: !,"IEN",?8,$S(SDPCF="B":"(*currently inactive)",1:"CLINIC NAME")
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: ?37,"CODE",?46,"STOP CODE",?57,"CONFORMANCE",!,$E(LNS,1,80)
  • Line Location: HDR+10
Function Call: WRITE
  • Prompt: !
  • Line Location: PAGE+3
Routine Call
  • %ZIS
  • Line Location:
    • EN+14
Routine Call
  • DIR
  • Line Location:
    • EN+7
    • PAGE+4
Routine Call
  • %ZIS
  • Line Location:
    • EN+11

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(40.7 - [#40.7] PROCESS+16, PROCESS+17, SCCHK+4
^SC - [#44] PROCESS+8, PROCESS+9, PROCESS+11

Label References

Name Line Occurrences
END EN+7, EN+11, EN+12
HDR PROCESS+6, PRN+1
PAGE PRN+1
PRN PROCESS+19, PROCESS+20, PROCESS+21
PROCESS EN+16
SCCHK PROCESS+20, PROCESS+21

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %H PROCESS+4*
%ZIS EN+10!, EN+11*
%ZIS("A" EN+11*
ACF PROCESS+3~, PROCESS+14*, PROCESS+15
CNTX PROCESS+2~, PROCESS+5*, PROCESS+8*, PROCESS+22
CTY SCCHK+1~, SCCHK+3*, SCCHK+9
DIR EN+1~, EN+7!, PAGE+1~, PAGE+4!
DIR("?" EN+5*, EN+6*
DIR("A" EN+4*
DIR(0 EN+3*, PAGE+4*
DIRUT EN+1~, EN+7
ECX PROCESS+2~, PROCESS+9*, PROCESS+10, PROCESS+11
IDAT PROCESS+2~, PROCESS+11*, PROCESS+12
IDT PROCESS+2~, PROCESS+12*, PROCESS+13
IEN PROCESS+2~, PROCESS+5*, PROCESS+8*, PROCESS+9, PROCESS+11, PRN+2
INACT SCCHK+1~, SCCHK+4*, SCCHK+5
IO EN+15
IO("Q" EN+10!, EN+12!
IOF EN+2, HDR+1
ION EN+14
IOP EN+10!
IOSL PRN+1
IOST PAGE+2
JJ PAGE+1~, PAGE+3*
LNS PROCESS+2~, PROCESS+5*, HDR+10
NAM PROCESS+2~, PROCESS+11*, PROCESS+12*, PROCESS+13*, PROCESS+14, PRN+2
POP EN+10!, EN+11
PSC PROCESS+2~, PROCESS+9*, PROCESS+16, PROCESS+19, PROCESS+20
PSCN PROCESS+2~, PROCESS+16*, PRN+2
RDT PROCESS+2~, PROCESS+12*, PROCESS+13
RTY SCCHK+1~, SCCHK+4*, SCCHK+8, SCCHK+9
SCIEN PROCESS+23!, SCCHK~, SCCHK+4, SCCHK+7
SCN SCCHK+1~, SCCHK+4*, SCCHK+5, SCCHK+6, SCCHK+8, SCCHK+10
SDF PROCESS+2~, PROCESS+5*, PROCESS+8, PROCESS+9*, PRN+3*
SDOUT PROCESS+2~, PROCESS+5*, PROCESS+8, PROCESS+18, PRN+1, PAGE+4*
SDPCF EN+1~, EN+8*, PROCESS+15, HDR+4, HDR+8, HDR+9
SDPG PROCESS+2~, PROCESS+5*, HDR+2, HDR+11*
SDRDT PROCESS+3~, PROCESS+4*, HDR+2
SS PAGE+1~, PAGE+3*
SSC PROCESS+2~, PROCESS+9*, PROCESS+17, PROCESS+21
SSCN PROCESS+2~, PROCESS+17*, PRN+2
STR PROCESS+2~, PROCESS+19*, PROCESS+20, PROCESS+21, PRN+2, SCCHK+2!, SCCHK+5*, SCCHK+7*, SCCHK+8*, SCCHK+10*
TYP PROCESS+23!, SCCHK~, SCCHK+3, SCCHK+7, SCCHK+10
U PROCESS+9, PROCESS+10, PROCESS+11, PROCESS+12, PROCESS+16, PROCESS+17, SCCHK+4
X EN+1~, PAGE+1~
Y EN+1~, EN+8, PROCESS+4, PAGE+1~, PAGE+4
ZTDESC EN+1~, EN+13*
ZTIO EN+1~, EN+14*
ZTQUEUED EN+1~, END
>> ZTREQ END*
ZTRTN EN+1~, EN+14*
>> ZTSAVE("SDPCF" EN+13*
ZTSK EN+14!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All