::*FormStates// collection of all states of all forms
emptyFormStates::*FormStates// creates empty states
emptyFormStates::!*FormStates// creates empty states
findState::!(FormIda)!*FormStates*NWorld// find the state value given FormId and a correct type
->(Bool,Maybea,*FormStates,*NWorld)// true if form has not yet been previously inspected
findState::!(FormIda)!*FormStates!*NWorld// find the state value given FormId and a correct type
->(!Bool,!Maybea,!*FormStates,!*NWorld)// true if form has not yet been previously inspected
|iPrint,iParse,iSpecialStorea
replaceState::!(FormIda)a!*FormStates*NWorld// replace state given FormId
->(*FormStates,*NWorld)|iPrint,iSpecialStorea
replaceState::!(FormIda)a!*FormStates!*NWorld// replace state given FormId
->(!*FormStates,!*NWorld)|iPrint,iSpecialStorea
getUpdateId::!*FormStates->([String],!*FormStates)// id of previously changed form
getUpdateId::!*FormStates->(![String],!*FormStates)// id of previously changed form
deleteStates::!String!*FormStates*NWorld->(*FormStates,*NWorld)// delete iData administration of all iData with this prefix
deleteStates::!String!*FormStates!*NWorld->(!*FormStates,!*NWorld)// delete iData administration of all iData with this prefix
changeLifetimeStates::!String!Lifespan!Lifespan!*FormStates*NWorld->(*FormStates,*NWorld)// change lifespan of all iData with is prefix and given old lifespan
changeLifetimeStates::!String!Lifespan!Lifespan!*FormStates!*NWorld->(!*FormStates,!*NWorld)// change lifespan of all iData with is prefix and given old lifespan
// storage and retrieval of FormStates
retrieveFormStates::[(String,String)]*NWorld->(*FormStates,*NWorld)// retrieves all form states hidden in the html page
initTestFormStates::*NWorld->(*FormStates,*NWorld)// creates initial empty form states
setTestFormStates::[(Triplet,String)]StringString*FormStates*NWorld->(*FormStates,*NWorld)// retrieves all form states hidden in the html page
initTestFormStates::!*NWorld->(!*FormStates,!*NWorld)// creates initial empty form states
setTestFormStates::![(!Triplet,!String)]!String!String!*FormStates!*NWorld->(!*FormStates,!*NWorld)// retrieves all form states hidden in the html page
setTestFormStates::[(Triplet,String)]StringString*FormStates*NWorld->(*FormStates,*NWorld)// retrieves all form states hidden in the html page
setTestFormStates::![(!Triplet,!String)]!String!String!*FormStates!*NWorld->(!*FormStates,!*NWorld)// retrieves all form states hidden in the html page
#((_,wfls),tst)=workflowProcessStoreidtst// read workflow process administration
#(done,tst)=scheduleWorkflowTableTruewfls0{tst&activated=True}// all added workflows processes are inspected (THIS NEEDS TO BE OPTIMIZED AT SOME STAGE)
=(a,{tst&activated=activated&&done})// whole application ends when all processes have ended
...
...
@@ -272,7 +288,7 @@ where
(DeletedWorkflow_)->WflDeleted
=(status,tst)// if everything is fine it should always succeed
showWorkflows::!Bool!*TSt->(![BodyTag],*TSt)
showWorkflows::!Bool!*TSt->([BodyTag],*TSt)
showWorkflowsalldonetst
=IF_ClientTasks
(\tst->([],tst))// workflow table not available on clients