view_editor_renderer.anubis
1.19 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
/*
* Created by PyramIDE.
* User: フランスのトトロ aka (David RENÉ)
* Date: 03/04/2017
* Time: 21:26
* © David RENÉ
*/
read xlib/web/CXM_making_a_web_site.anubis
read xlib/web/CXM_form.anubis
read hayamiki_lib/view/view_table_manager_types.anubis
read hayamiki_lib/view/view_table_manager.anubis
read hayamiki_lib/types/hayamiki.anubis
public define Maybe(HTML_Partial_Content)
view_editor_content
(
SQLite3DataBase db,
(String) -> String _T,
String lang,
String web_site_directory,
List(Web_arg) lwa,
String table, //table name
String view_name, //view name to use
HK_Form_action action, //new_entry or edit an existing record
VTM vtm,
String clause,
String fk_clause,
HK_Referer referer
) =
if vtm_get_edit(table, vtm.edit_list) is
{
failure then failure,
success(vtm_e) then
since vtm_e is vtm_edit(_, get_edit),
success(edit_table_form(db, _T, lang, web_site_directory, lwa, get_edit(db, action, view_name), vtm, clause, fk_clause, referer))
}.