sub csv { to('csv',@_) }

csv('A',
	rec('100','a'),
);

csv('B',
	rec('100','c')
);

csv('C',
	rec('680','a')
);

csv('D',
	rec('001')
);
