Routine: AZCMPR

Entry Points

Name	Comments	DBIA/ICR reference
DO	;ENTRY POINT FOR SETTING VARIABLES
END
ADD1
DOC
BEG
START
ADD
STUFF	;S DFN="",PO=0
CAN
OBJ

Name	Line Occurrences
Function Call: WRITE	Prompt: BA Line Location: STUFF+2
Function Call: WRITE	Prompt: ?5,FI Line Location: STUFF+3
Function Call: WRITE	Prompt: ?20,ADATE Line Location: STUFF+4
Function Call: WRITE	Prompt: ?30,ALLOW Line Location: STUFF+5
Function Call: WRITE	Prompt: ?40,CAN Line Location: STUFF+6
Function Call: WRITE	Prompt: ?45,OBJF Line Location: STUFF+7
Function Call: WRITE	Prompt: ?60,OBJ Line Location: STUFF+8
Function Call: WRITE	Prompt: ?65,DOCF Line Location: STUFF+9
Function Call: WRITE	Prompt: !!,?5,DOC Line Location: STUFF+10
Function Call: WRITE	Prompt: ?15,OBLG Line Location: STUFF+11
Function Call: WRITE	Prompt: ?25,VENDOR Line Location: STUFF+12
Function Call: WRITE	Prompt: ?35,PO Line Location: STUFF+13
Function Call: WRITE	Prompt: ?50,OBDT Line Location: STUFF+14
Function Call: READ	Prompt: "ENTER BEG NO.: " Timeout: 300 Variable: START Line Location: START+0
Function Call: WRITE	Prompt: !! Line Location: START+1
Function Call: READ	Timeout: ",END:300 Variable: "ENTER ENDING NO. Line Location: END+0
Function Call: WRITE	Prompt: !!,"MISSING DOCUMENT NUMBER ",X Line Location: ADD1+1

Name	Line Occurrences (* Changed, ! Killed)
^AZCM(1440069 - [#1440069]	BEG, CAN, OBJ, DOC, DOC+1
^AZCMTMPG("B"	DOC+3*, ADD1+1, ADD1+4!