From ed27f9556ac945f6d48ed3663cb26585ddd70879 Mon Sep 17 00:00:00 2001 From: erickson Date: Fri, 25 Mar 2005 15:37:59 +0000 Subject: [PATCH] basic duration/renewal script git-svn-id: svn://svn.open-ils.org/ILS/trunk@395 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Evergreen/circ_rules/dr_script.ttk | 45 ++++++++++++++++++++++++++++++ 1 file changed, 45 insertions(+) create mode 100644 Evergreen/circ_rules/dr_script.ttk diff --git a/Evergreen/circ_rules/dr_script.ttk b/Evergreen/circ_rules/dr_script.ttk new file mode 100644 index 0000000000..b388460afa --- /dev/null +++ b/Evergreen/circ_rules/dr_script.ttk @@ -0,0 +1,45 @@ +[% + +# ------------------------------------------------------------------ +# Circ Matrix +# +# Objects: +# patron +# copy +# loan_duration +# circlib +# shortname +# +# Constants: +# copy_types.* +# +# ------------------------------------------------------------------ + +# ------------------------------------------------------------------ +# Macros for simpler syntax + +MACRO jump(n) PROCESS $n; +MACRO policy(p) PROCESS policy_block val=p; +BLOCK policy_block; val; STOP; END; + +# ------------------------------------------------------------------ + + + +IF circlib.shortname == 'ARL-ATH'; jump('ARL_ATH'); END; +policy('pines_global_duration_policy_default'); + + +BLOCK ARL_ATH; + IF copy.type == copy_types.book AND copy.loan_duration == 1; policy('my_ath_policy'); END; + IF copy.type == copy_types.audio AND copy.loan_duration == 2; policy('my_other_ath_policy'); END; +END; + + +BLOCK BTRL; + IF copy.type == copy_types.dvd; policy('my_btrl_audio_policy'); END; +END; + + + +%] -- 2.43.2