In init_record the udf field is set to false only if inp

is a constant link and recGblInitConstantLink returns success.
In read_<record type> the udf field is set to false only if
inp is not a constant link and dbGetLink returns success.
This commit is contained in:
Janet B. Anderson
1996-10-30 17:44:33 +00:00
parent a3b1033015
commit e301e1b359
7 changed files with 22 additions and 22 deletions
+3 -3
View File
@@ -78,8 +78,8 @@ static long init_record(pbi)
/* bi.inp must be a CONSTANT or a PV_LINK or a DB_LINK or a CA_LINK */
switch (pbi->inp.type) {
case (CONSTANT) :
recGblInitConstantLink(&pbi->inp,DBF_ENUM,&pbi->val);
pbi->udf = FALSE;
if(recGblInitConstantLink(&pbi->inp,DBF_ENUM,&pbi->val))
pbi->udf = FALSE;
break;
case (DB_LINK) :
case (PV_LINK) :
@@ -100,7 +100,7 @@ static long read_bi(pbi)
status = dbGetLink(&pbi->inp, DBR_USHORT, &pbi->val,0,0);
if(RTN_SUCCESS(status)) pbi->udf=FALSE;
if(pbi->inp.type!=CONSTANT && RTN_SUCCESS(status)) pbi->udf=FALSE;
return(2);
}