From f7778539e891ae22c30ad430c0fb8db3c066d77c Mon Sep 17 00:00:00 2001 From: Dirk Zimoch Date: Thu, 22 May 2025 17:01:41 +0200 Subject: [PATCH] make CALC/OCAL fields twice as long --- modules/database/src/std/rec/calcRecord.dbd.pod | 4 ++-- modules/database/src/std/rec/calcoutRecord.dbd.pod | 8 ++++---- modules/libcom/src/calc/postfix.h | 2 +- 3 files changed, 7 insertions(+), 7 deletions(-) diff --git a/modules/database/src/std/rec/calcRecord.dbd.pod b/modules/database/src/std/rec/calcRecord.dbd.pod index d9a5835a2..14f3d20ee 100644 --- a/modules/database/src/std/rec/calcRecord.dbd.pod +++ b/modules/database/src/std/rec/calcRecord.dbd.pod @@ -512,7 +512,7 @@ manner for the VAL field. promptgroup("30 - Action") special(SPC_CALC) pp(TRUE) - size(80) + size(160) initial("0") } field(INPA,DBF_INLINK) { @@ -948,7 +948,7 @@ manner for the VAL field. prompt("Reverse Polish Calc") special(SPC_NOMOD) interest(4) - extra("char rpcl[INFIX_TO_POSTFIX_SIZE(80)]") + extra("char rpcl[INFIX_TO_POSTFIX_SIZE(160)]") } =head2 Record Support diff --git a/modules/database/src/std/rec/calcoutRecord.dbd.pod b/modules/database/src/std/rec/calcoutRecord.dbd.pod index fa30ef2b2..a8946e69b 100644 --- a/modules/database/src/std/rec/calcoutRecord.dbd.pod +++ b/modules/database/src/std/rec/calcoutRecord.dbd.pod @@ -660,7 +660,7 @@ manner for the VAL field. promptgroup("30 - Action") special(SPC_CALC) pp(TRUE) - size(80) + size(160) initial("0") } field(CLCV,DBF_LONG) { @@ -980,7 +980,7 @@ manner for the VAL field. promptgroup("30 - Action") special(SPC_CALC) pp(TRUE) - size(80) + size(160) initial("0") } field(OCLV,DBF_LONG) { @@ -1329,13 +1329,13 @@ manner for the VAL field. prompt("Reverse Polish Calc") special(SPC_NOMOD) interest(4) - extra("char rpcl[INFIX_TO_POSTFIX_SIZE(80)]") + extra("char rpcl[INFIX_TO_POSTFIX_SIZE(160)]") } field(ORPC,DBF_NOACCESS) { prompt("Reverse Polish OCalc") special(SPC_NOMOD) interest(4) - extra("char orpc[INFIX_TO_POSTFIX_SIZE(80)]") + extra("char orpc[INFIX_TO_POSTFIX_SIZE(160)]") } =head2 Record Support diff --git a/modules/libcom/src/calc/postfix.h b/modules/libcom/src/calc/postfix.h index 248a46a41..90d34e1cf 100644 --- a/modules/libcom/src/calc/postfix.h +++ b/modules/libcom/src/calc/postfix.h @@ -63,7 +63,7 @@ * * This is not a hard limit, just the default size for the database */ -#define MAX_INFIX_SIZE 100 +#define MAX_INFIX_SIZE 160 /** * \brief Size of a "standard" postfix buffer. *