Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Wizard graph

Status
Not open for further replies.

olivierrevel

Programmer
Mar 29, 2003
6
0
0
CH
I have a problem to display the value of date on one specific Graph (See Below)

I want to display the information Date (result of my query) on the field "Serie".
Because I am using a query "Group By" I am not able to force any column name.

And

I would like as well to display the result of the query when we click a bar on the Graph.
I just can't get it to work



{ PAGE NewComputer
{ LABEL NewComputerDaily
CAPTION = &quot;<HR><B>New Computer Daily for the last Month</B><BR>&quot;
}
{ CHART GraphNewComputerDaily
3D = 1
BACKGROUND = 0
{ CLICK =
Dim l As Long
l = amOpenScreen(&quot;amPortfolio&quot;, &quot;&quot;, &quot;dAssignment =&quot; & {GraphNewComputerDaily.serie}, &quot;&quot;, &quot;&quot;)
}
COLORS = &quot;255|16777215|255|16777215|255|16777215|255|16777215|255|16777215|255|16777215|255|16777215|255|16777215|255|16777215|255|16777215|255|16777215|255|16777215|255|16777215|255|16777215|255|16777215&quot;
DISPLAYLABELS = 1
DISPLAYLEGEND = 0
ELEVATION = 60
FORMAT = &quot;Long&quot;
INDEX = -1
INTERACTIVE = 1
ROTATION = 20
SERIE = 0
SERIES = &quot;&quot;
VALUES = &quot;&quot;
}
{ COMMANDBUTTON ButtonNewComputerDaily
CAPTION = &quot;Refresh&quot;
{ CLICK =
amRefreshProperty(&quot;TimerNewComputerDaily.timer&quot;)
}
}
{ TIMER TimerNewComputerDaily
AUTO = 1
ENABLED = 0
INTERVAL = 5000
{ TIMER =
dim c0 as string
dim l as long
c0 = amDbGetString(&quot;SELECT Count(lPortfolioItemId) FROM amportfolio WHERE lPortfolioItemId <> 0 and Model.Parent.BarCode = 'SERV' or Model.Parent.BarCode = 'LTOP' or Model.Parent.BarCode = 'DTOP' group by dAssignment&quot;)
dim toto as string
toto = c0
l = amSetProperty(&quot;GraphNewComputerDaily.values&quot;, toto)
}
VALUE = 0
}
{ TRANSITION TRANSITION1
TO = &quot;Workflow&quot;
}
}
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top