Routine: ACHSMERG

Entry Points

Name	Comments	DBIA/ICR reference
EN(XDRMRG)	;EP
FR	;EP - From PACKAGE file, to determine if FR pt has data for pt merge.

Name	Line Occurrences (* Changed, ! Killed)
^ACHSDEN - [#9002071]	EN+50, EN+52*, FR+12
^ACHSDEN("C"	EN+50, EN+51!, EN+53*, FR+12
^ACHSF - [#9002080]	EN+25, EN+26!, EN+27, EN+28, EN+29, EN+31, EN+33!, EN+34, EN+36, EN+37 , FR+8
^ACHSF("AC"	EN+32!, EN+35*
^DPT - [#2]	EN+48, EN+53, FR+10

Name	Field # of Occurrence
>> %	EN+36*, EN+37
D	EN+8~, EN+25, EN+26, EN+27, EN+28, EN+29, EN+31, EN+32, EN+33, EN+34 , EN+35, EN+36, EN+37, EN+48, EN+50, EN+51, EN+52, EN+53, FR+10, FR+12*
L	EN+8~, EN+23, EN+25, EN+26, EN+27, EN+28, EN+29, EN+31, EN+32, EN+33 , EN+34, EN+35, EN+36, EN+37, EN+48, EN+50, EN+51, FR+2~, FR+6, FR+8* , FR+10*, FR+12
T	EN+8~, EN+30, EN+31, EN+32, EN+33, EN+34, EN+35, EN+36, EN+37
U	EN+28, EN+34, EN+36, EN+48, EN+50, EN+52, EN+53, FR+10, FR+12
XDRMRG	EN~
XDRMRG("FR"	EN+2, EN+25, EN+26, EN+32, EN+33, EN+48, FR+1, FR+8, FR+10
XDRMRG("TO"	EN+3, EN+28, EN+29, EN+34, EN+35, EN+37, EN+52, EN+53
>> XDRZ	FR+8, FR+12