... font oFont2 @ 1.1,10 get aogets[5] var cdi:vCodBarras OF aoGrp[2] PICTURE "99" SIZE 20,15 COLOR COLOR_GET1 CENTER font oFont3 @ 1.95,2 say "Cod. Lote:" OF aoGrp[2] SIZE 65, 15 font oFont2 @ 2.4,10 get aogets[6] var cdi:lLote OF aoGrp[2] PICTURE "99" SIZE 20,15 COLOR COLOR_GET1 CENTER font oFont3 ...