select gthamcode as hamcode, gtnumber as item, 'G'
where (gtnumber between 08000000000000 and 08999999999999)
select modkey as hamcode, modndcnum as item, 'M'
where (modndcnum between 08000000000 and 08999999999)
This works with interactive SQL but I need to use this in an COBOL embbeded SQL cursor. The 'M' and 'G' are constants not on the files, they show me which file the record came from.