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

Package: Scheduling

Routine: SCRPI02


Information

SCRPI02 ;ALB/SCK - Incomplete Encounter Mgmt Statistical Summary Report ; 2/4/97

Source Information

Source file <SCRPI02.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 3 HOME^%ZIS  ($$DT,$$FMADD,$$FMTE)^XLFDT  EN^XUTMDEVQ  
Scheduling 3 RPT^SCRPI02  PRINT^SCRPI02A  ($$CLN,$$DIV)^SCRPIUT1  
VA Fileman 2 WAIT^DICD  ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Scheduling 1 SCRPI02  

Entry Points

Name Comments DBIA/ICR reference
ADD(SDXMT,SDIV,SDIVN,SDDCL,SDDCLN,SDPCE) ; Add error entries from #409.75
; for transmission entry.
; Input
; SDXMT - Pointer to #409.75
; SDIV - Division IEN
; SDIVN - Division Name
; SDDCL - Clinic IEN
; SDDCLN - Clinic Name
; SDPCE - Piece to increment in ^TMP("SCRPI SUM",$J...
; 1 - Incomplete Encounter (P1)
; 2 - Deleted Incomplete Encounter (P2)
EN ; Entry point for summary report
; Variables
; VAUTD,VAUTC - VA variables
; SDDT - Date range, Begin^End
; SDRTYP - Report type S - Summary Only
; D - Summary with Detail
ASKQ
RPT ; Entry point for building the summary report
RPTQ
REPORT(SDR) ; Select type of summary report
; Variable Input
; SDR - Returns with Report Type S - Summary Only,
; D - Summary with detail
ENQ
ASKDT(SDT) ; Ask for date range for report
; Variable Input
; SDT - Returns date range as Begin^End
EXIT ;
BLD ; Search for errors in the transmitted outpatient encounter error file
; and begin building the report
BLDDEL ; Search for entries in the Deleted Outpatient Encounter File and add to
; the report.
; Variables
; See list in BLD
ENBLT ; Entry point for bulletin generation of summary only report
; Variables
; SDBLT - Flag to send output to a bulletin
; SDRTYP - See above
; SDDT - See above
HELP ;

External References

Name Field # of Occurrence
HOME^%ZIS EN+22
WAIT^DICD RPT+7
^DIR REPORT+14, ASKDT+13, ASKDT+19
RPT^SCRPI02 ENBLT+10
PRINT^SCRPI02A RPT+9
$$CLN^SCRPIUT1 EN+14
$$DIV^SCRPIUT1 EN+13
$$DT^XLFDT ENBLT+9, ASKDT+8
$$FMADD^XLFDT ENBLT+9, ASKDT+8
$$FMTE^XLFDT ASKDT+12
EN^XUTMDEVQ EN+21

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Select Summary Report Only, or Summary Report with Detail",!
  • Line Location: EN+9
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+17
Function Call: WRITE
  • Prompt: "."
  • Line Location: ADD+25
Function Call: WRITE
  • Prompt: !!,"Date Range for Encounters"
  • Line Location: ASKDT+9
Function Call: WRITE
  • Prompt: !?2,"Answering YES, will provide a table of all clinics,"
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !?2,"showing total encounters, number of incomplete encounters, and"
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: !?2,"percentage. Answering NO will include a list of error details "
  • Line Location: HELP+3
Function Call: WRITE
  • Prompt: !?2,"for each selected clinic, in decsending order of occurrence,"
  • Line Location: HELP+4
Function Call: WRITE
  • Prompt: !?2,"and the number of encounters and incomplete encounters.",!
  • Line Location: HELP+5
Routine Call
  • %ZIS
  • Line Location:
    • EN+22
Routine Call
  • DIR
  • Line Location:
    • REPORT+14
    • ASKDT+13
    • ASKDT+19

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] BLD+23, BLDDEL+13
^SC - [#44] BLD+26, BLDDEL+16
^SCE - [#409.68] BLD+22, BLD+25
^SCE("B" BLD+19, BLD+20
^SD(409.73 - [#409.73] BLD+21, BLD+28, BLDDEL+11, BLDDEL+18
^SD(409.74 - [#409.74] BLDDEL+9, BLDDEL+10, BLDDEL+12, BLDDEL+15
^SD(409.75 - [#409.75] BLD+30, BLDDEL+19, ADD+21, ADD+22
^TMP("SCRPI SUM" RPT+3!, EXIT+1!, BLD+29*, BLD+31*, BLDDEL+20*, ADD+23*

Label References

Name Line Occurrences
$$ASKDT EN+16
$$REPORT EN+10
ADD BLD+32, BLDDEL+21
ASKQ ASKDT+13, ASKDT+19
BLD RPT+8
BLDDEL RPT+8
ENQ EN+13, EN+14, EN+16
RPTQ REPORT+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR REPORT+14!, ASKDT+19!
DIR("?" REPORT+12*, ASKDT+11*
DIR("??" REPORT+13*
DIR("A" REPORT+11*, ASKDT+10*, ASKDT+17*
DIR("B" REPORT+11*, ASKDT+12*, ASKDT+18*
DIR(0 REPORT+11*, ASKDT+10*
DIRUT REPORT+14, ASKDT+13, ASKDT+14!, ASKDT+19, ASKDT+20!
IOST RPT+7, ADD+25
NX REPORT+8~
SCCNT RPT+1~, RPT+4*
SCDE ADD+19~, ADD+21*, ADD+22
SCER ADD+19~, ADD+22*, ADD+23
>> SDBDT ASKDT+8*, ASKDT+12
SDBLT ENBLT+6~, ENBLT+8*, RPT+7
>> SDCNT BLD+17*, BLDDEL+7*, ADD+24*, ADD+25
SDDCL BLD+25*, BLD+26, BLD+27, BLD+32, BLDDEL+15*, BLDDEL+16, BLDDEL+17, BLDDEL+21, ADD~
SDDCLN BLD+26*, BLD+29, BLD+31, BLD+32, BLDDEL+16*, BLDDEL+20, BLDDEL+21, ADD~, ADD+23
SDDT EN+7~, EN+16, ENBLT+6~, ENBLT+9*, BLD+18, BLDDEL+8
SDEND BLD+15~, BLD+18*, BLD+19, BLDDEL+5~, BLDDEL+8*, BLDDEL+9
SDIV BLD+22*, BLD+23, BLD+24, BLD+32, BLDDEL+12*, BLDDEL+13, BLDDEL+14, BLDDEL+21, ADD~
SDIVN BLD+23*, BLD+29, BLD+31, BLD+32, BLDDEL+13*, BLDDEL+20, BLDDEL+21, ADD~, ADD+23
SDOE BLD+15~, BLD+20*, BLD+21, BLD+22, BLD+25, BLD+28, BLDDEL+5~, BLDDEL+10*, BLDDEL+11, BLDDEL+12
, BLDDEL+15, BLDDEL+18
SDOEDT BLD+15~, BLD+18*, BLD+19*, BLD+20, BLDDEL+5~, BLDDEL+8*, BLDDEL+9*, BLDDEL+10
SDPCE ADD~, ADD+23
SDR REPORT~, REPORT+10*, REPORT+15*
SDRTYP EN+7~, EN+10, EN+12, EN+13, EN+14, ENBLT+6~, ENBLT+8*, RPT+5
SDT ASKDT~, ASKDT+13!, ASKDT+15*, ASKDT+19!, ASKDT+21*, ASKQ
SDXMT BLD+28*, BLD+30, BLD+32, BLDDEL+18*, BLDDEL+19, BLDDEL+21, ADD~, ADD+21
U BLD+18, BLD+22, BLD+23, BLD+25, BLD+26, BLD+29, BLD+31, BLDDEL+8, BLDDEL+12, BLDDEL+13
, BLDDEL+15, BLDDEL+16, BLDDEL+20, ADD+22, ADD+23, ASKDT+21
VAUTC EN+7~, EN+12*, ENBLT+6~, ENBLT+8*, BLD+27, BLDDEL+17
VAUTC( BLD+27, BLDDEL+17
VAUTD EN+7~, EN+12*, ENBLT+6~, ENBLT+8*, BLD+24, BLDDEL+14
VAUTD( BLD+24, BLDDEL+14
>> X EN+18*, EN+19
Y REPORT+8~, REPORT+14*, REPORT+15, RPTQ, ASKDT+15, ASKDT+21
>> ZTQUEUED RPT+7, ADD+25
ZTSAVE EN+7~, EN+21
ZTSAVE( EN+19*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All