Routine: XDRPTDOB

Package	Total	Call Graph
Toolkit	1	$$NUMCOMP^XDRPTCLN

Package

Total

Call Graph

$$NUMCOMP^XDRPTCLN

Package	Total	Caller Graph
Toolkit	2	XDRPTDOD XDRPTLSD

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
COMPARE	;
EN	; EP - Entry point for comparing dates
END
EOJ	;
INIT	;
START	;
DATECOMP(DATE1,DATE2,MATCH,NOMATCH,VAL1,VAL2)	;

Name	Field # of Occurrence
$$NUMCOMP^XDRPTCLN	DATECOMP+2, DATECOMP+6

Name	Field # of Occurrence
DATE1	DATECOMP~, DATECOMP+2, DATECOMP+4, DATECOMP+5, DATECOMP+6
DATE2	DATECOMP~, DATECOMP+2, DATECOMP+4, DATECOMP+5, DATECOMP+6
MATCH	DATECOMP~, DATECOMP+2, DATECOMP+4, DATECOMP+5, DATECOMP+6
NOMATCH	DATECOMP~, DATECOMP+2, DATECOMP+3, DATECOMP+6
U	INIT+3, INIT+4
VAL1	DATECOMP~, DATECOMP+2, DATECOMP+5
VAL2	DATECOMP~, DATECOMP+4
>> XDRCD	INIT+2
>> XDRCD(	INIT+2
>> XDRCD2	INIT+2
>> XDRCD2(	INIT+2
>> XDRD("TEST SC	ORE" , COMPARE+1*
XDRDOB	INIT+1!, INIT+2*, COMPARE+1, EOJ+1!
XDRDOB("MATCH"	INIT+3*, COMPARE+1
XDRDOB("NO MA	TCH" , INIT+4*, COMPARE+1
XDRDOB2	INIT+1!, INIT+2*, COMPARE+1, EOJ+1!
>> XDRDTEST(	INIT+3, INIT+4
>> XDRDTO	INIT+3, INIT+4
>> XDRFL	INIT+2
Y	DATECOMP+1~, DATECOMP+2, DATECOMP+3, DATECOMP+6, DATECOMP+7

Information