FiveTech Software tech support forums

... por favor alguien podría indicarme porqué en un mismo sencillo Report, la línea de abajo de los títulos de columnas, llamada con ::TotalLine( ::nTitleDnLine, GRID_ABOBEL ) desde el método ColTitle(), no imprime nada en impresoras térmicas, pero si imprime ok la línea en impresoras gráficas normales ...

... he mirado en los foros ,etc.. y no acabo de verlo

gracias anticipadas


me respondo a mi mismo, encontré lo que quería

oReport:nTitleUpLine:= nil // no imprime línea antes de cabecera
oReport:nTitleDnLine:= RPT_SINGLELINE // improme una única línea después de cabecera, por defecto es DOUBLELINE

... TITLE "Code" DATA VP->V_CODE


GROUP ON VP->V_ACCT


END REPORT

oReport:lSummary := .T.
oReport:nTitleUpLine := RPT_NOLINE
oReport:nTitleDnLine := RPT_SINGLELINE
oReport:aColumns[4]:bTitleFont := {|| 2 }


ACTIVATE REPORT oReport

CLOSE VP

oFont1:End()
oFont2:End()


Endif ...

... not run !!!!
::oReport:CellView()
::oReport:SetShdColor(CLR_GRAY)
ENDIF
::oReport:nTitleUpLine := RPT_SINGLELINE
::oReport:nTitleDnLine := RPT_SINGLELINE
::oReport:oTitle:aFont[2] := {|| 3 }
::oReport:oTitle:aFont[3] := {|| 2 }
::oReport:SetTxtColor(::nColoreFont1,1 ...

... SubStr(oReport:aGroups[2]:cValue,11,30)

END REPORT

oReport:bSkip := {||oPagos:skip(1) }
oReport:nTitleUpLine := RPT_SINGLELINE
oReport:nTitleDnLine := RPT_SINGLELINE
oReport:nTotalline := RPT_NOLINE
oReport:nGroupLine := RPT_NOLINE
oReport:cGrandTotal := "Total General Recaudado Desde ...

... xalias)->fechacad size 9
COLUMN title "OBSERVACIONES" data "" size 35
oList:nGroupLine := RPT_NOLINE
oList:nTitleUpLine := RPT_DOUBLELINE
oList:nTitleDnLine := RPT_DOUBLELINE
//oList:nTotalLine := RPT_SINGLELINE
END REPORT
oList:CellView()

ACTIVATE REPORT oList while &macro

Un Saludo.

... 2]+transform(aImp[nField],"999,999.99")," "
END REPORT
*/
oReport:bSkip := {|| nField++}
oReport:nTitleUpLine := RPT_NOLINE
oReport:nTitleDnLine := RPT_NOLINE
oReport:nTotalLine := RPT_NOLINE
oReport:Margin(1,RPT_LEFT,RPT_CMTERS) // Aqui no respeta el margen
ACTIVATE REPORT oReport ...

... CAPTION "Listado de Litros de Petroleo Mensual.." PREVIEW FONT oFont
COLUMN DATA " " SIZE nWidth
END REPORT
oRep:nTitleUpLine:=RPT_NOLINE
oRep:nTitleDnLine:=RPT_NOLINE
oRep:Margin(.25,RPT_LEFT ,RPT_INCHES)
oRep:Margin(.10,RPT_RIGHT ,RPT_INCHES)
oRep:Margin(.30,RPT_TOP ,RPT_INCHES)
oRep:Margin(.20 ...

... oReport:cGrandTotal := "Total General "
oReport:cPageTotal := "Total Parcial Pagina: "
oReport:nTitleUpLine := RPT_SINGLELINE
oReport:nTitleDnLine := RPT_SINGLELINE
oReport:nGroupLine := RPT_NOLINE


END REPORT

ACTIVATE REPORT oReport WHILE (nField + 1) <= Len(aTabla);
on POSTgroup ...

... 2] := {|| 3 }
oReport:oTitle:aFont[3] := {|| 3 }
oReport:oTitle:aFont[4] := {|| 3 }

oReport:nTitleUpLine := RPT_SINGLELINE
oReport:nTitleDnLine := RPT_SINGLELINE
oReport:nTotalLine := RPT_SINGLELINE


//Solo imprimir el total de Pagina actual, no el acumulado
oReport:bStartPag ...

... FOOTER SPACE(90)+"Tiempo Total________ "+str(thora,6)+":"+strzero(tminu,2) ;
EJECT

oReport:nTitleUpLine := RPT_NOLINE
// oReport:nTitleDnLine := RPT_NOLINE
oReport:nGroupLine := RPT_NOLINE // no imprime linea separadora
// oReport:oHeader:aFont[3] := { || 2 }
END REPORT

IF ...

... Kardex()

LOCAL oReport

lCellView := .F.
lSeparator := .T.
lJoin := .T.
lGrid := .T.
nTitleUpLine := 2 /*"Sombra","RoundRect","Box"*/
nTitleDnLine := 2 /*"Sombra","RoundRect","Box"*/
nTotalLine := 2 /*"Sombra","RoundRect","Box"*/
lTitleShadow := .T.
lTitleJoin := .F.
lTotalShadow ...

... oRpt:bSkip := { || oRpt:Cargo := ::rptSKIP( ) }
oRpt:Cargo := 1
oRpt:cellview()
oRpt:otitle:aFont[1] := {|| 2 }
orpt:ntitleupline:=1
orpt:ntitlednline:=1
orpt:ntotalline:=1

IF len(::aselected)>0
While AScan( ::aSelected, ;
If( ::NDATATYPE==DATATYPE_ARRAY,::nArrayAt,eval(::bKeyno)))==0 ...

... FONT oFont;
PREVIEW

COLUMN DATA spac(6)+OemToAnsi(b->Cod_det) SIZE 71

END REPORT

oReport:nTitleUpLine := RPT_NOLINE
oReport:nTitleDnLine := RPT_NOLINE
oReport:Margin(.15,RPT_LEFT,RPT_INCHES)
oReport:Margin(.25,RPT_TOP,RPT_INCHES)
oReport:Margin(.25,RPT_BOTTOM,RPT_INCHES ...

... FONT oFont;
PREVIEW

COLUMN DATA spac(6)+OemToAnsi(b->Cod_det) SIZE 71

END REPORT

oReport:nTitleUpLine := RPT_NOLINE
oReport:nTitleDnLine := RPT_NOLINE
oReport:Margin(.15,RPT_LEFT,RPT_INCHES)
oReport:Margin(.25,RPT_TOP,RPT_INCHES)
oReport:Margin(.25,RPT_BOTTOM,RPT_INCHES ...