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

Package: Scheduling

Routine: SCRPW62


Information

SCRPW62 ;BP-CIOFO/KEITH - SC veterans awaiting appointments ;1/5/16 12:26pm

Source Information

Source file <SCRPW62.m>

Entry Points

Name Comments DBIA/ICR reference
RPT
FMT
QUE ;Queue output
ENT ;Date entered parameters
APPT ;Appointment delay parameters
START ;Gather report data
SCEL(SDE,SDSCVT) ;Gather SC eligibility codes
EXIT
HDR ;Print report header
HDRD ;Header for delimited report
DELIM(ARR) ;enter delimiter in the end of wrapped line

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Note: Once the scheduling replacement application has been implemented at your"
  • Line Location: SCRPW62+9
Function Call: WRITE
  • Prompt: !,"site, this report will no longer be accurate."
  • Line Location: SCRPW62+10
Function Call: WRITE
  • Prompt: !
  • Line Location: RPT+7
Function Call: WRITE
  • Prompt: !
  • Line Location: RPT+13
Function Call: WRITE
  • Prompt: !
  • Line Location: FMT+4
Function Call: WRITE
  • Prompt: !
  • Line Location: FMT+13
Function Call: WRITE
  • Prompt: !!,"This report requires the following steps to be converted to 'EXCEL':"
  • Line Location: QUE+2
Function Call: WRITE
  • Prompt: !,"1 - Copy it into WORD and replace '!^p' with null"
  • Line Location: QUE+3
Function Call: WRITE
  • Prompt: !,"2 - Save this file as *.txt format"
  • Line Location: QUE+4
Function Call: WRITE
  • Prompt: !,"3 - Open this file in 'EXCEL' with the All Files(*.*) type of file, listing it with one delimiter: '^'."
  • Line Location: QUE+5
Function Call: WRITE
  • Prompt: !
  • Line Location: QUE+7
Function Call: WRITE
  • Prompt: !
  • Line Location: ENT+8
Function Call: WRITE
  • Prompt: !
  • Line Location: APPT+12
Function Call: WRITE
  • Prompt: !!
  • Line Location: START+10
Function Call: WRITE
  • Prompt: $$XY^SCRPW50("",0,0)
  • Condition for execution: $X
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: SDLINE
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !?(IOM-$L(SDT(X))\2),SDT(X)
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !,SDLINE,!,"Date printed: ",SDPNOW,?((IOM-6)-$L(SDPAGE)),"Page: "
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: SDPAGE,!,SDLINE
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: !,SDT(X)
  • Line Location: HDRD+2
Function Call: WRITE
  • Prompt: !,"Date printed: ",SDPNOW,!,SDLINE
  • Line Location: HDRD+3
Function Call: WRITE
  • Prompt: !,$E(LN,JJ,JJ+78)
  • Line Location: DELIM+4
Function Call: WRITE
  • Prompt: DELIM
  • Condition for execution: JJ+79<LL
  • Line Location: DELIM+4
Function Call: WRITE
  • Prompt: $E(LN,LL)
  • Line Location: DELIM+4
Info |  Source |  Entry Points |  Interaction Calls