Routine: ATSERCHG

Information

ATSERCHG ;TUCSON/DG;PIECES OF ATSERCH4 [ 10/25/91 1:39 PM ]

Source file <ATSERCHG.m>

Package	Total	Caller Graph
Template Compare	1	ATSERCH4

Name	Comments	DBIA/ICR reference
WRITE	; - EP -
CHKMTCH	; - EP - IF MATCHES=0 AND > FIRST TIME THRU, SET ^("MERGED",4) TO ^("MERGED",3)

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"There ",$S(ATSEARCH("MERGE COUNT")=1:"was ",1:"were "),ATSEARCH("MERGE COUNT"),$S(ATSEARCH("MERGE COUNT")=1:" match ",1:" matches "),"(" Line Location: WRITE+1

Name	Line Occurrences (* Changed, ! Killed)
^UTILITY("ATSEARCH"	CHKMTCH+2!, CHKMTCH+3*