PROFESSIONAL NEWSGROUPS
WINDEV
,
WEBDEV
and
WINDEV Mobile
Home
|
Recent messages
|
Connect
|
Sign out
|
English
Home
→
WINDEV 2024
→
Gantt chart column?
Gantt chart column?
Started by marin, May, 18 2021 10:58 AM - 1 reply
Connect yourself…
marin
#1
Registered member
27 messages
Posted on May, 18 2021 - 10:58 AM
Have anyone had problems with adding new tasks into gantt chart column? I followed the example called "WD Gant" and while adding new tasks can not add graphichal show in gantt chart column. Here is the code:
Procedure
AddNewTask
(
LOCAL
b
Milestone
is boolean
=
False
)
NewTask
is
a
GanttTask
st
ATask
is
ST
GanttChartInfo
//Defines the task
NewTask
..
Progress
=
0
NewTask
..
ProgressColor
= (
b
Milestone
?
CO
LOR_MILESTONE
ELSE
CO
LOR_PROGRESS
)
NewTask
..
BackgroundColor
= (
b
Milestone
?
CO
LOR_MILESTONE
ELSE
CO
LOR_BACKGROUND
)
NewTask
..
Cumulative
=
False
NewTask
..
StartDate
=
Today
(
)
// + "080000"
IF
b
Milestone
=
False
THEN
NewTask
..
DurationInDay
=
1
NewTask
..
ID
=
GetGUID
(
)
NewTask
..
Milestone
=
b
Milestone
NewTask
..
Title
= (
b
Milestone
?
"New Milestone"
ELSE
"New task "
)
+
""
+
GetIdentifier
(
)
//Stores the task
st
ATask.sTaskID
=
NewTask
..
ID
st
ATask.Task
=
NewTask
st
ATask.nParentSubscript
=
0
//Adds the "task" row
n
Subscript
is int
=
TableAddLine
(
TABLE_
Gantt
,
NewTask
..
ID
,
NewTask
..
Title
,
gn
Nalozi
+
1
,
NewTask
..
StartDate
, (
b
Milestone
?
""
ELSE
NewTask
..
DurationInDay
)
, (
b
Milestone
?
""
ELSE
NewTask
..
Progress
)
,
NewTask
)
//TableInsertColumn(TABLE_Gantt, 3, QRY_PrikazPodataka.Auftrag)
//Forces the style and the information
IF
b
Milestone
THEN
SwitchTaskToMilestone
(
n
Subscript
)
ELSE
SwitchTaskToStandard
(
n
Subscript
)
//Updates the values of parent tasks
C
alculateParentTasks
(
n
Subscript
)
//Updates the information of the Gantt chart
DisplayGeneralInfo
(
)
//Modifies the status of the buttons
AdaptButtons
(
)
//Positions on the row
TableSelectPlus
(
TABLE_
Gantt
,
n
Subscript
)
//Switches to input to modify the title
ReturnToCapture
(
TABLE_
Gantt.COL_Strojevi
)
Also, there is limitation in range of gantt dates, only from middle of 2019. (which is start of it) up to begin of 2021.
Is anyone have proposition?
Report
0
0
marin
#2
Registered member
27 messages
Posted on May, 18 2021 - 11:00 AM
I can add all data in columns, but only gantt column is not adding.
Report
0
0
→ Go back to WINDEV 2024
WINDEV 2024
WEBDEV 2024
WINDEV Mobile 2024
WINDEV (earlier versions)
Français
English
Español
Portuguesa
Close this window
Search type
Only topics
All the messages
Search period
Any time
Past hour
Past 24 hours
Past week
Past month
Past year
Cancel
Preview of your message
Adding an image
Import an image from a URL
Send an image from a file of your disk
Drop a file or click "Browse..."
or
Cancel
0%
WLanguage
SQL
XML, HTML
JAVA, Javascript
Text