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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: SDWLRPT2

Package: Scheduling

Routine: SDWLRPT2


Information

SDWLRPT2 ;;IOFO BAY PINES/TEH - WAIT LIST REPORT FORMAT 2 (PCMM);06/12/2002 ; 29 Aug 2002 2:54 PM

Source Information

Source file <SDWLRPT2.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 5 DD^%DT  NOW^%DTC  $$EXTERNAL^DILFD  $$GET1^DIQ  ^DIR  
Kernel 1 $$S^%ZTLOAD  
Registration 1 (ADD,DEM,ELIG)^VADPT  
Scheduling 1 EN^SDWLKIL  

Entry Points

Name Comments DBIA/ICR reference
EN ;
INIT ;Initialize variables
INIT1
SORT ;Sort Records
PRINT ;Print Report
LINE ;Draw Line
HD ;Header
END

External References

Name Field # of Occurrence
DD^%DT INIT1, PRINT+10, PRINT+14
NOW^%DTC INIT1
$$S^%ZTLOAD EN+3, EN+5, PRINT+2
$$EXTERNAL^DILFD PRINT+18, PRINT+19
$$GET1^DIQ SORT+18, SORT+19, HD+5
^DIR PRINT+26
EN^SDWLKIL END
ADD^VADPT PRINT+8
DEM^VADPT PRINT+8
ELIG^VADPT SORT+17, PRINT+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,?80-$L("*** No Patient Records to Report ***")\2,"*** No Patient Records to Report ***"
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: !!,"*** No Patient Records to Report ***"
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: SDWLB,!
  • Line Location: PRINT+5
Function Call: WRITE
  • Prompt: !,"Requested by: ",$$EXTERNAL^DILFD(409.3,11,,SDWLRBY)
  • Line Location: PRINT+18
Function Call: WRITE
  • Prompt: ?35,"Requesting Provider: "
  • Line Location: PRINT+19
Function Call: WRITE
  • Prompt: X
  • Line Location: PRINT+19
Function Call: WRITE
  • Prompt: !,?10,"(Work): ",$P(SDWLPH,U,2)
  • Line Location: PRINT+20
Function Call: WRITE
  • Prompt: !,"Disposition: ",$P(SDWLDISX,U,3)," (",SDWLDIDT,")"
  • Line Location: PRINT+24
Function Call: WRITE
  • Prompt: !!,"** End of Report **"
  • Line Location: PRINT+28
Function Call: WRITE
  • Prompt: !,"_______________________________________________________________________________"
  • Line Location: LINE+1
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $D(IOF)
  • Line Location: HD+1
Function Call: WRITE
  • Prompt: !,SDWLDTP,?80-$L("PCMM Team/Position Wait List Report")\2,"PCMM Team/Position Wait List Report"
  • Line Location: HD+1
Function Call: WRITE
  • Prompt: ?72,"Page: ",SDWLPG
  • Line Location: HD+2
Function Call: WRITE
  • Prompt: !!,?30,"Institution: "
  • Line Location: HD+3
Function Call: WRITE
  • Prompt: !
  • Condition for execution: I>1
  • Line Location: HD+5
Function Call: WRITE
  • Prompt: ?45,$$GET1^DIQ(4,SDWLIENS,".01")
  • Line Location: HD+5
Function Call: WRITE
  • Prompt: !?26,"Report Category: ",$S($P(SDWLCT1,U,1)="T":"TEAM",1:"POSITION")
  • Line Location: HD+7
Function Call: WRITE
  • Prompt: " ALL"
  • Line Location: HD+7
Function Call: WRITE
  • Prompt: !,?45,X
  • Line Location: HD+9
Function Call: WRITE
  • Prompt: !,?35,"Status: ",$S(SDWLOPEN="O":"Open",1:"All")
  • Line Location: HD+10
Function Call: WRITE
  • Prompt: !,?28,"Output Format: ",$S(SDWLFORM="S":"Summary",1:"Detailed")
  • Line Location: HD+11
Routine Call
  • DIR
  • Line Location:
    • PRINT+26

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(4 - [#4] GET1^DIQ
^SDWL(409.3 - [#409.3] EXTERNAL^DILFD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] INIT+13, SORT+21
^SDWL(409.3 - [#409.3] SORT+2, SORT+3, PRINT+8, PRINT+10, PRINT+12, PRINT+13, PRINT+21, PRINT+22, PRINT+23
^TMP("SDWLRPT2" EN+6!, INIT+13*, SORT+1!, SORT+20*, SORT+21*, PRINT+1, PRINT+2, PRINT+3, PRINT+4, PRINT+6
, PRINT+7

Label References

Name Line Occurrences
END EN+3, EN+5, PRINT+2
HD PRINT+1, PRINT+27
INIT EN+1
INIT1 INIT+15, INIT+16
LINE PRINT+3
PRINT EN+4
SORT EN+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % INIT1
CT1 INIT+2, END!
CT2 INIT+3, END!
DATE INIT+4, END!
>> DFN SORT+17*, PRINT+8*
>> DIR(0 PRINT+26*
>> DUOUT PRINT+2, PRINT+4, PRINT+6, PRINT+7, PRINT+26*
FORM INIT+5, END!
I HD+5*, HD+9*, END!
INS INIT+6, END!
IOF HD+1
IOSL PRINT+26, PRINT+27
OPEN INIT+7, END!
>> SDWL INIT+10*
>> SDWLA PRINT+2*, PRINT+3, PRINT+4, PRINT+6, PRINT+7
>> SDWLAPTD PRINT+12*, PRINT+14*
>> SDWLB PRINT+4*, PRINT+5, PRINT+6, PRINT+7
>> SDWLBD INIT+15*, INIT+16*, INIT+17*
>> SDWLC PRINT+6*, PRINT+7
>> SDWLCNT SORT+1*, SORT+21*, PRINT+1*
>> SDWLCOM PRINT+12*, PRINT+17
>> SDWLCT INIT+14*
>> SDWLCT1 INIT+2*, INIT+12, SORT+8, SORT+18, HD+7
>> SDWLCT2 INIT+3*, INIT+14, SORT+12, HD+6, HD+9
>> SDWLCT2( INIT+14*, SORT+13
>> SDWLD PRINT+7*, PRINT+8, PRINT+10, PRINT+12, PRINT+13, PRINT+21, PRINT+22, PRINT+23
>> SDWLDA SORT+2*, SORT+3, SORT+20
>> SDWLDATE INIT+4*, INIT+15, INIT+16, INIT+17
>> SDWLDDT PRINT+23*
SDWLDDUZ PRINT+22*, PRINT+24!
>> SDWLDEAD PRINT+11*
>> SDWLDFN SORT+3*, SORT+17, PRINT+8*
SDWLDIDT PRINT+23*, PRINT+24!
SDWLDIS PRINT+22*, PRINT+24!
SDWLDISX PRINT+22*, PRINT+24!
>> SDWLDTP INIT1*, HD+1
>> SDWLED INIT+15*, INIT+16*, INIT+17*
>> SDWLELIG PRINT+9*, PRINT+16
>> SDWLERR SORT+3*, SORT+6*, SORT+9*, SORT+10*, SORT+13*, SORT+14*, SORT+15*, SORT+16
>> SDWLF SORT+18*, SORT+19
>> SDWLFLD SORT+11*
>> SDWLFORM INIT+5*, HD+11
>> SDWLI INIT+10*, INIT+13*, INIT+14*
SDWLIENS SORT+18*, HD+5*, END!
>> SDWLIN INIT+13*
>> SDWLIN( INIT+13*, SORT+6
>> SDWLIN("ALL" INIT+11*
>> SDWLINS INIT+6*, INIT+11, INIT+13, SORT+5, HD+3, HD+4, HD+5
SDWLIX SORT+18*, SORT+20, END!
>> SDWLNAM PRINT+9*, PRINT+15
>> SDWLODT PRINT+10*, PRINT+15
>> SDWLOPEN INIT+7*, SORT+15, HD+10
>> SDWLPG INIT+8*, HD+2*
>> SDWLPH PRINT+14*, PRINT+20
>> SDWLRBY PRINT+13*, PRINT+18
>> SDWLRPV PRINT+13*, PRINT+19
>> SDWLSCC SORT+17*, SORT+20
>> SDWLSCN SORT+17*
SDWLSIEN SORT+19*, END!
>> SDWLSPT PRINT+26, PRINT+27
>> SDWLSSN PRINT+12*, PRINT+15
>> SDWLTXP INIT+12*
>> SDWLTY1 SORT+7*, SORT+9
>> SDWLTY2 SORT+9*
>> SDWLTYP SORT+8*, SORT+9, SORT+10, SORT+11, SORT+14
>> SDWLTYPE SORT+10*, SORT+13, SORT+19
>> SDWLX SORT+3*, SORT+6, SORT+7, SORT+10, SORT+15, SORT+18, SORT+21
U INIT+12, INIT+13, INIT+14, INIT+17, SORT+6, SORT+7, SORT+8, SORT+10, SORT+15, SORT+17
, SORT+18, SORT+21, PRINT+8, PRINT+10, PRINT+12, PRINT+13, PRINT+16, PRINT+20, PRINT+22, PRINT+23
, PRINT+24, HD+6, HD+7
>> VA("BID" PRINT+12
VADM END!
VADM(1 PRINT+9
>> VAEL(1 PRINT+9
>> VAEL(3 SORT+17
VAPA END!
VAPA(8 PRINT+14
>> X PRINT+19*, PRINT+26, HD+5*, HD+6*, HD+7, HD+8, HD+9*, HD+10*, HD+11*
>> Y INIT1*, SORT+19*, SORT+20, PRINT+10*, PRINT+14*
>> ZTSAVE INIT+9
>> ZTSAVE( INIT+10
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All