Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: SCRPW43

Package: Scheduling

Routine: SCRPW43


Information

SCRPW43 ;RENO/KEITH - Means Test/Eligibility/Enrollment Report ; 24 Aug 99 9:25 PM

Source Information

Source file <SCRPW43.m>

Entry Points

Name Comments DBIA/ICR reference
START ;Print report
EXIT
SCAT ;Select format subcategory
SCAT1
SDEL ;Delete sub-category
PDIS ;Parameter display
PD1(SDI) ;Print parameters
PDP(SDT,SDX,SDP,SDL,SDL1) ;Print parameter display line
WAIT ;Do CRT pause
LC(X) ;Lowercase value
DIV(SDIV) ;Evaluate division
GET ;Gather report information
SET0(SDIV) ;Set TMP global for summary
SET1(SDIV) ;Set TMP global for detail
DSV(SDIV,S0,S1,S2,S3,S4) ;Produce detail sort value
SORT(SDACR) ;Return sort value
STOP ;Check for stop task request
INCL() ;Determine if encounter should be included in detailed report

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PDIS+1
Function Call: WRITE
  • Prompt: !
  • Line Location: PDIS+1
Function Call: WRITE
  • Prompt: !
  • Condition for execution: SDI>1
  • Line Location: PD1+16
Function Call: WRITE
  • Prompt: ?($S($E(IOST)="P":(IOM\2-1),1:C+19+(3*SDI)))
  • Line Location: PD1+16
Function Call: WRITE
  • Prompt: $E($P(SDX,U,2),1,SDL)_$S($P(SDX,U,3):" <pagefeed>",1:"")
  • Line Location: PD1+16
Function Call: WRITE
  • Prompt: !
  • Line Location: PDP+8
Function Call: WRITE
  • Prompt: ?(IOM\2-1),$P(SDX,U,SDP)
  • Line Location: PDP+9
Function Call: WRITE
  • Prompt: !
  • Line Location: WAIT+1
Info |  Source |  Entry Points |  Interaction Calls