lPortaArg = 1
lTabArg = "TMP_IMPRIMIR"

SELECT TMP_IMPRIMIR
GO TOP IN TMP_IMPRIMIR

cReport = Fullpath(curdir()) + "impress\etiquetas.frx"

report form &cReport to printer prompt preview