Routine: ASMSOFT

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"SOFTWARE BULLETIN PRINTER......",!! Line Location: L1+0
Function Call: WRITE	Prompt: ! Line Location: L3+0
Function Call: WRITE	Prompt: *7 Line Location: L4+0
Function Call: WRITE	Prompt: @IOF,"Software change bulletin.....",?65,"page ",PG+1,!!!,"SOFTWARE SYSTEM: ",^AZOSOFT(ASM("SYS"),0),!!,"Change number: ",^AZOSOFT(ASM("SYS"),1,ASM("DT"),2),!!,"Change date: " Line Location: L7+0
Function Call: WRITE	Prompt: Y,!!,"SOURCE: ",^DD("SITE"),!! Line Location: L7+1
Function Call: WRITE	Prompt: "ROUTINE: ",$P(X,"^",1),!,?3,"LINE: ",$P(X,"^",2),!! Line Location: CHNG+1
Function Call: WRITE	Prompt: !!,"PROBLEM",!,"-------",! Line Location: CHNG3+0
Function Call: WRITE	Prompt: !!,"SOLUTION",!,"--------",! Line Location: CHNG5+0
Function Call: WRITE	Prompt: @IOF Line Location: END+0
Function Call: WRITE	Prompt: !,AG("PRL"),! Line Location: LINE+0
Routine Call	DIC Line Location: L2

Name	Line Occurrences (* Changed, ! Killed)
^%ZIS("C"	END
^%ZTSK - [#14.4]	PRQ, PRQ1!, QUE1*
^AZOSOFT(	L7, L7+1, CHNG, CHNG+1, CHNG1, CHNG1A, CHNG3, CHNG3A, CHNG5, CHNG5A
^AZOSOFT("C"	L4, L5
^DD("DD"	L7+1
^DD("SITE"	L7+1
^UTILITY($J	CHNG!, CHNG3!, CHNG5!

Name	Field # of Occurrence
^("DT"	PRQ, QUE1*
^("SYS"	QUE1*

Name	Field # of Occurrence
>> %DT	L3*
>> AG("LINE"	L7+1*, LINE
>> AG("OLD"	LINE*
>> AG("PRL"	LINE*
ASM	END!
ASM("DT"	L5, L7, L7+1, CHNG, CHNG+1, CHNG1, CHNG1A, CHNG3, CHNG3A, CHNG5 , CHNG5A, PRQ, QUE1
ASM("PG"	L1, START, CHNG*, CHNG+1, CHNG1, CHNG1A, CHNG3, CHNG3A, CHNG5, CHNG5A
ASM("SYS"	L2, L4, L5, L7, L7+1, CHNG, CHNG+1, CHNG1, CHNG1A, CHNG3 , CHNG3A, CHNG5, CHNG5A, PRQ, QUE1
AU	END!
AU("PRINT"	END, QUE
AU("QUE"	QUE
>> DIC	L2*
>> DIC(0	L2*
>> DIWF	CHNG1A*
>> DIWL	CHNG1A, CHNG3A
>> DIWR	CHNG1A*
>> I	CHNG1, CHNG1A, CHNG3, CHNG3A, CHNG5, CHNG5A
IO	START
IOF	L7, END
>> PG	START, L7, CHNGEND
>> SITENUM	PRQ1*
U	PRQ1*
>> X	L3, L4, CHNG+1, CHNG1A, CHNG3A, CHNG5A*
>> Y	L2, L3, L5, L7+1*
ZTSK	PRQ, PRQ1, QUE1, QUEND!

Information