Found this from another post here on the tek tips forums, didn't test but thought you may find it useful (even if it's just directionally helpful)
event INQ : 200000
var qrCodeData: A255
var qrCodeDataLen : N3
var rawDataLen: N3
var PrintDataCode : A1000
startprint @CHK
format qrCodeData as "This is QR Code data!
complete our survey and you will get the next meal free."
qrCodeDataLen = len(qrCodeData) + 3
rawDataLen = len(qrCodeData) + 48
FORMATRAW "ABC", 200, chr(127), rawDataLen, ";", chr(13), chr(10), chr(27), chr(97), chr(1), chr(29), chr(40), chr(107), chr(4), chr(0), chr(49), chr(65), chr(50), chr(0), chr(29), chr(40), chr(107), chr(3), chr(0), chr(49), chr(67), chr(5), chr(29), chr(40), chr(107), chr(3), chr(0), chr(49), chr(69), chr(48), chr(29), chr(40), chr(107), chr(qrCodeDataLen), chr(0), chr(49), chr(80), chr(48), qrCodeData, chr(29), chr(40), chr(107), chr(3), chr(0), chr(49), chr(81), chr(48), chr(27), chr(64)
printline "@@ABC@@"
endprint
endevent