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

Package: IHS Changes To Scheduling

Routine: BSDWKR2


Information

BSDWKR2 ; IHS/ANMC/LJF - WORKLOAD LISTING ; [ 04/12/2004 3:24 PM ]

Source Information

Source file <BSDWKR2.m>

Call Graph

Call Graph Total: 13

Package Total Call Graph
Kernel 4 ^%ZISC  $$FMTE^XLFDT  $$REPEAT^XLFSTR  DISP^XQORM1  
Registration 3 EN^VALM  TERM^VALM0  CLEAR^VALM1  
IHS Changes To ADT 2 ($$BROWSE,$$RANGE,$$READ,ZIS)^BDGF  $$HRCN^BDGF2  
IHS Changes To Scheduling 2 ($$CONF,$$FAC,CLINIC,PCASK)^BSDU  $$SUB1^BSDWKR1  
IHS VA Utilities 1 ($$VAL,$$VALI)^XBDIQ1  
VA Fileman 1 $$GET1^DIQ  

Entry Points

Name Comments DBIA/ICR reference
EN ; -- main entry point for BSDRM WORKLOAD LIST
HDR ; -- header code
PAD(D,L) ;EP -- SUBRTN to pad length of data
; -- D=data L=length
TYPE(C,D,N,P,S) ; return type of appt
; returns sched, same day, walk-in, overbook, inpt
PRINT ; print report to paper
EXPND ; -- expand code
HDG ; heading for paper report
START ;EP; -- re-entry for printing to paper
INIT ; -- init variables and list array
EXIT ; -- exit code
SET(LINE,NUM) ; set line into display array
SP(N) ; -- SUBRTN to pad N number of spaces
ASK ; -- ask user questions
HELP ; -- help code

External References

Name Field # of Occurrence
^%ZISC PRINT+6
$$BROWSE^BDGF ASK+13
$$RANGE^BDGF HDR+4
$$READ^BDGF ASK+3, ASK+10, ASK+11
ZIS^BDGF ASK+14
$$HRCN^BDGF2 INIT+27
$$CONF^BSDU HDR+1
$$FAC^BSDU INIT+27
CLINIC^BSDU ASK+7
PCASK^BSDU ASK+8
$$SUB1^BSDWKR1 INIT+9
$$GET1^DIQ INIT+8, INIT+28, INIT+29
EN^VALM EN+2
TERM^VALM0 EN+1
CLEAR^VALM1 EN+1, EN+3
$$VAL^XBDIQ1 INIT+19
$$VALI^XBDIQ1 TYPE+4
$$FMTE^XLFDT INIT+25
$$REPEAT^XLFSTR HDG+3, HDG+5, PAD+2
DISP^XQORM1 HELP+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !,^TMP("BSDWKR2",$J,LINE,0)
  • Line Location: PRINT+5
Function Call: WRITE
  • Prompt: @IOF,?30,"Workload Listings"
  • Line Location: HDG+1
Function Call: WRITE
  • Prompt: !,VALMHDR(I)
  • Line Location: HDG+2
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("-",80)
  • Line Location: HDG+3
Function Call: WRITE
  • Prompt: !,"Appt Date",?22,"Type",?33,"Chart #",?43,"Sex",?48,"Age",?57,"Status"
  • Line Location: HDG+4
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("=",80)
  • Line Location: HDG+5
Routine Call
  • VALM
  • Line Location:
    • EN+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^SC - [#44] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] TYPE+5
^SC - [#44] INIT+13, INIT+17, INIT+18, TYPE+3
^SC("AIHSPC" INIT+7
^TMP("BSD" INIT+1!, INIT+31*, INIT+35, INIT+37, INIT+39, INIT+40, INIT+44!
^TMP("BSDWKR2" INIT+1!, SET+2*, EXIT+1!, PRINT+3, PRINT+5

Label References

Name Line Occurrences
$$PAD INIT+25, INIT+26, INIT+28, INIT+29, INIT+30, SP+1
$$SP HDR+1, HDR+2, HDR+3, HDR+4, INIT+38
$$TYPE INIT+22
EN ASK+13
EXIT PRINT+6
HDG PRINT+1, PRINT+4
HDR HDG+1
INIT START+1
PRINT START+1
SET INIT+36, INIT+38, INIT+40, INIT+41, INIT+42

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
APPN INIT+5~, INIT+16*, INIT+17*, INIT+18, INIT+22
APPT INIT+5~, INIT+12*, INIT+13*, INIT+17, INIT+18, INIT+19, INIT+22, INIT+25, INIT+31
BSDAR INIT+2~*, INIT+6
BSDBD ASK+1~, ASK+10*, ASK+11, HDR+4, INIT+12
BSDED ASK+1~, ASK+11*, HDR+4, INIT+12
>> BSDQ ASK+7, ASK+8
BSDSUB ASK+1~, ASK+3*, ASK+4, ASK+7, ASK+8
BSDTT ASK+1~
C TYPE~, TYPE+3
CLN INIT+5~, INIT+6*, INIT+7, INIT+8, INIT+9, INIT+13, INIT+17, INIT+18, INIT+22, INIT+27
D TYPE~, TYPE+3, TYPE+4, TYPE+5, PAD~, PAD+2
END INIT+5~, INIT+12*, INIT+13
I HDG+2~*
IO PRINT+1
IOF HDG+1
IOSL PRINT+4
L PAD~, PAD+2
LINE INIT+5~, INIT+25*, INIT+26*, INIT+27*, INIT+28*, INIT+29*, INIT+30*, INIT+31, SET~, SET+2
, PRINT+2~, PRINT+3*, PRINT+5
N TYPE~, TYPE+3, SP~, SP+1
NAME INIT+5~, INIT+8*, INIT+9, INIT+31
NUM SET~, SET+1*, SET+2
P TYPE~, TYPE+4, TYPE+5
PAT INIT+5~, INIT+18*, INIT+19, INIT+22, INIT+27, INIT+28, INIT+29
POP ASK+1~
S TYPE~, TYPE+2
S1 INIT+34~, INIT+35*, INIT+36, INIT+37, INIT+38, INIT+39, INIT+40, INIT+41
S2 INIT+34~, INIT+37*, INIT+38, INIT+39, INIT+40, INIT+41
S3 INIT+34~, INIT+39*, INIT+40
STATUS INIT+5~, INIT+19*, INIT+20, INIT+21, INIT+22, INIT+30
SUB INIT+5~, INIT+9*, INIT+31
TYPE INIT+5~, INIT+22*, INIT+26
U ASK+4, TYPE+5
VALMCNT EN+1~, INIT+1*, INIT+36, INIT+38, INIT+40, INIT+41, INIT+42
>> VALMHDR( HDG+2
>> VALMHDR(1 HDR+1*
>> VALMHDR(2 HDR+2*
>> VALMHDR(3 HDR+3*
>> VALMHDR(4 HDR+4*
VAUTC ASK+1~, INIT+2
VAUTD ASK+1~
X TYPE+4~*, TYPE+5, TYPE+6, HELP+1*
>> Y ASK+13*
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