10 ;ACC07P - MERGE SECONDARY AND INITIAL MASTER FILES
20 DEFINE
30 	F1,A9	;PART NUMBER
40 	F2,D10	;UNIT COST
50 	F3,D10	;QTY ON HAND
60 	F4,A6	;DATE
70 	F5,A6	;DATE
80 INPUT	ACC05F/6,ACC06F/7
90 KEY	F1
100 OUTPUT	ACC07F/8
110 END