Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
I
intranet-workflow
Project
Project
Details
Activity
Releases
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
project-open
intranet-workflow
Commits
0419c500
Commit
0419c500
authored
Apr 23, 2024
by
Frank Bergmann
Browse files
Options
Browse Files
Download
Plain Diff
Merge branch 'master' of
https://gitlab.project-open.net/project-open/intranet-workflow
parents
d5bd22a6
c161c743
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
9 additions
and
7 deletions
+9
-7
upgrade-5.1.0.0.2-5.1.0.0.3.sql
sql/postgresql/upgrade/upgrade-5.1.0.0.2-5.1.0.0.3.sql
+4
-2
intranet-workflow-procs.tcl
tcl/intranet-workflow-procs.tcl
+5
-5
No files found.
sql/postgresql/upgrade/upgrade-5.1.0.0.2-5.1.0.0.3.sql
View file @
0419c500
...
...
@@ -56,8 +56,10 @@ begin
p_task_id
,
v_object_id
,
p_custom_arg
;
-- Cast to integer from parties.party_id. NULL argument gracefully handled or use global default
v_default_party_id
:
=
select
party_id
from
parties
where
party_id
::
varchar
=
p_custom_arg
;
IF
v_default_party_id
is
null
THEN
v_default_party_id
:
=
select
group_id
from
groups
where
group_name
=
'Senior Managers'
;
END
IF
;
select
party_id
into
v_default_party_id
from
parties
where
party_id
::
varchar
=
p_custom_arg
;
IF
v_default_party_id
is
null
THEN
select
group_id
into
v_default_party_id
from
groups
where
group_name
=
'Senior Managers'
;
END
IF
;
IF
v_default_party_id
is
not
null
THEN
RAISE
NOTICE
'im_workflow__assign_to_supervisor(task_id=%, oid=%): Assigning to party_id in custom_arg="%" '
,
p_task_id
,
v_object_id
,
p_custom_arg
;
...
...
tcl/intranet-workflow-procs.tcl
View file @
0419c500
...
...
@@ -1512,7 +1512,7 @@ ad_proc -public im_workflow_home_inbox_component {
# ad_return_complaint 1
$wf
_options_sql
set workflow_options
[
db_list_of_lists wf
$wf
_options_sql
]
set workflow_options
[
linsert
$workflow
_options 0
[
list
""
""
]]
set workflow_options
[
linsert
$workflow
_options 0
[
list
[
_ intranet-core.All
]
""
]]
set workflow_select
[
im_select -translate_p 0 -ad_form_option_list_style_p 1 filter_workflow_key
$workflow
_options
$filter
_workflow_key
]
# Options for the type of object
...
...
@@ -1529,7 +1529,7 @@ ad_proc -public im_workflow_home_inbox_component {
ot.pretty_name
}
set object_type_options
[
db_list_of_lists otypes
$object
_type_sql
]
set object_type_options
[
linsert
$object
_type_options 0
[
list
""
""
]]
set object_type_options
[
linsert
$object
_type_options 0
[
list
[
_ intranet-core.All
]
""
]]
set object_type_select
[
im_select -translate_p 0 -ad_form_option_list_style_p 1 filter_object_type
$object
_type_options
$filter
_object_type
]
...
...
@@ -1543,7 +1543,7 @@ ad_proc -public im_workflow_home_inbox_component {
"
# ad_return_complaint 1
[
im_ad_hoc_query -format html
$wf
_action_sql
]
set wf_action_options
[
db_list_of_lists wfa
$wf
_action_sql
]
set wf_action_options
[
linsert
$wf
_action_options 0
[
list
""
""
]]
set wf_action_options
[
linsert
$wf
_action_options 0
[
list
[
_ intranet-core.All
]
""
]]
set wf_action_select
[
im_select -translate_p 0 -ad_form_option_list_style_p 1 filter_wf_action
$wf
_action_options
$filter
_wf_action
]
...
...
@@ -1560,7 +1560,7 @@ ad_proc -public im_workflow_home_inbox_component {
im_name_from_user_id
(
o.creation_user
)
}
set owner_options
[
db_list_of_lists otypes
$owner
_sql
]
set owner_options
[
linsert
$owner
_options 0
[
list
""
""
]]
set owner_options
[
linsert
$owner
_options 0
[
list
[
_ intranet-core.All
]
""
]]
set owner_select
[
im_select -translate_p 0 -ad_form_option_list_style_p 1 filter_owner_id
$owner
_options
$filter
_owner_id
]
...
...
@@ -1583,7 +1583,7 @@ ad_proc -public im_workflow_home_inbox_component {
im_name_from_user_id
(
assignee_id
)
}
set assignee_options
[
db_list_of_lists otypes
$assignee
_sql
]
set assignee_options
[
linsert
$assignee
_options 0
[
list
""
""
]]
set assignee_options
[
linsert
$assignee
_options 0
[
list
[
_ intranet-core.All
]
""
]]
set assignee_select
[
im_select -translate_p 0 -ad_form_option_list_style_p 1 filter_assignee_id
$assignee
_options
$filter
_assignee_id
]
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment