Routine: SDUL

Information

SDUL ;MJK/ALB - List Manager; 12/1/91

Source Information

Source file <SDUL.m>

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
Scheduling	3	(INIT,POP)^SDUL0 ($$LOWER,$$NOW,$$SETSTR)^SDUL1 ($$GET,$$PAGE,RESET)^SDUL4
Kernel	2	EN^XQOR DISP^XQORM1

Caller Graph

Caller Graph Total: 4

Package	Total	Caller Graph
Scheduling	4	SDUL0 SDUL1 SDUL4 SDUL40

Entry Points

Name	Comments	DBIA/ICR reference
WP1(SDULREF)	; -- quick setup
ASKQ
HDR	; -- prt/display header
EN(NAME,PARMS)	; -- main entry point ; input: NAME := free text name of list template or routine call ; PARMS := parameter list	ICR #660 Status: Retired Usage: Private
SHOW	; -- show items to user
CHGCAP(FLD,LABEL)	; -- change label on caption ; input: FLD := name of field ; LABEL := text for column header
LIST	; -- list items
REFRESH	;	ICR #660 Status: Retired Usage: Private
WP(SDULREF,SDULWPTL)	; -- quick entry to List Manager (c)
ENQ
ASK	; -- prompt user
BLD	; -- build list of items
BLDQ
COL	;
CAPTION()	; -- set up caption line of header

External References

Name	Field # of Occurrence
INIT^SDUL0	EN+4
POP^SDUL0	ENQ
$$LOWER^SDUL1	HDR+11
$$NOW^SDUL1	HDR+11
$$SETSTR^SDUL1	CAPTION+4
$$GET^SDUL4	LIST+4
$$PAGE^SDUL4	BLD+3, LIST+2, HDR+11, REFRESH+1
RESET^SDUL4	ASK+1
EN^XQOR	ASK+5
DISP^XQORM1	SHOW+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: LIST+3
Function Call: WRITE	Prompt: !,X Line Location: LIST+4
Function Call: WRITE	Prompt: !,X Line Location: LIST+9
Function Call: WRITE	Prompt: ! Condition for execution: $E(IOST,1,2)="C-" Line Location: LIST+9
Function Call: WRITE	Prompt: @IOF Line Location: HDR+4
Function Call: WRITE	Prompt: $E(SDUL("TITLE"),1,30) Line Location: HDR+7
Function Call: WRITE	Prompt: $J("",30-$L(SDUL("TITLE"))) Line Location: HDR+9
Function Call: WRITE	Prompt: $C(13) Line Location: HDR+10
Function Call: WRITE	Prompt: $$LOWER^SDUL1($$NOW^SDUL1)," Page: ",$J(SDULPGE,3)," of ",$J($$PAGE^SDUL4(SDULCNT,SDUL("LINES")),3) Line Location: HDR+11
Function Call: WRITE	Prompt: !,$G(SDULHDR(I)) Line Location: HDR+14

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("XY"	LIST+3
^SD(409.61 - [#409.61]	COL+2
^TMP("SDUL DATA"	EN+7, BLD+1, ASK+3

Label References

Name	Line Occurrences
$$CAPTION	CHGCAP+3
ASK	EN+6, ASK+6
BLD	EN+5
BLDQ	BLD+1
EN	WP+1
ENQ	EN+4, EN+5
HDR	REFRESH+1
LIST	REFRESH+2
REFRESH	EN+6, ASK+6

Naked Globals

Name	Field # of Occurrence
^(	COL+2
^("FNL"	EN+7
^("HLP"	ASK+3
^("INIT"	BLD+1
^(0	COL+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
COL	CAPTION+1~, CAPTION+3*
DIROUT	ASK+4!, ASKQ!
DTOUT	ASK+4!, ASKQ!
DUOUT	ASK+4!, ASKQ!
>> DX	LIST+3, HDR+6, HDR+10, SHOW+1
>> DY	LIST+3, HDR+6, HDR+10, SHOW+1
FLD	CAPTION+1~, CAPTION+3*, CAPTION+4, CHGCAP~, CHGCAP+3
I	LIST+4, COL+2, HDR+1~, HDR+14*
IOF	HDR+4
>> IOINHI	HDR+5
>> IOINORM	HDR+8
IOST	LIST+3, LIST+9, HDR+6, HDR+10
>> IOUOFF	LIST+8, HDR+12, HDR+17
>> IOUON	LIST+8, HDR+5, HDR+8, HDR+17
>> IOXY	LIST+3, HDR+6, HDR+10, SHOW+1
LABEL	CHGCAP~, CHGCAP+3
>> LN	LIST+4*
NAME	EN~, EN+4
PARMS	EN~, EN+4
>> SDUL("ARRAY"	WP1+2*
>> SDUL("BM"	SHOW+1
>> SDUL("HDR"	HDR+2
>> SDUL("IFN"	COL+2
>> SDUL("LINES"	BLD+3, LIST+2, LIST+4, HDR+11, REFRESH+1
>> SDUL("MAX"	ASK+2
>> SDUL("PROTOCOL"	ASK+2
>> SDUL("TITLE"	HDR+7, HDR+9, WP1+3*
>> SDUL("TM"	LIST+3, HDR+14, HDR+16
>> SDULAR	LIST+4
SDULBCK	ASK+4!, ASK+6, REFRESH+2*
>> SDULBG	BLD+2, BLD+3, LIST+1, LIST+2, LIST+4, HDR+15, REFRESH+1
>> SDULCAP	CHGCAP+3, HDR+15, HDR+17, HDR+18
>> SDULCC	LIST+6, LIST+8, ASK+1, CAPTION+2, HDR+5, HDR+8, HDR+12, HDR+15, HDR+17, HDR+18
>> SDULCNT	LIST+5, LIST+7, HDR+11, WP1+1*
SDULDDF	COL+1!
SDULDDF(	COL+2, CAPTION+3, CHGCAP+3
>> SDULDN	LIST+7*
>> SDULEVL	EN+7, BLD+1, ASK+3
>> SDULHDR	HDR+2
>> SDULHDR(	HDR+14
>> SDULMENU	SHOW+1, SHOW+2
>> SDULPGE	BLD+3, LIST+2, HDR+11, REFRESH+1*
>> SDULQUIT	EN+4, EN+5, BLD+1
SDULREF	WP1~, WP1+1, WP1+2, WP~
>> SDULST	LIST+2, LIST+4, LIST+5*, LIST+7
>> SDULUP	HDR+15*
>> SDULWD	LIST+6, LIST+7, CAPTION+2, HDR+15
SDULWPTL	WP1+3, WP~
U	COL+2, CAPTION+4, CHGCAP+3, WP1+1
X	LIST+4, LIST+6!, LIST+7, LIST+8, LIST+9, ASK+2, CAPTION+1~, CAPTION+2, CAPTION+4, CAPTION+5 , HDR+1~, SHOW+3
XQORM	ASKQ!
XQORM("??"	ASK+3*
XQORM(0	ASK+2*

Customize PDF page

Package: Scheduling

Routine: SDUL

Call Graph Total: 5

Caller Graph Total: 4