From 4d3389a8d468a04a2fb04a7dbbf440b1e603d0da Mon Sep 17 00:00:00 2001
From: marcofilho <marco.filho@ess.eu>
Date: Mon, 15 Jul 2024 12:38:12 +0200
Subject: [PATCH] Make register name dynamic

ST register is not hardcoded into template file anymore.
This will make it easier to add new registers, I hope.
---
 vmmTblApp/Db/channels.sub      | 10 +++++-----
 vmmTblApp/Db/channels.template | 18 +++++++++---------
 2 files changed, 14 insertions(+), 14 deletions(-)

diff --git a/vmmTblApp/Db/channels.sub b/vmmTblApp/Db/channels.sub
index b30992b..c7c4221 100644
--- a/vmmTblApp/Db/channels.sub
+++ b/vmmTblApp/Db/channels.sub
@@ -1,7 +1,7 @@
 file channels.template {
-pattern {HYB, VMM}
-{0, 0}
-{0, 1}
-{1, 0}
-{1, 1}
+pattern {HYB, VMM, CH}
+        {0,   0,  "ST"}
+        {0,   1,  "ST"}
+        {1,   0,  "ST"}
+        {1,   1,  "ST"}
 }
diff --git a/vmmTblApp/Db/channels.template b/vmmTblApp/Db/channels.template
index 1c42aad..13b8f45 100644
--- a/vmmTblApp/Db/channels.template
+++ b/vmmTblApp/Db/channels.template
@@ -4,24 +4,24 @@
 #     The aao record sets the register channel by channel.
 #     The bo record sets all channels at once.
 
-record(aao, "$(P)$(R)Hyb$(HYB)Vmm$(VMM)ST-S") {
-    field(DESC, "Set ST channels array")
+record(aao, "$(P)$(R)Hyb$(HYB)Vmm$(VMM)$(CH)-S") {
+    field(DESC, "Set $(CH) channels array")
     field(DTYP, "asynInt8ArrayOut")
     field(NELM, "64")
     field(FTVL, "CHAR")
-    field(OUT,  "@asyn($(PORT),$(ADDR),$(TIMEOUT))HYB_$(HYB)_$(VMM)_ST")
+    field(OUT,  "@asyn($(PORT),$(ADDR),$(TIMEOUT))HYB_$(HYB)_$(VMM)_$(CH)")
 }
 
-record(bo, "$(P)$(R)Hyb$(HYB)Vmm$(VMM)AllST-S") {
-    field(DESC, "Set all ST channels")
+record(bo, "$(P)$(R)Hyb$(HYB)Vmm$(VMM)All$(CH)-S") {
+    field(DESC, "Set all $(CH) channels")
     field(VAL,  "0")
 }
 
-record(acalcout, "$(P)$(R)Hyb$(HYB)Vmm$(VMM)#AllST-S") {
+record(acalcout, "$(P)$(R)Hyb$(HYB)Vmm$(VMM)#All$(CH)-S") {
     field(NELM, "64")
     field(CALC, "A=1?1:0")
     field(OOPT, "On Change")
-    field(INPA, "$(P)$(R)Hyb$(HYB)Vmm$(VMM)AllST-S CPP")
-    field(INAA, "$(P)$(R)Hyb$(HYB)Vmm$(VMM)ST-S")
-    field(OUT,  "$(P)$(R)Hyb$(HYB)Vmm$(VMM)ST-S PP")
+    field(INPA, "$(P)$(R)Hyb$(HYB)Vmm$(VMM)All$(CH)-S CPP")
+    field(INAA, "$(P)$(R)Hyb$(HYB)Vmm$(VMM)$(CH)-S")
+    field(OUT,  "$(P)$(R)Hyb$(HYB)Vmm$(VMM)$(CH)-S PP")
 }
-- 
GitLab