We use the same printers from Unix. Here is a sample that works for us.
put unformatted
"N" skip
"A" simple.auth.loc-oset + 50 ",0,0,3,1,2,N," chr(34)
replace(substr(simple.s-item.description,1,27),"\"","\\\"") chr(34) skip
"A" simple.auth.loc-oset + 50 ",40,0,3,1,1,N," chr(34)...