Ayuda usando el commando PRINT

[ruben Dario]

Buen Dia como controlo la posicion para poder ubicar la trama en la linea, con la coordenada donde imprimo los datos le coloco lo mismo para imprimir la trama, y me lo coloca mas arriba. Por fa su ayuda.
La idea es que el texto quede montado en la trama.

Ajunto ejemplo usando oPrn:FillRect( {nRow+1*Rlinha,0.6*Rcolha,nRow+1.8*Rlinha,27*Rcolha},SdBrush )

PRINT oPrn NAME "Referencias Productos" PREVIEW


[code]
DEFINE BRUSH SdBrush COLOR X_LINTCOL

..
--
oPrn:FillRect( {nRow+1*Rlinha,0.6*Rcolha,nRow+1.8*Rlinha,27*Rcolha},SdBrush )
oPrn:CmSay( nRow,1.2, RADAField("codprod" ,oDatos ), aoFont[2],,,,0)
oPrn:CmSay( nRow,2.3, iif(RADAField("status",oDatos)=1,"Si","No") , aoFont[2],,,,0)
oPrn:CmSay( nRow,2.7, RADAField("consec" ,oDatos ), aoFont[2],,,,0)
oPrn:CmSay( nRow,3.0, RADAField("planta" ,oDatos ), aoFont[2],,,,0)
oPrn:CmSay( nRow,3.5, RADAField("simbolo" ,oDatos ), aoFont[2],,,,0)
oPrn:CmSay( nRow,8.7, RADAField("referencia",oDatos ), aoFont[2],,,,0)
oPrn:CmSay( nRow,11.9, TRANSFORM(RADAField("largo",oDatos) ,"999.99") , aoFont[2],,,,1)
oPrn:CmSay( nRow,13, TRANSFORM(RADAField("ancho",oDatos) ,"999.99") ,aoFont[2],,,,1)
oPrn:CmSay( nRow,14.1, TRANSFORM(RADAField("ancho_m",oDatos),"999.99") , aoFont[2],,,,1)
oPrn:CmSay( nRow,15.2, TRANSFORM(RADAField("solapa",oDatos) ,"999.99") , aoFont[2],,,,1)
oPrn:CmSay( nRow,16.3, TRANSFORM(RADAField("fuel_f",oDatos) ,"999.99") , aoFont[2],,,,1)
oPrn:CmSay( nRow,17.4, TRANSFORM(RADAField("fuel_l",oDatos) ,"999.99") , aoFont[2],,,,1)
oPrn:CmSay( nRow,18.5, TRANSFORM(RADAField("metros",oDatos) ,"99999.99"), aoFont[2],,,,1)
oPrn:CmSay( nRow,20.0, TRANSFORM(RADAField("kilmil",oDatos) ,"999.9999"), aoFont[2],,,,1)
oPrn:CmSay( nRow,21.4, TRANSFORM(RADAField("calibre",oDatos),"99.9999") , aoFont[2],,CLR_BLACK,,1)
oPrn:CmSay( nRow,21.8, RADAField("nombre_selle",oDatos ) , aoFont[2],,,,0)
oPrn:CmSay( nRow,24.0, RADAField("nombre_estilo",oDatos ), aoFont[2],,,,0)
nRow+=0.3;nConta++
Cabeceras(@nConta,@nPag, oPrn, @nRow, aoFont, oPen, Rlinha,Rcolha,SdBrush )
oPrn:CmSay( nRow,2, RADAField("nombre_mat",oDatos ), aoFont[2],,,,0)
oPrn:CmSay( nRow,6, RADAField("nombre_ruta",oDatos ), aoFont[2],,,,0)
oPrn:CmSay( nRow,9, RADAField("Tipo_Factu",oDatos ), aoFont[2],,,,0)
oPrn:CmSay( nRow,11, RADAField("Termino_envio",oDatos ), aoFont[2],,,,0)
..
oPrn:CmSay( nRow,12.5, TRANSFORM(RADAField("num_paq",oDatos) ,"999") , aoFont[2],,,,0)