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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: SOWKCO

Package: Social Work

Routine: SOWKCO


Information

SOWKCO ;B'HAM ISC/SAB-Routine to notify Social Work service of unopened cases for high risk patients ; 25 Feb 93 / 9:17 AM [ 09/22/94 2:04 PM ]

Source Information

Source file <SOWKCO.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  (,KILL)^%ZTLOAD  
Registration 2 (INP,KVA)^VADPT  PID^VADPT6  
VA FileMan 1 NOW^%DTC  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Social Work 1 SOWKOC  

Entry Points

Name Comments DBIA/ICR reference
EN
COM
DEV
CL

External References

Name Field # of Occurrence
NOW^%DTC EN+1
^%ZIS DEV+1
^%ZISC CL
^%ZTLOAD DEV+3
KILL^%ZTLOAD CL
INP^VADPT EN+4
KVA^VADPT CL
PID^VADPT6 EN+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"WARNING !!!",!?5,"This report is formatted for 132 columns and will be",!?5,"difficult to read if printed to the screen.",!
  • Line Location: DEV+0
Function Call: WRITE
  • Prompt: !!,*7,"PRINTOUT MUST BE SENT TO PRINTER !!",!
  • Line Location: DEV+2
Function Call: WRITE
  • Prompt: !,"POSSIBLE HIGH RISK PATIENT(S) THAT HAVE NOT BEEN SEEN BY SOCIAL WORK SERVICE "
  • Line Location: EN+0
Function Call: WRITE
  • Prompt: !!,"PATIENT NAME",?35,"ID#",?47,"WARD",?60,"ADMIT DATE/TIME",!,"Run Date/Time: "_RT,!
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: "_"
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !,$P(^DPT(DFN,0),"^"),?35,VA("BID"),?45,$S(+VAIN(4):$P(VAIN(4),"^",2),1:"DISCHARGED"),?60,$P(VAIN(7),"^",2)
  • Line Location: COM+0
Routine Call
  • %ZIS
  • Line Location:
    • DEV+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" EN+1
^DPT - [#2] EN+3, COM
^SOWK(655 - [#655] EN+3
^TMP($J EN!, EN+3*, EN+4, CL!

Label References

Name Line Occurrences
CL DEV+1
COM EN+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EN+1!
%ZIS DEV+1!*, CL!
%ZIS("B" DEV+1*
A EN+3*, CL!
B CL!
C EN+3*, CL!
DFN EN+4*, CL!, COM
I EN+2*, CL!
II EN+4*, CL!
IO EN
IO("Q" DEV+3
IOF CL
IOM EN+2
ION DEV+1
IOP DEV+1!*, CL!
IOST CL
P EN+3*, CL!
POP DEV+1!, CL!
R EN+4*, CL!
RT EN+1*, EN+2, CL!
SOWKION DEV+1*!, CL!
>> VA("BID" COM
>> VAIN(4 COM
>> VAIN(7 COM
Y EN+1*!
>> ZTDESC DEV+3*
>> ZTRTN DEV+3*
ZTSK DEV+1!, CL
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All