Set PACT if error occurred during record init

src/dev/testDev/devAiTestAsyn.c

@@ -60,6 +60,7 @@ static long init_record(struct aiRecord *pai)
     default :
         recGblRecordError(S_db_badField,(void *)pai,
             "devAiTestAsyn (init_record) Illegal INP field");
+        pai->pact=TRUE;
         return(S_db_badField);
     }
     return(0);

src/dev/testDev/devAoTestAsyn.c

@@ -72,6 +72,7 @@ static long init_record(pao)
     default :
 	recGblRecordError(S_db_badField,(void *)pao,
 		"devAoTestAsyn (init_record) Illegal OUT field");
+	pao->pact=TRUE;
 	return(S_db_badField);
     }
     return(2);

src/dev/testDev/devBiTestAsyn.c

@@ -73,6 +73,7 @@ static long init_record(pbi)
     default :
 	recGblRecordError(S_db_badField,(void *)pbi,
 		"devBiTestAsyn (init_record) Illegal INP field");
+        pbi->pact=TRUE;
 	return(S_db_badField);
     }
     return(0);

src/dev/testDev/devBoTestAsyn.c

@@ -72,6 +72,7 @@ static long init_record(pbo)
     default :
 	recGblRecordError(S_db_badField,(void *)pbo,
 		"devBoTestAsyn (init_record) Illegal OUT field");
+        pbo->pact=TRUE;
 	return(S_db_badField);
     }
     return(2);

src/dev/testDev/devHistogramTestAsyn.c

@@ -69,6 +69,7 @@ static long init_record(phistogram)
     default :
 	recGblRecordError(S_db_badField,(void *)phistogram,
 	    "devHistogramTestAsyn (init_record) Illegal SVL field");
+        phistogram->pact=TRUE;
 	return(S_db_badField);
     }
     return(0);

src/dev/testDev/devMbbiTestAsyn.c

@@ -73,6 +73,7 @@ static long init_record(pmbbi)
     default :
 	recGblRecordError(S_db_badField,(void *)pmbbi,
 		"devMbbiTestAsyn (init_record) Illegal INP field");
+        pmbbi->pact=TRUE;
 	return(S_db_badField);
     }
     return(0);

src/dev/testDev/devMbboTestAsyn.c

@@ -72,6 +72,7 @@ static long init_record(pmbbo)
     default :
 	recGblRecordError(S_db_badField,(void *)pmbbo,
 	    "devMbboTestAsyn (init_record) Illegal OUT field");
+        pmbbo->pact=TRUE;
 	return(S_db_badField);
     }
     return(2);

src/dev/testDev/devSiTestAsyn.c

@@ -72,6 +72,7 @@ static long init_record(pstringin)
     default :
 	recGblRecordError(S_db_badField,(void *)pstringin,
 		"devSiTestAsyn (init_record) Illegal INP field");
+        pstringin->pact=TRUE;
 	return(S_db_badField);
     }
     return(0);

src/dev/testDev/devSoTestAsyn.c

@@ -71,6 +71,7 @@ static long init_record(pstringout)
     default :
 	recGblRecordError(S_db_badField,(void *)pstringout,
 		"devSoTestAsyn (init_record) Illegal OUT field");
+        pstringout->pact=TRUE;
 	return(S_db_badField);
     }
     return(0);

src/dev/testDev/devWfTestAsyn.c

@@ -72,6 +72,7 @@ static long init_record(pwf)
     default :
 	recGblRecordError(S_db_badField,(void *)pwf,
 		"devWfTestAsyn (init_record) Illegal INP field");
+	pwf->pact=TRUE;
 	return(S_db_badField);
     }
     return(0);