Routine: PSJOCPGX

Information

PSJOCPGX ;BIR/MV - PGx ORDER CHECKS DRIVER ; 9/10/14 10:53pm

Name	Comments	DBIA/ICR reference
EN(PSJPDRG)	;
DISPLAY	;
DISPPGX	;
ADDINFO(PSJTYPE,PSJSUB)	;Display additional information
ASK()	;display additional information prompt
AIPRT	;

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: DISPLAY+8
Function Call: WRITE	Prompt: ! Line Location: DISPLAY+9
Function Call: WRITE	Prompt: ! Line Location: DISPLAY+10
Function Call: WRITE	Prompt: ! Line Location: DISPPGX+6
Function Call: WRITE	Prompt: @IOF Line Location: DISPPGX+6
Function Call: WRITE	Prompt: ! Line Location: DISPPGX+7
Function Call: WRITE	Prompt: @IOF Line Location: DISPPGX+7
Function Call: WRITE	Prompt: ! Line Location: DISPPGX+10
Function Call: WRITE	Prompt: ! Line Location: ADDINFO+4
Function Call: WRITE	Prompt: !,"NOTHING PRINTED",! Line Location: ADDINFO+5
Function Call: WRITE	Prompt: ! Line Location: ASK+5
Function Call: WRITE	Prompt: !,^TMP($J,"PSSXWARN",PSJTYPE,PSJSUB,"AI",PSJCNT) Line Location: AIPRT+7
Function Call: WRITE	Prompt: ! Line Location: AIPRT+8
Function Call: WRITE	Prompt: @IOF Line Location: AIPRT+8