2025 Automation improvements

SetValueSetProperty

SetValueSetProperty("ValueSetName", "Type3AllocateValuesUsingBaselineSymbols", "Yes" or "No")

This sets the following setting in the ValueSet Properties dialog:

A screenshot of a computer
Description automatically generated


DisplayMessageBoxYesNoCancel

DisplayMessageBoxYesNoCancel("Your Question")

Returns "Yes", or "No" or "Cancel"


SetToolboxHorizontalConnectorProperty

Additions to SetToolboxHorizontalConnectorProperty

"AfterStatusFillPattern" 1-57 (the pattern from dropdown)

"LeaveOffEndsOfBars" 0-1 (0 show ends, 1 leave ends off)

"FillColorTarget2" RBG color

"AfterStatusFillColorTarget2" RGB Color

"UseTargetColorForPatternBackgroundColor" 0-1 (0 do not use, 1 use)


SetTasklineFillPattern

SetTasklineFillPattern (nTask, nSection, nPattern)

nSection = 0, 1, 2 for left, schedule area, right

nPattern = 1-57


SetCurtainDisplayOptions

SetCurtainDisplayOptions(nCurtain, DisplayOption, (optional)ShowCurtainsOverGridlinesAndShading)

Optional argument 3 added:

                 To set the ShowCurtainsOverGridlinesAndShading

                =0 never

                =1 over both shading and gridlines

                =2 over shading but not gridlines

 

Note arg3 is optional to avoid breaking existing programs which just call it with 2 arguments.


SetMiscProperty

SetMiscProperty("ShowGridlinesOnTopOfHolidayWeekendShading" ,0 or 1)

 

"ShowGridlinesOnTopOfHolidayWeekendShading" forces gridlines to be on top of any holiday or weekend shading. Without this setting any holiday or weekend shading will be on top of task row gridlines.


SetCurtainProperties

SetCurtainProperties 1, "6/2/2024", "7/1/2024", RGB(0, 255, 0), RGB(255, 255, 0), 4, 0, "", "Test Curtain Name"

 

Added argument 9 to SetCurtainProperties. Argument 9 is the Optional Curtain Name that overlays the curtain on the schedule:

A screenshot of a computer
Description automatically generated

Note that arguments 8 and 9 are optional, but to have 9 you must have 8. If you are not using arg 8 then just pass an empty or 1 blank character string as shown above.


SetCurtainNamedProperty

SetCurtainNamedProperty nCurtainNumber "PropertyName", "Property Value"

 

arg 1, curtain number. note that curtain number can change if a prior curtain is deleted

arg 2, named property to change

arg 3, new value for property - can be number or string

                                 

"OptionalCurtainLabel", "New Label"

 

"CurtainLabelFont", "Font Name" must exactly match an existing font name, case is probably ignored

 

"CurtainLabelFontSize", nSize - must match valid sizes in Milestones: 3,4,5,6,7,8,9,10,11,12,14,16,18,20,22,24,26,28,32,36,40,44,48,60,72

 

"CurtainLabelFontColor", nColor - must be an RGB color, such as RGB(255,0,0)

 

"CurtainLabelTextAngle", nAngle - must be 0, 90, or -90

 

"CurtainLabelTextAlign", nAlign - must be 0, 1, or 2 (left, center, right)

 

"CurtainLabelPosition", nPosition - must be 0, 1, 2, or 3 (top, bottom, left, right)

 

"CurtainLabelBold", nBold - must be 0, 1 (not bold, bold)

 

"CurtainLabelItal", nItal - must be 0, 1 (not ital, ital)

 

"CurtainLabelTextUnder", nUnder - must be 0, 1, 2, 3 (not under and not strikethrough, under but not strikethrough, not under but strikethrough, under and strikethrough)

 

"CurtainLabelShow", nShow - must be 0, 1 (not showing, showing)

 

 

Examples:

 

    .SetCurtainNamedProperty 1, "OptionalCurtainLabel", "New Label"

   

    .SetCurtainNamedProperty 1, "CurtainLabelFont", "courier new"

   

    .SetCurtainNamedProperty 1, "CurtainLabelFontSize", 36

   

    .SetCurtainNamedProperty 1, "CurtainLabelFontColor", RGB(255, 0, 0)

   

    .SetCurtainNamedProperty 1, "CurtainLabelTextAngle", -90

 

    .SetCurtainNamedProperty 1, "CurtainLabelTextAlign", 1

   

    .SetCurtainNamedProperty 1, "CurtainLabelTextPosition", 3

   

    .SetCurtainNamedProperty 1, "CurtainLabelTextBold", 1

    

    .SetCurtainNamedProperty 1, "CurtainLabelTextItal", 1

     

    .SetCurtainNamedProperty 1, "CurtainLabelTextUnder", 3

 

    .SetCurtainNamedProperty 1, "CurtainLabelShow", 0