Routine: AZHLSCA

Package	Total	Call Graph
VA Fileman	2	^DIC ^DIR

Package	Total	Caller Graph
Local Area Programs	1	AZHLSC

Entry Points

Name	Comments	DBIA/ICR reference
EN
ALLROUTI
SELPATCH	; SELECT ROUTINES BY PATCH NUMBER FROM INSTALL FILE
ENDPATCH
UTILIREC	; SET ROUTINE RECORD TO BE PASSED TO ^AZHLSC ; AZHLSC4I = 0 SELECT ROUTINES %RSEL ; AZHLSC4I = 1 SELECTED ROUTINES FROM INSTALL FILE
SELPATI	;
SELROUTI	;
PATEND	;NO PATCH FOUND IN PATCH PIECE ; AZHLSCNF = 1 PATCH NOT FOUND
PATCHROU
SECLINE	;SEARCH FOR PATCH NUMBER IN SECOND LINE OF ROUTINE

Name	Field # of Occurrence
^DIC	EN+6
^DIR	EN+3, EN+11

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: EN+4
Function Call: WRITE	Prompt: ! Line Location: EN+8
Function Call: WRITE	Prompt: ! Line Location: EN+13
Function Call: WRITE	Prompt: !,"PATCH NUMBER (",AZHLPAT,") NOT FOUND, TO CONTINUE SELECT ROUTINES",! Line Location: SELPATI+2
Routine Call	DIC Line Location: EN+6
Routine Call	DIR Line Location: EN+3 EN+11

FileNo	Call Tags
^XPD(9.7 - [#9.7]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("LOAD"	SECLINE+2
^TMP($J	EN!, SECLINE+4
^UTILITY($J	EN!, ALLROUTI+5, UTILIREC+3
^XPD(9.7 - [#9.7]	ALLROUTI+2, ALLROUTI+5, SELPATCH+2, SELPATCH+5

Name	Line Occurrences
ALLROUTI	EN+11, PATCHROU+1
ENDPATCH	SELPATI+1
PATEND	SECLINE+4
SECLINE	SELPATCH+5
SELPATCH	PATCHROU
SELPATI	PATCHROU+3
SELROUTI	EN+3, EN+7, EN+12, PATCHROU, ALLROUTI+2, ALLROUTI+6
UTILIREC	SECLINE+5

Name	Field # of Occurrence
AZHLNF	EN!, PATCHROU+3
AZHLPAT	EN!, PATCHROU*, SELPATI+2, SECLINE+5
AZHLPATS	EN!, SECLINE+4*, SECLINE+5
>> AZHLSC4I	EN, PATCHROU, ALLROUTI+9, SELPATI+1, PATEND+3, UTILIREC+3*
AZHLSCNF	SELROUTI+1!, PATEND+3*
AZHLSCR1	EN, ALLROUTI+5, SELROUTI+1!, SELPATCH+5*
AZHLSCR2	EN!, ALLROUTI+5, SELROUTI+1!, SELPATCH+5, SECLINE+1, UTILIREC+3
AZHLSCR3	EN!, ALLROUTI+2, ALLROUTI+5, SELROUTI+1!, SELPATCH+2, SELPATCH+5
AZHLSCRE	EN!, EN+6*, ALLROUTI+2, ALLROUTI+5, ALLROUTI+6, SELPATCH+2, SELPATCH+5
AZHLSCREC	SELROUTI+1!
>> DIC	EN+6*
>> DIC("A"	EN+5!, ALLROUTI!, SELROUTI+1!
>> DIC(0	EN+6*
>> DIF	SECLINE+1*
>> DIR("A"	EN+3, EN+11
>> DIR("B"	EN+3*, EN+5!, ALLROUTI!, SELROUTI+1!
>> DIR(0	EN+3, EN+11
DTOUT	EN!, EN+3, SELROUTI+1!
DUOUT	EN!, EN+3, SELROUTI+1!
I	EN!, ALLROUTI+5, SELPATCH+5
>> II	SECLINE+5*
>> X	SECLINE+1*
>> XCNP	SECLINE+1*
Y	EN+3, EN+5!, EN+6, EN+7, EN+11, EN+12, PATCHROU, PATCHROU+1, ALLROUTI!, SELROUTI+1!
Y(0	EN+3