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

Package: Scheduling

Routine: SDWLCU6


Information

SDWLCU6 ;IOFO BAY PINES/DMR - EWL FILE 409.3 CLEANUP - print ;2/15/05

Source Information

Source file <SDWLCU6.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 5 DD^%DT  NOW^%DTC  ^DIE  $$GET1^DIQ  ^DIR  
Registration 1 $$SITE^VASITE  
Scheduling 1 $$CLIN^SDWLPE  

Entry Points

Name Comments DBIA/ICR reference
CLINIC ;Display all clinics in file 409.32 that need to be cleaned up in file 44 in mail message
FIX ;fix corrupted Wait List Type piece 5
HD ;HDR
EOP() ;end of page check - return 1 to quit, 0 to continue

External References

Name Field # of Occurrence
DD^%DT SDWLCU6+4, SDWLCU6+26, HD+3
NOW^%DTC SDWLCU6+4
^DIE SDWLCU6+15, SDWLCU6+16, SDWLCU6+17, SDWLCU6+18, SDWLCU6+19
$$GET1^DIQ SDWLCU6+25, CLINIC+8
^DIR EOP+5
$$CLIN^SDWLPE CLINIC+4
$$SITE^VASITE HD+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"TOTAL null field error EWL entries: "_CC
  • Line Location: SDWLCU6+33
Function Call: WRITE
  • Prompt: !!,"++ Missing Wait List Type and corresponding field entry (TEAM,POSITION,",!," SERVICE/SPECIALTY,CLINIC). Correct corresponding field entries",!," and running report again will correct Wait List Type field"
  • Line Location: SDWLCU6+34
Function Call: WRITE
  • Prompt: !!,"** End of Report **"
  • Line Location: SDWLCU6+36
Function Call: WRITE
  • Prompt: !,*7,$P(INSTST,U,6)
  • Line Location: CLINIC+5
Function Call: WRITE
  • Prompt: !!!,"The following clinics need to have the institution updated in file 44:",!!
  • Line Location: CLINIC+7
Function Call: WRITE
  • Prompt: !,?20,$$GET1^DIQ(44,+$G(^SDWL(409.32,CLINIC,0))_",",.01)
  • Line Location: CLINIC+8
Function Call: WRITE
  • Prompt: ?57,SDWLPD,?72,"Page: ",SDWLPG
  • Line Location: HD+3
Function Call: WRITE
  • Prompt: !,?10,"Wait List Key Field 'NULL' Report for OPEN EWL entries."
  • Line Location: HD+4
Function Call: WRITE
  • Prompt: !!,"STATION: "_+$$SITE^VASITE(,)
  • Line Location: HD+5
Function Call: WRITE
  • Prompt: !!,"IEN Patient Name",?42,"Wait Date",?53,"STS",?58,"Null Fields"
  • Line Location: HD+6
Function Call: WRITE
  • Prompt: !
  • Line Location: EOP+3
Routine Call
  • DIE
  • Line Location:
    • SDWLCU6+15
    • SDWLCU6+16
    • SDWLCU6+17
    • SDWLCU6+18
    • SDWLCU6+19
Routine Call
  • DIR
  • Line Location:
    • EOP+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^SDWL(409.3 - [#409.3] Classic Fileman Calls
^SC - [#44] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SDWL(409.3 - [#409.3] SDWLCU6+6, SDWLCU6+7, SDWLCU6+8!, SDWLCU6+9, SDWLCU6+25, FIX+5*
^SDWL(409.32 - [#409.32] CLINIC+2, CLINIC+3, CLINIC+8

Label References

Name Line Occurrences
$$EOP HD+1
CLINIC SDWLCU6+35
FIX SDWLCU6+21
HD SDWLCU6+5, SDWLCU6+24

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % SDWLCU6+4
CC SDWLCU6+2~, SDWLCU6+3*, SDWLCU6+31*, SDWLCU6+33, CLINIC+1~*, CLINIC+6*, CLINIC+7
CL CLINIC+3~*, CLINIC+4
CLINIC CLINIC+1~*, CLINIC+2*, CLINIC+3, CLINIC+8
DA SDWLCU6+14~, SDWLCU6+15*
DIE SDWLCU6+14~, SDWLCU6+15*
DIR EOP+1~
DIR(0 EOP+4*
DIROUT EOP+1~
DIRUT EOP+1~
DR SDWLCU6+14~, SDWLCU6+15*, SDWLCU6+16*, SDWLCU6+17*, SDWLCU6+18*, SDWLCU6+19*
DT SDWLCU6+11, SDWLCU6+13, HD+3
DTOUT EOP+1~
DUOUT EOP+1~
END SDWLCU6+2~, SDWLCU6+3*, SDWLCU6+24, SDWLCU6+32, HD+1*
I SDWLCU6+2~, SDWLCU6+21*, SDWLCU6+28*
IEN SDWLCU6+3~*, SDWLCU6+7*, SDWLCU6+8, SDWLCU6+9, SDWLCU6+15, SDWLCU6+25, SDWLCU6+27, FIX+5
INST CLINIC+1~*
INSTST CLINIC+3~, CLINIC+4*, CLINIC+5
IOF HD+2
IOSL SDWLCU6+24, EOP+3
IOST HD+1, EOP+2
J SDWLCU6+2~, FIX+2*
NAME SDWLCU6+23~, SDWLCU6+25*, SDWLCU6+27
NN SDWLCU6+23~, SDWLCU6+25*
PAT SDWLCU6+3~*, SDWLCU6+6*, SDWLCU6+7, SDWLCU6+8
SDCS SDWLCU6+9~*, SDWLCU6+10, SDWLCU6+11, SDWLCU6+13
SDWLAPTD SDWLCU6+2~, SDWLCU6+26*, SDWLCU6+27
SDWLDISP SDWLCU6+14~*
SDWLDTP SDWLCU6+3~, SDWLCU6+4*
SDWLPD SDWLCU6+2~, HD+3*
SDWLPG SDWLCU6+2~, SDWLCU6+3*, HD+1, HD+2*, HD+3
SDWLTP SDWLCU6+2~, SDWLCU6+3*, SDWLCU6+34, FIX+3*
SDWLTP1 SDWLCU6+2~, SDWLCU6+20*, SDWLCU6+29, FIX+1*, FIX+3*
SDWLWD SDWLCU6+2~, SDWLCU6+20*, SDWLCU6+30, FIX+6*
SDWLX SDWLCU6+9~*, SDWLCU6+11, SDWLCU6+13, SDWLCU6+21, SDWLCU6+26, SDWLCU6+27, FIX+2, FIX+5*
U SDWLCU6+3*, SDWLCU6+9, SDWLCU6+11, SDWLCU6+13, SDWLCU6+21, SDWLCU6+26, SDWLCU6+27, CLINIC+5, FIX+2, FIX+5
X EOP+1~
XDATA SDWLCU6+2~, SDWLCU6+21*, FIX+2*
XFL SDWLCU6+2~, SDWLCU6+20*, SDWLCU6+21*, SDWLCU6+28*, SDWLCU6+29, FIX+4, FIX+5*
XFL1 SDWLCU6+2~, FIX+1*, FIX+2*, FIX+3, FIX+4, FIX+5, FIX+6
XFLG SDWLCU6+2~, SDWLCU6+20*, SDWLCU6+21*, SDWLCU6+22, SDWLCU6+28
Y SDWLCU6+4*, SDWLCU6+26*, HD+3*, EOP+1~, EOP+6
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