epics/epics-base
0
0
Fork 0
Code Issues Pull Requests Projects Wiki Activity

DBF_FLOAT fields have been replaced by DBF_DOUBLE

Browse Source 
DBF_FLOAT fields have been replaced by DBF_DOUBLE
This commit is contained in:
Marty Kraimer
2001-06-20 16:05:37 +00:00
parent adb2d574a3
commit 930f5d64ec
20 changed files with 103 additions and 99 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/rec/aaiRecord.dbd
View File

@@ -23,12 +23,12 @@ recordtype(aai) {
interest(1)
size(16)
}
field(HOPR,DBF_FLOAT) {
field(HOPR,DBF_DOUBLE) {
prompt("High Operating Range")
promptgroup(GUI_CALC)
interest(1)
}
field(LOPR,DBF_FLOAT) {
field(LOPR,DBF_DOUBLE) {
prompt("Low Operating Range")
promptgroup(GUI_CLOCK)
interest(1)

4
src/rec/aaoRecord.dbd
View File

@@ -23,12 +23,12 @@ recordtype(aao) {
interest(1)
size(16)
}
field(HOPR,DBF_FLOAT) {
field(HOPR,DBF_DOUBLE) {
prompt("High Operating Range")
promptgroup(GUI_CALC)
interest(1)
}
field(LOPR,DBF_FLOAT) {
field(LOPR,DBF_DOUBLE) {
prompt("Low Operating Range")
promptgroup(GUI_CLOCK)
interest(1)

22
src/rec/aiRecord.dbd
View File

@@ -23,14 +23,14 @@ recordtype(ai) {
interest(1)
menu(menuConvert)
}
field(EGUF,DBF_FLOAT) {
field(EGUF,DBF_DOUBLE) {
prompt("Engineer Units Full")
promptgroup(GUI_CONVERT)
special(SPC_LINCONV)
pp(TRUE)
interest(1)
}
field(EGUL,DBF_FLOAT) {
field(EGUL,DBF_DOUBLE) {
prompt("Engineer Units Low")
promptgroup(GUI_CONVERT)
special(SPC_LINCONV)
@@ -43,53 +43,53 @@ recordtype(ai) {
interest(1)
size(16)
}
field(HOPR,DBF_FLOAT) {
field(HOPR,DBF_DOUBLE) {
prompt("High Operating Range")
promptgroup(GUI_DISPLAY)
interest(1)
}
field(LOPR,DBF_FLOAT) {
field(LOPR,DBF_DOUBLE) {
prompt("Low Operating Range")
promptgroup(GUI_DISPLAY)
interest(1)
}
field(AOFF,DBF_FLOAT) {
field(AOFF,DBF_DOUBLE) {
prompt("Adjustment Offset")
promptgroup(GUI_CONVERT)
pp(TRUE)
interest(1)
}
field(ASLO,DBF_FLOAT) {
field(ASLO,DBF_DOUBLE) {
prompt("Adjustment Slope")
promptgroup(GUI_CONVERT)
pp(TRUE)
interest(1)
initial("1")
}
field(SMOO,DBF_FLOAT) {
field(SMOO,DBF_DOUBLE) {
prompt("Smoothing")
promptgroup(GUI_CONVERT)
interest(1)
}
field(HIHI,DBF_FLOAT) {
field(HIHI,DBF_DOUBLE) {
prompt("Hihi Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)
interest(1)
}
field(LOLO,DBF_FLOAT) {
field(LOLO,DBF_DOUBLE) {
prompt("Lolo Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)
interest(1)
}
field(HIGH,DBF_FLOAT) {
field(HIGH,DBF_DOUBLE) {
prompt("High Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)
interest(1)
}
field(LOW,DBF_FLOAT) {
field(LOW,DBF_DOUBLE) {
prompt("Low Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)

26
src/rec/aoRecord.dbd
View File

@@ -17,7 +17,7 @@ recordtype(ao) {
promptgroup(GUI_OUTPUT)
interest(1)
}
field(OROC,DBF_FLOAT) {
field(OROC,DBF_DOUBLE) {
prompt("Output Rate of Chang")
promptgroup(GUI_OUTPUT)
interest(1)
@@ -52,14 +52,14 @@ recordtype(ao) {
interest(1)
menu(menuConvert)
}
field(EGUF,DBF_FLOAT) {
field(EGUF,DBF_DOUBLE) {
prompt("Eng Units Full")
promptgroup(GUI_CONVERT)
special(SPC_LINCONV)
pp(TRUE)
interest(1)
}
field(EGUL,DBF_FLOAT) {
field(EGUL,DBF_DOUBLE) {
prompt("Eng Units Low")
promptgroup(GUI_CONVERT)
special(SPC_LINCONV)
@@ -88,59 +88,59 @@ recordtype(ao) {
interest(2)
initial("1")
}
field(DRVH,DBF_FLOAT) {
field(DRVH,DBF_DOUBLE) {
prompt("Drive High Limit")
promptgroup(GUI_OUTPUT)
pp(TRUE)
interest(1)
}
field(DRVL,DBF_FLOAT) {
field(DRVL,DBF_DOUBLE) {
prompt("Drive Low Limit")
promptgroup(GUI_OUTPUT)
pp(TRUE)
interest(1)
}
field(HOPR,DBF_FLOAT) {
field(HOPR,DBF_DOUBLE) {
prompt("High Operating Range")
promptgroup(GUI_DISPLAY)
interest(1)
}
field(LOPR,DBF_FLOAT) {
field(LOPR,DBF_DOUBLE) {
prompt("Low Operating Range")
promptgroup(GUI_DISPLAY)
interest(1)
}
field(AOFF,DBF_FLOAT) {
field(AOFF,DBF_DOUBLE) {
prompt("Adjustment Offset")
promptgroup(GUI_CONVERT)
pp(TRUE)
interest(1)
}
field(ASLO,DBF_FLOAT) {
field(ASLO,DBF_DOUBLE) {
prompt("Adjustment Slope")
promptgroup(GUI_CONVERT)
pp(TRUE)
interest(1)
}
field(HIHI,DBF_FLOAT) {
field(HIHI,DBF_DOUBLE) {
prompt("Hihi Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)
interest(1)
}
field(LOLO,DBF_FLOAT) {
field(LOLO,DBF_DOUBLE) {
prompt("Lolo Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)
interest(1)
}
field(HIGH,DBF_FLOAT) {
field(HIGH,DBF_DOUBLE) {
prompt("High Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)
interest(1)
}
field(LOW,DBF_FLOAT) {
field(LOW,DBF_DOUBLE) {
prompt("Low Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)

2
src/rec/boRecord.dbd
View File

@@ -21,7 +21,7 @@ recordtype(bo) {
promptgroup(GUI_OUTPUT)
interest(1)
}
field(HIGH,DBF_FLOAT) {
field(HIGH,DBF_DOUBLE) {
prompt("Seconds to Hold High")
promptgroup(GUI_OUTPUT)
interest(1)

12
src/rec/calcRecord.dbd
View File

@@ -82,35 +82,35 @@ recordtype(calc) {
promptgroup(GUI_DISPLAY)
interest(1)
}
field(HOPR,DBF_FLOAT) {
field(HOPR,DBF_DOUBLE) {
prompt("High Operating Rng")
promptgroup(GUI_DISPLAY)
interest(1)
}
field(LOPR,DBF_FLOAT) {
field(LOPR,DBF_DOUBLE) {
prompt("Low Operating Range")
promptgroup(GUI_DISPLAY)
interest(1)
}
field(HIHI,DBF_FLOAT) {
field(HIHI,DBF_DOUBLE) {
prompt("Hihi Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)
interest(1)
}
field(LOLO,DBF_FLOAT) {
field(LOLO,DBF_DOUBLE) {
prompt("Lolo Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)
interest(1)
}
field(HIGH,DBF_FLOAT) {
field(HIGH,DBF_DOUBLE) {
prompt("High Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)
interest(1)
}
field(LOW,DBF_FLOAT) {
field(LOW,DBF_DOUBLE) {
prompt("Low Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)

16
src/rec/calcoutRecord.dbd
View File

@@ -22,7 +22,7 @@ menu(calcoutINAV) {
}
recordtype(calcout) {
include "dbCommon.dbd"
field(VERS,DBF_FLOAT) {
field(VERS,DBF_DOUBLE) {
prompt("Code Version")
special(SPC_NOMOD)
initial("1")
@@ -296,7 +296,7 @@ recordtype(calcout) {
interest(1)
menu(calcoutOOPT)
}
field(ODLY,DBF_FLOAT) {
field(ODLY,DBF_DOUBLE) {
prompt("Output Execute Delay")
promptgroup(GUI_ALARMS)
asl(ASL0)
@@ -351,35 +351,35 @@ recordtype(calcout) {
promptgroup(GUI_DISPLAY)
interest(1)
}
field(HOPR,DBF_FLOAT) {
field(HOPR,DBF_DOUBLE) {
prompt("High Operating Rng")
promptgroup(GUI_DISPLAY)
interest(1)
}
field(LOPR,DBF_FLOAT) {
field(LOPR,DBF_DOUBLE) {
prompt("Low Operating Range")
promptgroup(GUI_DISPLAY)
interest(1)
}
field(HIHI,DBF_FLOAT) {
field(HIHI,DBF_DOUBLE) {
prompt("Hihi Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)
interest(1)
}
field(LOLO,DBF_FLOAT) {
field(LOLO,DBF_DOUBLE) {
prompt("Lolo Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)
interest(1)
}
field(HIGH,DBF_FLOAT) {
field(HIGH,DBF_DOUBLE) {
prompt("High Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)
interest(1)
}
field(LOW,DBF_FLOAT) {
field(LOW,DBF_DOUBLE) {
prompt("Low Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)

2
src/rec/compressRecord.c
View File

@@ -357,7 +357,7 @@ static long process(pcompress)
if(!dbIsLinkConnected(&pcompress->inp)
|| dbGetNelements(&pcompress->inp,&nelements)
|| nelements<=0) {
recGblSetSevr(pcompress,READ_ALARM,INVALID_ALARM);
recGblSetSevr(pcompress,LINK_ALARM,INVALID_ALARM);
} else {
if(!pcompress->wptr || nelements!=pcompress->inpn) {
free(pcompress->wptr);

8
src/rec/compressRecord.dbd
View File

@@ -47,22 +47,22 @@ recordtype(compress) {
interest(1)
initial("1")
}
field(IHIL,DBF_FLOAT) {
field(IHIL,DBF_DOUBLE) {
prompt("Init High Interest Lim")
promptgroup(GUI_COMPRESS)
interest(1)
}
field(ILIL,DBF_FLOAT) {
field(ILIL,DBF_DOUBLE) {
prompt("Init Low Interest Lim")
promptgroup(GUI_COMPRESS)
interest(1)
}
field(HOPR,DBF_FLOAT) {
field(HOPR,DBF_DOUBLE) {
prompt("High Operating Range")
promptgroup(GUI_DISPLAY)
interest(1)
}
field(LOPR,DBF_FLOAT) {
field(LOPR,DBF_DOUBLE) {
prompt("Low Operating Range")
promptgroup(GUI_DISPLAY)
interest(1)

4
src/rec/dfanoutRecord.c
View File

@@ -97,7 +97,9 @@ static long process(struct dfanoutRecord *pdfanout)
{
long status=0;
if (!pdfanout->pact && pdfanout->omsl == CLOSED_LOOP){
if (!pdfanout->pact
&& (pdfanout->dol.type != CONSTANT)
&& (pdfanout->omsl == CLOSED_LOOP)){
status = dbGetLink(&(pdfanout->dol),DBR_DOUBLE,&(pdfanout->val),0,0);
if(pdfanout->dol.type!=CONSTANT && RTN_SUCCESS(status))
pdfanout->udf=FALSE;

6
src/rec/egeventRecord.dbd
View File

@@ -48,13 +48,13 @@ recordtype(egevent) {
interest(1)
menu(egeventRAM)
}
field(DELY,DBF_FLOAT) {
field(DELY,DBF_DOUBLE) {
prompt("Desired Delay Time")
promptgroup(GUI_DISPLAY)
pp(TRUE)
interest(1)
}
field(ADLY,DBF_FLOAT) {
field(ADLY,DBF_DOUBLE) {
prompt("Actual Delay")
special(SPC_NOMOD)
interest(1)
@@ -69,7 +69,7 @@ recordtype(egevent) {
special(SPC_NOMOD)
interest(1)
}
field(LDLY,DBF_FLOAT) {
field(LDLY,DBF_DOUBLE) {
prompt("Last Desired Delay")
special(SPC_NOMOD)
interest(1)

12
src/rec/gsubRecord.c
View File

@@ -112,7 +112,7 @@ static long init_record(psub,pass)
STATUS ret;
struct link *plink;
int i;
float *pvalue;
double *pvalue;
int *pcallbackdummy = NULL; /* dummy callback arguments */
if (pass==0) return(0);
@@ -121,7 +121,7 @@ static long init_record(psub,pass)
pvalue = &psub->a;
for(i=0; i<ARG_MAX; i++, plink++, pvalue++) {
if(plink->type==CONSTANT)
recGblInitConstantLink(plink,DBF_FLOAT,pvalue);
recGblInitConstantLink(plink,DBF_DOUBLE,pvalue);
}
/* convert the initialization subroutine name */
@@ -283,7 +283,7 @@ static void alarm(psub)
struct gsubRecord *psub;
{
double val;
float hyst, lalm, hihi, high, low, lolo;
double hyst, lalm, hihi, high, low, lolo;
unsigned short hhsv, llsv, hsv, lsv;
if(psub->udf == TRUE ){
@@ -328,8 +328,8 @@ static void monitor(psub)
{
unsigned short monitor_mask;
double delta;
float *pnew;
float *pprev;
double *pnew;
double *pprev;
int i;
monitor_mask = recGblResetAlarms(psub);
@@ -369,7 +369,7 @@ static long fetch_values(psub)
struct gsubRecord *psub;
{
struct link *plink; /* structure of the link field */
float *pvalue;
double *pvalue;
int i;
long status;

44
src/rec/gsubRecord.dbd
View File

@@ -1,6 +1,6 @@
recordtype(gsub) {
include "dbCommon.dbd"
field(VAL,DBF_FLOAT) {
field(VAL,DBF_DOUBLE) {
prompt("Result")
asl(ASL0)
pp(TRUE)
@@ -66,35 +66,35 @@ recordtype(gsub) {
interest(1)
size(16)
}
field(HOPR,DBF_FLOAT) {
field(HOPR,DBF_DOUBLE) {
prompt("High Operating Rng")
promptgroup(GUI_DISPLAY)
interest(1)
}
field(LOPR,DBF_FLOAT) {
field(LOPR,DBF_DOUBLE) {
prompt("Low Operating Range")
promptgroup(GUI_DISPLAY)
interest(1)
}
field(HIHI,DBF_FLOAT) {
field(HIHI,DBF_DOUBLE) {
prompt("Hihi Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)
interest(1)
}
field(LOLO,DBF_FLOAT) {
field(LOLO,DBF_DOUBLE) {
prompt("Lolo Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)
interest(1)
}
field(HIGH,DBF_FLOAT) {
field(HIGH,DBF_DOUBLE) {
prompt("High Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)
interest(1)
}
field(LOW,DBF_FLOAT) {
field(LOW,DBF_DOUBLE) {
prompt("Low Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)
@@ -155,71 +155,71 @@ recordtype(gsub) {
promptgroup(GUI_DISPLAY)
interest(1)
}
field(A,DBF_FLOAT) {
field(A,DBF_DOUBLE) {
prompt("Value of Input A")
pp(TRUE)
}
field(B,DBF_FLOAT) {
field(B,DBF_DOUBLE) {
prompt("Value of Input B")
pp(TRUE)
}
field(C,DBF_FLOAT) {
field(C,DBF_DOUBLE) {
prompt("Value of Input C")
pp(TRUE)
}
field(D,DBF_FLOAT) {
field(D,DBF_DOUBLE) {
prompt("Value of Input D")
pp(TRUE)
}
field(E,DBF_FLOAT) {
field(E,DBF_DOUBLE) {
prompt("Value of Input E")
pp(TRUE)
}
field(F,DBF_FLOAT) {
field(F,DBF_DOUBLE) {
prompt("Value of Input F")
pp(TRUE)
}
field(LA,DBF_FLOAT) {
field(LA,DBF_DOUBLE) {
prompt("Prev Value of A")
special(SPC_NOMOD)
interest(3)
}
field(LB,DBF_FLOAT) {
field(LB,DBF_DOUBLE) {
prompt("Prev Value of B")
special(SPC_NOMOD)
interest(3)
}
field(LC,DBF_FLOAT) {
field(LC,DBF_DOUBLE) {
prompt("Prev Value of C")
special(SPC_NOMOD)
interest(3)
}
field(LD,DBF_FLOAT) {
field(LD,DBF_DOUBLE) {
prompt("Prev Value of D")
special(SPC_NOMOD)
interest(3)
}
field(LE,DBF_FLOAT) {
field(LE,DBF_DOUBLE) {
prompt("Prev Value of E")
special(SPC_NOMOD)
interest(3)
}
field(LF,DBF_FLOAT) {
field(LF,DBF_DOUBLE) {
prompt("Prev Value of F")
special(SPC_NOMOD)
interest(3)
}
field(LALM,DBF_FLOAT) {
field(LALM,DBF_DOUBLE) {
prompt("Last Value Alarmed")
special(SPC_NOMOD)
interest(3)
}
field(ALST,DBF_FLOAT) {
field(ALST,DBF_DOUBLE) {
prompt("Last Value Archived")
special(SPC_NOMOD)
interest(3)
}
field(MLST,DBF_FLOAT) {
field(MLST,DBF_DOUBLE) {
prompt("Last Value Monitored")
special(SPC_NOMOD)
interest(3)

3
src/rec/longoutRecord.c
View File

@@ -161,7 +161,8 @@ static long process(plongout)
return(S_dev_missingSup);
}
if (!plongout->pact) {
if (plongout->omsl == CLOSED_LOOP) {
if((plongout->dol.type != CONSTANT)
&& (plongout->omsl == CLOSED_LOOP)) {
status = dbGetLink(&(plongout->dol),DBR_LONG,
&value,0,0);
if (plongout->dol.type!=CONSTANT && RTN_SUCCESS(status))

1
src/rec/mbbiDirectRecord.dbd
View File

@@ -2,7 +2,6 @@ recordtype(mbbiDirect) {
include "dbCommon.dbd"
field(VAL,DBF_USHORT) {
prompt("Current Value")
special(SPC_NOMOD)
asl(ASL0)
pp(TRUE)
}

12
src/rec/selRecord.dbd
View File

@@ -95,35 +95,35 @@ recordtype(sel) {
interest(1)
size(16)
}
field(HOPR,DBF_FLOAT) {
field(HOPR,DBF_DOUBLE) {
prompt("High Operating Rng")
promptgroup(GUI_DISPLAY)
interest(1)
}
field(LOPR,DBF_FLOAT) {
field(LOPR,DBF_DOUBLE) {
prompt("Low Operating Range")
promptgroup(GUI_DISPLAY)
interest(1)
}
field(HIHI,DBF_FLOAT) {
field(HIHI,DBF_DOUBLE) {
prompt("Hihi Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)
interest(1)
}
field(LOLO,DBF_FLOAT) {
field(LOLO,DBF_DOUBLE) {
prompt("Lolo Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)
interest(1)
}
field(HIGH,DBF_FLOAT) {
field(HIGH,DBF_DOUBLE) {
prompt("High Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)
interest(1)
}
field(LOW,DBF_FLOAT) {
field(LOW,DBF_DOUBLE) {
prompt("Low Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)

4
src/rec/stringoutRecord.c
View File

@@ -161,7 +161,9 @@ static long process(pstringout)
recGblRecordError(S_dev_missingSup,(void *)pstringout,"write_stringout");
return(S_dev_missingSup);
}
if (!pstringout->pact && pstringout->omsl == CLOSED_LOOP){
if (!pstringout->pact
&& (pstringout->dol.type != CONSTANT)
&& (pstringout->omsl == CLOSED_LOOP)) {
status = dbGetLink(&(pstringout->dol),
DBR_STRING,pstringout->val,0,0);
if(pstringout->dol.type!=CONSTANT && RTN_SUCCESS(status)) pstringout->udf=FALSE;

4
src/rec/subArrayRecord.dbd
View File

@@ -30,12 +30,12 @@ recordtype(subArray) {
interest(1)
size(16)
}
field(HOPR,DBF_FLOAT) {
field(HOPR,DBF_DOUBLE) {
prompt("High Operating Range")
promptgroup(GUI_CALC)
interest(1)
}
field(LOPR,DBF_FLOAT) {
field(LOPR,DBF_DOUBLE) {
prompt("Low Operating Range")
promptgroup(GUI_CLOCK)
interest(1)

12
src/rec/subRecord.dbd
View File

@@ -96,35 +96,35 @@ recordtype(sub) {
interest(1)
size(16)
}
field(HOPR,DBF_FLOAT) {
field(HOPR,DBF_DOUBLE) {
prompt("High Operating Rng")
promptgroup(GUI_DISPLAY)
interest(1)
}
field(LOPR,DBF_FLOAT) {
field(LOPR,DBF_DOUBLE) {
prompt("Low Operating Range")
promptgroup(GUI_DISPLAY)
interest(1)
}
field(HIHI,DBF_FLOAT) {
field(HIHI,DBF_DOUBLE) {
prompt("Hihi Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)
interest(1)
}
field(LOLO,DBF_FLOAT) {
field(LOLO,DBF_DOUBLE) {
prompt("Lolo Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)
interest(1)
}
field(HIGH,DBF_FLOAT) {
field(HIGH,DBF_DOUBLE) {
prompt("High Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)
interest(1)
}
field(LOW,DBF_FLOAT) {
field(LOW,DBF_DOUBLE) {
prompt("Low Alarm Limit")
promptgroup(GUI_ALARMS)
pp(TRUE)

4
src/rec/waveformRecord.dbd
View File

@@ -29,12 +29,12 @@ recordtype(waveform) {
interest(1)
size(16)
}
field(HOPR,DBF_FLOAT) {
field(HOPR,DBF_DOUBLE) {
prompt("High Operating Range")
promptgroup(GUI_DISPLAY)
interest(1)
}
field(LOPR,DBF_FLOAT) {
field(LOPR,DBF_DOUBLE) {
prompt("Low Operating Range")
promptgroup(GUI_DISPLAY)
interest(1)