Do not let any software impress you!

Only let it convince your intellect.
Slider img 1
Do not look for a business paradise!

It is a waste of time.
Slider img 2
Only yourself can push you uphill.

There is no easy road to prizes.
Slider img 3
Productivity is the name of the game.

And you have to conquer it.
Slider img 4
As long as you understand it,

you will start to build your know-how.
Slider img 5
We can help with that.

We have the tools and the method.
Slider img 6

Assignment Activity Comments To User To Position Predefined Time Time Delay
23/6/2014 6:50:05 μμ Prev Corr Action First time visit to customer admin QUALITY ASSURANCE MANAGER 0 0,0165705324034207
23/6/2014 7:06:32 μμ Peventive and Corrective Action Always attempt the in-home visit admin 0 0,00137387731228955
23/6/2014 7:08:31 μμ Approvals for the Correcive Actions Always attempt the in-home visit admin QUALITY ASSURANCE MANAGER 0 0,000360150464985054
23/6/2014 7:09:02 μμ Approval/Rejection of Corrective Actions Always attempt the in-home visit admin 0 0,000878842591191642
23/6/2014 7:10:18 μμ Corrective Action Always attempt the in-home visit John 0 0,00130327545775799
3/11/2014 9:05:59 πμ New Mass Production Order NOVEMBER admin 0 5,67129609407857E-5
3/11/2014 9:10:53 πμ Define Production Quantities NOVEMBER admin 0 0,000338576392096002
3/11/2014 9:11:22 πμ Plan Mass Production NOVEMBER admin 0 2513,40977263889
24/8/2015 10:49:19 πμ Setup Associates First Time Accosiates Setup admin 0 2219,34175186342
26/10/2016 8:42:24 μμ New Mass Production Order November 1/15 admin 0 0,000263622685451992
1872:1-60

Title : Delayed Activities

Toolbars

call history()
call BrowseFilter()
call CreateSheet()
call PrintGrid()
call BrowseFilter()
call PrintGrid()
call CreateSheet()
call CloseForm(False)

Buttons

Fields


 (.ASSIGNED_AT_DATE)
 (.ASSIGNED_AT_TIME)
 (.ACTIVITY)
 (.COMM)
 (.UNAME)
 (.RNAME)
 (.TIMELIMIT)
 (.FTIME)
 (.ASSIGNED_AT_DATE)
 (.ASSIGNED_AT_TIME)
 (.ACTIVITY)
 (.COMM)
 (.UNAME)
 (.RNAME)
 (.TIMELIMIT)
 (.FTIME)


AutoScript

lib

proc Lst_DblClick()

     call OpenBPMStep("history")

end

proc Form_Start()
     f = TopForm()

     call SetCaption("Delayed Activities")

     call CollapseNavBar()
end

proc Panels_Start()

     call FollowUpResults()

     start_sql "DATA" "KOSMOS"
         SELECT
         AU_STEP.FTIME, AU_STEP.TIMELIMIT, (AU_STEP.FTIME - AU_STEP.TIMELIMIT) AS DTIME,
         AU_STEP.STEP_DESCR, AU_STEP.STEP_CODE, AU_STEP.AU_STEP, AU_STEP.STEP_ID,
         AU_STEP.TOSTART_AT_DATE, AU_STEP.TOSTART_AT_TIME, AU_STEP.ISTEP,
         AU_STEP.BRANCH_ID, AU_STEP.ASSIGNED_AT_DATE, AU_STEP.ASSIGNED_AT_TIME,
         AU_PROCESS.AGENT_NAME, AU_PROCESS.AGENT_ID, AU_STEP.FINISHED_AT_DATE,
         AU_STEP.AU_PROCESS,
         AU_STEP.FINISHED_AT_TIME, AU_STEP.UNAME AS STEP_UNAME, AU_STEP.COMM,
         AU_STEP.FINISHED, AU_STEP.RNAME, AU_STEP.UNAME,
         AU_PROCESS.PARENT_AGENT_ID, AU_STEP.ACTIVITY
         FROM
         AU_PROCESS INNER JOIN AU_STEP ON AU_PROCESS.AU_PROCESS = AU_STEP.AU_PROCESS
         WHERE
         (AU_STEP.FINISHED<>1) AND (AU_STEP.ISTEP = 0) AND (AU_STEP.FTIME >= AU_STEP.TIMELIMIT)
     end_sql

     q = QueryByName("DATA")
     call TPrepare(q)
end

proc history()

     process_id = TGetFld(q,"AU_PROCESS")
     call OpenFormTop("ptBrowse";"AU_PROOD.FM";"QRY.DATA",process_id)

end