Here is another way of doing the chart
Names Default To Here( 1 );
dt = Current Data Table();
dt << New Column( "Min",
Numeric,
"Continuous",
Format( "hr:m:s", 13, 0 ),
Input Format( "hr:m:s", 0 ),
Formula( :Duration cummulated - :Duration per production type )
);
dt << New Column( "Max",
Numeric,
"Continuous",
Format( "Best", 12 ),
Formula( :Duration cummulated ),
Set Selected
);
dtStack = dt << Stack(
columns( :Min, :Max ),
Source Label Column( "Label" ),
Stacked Data Column( "Data" )
);
dtStack:Data << format(":day:hr:m");
Graph Builder(
Size( 543, 456 ),
Show Control Panel( 0 ),
Variables( X( :Data ), Group Y( :Production Type ) ),
Elements( Line( X, Legend( 12 ), Error Interval( "Range" ) ) ),
SendToReport(
Dispatch(
{},
"",
ScaleBox,
{Label Row(
{Automatic Tick Marks( 0 ), Show Major Labels( 0 ),
Show Major Ticks( 0 ), Show Minor Ticks( 0 )}
)}
),
Dispatch(
{},
"400",
ScaleBox,
{Legend Model(
12,
Properties( 0, {Line Width( 9 )}, Item ID( "Count", 1 ) )
)}
),
Dispatch( {}, "graph title", TextEditBox, {Set Text( "Gantt Chart" )} )
)
);
Jim