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

Package: Scheduling

Routine: SCRPW22


Information

SCRPW22 ;RENO/KEITH - ACRP Ad Hoc Report (cont.) ;03 Aug 98 9:36 PM

Source Information

Source file <SCRPW22.m>

Entry Points

Name Comments DBIA/ICR reference
PLIST(C,SDLP,SDTEMP) ;Display parameter list
PTMP
D1(SDI,SDE)
D2(SDTX,SDS1,SDS2)
D2P
F ;Format captions
L ;Limitation captions
O ;Order caption
XY(X) ;Maintain $X, $Y
PHD(SDH) ;Parameter header
WAIT
CAT(SDA) ;Enter edit perspective and limitation categories
CAT1
CATD
CATQ
RL() ;List or range?
PRMT(SDS1,SDS2) ;Prompts for level DIR2
DIRB(SDS1,SDS2,SDS3) ;Get default value
AED(SDS1) ;Add/edit/delete element categories
AED1
A ;Add items
E ;Edit items
D ;Delete items
DEL1
ILIST(SDY) ;List/select items
ISET
IL1
DESC ;Prompt for descriptive report title
REST() ;Select/restore template for editing

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Variable: E P O R T F O R M A T ") Q
  • Timeout: SDOUT
  • Line Location: PLIST+5
Function Call: READ
  • Variable: E P O R T P E R S P E C T I V E ") Q
  • Timeout: SDOUT
  • Line Location: PLIST+6
Function Call: READ
  • Variable: E P O R T L I M I T A T I O N S ") Q
  • Timeout: SDOUT
  • Line Location: PLIST+7
Function Call: WRITE
  • Prompt: !
  • Line Location: PLIST+8
Function Call: READ
  • Variable: E P O R T P R I N T O R D E R ") Q
  • Timeout: SDOUT
  • Line Location: PLIST+9
Function Call: WRITE
  • Prompt: !?(C+36-$L($P(SDX,U,2))),$P(SDX,U,2),": ",$E($P(SDX,U,3),1,(42+C))
  • Line Location: PLIST+11
Function Call: WRITE
  • Prompt: !
  • Line Location: PLIST+13
Function Call: WRITE
  • Prompt: !
  • Line Location: PLIST+13
Function Call: WRITE
  • Prompt: !
  • Line Location: PLIST+13
Function Call: WRITE
  • Prompt: !?(C+36-$L(SDX)),SDX,": ",$E($P(SDPAR(SDI,SDII),U,2),1,(42+C))
  • Line Location: D1+0
Function Call: WRITE
  • Prompt: !?(38+C),$E(^UTILITY($J,"W",DIWL,SDL2,0),1,(42+C))
  • Line Location: D2+9
Function Call: WRITE
  • Prompt: !?(C+36-$L(SDX)),SDX,": ",$E(^UTILITY($J,"W",DIWL,SDL2,0),1,(42+C))
  • Line Location: D2P+4
Function Call: WRITE
  • Prompt: !?(38+C),$E(^UTILITY($J,"W",DIWL,SDL2,0),1,(42+C))
  • Line Location: D2P+5
Function Call: WRITE
  • Prompt: X
  • Line Location: XY+2
Function Call: WRITE
  • Prompt: !
  • Line Location: PHD+2
Function Call: WRITE
  • Prompt: !
  • Line Location: PHD+3
Function Call: WRITE
  • Prompt: "-"
  • Line Location: PHD+4
Function Call: WRITE
  • Prompt: " ",SDH," "
  • Line Location: PHD+5
Function Call: WRITE
  • Prompt: "-"
  • Line Location: PHD+5
Function Call: WRITE
  • Prompt: !
  • Line Location: PHD+6
Function Call: WRITE
  • Prompt: !!,$C(7),"Required ",$S($P(SDPAR(SDS1,SDS2,2),U)="L":"list",1:"range")," data missing.",!,$P(SDPAR(SDS1,SDS2),U,2),": ",$P(SDPAR(SDS1,SDS2,1),U,2)," element deleted!"
  • Line Location: CATD+1
Function Call: WRITE
  • Prompt: !!,"Required data missing! "_$S(SDS1="P":"Perspective ",1:"Limitation item ")_$S(SDA="E":"changes ",1:"")_"not filed.",!
  • Line Location: CATQ+0
Function Call: WRITE
  • Prompt: !!?28,$$XY(IORVON)," Limitation item action ",$$XY(IORVOFF)
  • Line Location: AED1+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ILIST+3
Function Call: WRITE
  • Prompt: !
  • Line Location: IL1+0
Function Call: WRITE
  • Prompt: !
  • Line Location: IL1+0
Function Call: WRITE
  • Prompt: !
  • Line Location: DESC+3
Function Call: WRITE
  • Prompt: !
  • Line Location: REST+3
Function Call: WRITE
  • Prompt: !
  • Line Location: REST+4
Info |  Source |  Entry Points |  Interaction Calls