svn-gvsig-desktop / trunk / org.gvsig.desktop / org.gvsig.desktop.library / org.gvsig.expressionevaluator / org.gvsig.expressionevaluator.lib / org.gvsig.expressionevaluator.lib.impl / src / test / resources / org / gvsig / expressionevaluator / impl / TestScript1_1.txt @ 44384
History | View | Annotate | Download (1.06 KB)
1 |
|
---|---|
2 |
create procedure form_onSetvalues form, values as |
3 |
begin |
4 |
print("form_onSetvalues"); |
5 |
end |
6 |
|
7 |
create procedure form_onFieldEnter form, field as |
8 |
begin |
9 |
print("form_onFieldEnter"); |
10 |
end |
11 |
|
12 |
create procedure form_onFieldExit form, field as |
13 |
begin |
14 |
print("form_onFieldExit"); |
15 |
end |
16 |
|
17 |
create procedure form_onFieldChanged form, field as |
18 |
begin |
19 |
print("form_onFieldChanged"); |
20 |
end |
21 |
|
22 |
create function form_validate form as |
23 |
$$ |
24 |
return true; |
25 |
$$ |
26 |
|
27 |
create procedure form_onLoad form as |
28 |
$$ |
29 |
print("form_onLoad"); |
30 |
$$ |
31 |
|
32 |
create procedure form_clear form as |
33 |
$$ |
34 |
print("form_clear"); |
35 |
$$ |
36 |
|
37 |
create function form_isReadOnly form as |
38 |
begin |
39 |
if not user().isAuthenticated() then |
40 |
return true; |
41 |
end if |
42 |
return false; |
43 |
-- set fecha_accidente = form.getField('FECHA_ACCIDENTE').getValue(); |
44 |
-- if fecha_accidente = null then |
45 |
-- return false; |
46 |
-- end if |
47 |
-- set fecha_de_cierre = application().getProperty('CEGESEV.accidentes.fecha_de_cierre'); |
48 |
-- if fecha_de_cierre = null then |
49 |
-- return true; |
50 |
-- end if |
51 |
-- return Date(fecha_de_cierre) > Date(fecha_accidente); |
52 |
end |