Add valexpr functions for lot dates, prices and tags

2 files changed, 36 insertions, 0 deletions

diff --git a/src/report.cc b/src/report.cc
index 7d74952c..565597c6 100644
--- a/src/report.cc
+++ b/src/report.cc
@@ -315,6 +315,39 @@ value_t report_t::fn_price(call_scope_t& scope)
   return args.value_at(0).price();
 }
 
+value_t report_t::fn_lot_date(call_scope_t& scope)
+{
+  interactive_t args(scope, "v");
+  if (args.value_at(0).is_annotated()) {
+    const annotation_t& details(args.value_at(0).annotation());
+    if (details.date)
+      return *details.date;
+  }
+  return NULL_VALUE;
+}
+
+value_t report_t::fn_lot_price(call_scope_t& scope)
+{
+  interactive_t args(scope, "v");
+  if (args.value_at(0).is_annotated()) {
+    const annotation_t& details(args.value_at(0).annotation());
+    if (details.price)
+      return *details.price;
+  }
+  return NULL_VALUE;
+}
+
+value_t report_t::fn_lot_tag(call_scope_t& scope)
+{
+  interactive_t args(scope, "v");
+  if (args.value_at(0).is_annotated()) {
+    const annotation_t& details(args.value_at(0).annotation());
+    if (details.tag)
+      return string_value(*details.tag);
+  }
+  return NULL_VALUE;
+}
+
 namespace {
   value_t fn_black(call_scope_t&) {
     return string_value("black");
diff --git a/src/report.h b/src/report.h
index c1ad1997..0fe7d05b 100644
--- a/src/report.h
+++ b/src/report.h
@@ -160,6 +160,9 @@ public:
   value_t fn_ansify_if(call_scope_t& scope);
   value_t fn_percent(call_scope_t& scope);
   value_t fn_price(call_scope_t& scope);
+  value_t fn_lot_date(call_scope_t& scope);
+  value_t fn_lot_price(call_scope_t& scope);
+  value_t fn_lot_tag(call_scope_t& scope);
 
   value_t fn_now(call_scope_t&) {
     return terminus;