Hola a todos,
Gracias a los compañeros del foro que me orientaron con la elaboración de gráficos.
Ya comencé con algo muy simple, solo deseo graficar dos cantidades: El dinero que se otorgó en nuevos créditos y el dinero que se recogió con la cobranza en los últimos 3 meses, cada mes.
Creo que ya lo tengo casi listo, pero por alguna razón no logro que se muestre el último mes en la gráfica.
Acá les dejo la imagen y el código:
LOCAL oDlg, oGraph, oBtn
DEFINE DIALOG oDlg SIZE 650, 450
oDlg:lHelpIcon:=.f.
@ .5, 1 GRAPH oGraph SIZE 300, 200 TYPE GRAPH_TYPE_BAR YVALUES XGRID YGRID XVALUES LEGENDS
oGraph:aSeries = { { "Créditos" , CLR_CYAN },;//BAR y 3D por defecto
{ "Cobranzas", CLR_HBLUE }}
oGraph:aYVals := { "Enero", "Febrero", "Marzo" }
oGraph:aData := { { 14280, 20420 },;
{ 8350 , 10315 },;
{ 10000, 6000 }}
oGraph:nClrX := CLR_GREEN
oGraph:nClrY := CLR_HBLUE
oGraph:lViewSRLegend := .T.
oGraph:cToolTip := {|oGph,nSerie,nPos,nVal| oGph:aSeries[nSerie][1]+CRLF+oGraph:aYVals[nPos]+": "+cValToChar(nVal)}
ACTIVATE DIALOG oDlg CENTER
return .t.
También quiero que aparezca sobre cada columna la cantidad exacta, probé con lviewval:=.t. pero me da este error.
Time from start: 0 hours 0 mins 0 secs
Error occurred at: 30/09/2023, 01:58:50
Error description: Error BASE/1066 Argument error: conditional
Args:
[ 1] = U
Stack Calls
===========
Called from: .\source\classes\TGRAPH.PRG => TGRAPH:PAINT( 1270 )
Called from: .\source\classes\TGRAPH.PRG => (b)TGRAPH( 136 )
Called from: .\source\classes\TGRAPH.PRG => TGRAPH:DISPLAY( 0 )
¿que me esta faltando por hacer?
