Re: Modify remaining days calculation in release module

Hi Daniel,

As HP QC/ALM is an event driven application any code you write will not be triggered until an action is performed.

If is ok for you to update the days remaining field when an action is performed in QC/ALM then you can write a workflow code to populate the field.

Foe example check the below code which you might have to write in Move to and field change.

Sub Release_MoveTo
  On Error Resume Next
     iDayTot = DateDiff("D", Date, Release_Fields("REL_END_DATE").Value)
     iLftRelDt =  0
     For i = 0 to iDayTot-1
     TDate =  Release_Fields("REL_END_DATE").Value - i
       If weekday(TDate, vbmonday) < 6 Then
         iLftRelDt = iLftRelDt + 1
       End If
     Next
     Release_Fields.Field("REL_USER_01").Value = ""                      ' Days remaining field
     Release_Fields.Field("REL_USER_01").Value = iLftRelDt
  On Error GoTo 0
End Sub

If this post solves or helps solve your issue, mark the thread as solved and please give KUDOS to the author.