diff -r 77d8eafe2a07 -r f6e1a4c75073 dbd/IOCINFRA.dbd --- a/dbd/IOCINFRA.dbd Thu Mar 07 09:23:26 2019 +0100 +++ b/dbd/IOCINFRA.dbd Fri Jul 10 06:11:39 2020 +0200 @@ -1,24 +1,32 @@ -menu(aoOIF) { - choice(aoOIF_Full, "Full") - choice(aoOIF_Incremental, "Incremental") -} -menu(acalcoutINAP) { - choice(acalcoutINAP_No, "No PROC on Change") - choice(acalcoutINAP_Yes, "PROC on Change") -} -menu(acalcoutOOPT) { - choice(acalcoutOOPT_Every_Time, "Every Time") - choice(acalcoutOOPT_On_Change, "On Change") - choice(acalcoutOOPT_When_Zero, "When Zero") - choice(acalcoutOOPT_When_Non_zero, "When Non-zero") - choice(acalcoutOOPT_Transition_To_Zero, "Transition To Zero") - choice(acalcoutOOPT_Transition_To_Non_zero, "Transition To Non-zero") - choice(acalcoutOOPT_Never, "Never") -} -menu(menuSimm) { - choice(menuSimmNO, "NO") - choice(menuSimmYES, "YES") - choice(menuSimmRAW, "RAW") +menu(aSubLFLG) { + choice(aSubLFLG_IGNORE, "IGNORE") + choice(aSubLFLG_READ, "READ") +} +menu(scalcoutINAP) { + choice(scalcoutINAP_No, "No PROC on Change") + choice(scalcoutINAP_Yes, "PROC on Change") +} +menu(acalcoutDOPT) { + choice(acalcoutDOPT_Use_VAL, "Use CALC") + choice(acalcoutDOPT_Use_OVAL, "Use OCAL") +} +menu(stringoutPOST) { + choice(stringoutPOST_OnChange, "On Change") + choice(stringoutPOST_Always, "Always") +} +menu(serialIX) { + choice(serialIX_unknown, "Unknown") + choice(serialIX_No, "No") + choice(serialIX_Yes, "Yes") +} +menu(serialSBIT) { + choice(serialSBIT_unknown, "Unknown") + choice(serialSBIT_1, "1") + choice(serialSBIT_2, "2") +} +menu(bufferingALG) { + choice(bufferingALG_FIFO, "FIFO Buffer") + choice(bufferingALG_LIFO, "LIFO Buffer") } menu(menuAlarmSevr) { choice(menuAlarmSevrNO_ALARM, "NO_ALARM") @@ -26,6 +34,69 @@ choice(menuAlarmSevrMAJOR, "MAJOR") choice(menuAlarmSevrINVALID, "INVALID") } +menu(scalcoutWAIT) { + choice(scalcoutWAIT_NoWait, "NoWait") + choice(scalcoutWAIT_Wait, "Wait") +} +menu(calcoutINAV) { + choice(calcoutINAV_EXT_NC, "Ext PV NC") + choice(calcoutINAV_EXT, "Ext PV OK") + choice(calcoutINAV_LOC, "Local PV") + choice(calcoutINAV_CON, "Constant") +} +menu(dfanoutSELM) { + choice(dfanoutSELM_All, "All") + choice(dfanoutSELM_Specified, "Specified") + choice(dfanoutSELM_Mask, "Mask") +} +menu(scalcoutOOPT) { + choice(scalcoutOOPT_Every_Time, "Every Time") + choice(scalcoutOOPT_On_Change, "On Change") + choice(scalcoutOOPT_When_Zero, "When Zero") + choice(scalcoutOOPT_When_Non_zero, "When Non-zero") + choice(scalcoutOOPT_Transition_To_Zero, "Transition To Zero") + choice(scalcoutOOPT_Transition_To_Non_zero, "Transition To Non-zero") + choice(scalcoutOOPT_Never, "Never") +} +menu(serialDBIT) { + choice(serialDBIT_unknown, "Unknown") + choice(serialDBIT_5, "5") + choice(serialDBIT_6, "6") + choice(serialDBIT_7, "7") + choice(serialDBIT_8, "8") +} +menu(waveformPOST) { + choice(waveformPOST_Always, "Always") + choice(waveformPOST_OnChange, "On Change") +} +menu(sseqLNKV) { + choice(sseqLNKV_EXT_NC, "Ext PV NC") + choice(sseqLNKV_EXT, "Ext PV OK") + choice(sseqLNKV_LOC, "Local PV") + choice(sseqLNKV_CON, "Constant") +} +menu(calcoutDOPT) { + choice(calcoutDOPT_Use_VAL, "Use CALC") + choice(calcoutDOPT_Use_OVAL, "Use OCAL") +} +menu(asynENABLE) { + choice(asynENABLE_Disable, "Disable") + choice(asynENABLE_Enable, "Enable") +} +menu(swaitINAV) { + choice(swaitINAV_PV_OK, "PV OK") + choice(swaitINAV_PV_BAD, "PV BAD") + choice(swaitINAV_No_PV, "No PV") +} +menu(swaitOOPT) { + choice(swaitOOPT_Every_Time, "Every Time") + choice(swaitOOPT_On_Change, "On Change") + choice(swaitOOPT_When_Zero, "When Zero") + choice(swaitOOPT_When_Non_zero, "When Non-zero") + choice(swaitOOPT_Transition_To_Zero, "Transition To Zero") + choice(swaitOOPT_Transition_To_Non_zero, "Transition To Non-zero") + choice(swaitOOPT_Never, "Never") +} menu(menuConvert) { choice(menuConvertNO_CONVERSION, "NO CONVERSION") choice(menuConvertSLOPE, "SLOPE") @@ -43,126 +114,6 @@ choice(menuConverttypeSdegF, "typeSdegF") choice(menuConverttypeSdegC, "typeSdegC") } -menu(scalcoutOOPT) { - choice(scalcoutOOPT_Every_Time, "Every Time") - choice(scalcoutOOPT_On_Change, "On Change") - choice(scalcoutOOPT_When_Zero, "When Zero") - choice(scalcoutOOPT_When_Non_zero, "When Non-zero") - choice(scalcoutOOPT_Transition_To_Zero, "Transition To Zero") - choice(scalcoutOOPT_Transition_To_Non_zero, "Transition To Non-zero") - choice(scalcoutOOPT_Never, "Never") -} -menu(ipDRTO) { - choice(ipDRTO_unknown, "Unknown") - choice(ipDRTO_No, "No") - choice(ipDRTO_Yes, "Yes") -} -menu(calcoutOOPT) { - choice(calcoutOOPT_Every_Time, "Every Time") - choice(calcoutOOPT_On_Change, "On Change") - choice(calcoutOOPT_When_Zero, "When Zero") - choice(calcoutOOPT_When_Non_zero, "When Non-zero") - choice(calcoutOOPT_Transition_To_Zero, "Transition To Zero") - choice(calcoutOOPT_Transition_To_Non_zero, "Transition To Non-zero") -} -menu(sseqLNKV) { - choice(sseqLNKV_EXT_NC, "Ext PV NC") - choice(sseqLNKV_EXT, "Ext PV OK") - choice(sseqLNKV_LOC, "Local PV") - choice(sseqLNKV_CON, "Constant") -} -menu(aSubEFLG) { - choice(aSubEFLG_NEVER, "NEVER") - choice(aSubEFLG_ON_CHANGE, "ON CHANGE") - choice(aSubEFLG_ALWAYS, "ALWAYS") -} -menu(sseqSELM) { - choice(sseqSELM_All, "All") - choice(sseqSELM_Specified, "Specified") - choice(sseqSELM_Mask, "Mask") -} -menu(asynFMT) { - choice(asynFMT_ASCII, "ASCII") - choice(asynFMT_Hybrid, "Hybrid") - choice(asynFMT_Binary, "Binary") -} -menu(serialFCTL) { - choice(serialFCTL_unknown, "Unknown") - choice(serialFCTL_None, "None") - choice(serialFCTL_Hardware, "Hardware") -} -menu(acalcoutDOPT) { - choice(acalcoutDOPT_Use_VAL, "Use CALC") - choice(acalcoutDOPT_Use_OVAL, "Use OCAL") -} -menu(gpibUCMD) { - choice(gpibUCMD_None, "None") - choice(gpibUCMD_Device_Clear__DCL_, "Device Clear (DCL)") - choice(gpibUCMD_Local_Lockout__LL0_, "Local Lockout (LL0)") - choice(gpibUCMD_Serial_Poll_Disable__SPD_, "Serial Poll Disable (SPD)") - choice(gpibUCMD_Serial_Poll_Enable__SPE_, "Serial Poll Enable (SPE)") - choice(gpibUCMD_Unlisten__UNL_, "Unlisten (UNL)") - choice(gpibUCMD_Untalk__UNT_, "Untalk (UNT)") -} -menu(asynENABLE) { - choice(asynENABLE_Disable, "Disable") - choice(asynENABLE_Enable, "Enable") -} -menu(menuPriority) { - choice(menuPriorityLOW, "LOW") - choice(menuPriorityMEDIUM, "MEDIUM") - choice(menuPriorityHIGH, "HIGH") -} -menu(menuYesNo) { - choice(menuYesNoNO, "NO") - choice(menuYesNoYES, "YES") -} -menu(calcoutDOPT) { - choice(calcoutDOPT_Use_VAL, "Use CALC") - choice(calcoutDOPT_Use_OVAL, "Use OCAL") -} -menu(swaitINAP) { - choice(swaitINAP_No, "No") - choice(swaitINAP_Yes, "Yes") -} -menu(asynAUTOCONNECT) { - choice(asynAUTOCONNECT_noAutoConnect, "noAutoConnect") - choice(asynAUTOCONNECT_autoConnect, "autoConnect") -} -menu(acalcoutSIZE) { - choice(acalcoutSIZE_NELM, "NELM") - choice(acalcoutSIZE_NUSE, "NUSE") -} -menu(aaoPOST) { - choice(aaoPOST_Always, "Always") - choice(aaoPOST_OnChange, "On Change") -} -menu(menuPost) { - choice(menuPost_OnChange, "On Change") - choice(menuPost_Always, "Always") -} -menu(serialDBIT) { - choice(serialDBIT_unknown, "Unknown") - choice(serialDBIT_5, "5") - choice(serialDBIT_6, "6") - choice(serialDBIT_7, "7") - choice(serialDBIT_8, "8") -} -menu(scalcoutINAP) { - choice(scalcoutINAP_No, "No PROC on Change") - choice(scalcoutINAP_Yes, "PROC on Change") -} -menu(selSELM) { - choice(selSELM_Specified, "Specified") - choice(selSELM_High_Signal, "High Signal") - choice(selSELM_Low_Signal, "Low Signal") - choice(selSELM_Median_Signal, "Median Signal") -} -menu(seqSELM) { - choice(seqSELM_All, "All") - choice(seqSELM_Specified, "Specified") - choice(seqSELM_Mask, "Mask") -} menu(sseqWAIT) { choice(sseqWAIT_NoWait, "NoWait") choice(sseqWAIT_Wait, "Wait") @@ -177,26 +128,98 @@ choice(sseqWAIT_Wait9, "After9") choice(sseqWAIT_Wait10, "AfterA") } -menu(compressALG) { - choice(compressALG_N_to_1_Low_Value, "N to 1 Low Value") - choice(compressALG_N_to_1_High_Value, "N to 1 High Value") - choice(compressALG_N_to_1_Average, "N to 1 Average") - choice(compressALG_Average, "Average") - choice(compressALG_Circular_Buffer, "Circular Buffer") - choice(compressALG_N_to_1_Median, "N to 1 Median") -} -menu(menuPini) { - choice(menuPiniNO, "NO") - choice(menuPiniYES, "YES") - choice(menuPiniRUN, "RUN") - choice(menuPiniRUNNING, "RUNNING") - choice(menuPiniPAUSE, "PAUSE") - choice(menuPiniPAUSED, "PAUSED") -} -menu(serialMCTL) { - choice(serialMCTL_unknown, "Unknown") - choice(serialMCTL_CLOCAL, "CLOCAL") - choice(serialMCTL_Yes, "YES") +menu(histogramCMD) { + choice(histogramCMD_Read, "Read") + choice(histogramCMD_Clear, "Clear") + choice(histogramCMD_Start, "Start") + choice(histogramCMD_Stop, "Stop") +} +menu(asynFMT) { + choice(asynFMT_ASCII, "ASCII") + choice(asynFMT_Hybrid, "Hybrid") + choice(asynFMT_Binary, "Binary") +} +menu(transformIVLA) { + choice(transformIVLA_IGNORE, "Ignore error") + choice(transformIVLA_DO_NOTHING, "Do Nothing") +} +menu(swaitINAP) { + choice(swaitINAP_No, "No") + choice(swaitINAP_Yes, "Yes") +} +menu(asynEOMREASON) { + choice(asynEOMREASONNone, "None") + choice(asynEOMREASONCNT, "Count") + choice(asynEOMREASONEOS, "Eos") + choice(asynEOMREASONCNTEOS, "Count Eos") + choice(asynEOMREASONEND, "End") + choice(asynEOMREASONCNTEND, "Count End") + choice(asynEOMREASONEOSEND, "Eos End") + choice(asynEOMREASONCNTEOSEND, "Count Eos End") +} +menu(asynTMOD) { + choice(asynTMOD_Write_Read, "Write/Read") + choice(asynTMOD_Write, "Write") + choice(asynTMOD_Read, "Read") + choice(asynTMOD_Flush, "Flush") + choice(asynTMOD_NoIO, "NoI/O") +} +menu(stringinPOST) { + choice(stringinPOST_OnChange, "On Change") + choice(stringinPOST_Always, "Always") +} +menu(serialFCTL) { + choice(serialFCTL_unknown, "Unknown") + choice(serialFCTL_None, "None") + choice(serialFCTL_Hardware, "Hardware") +} +menu(menuPriority) { + choice(menuPriorityLOW, "LOW") + choice(menuPriorityMEDIUM, "MEDIUM") + choice(menuPriorityHIGH, "HIGH") +} +menu(aaoPOST) { + choice(aaoPOST_Always, "Always") + choice(aaoPOST_OnChange, "On Change") +} +menu(menuFtype) { + choice(menuFtypeSTRING, "STRING") + choice(menuFtypeCHAR, "CHAR") + choice(menuFtypeUCHAR, "UCHAR") + choice(menuFtypeSHORT, "SHORT") + choice(menuFtypeUSHORT, "USHORT") + choice(menuFtypeLONG, "LONG") + choice(menuFtypeULONG, "ULONG") + choice(menuFtypeINT64, "INT64") + choice(menuFtypeUINT64, "UINT64") + choice(menuFtypeFLOAT, "FLOAT") + choice(menuFtypeDOUBLE, "DOUBLE") + choice(menuFtypeENUM, "ENUM") +} +menu(menuPost) { + choice(menuPost_OnChange, "On Change") + choice(menuPost_Always, "Always") +} +menu(menuScan) { + choice(menuScanPassive, "Passive") + choice(menuScanEvent, "Event") + choice(menuScanI_O_Intr, "I/O Intr") + choice(menuScan10_second, "10 second") + choice(menuScan5_second, "5 second") + choice(menuScan2_second, "2 second") + choice(menuScan1_second, "1 second") + choice(menuScan_5_second, ".5 second") + choice(menuScan_2_second, ".2 second") + choice(menuScan_1_second, ".1 second") +} +menu(transformCOPT) { + choice(transformCOPT_CONDITIONAL, "Conditional") + choice(transformCOPT_ALWAYS, "Always") +} +menu(menuSimm) { + choice(menuSimmNO, "NO") + choice(menuSimmYES, "YES") + choice(menuSimmRAW, "RAW") } menu(menuAlarmStat) { choice(menuAlarmStatNO_ALARM, "NO_ALARM") @@ -222,124 +245,85 @@ choice(menuAlarmStatREAD_ACCESS, "READ_ACCESS") choice(menuAlarmStatWRITE_ACCESS, "WRITE_ACCESS") } -menu(aSubLFLG) { - choice(aSubLFLG_IGNORE, "IGNORE") - choice(aSubLFLG_READ, "READ") -} -menu(histogramCMD) { - choice(histogramCMD_Read, "Read") - choice(histogramCMD_Clear, "Clear") - choice(histogramCMD_Start, "Start") - choice(histogramCMD_Stop, "Stop") -} -menu(bufferingALG) { - choice(bufferingALG_FIFO, "FIFO Buffer") - choice(bufferingALG_LIFO, "LIFO Buffer") -} -menu(aaiPOST) { - choice(aaiPOST_Always, "Always") - choice(aaiPOST_OnChange, "On Change") -} -menu(swaitDOPT) { - choice(swaitDOPT_Use_VAL, "Use VAL") - choice(swaitDOPT_Use_DOL, "Use DOL") -} -menu(menuFtype) { - choice(menuFtypeSTRING, "STRING") - choice(menuFtypeCHAR, "CHAR") - choice(menuFtypeUCHAR, "UCHAR") - choice(menuFtypeSHORT, "SHORT") - choice(menuFtypeUSHORT, "USHORT") - choice(menuFtypeLONG, "LONG") - choice(menuFtypeULONG, "ULONG") - choice(menuFtypeINT64, "INT64") - choice(menuFtypeUINT64, "UINT64") - choice(menuFtypeFLOAT, "FLOAT") - choice(menuFtypeDOUBLE, "DOUBLE") - choice(menuFtypeENUM, "ENUM") -} -menu(calcoutINAV) { - choice(calcoutINAV_EXT_NC, "Ext PV NC") - choice(calcoutINAV_EXT, "Ext PV OK") - choice(calcoutINAV_LOC, "Local PV") - choice(calcoutINAV_CON, "Constant") -} -menu(scalcoutINAV) { - choice(scalcoutINAV_EXT_NC, "Ext PV NC") - choice(scalcoutINAV_EXT, "Ext PV OK") - choice(scalcoutINAV_LOC, "Local PV") - choice(scalcoutINAV_CON, "Constant") -} -menu(asynINTERFACE) { - choice(asynINTERFACE_OCTET, "asynOctet") - choice(asynINTERFACE_INT32, "asynInt32") - choice(asynINTERFACE_UINT32, "asynUInt32Digital") - choice(asynINTERFACE_FLOAT64, "asynFloat64") -} -menu(transformCOPT) { - choice(transformCOPT_CONDITIONAL, "Conditional") - choice(transformCOPT_ALWAYS, "Always") -} -menu(asynCONNECT) { - choice(asynCONNECT_Disconnect, "Disconnect") - choice(asynCONNECT_Connect, "Connect") -} -menu(stringinPOST) { - choice(stringinPOST_OnChange, "On Change") - choice(stringinPOST_Always, "Always") -} -menu(menuOmsl) { - choice(menuOmslsupervisory, "supervisory") - choice(menuOmslclosed_loop, "closed_loop") -} -menu(menuScan) { - choice(menuScanPassive, "Passive") - choice(menuScanEvent, "Event") - choice(menuScanI_O_Intr, "I/O Intr") - choice(menuScan10_second, "10 second") - choice(menuScan5_second, "5 second") - choice(menuScan2_second, "2 second") - choice(menuScan1_second, "1 second") - choice(menuScan_5_second, ".5 second") - choice(menuScan_2_second, ".2 second") - choice(menuScan_1_second, ".1 second") -} -menu(transformIVLA) { - choice(transformIVLA_IGNORE, "Ignore error") - choice(transformIVLA_DO_NOTHING, "Do Nothing") -} menu(transformIAV) { choice(transformIAV_EXT_NC, "Ext PV NC") choice(transformIAV_EXT, "Ext PV OK") choice(transformIAV_LOC, "Local PV") choice(transformIAV_CON, "Constant") } -menu(waveformPOST) { - choice(waveformPOST_Always, "Always") - choice(waveformPOST_OnChange, "On Change") -} -menu(serialIX) { - choice(serialIX_unknown, "Unknown") - choice(serialIX_No, "No") - choice(serialIX_Yes, "Yes") -} -menu(swaitINAV) { - choice(swaitINAV_PV_OK, "PV OK") - choice(swaitINAV_PV_BAD, "PV BAD") - choice(swaitINAV_No_PV, "No PV") -} -menu(swaitOOPT) { - choice(swaitOOPT_Every_Time, "Every Time") - choice(swaitOOPT_On_Change, "On Change") - choice(swaitOOPT_When_Zero, "When Zero") - choice(swaitOOPT_When_Non_zero, "When Non-zero") - choice(swaitOOPT_Transition_To_Zero, "Transition To Zero") - choice(swaitOOPT_Transition_To_Non_zero, "Transition To Non-zero") - choice(swaitOOPT_Never, "Never") -} -menu(scalcoutDOPT) { - choice(scalcoutDOPT_Use_VAL, "Use CALC") - choice(scalcoutDOPT_Use_OVAL, "Use OCAL") +menu(sseqSELM) { + choice(sseqSELM_All, "All") + choice(sseqSELM_Specified, "Specified") + choice(sseqSELM_Mask, "Mask") +} +menu(seqSELM) { + choice(seqSELM_All, "All") + choice(seqSELM_Specified, "Specified") + choice(seqSELM_Mask, "Mask") +} +menu(menuYesNo) { + choice(menuYesNoNO, "NO") + choice(menuYesNoYES, "YES") +} +menu(serialPRTY) { + choice(serialPRTY_unknown, "Unknown") + choice(serialPRTY_None, "None") + choice(serialPRTY_Even, "Even") + choice(serialPRTY_Odd, "Odd") +} +menu(serialMCTL) { + choice(serialMCTL_unknown, "Unknown") + choice(serialMCTL_CLOCAL, "CLOCAL") + choice(serialMCTL_Yes, "YES") +} +menu(asynTRACE) { + choice(asynTRACE_Off, "Off") + choice(asynTRACE_On, "On") +} +menu(gpibUCMD) { + choice(gpibUCMD_None, "None") + choice(gpibUCMD_Device_Clear__DCL_, "Device Clear (DCL)") + choice(gpibUCMD_Local_Lockout__LL0_, "Local Lockout (LL0)") + choice(gpibUCMD_Serial_Poll_Disable__SPD_, "Serial Poll Disable (SPD)") + choice(gpibUCMD_Serial_Poll_Enable__SPE_, "Serial Poll Enable (SPE)") + choice(gpibUCMD_Unlisten__UNL_, "Unlisten (UNL)") + choice(gpibUCMD_Untalk__UNT_, "Untalk (UNT)") +} +menu(compressALG) { + choice(compressALG_N_to_1_Low_Value, "N to 1 Low Value") + choice(compressALG_N_to_1_High_Value, "N to 1 High Value") + choice(compressALG_N_to_1_Average, "N to 1 Average") + choice(compressALG_Average, "Average") + choice(compressALG_Circular_Buffer, "Circular Buffer") + choice(compressALG_N_to_1_Median, "N to 1 Median") +} +menu(asynCONNECT) { + choice(asynCONNECT_Disconnect, "Disconnect") + choice(asynCONNECT_Connect, "Connect") +} +menu(ipDRTO) { + choice(ipDRTO_unknown, "Unknown") + choice(ipDRTO_No, "No") + choice(ipDRTO_Yes, "Yes") +} +menu(acalcoutOOPT) { + choice(acalcoutOOPT_Every_Time, "Every Time") + choice(acalcoutOOPT_On_Change, "On Change") + choice(acalcoutOOPT_When_Zero, "When Zero") + choice(acalcoutOOPT_When_Non_zero, "When Non-zero") + choice(acalcoutOOPT_Transition_To_Zero, "Transition To Zero") + choice(acalcoutOOPT_Transition_To_Non_zero, "Transition To Non-zero") + choice(acalcoutOOPT_Never, "Never") +} +menu(menuIvoa) { + choice(menuIvoaContinue_normally, "Continue normally") + choice(menuIvoaDon_t_drive_outputs, "Don't drive outputs") + choice(menuIvoaSet_output_to_IVOV, "Set output to IVOV") +} +menu(aSubEFLG) { + choice(aSubEFLG_NEVER, "NEVER") + choice(aSubEFLG_ON_CHANGE, "ON CHANGE") + choice(aSubEFLG_ALWAYS, "ALWAYS") } menu(gpibACMD) { choice(gpibACMD_None, "None") @@ -349,14 +333,23 @@ choice(gpibACMD_Take_Control__TCT_, "Take Control (TCT)") choice(gpibACMD_Serial_Poll, "Serial Poll") } -menu(dfanoutSELM) { - choice(dfanoutSELM_All, "All") - choice(dfanoutSELM_Specified, "Specified") - choice(dfanoutSELM_Mask, "Mask") -} -menu(asynTRACE) { - choice(asynTRACE_Off, "Off") - choice(asynTRACE_On, "On") +menu(menuPini) { + choice(menuPiniNO, "NO") + choice(menuPiniYES, "YES") + choice(menuPiniRUN, "RUN") + choice(menuPiniRUNNING, "RUNNING") + choice(menuPiniPAUSE, "PAUSE") + choice(menuPiniPAUSED, "PAUSED") +} +menu(scalcoutINAV) { + choice(scalcoutINAV_EXT_NC, "Ext PV NC") + choice(scalcoutINAV_EXT, "Ext PV OK") + choice(scalcoutINAV_LOC, "Local PV") + choice(scalcoutINAV_CON, "Constant") +} +menu(acalcoutSIZE) { + choice(acalcoutSIZE_NELM, "NELM") + choice(acalcoutSIZE_NUSE, "NUSE") } menu(acalcoutINAV) { choice(acalcoutINAV_EXT_NC, "Ext PV NC") @@ -364,46 +357,46 @@ choice(acalcoutINAV_LOC, "Local PV") choice(acalcoutINAV_CON, "Constant") } -menu(asynTMOD) { - choice(asynTMOD_Write_Read, "Write/Read") - choice(asynTMOD_Write, "Write") - choice(asynTMOD_Read, "Read") - choice(asynTMOD_Flush, "Flush") - choice(asynTMOD_NoIO, "NoI/O") -} -menu(scalcoutWAIT) { - choice(scalcoutWAIT_NoWait, "NoWait") - choice(scalcoutWAIT_Wait, "Wait") -} -menu(menuIvoa) { - choice(menuIvoaContinue_normally, "Continue normally") - choice(menuIvoaDon_t_drive_outputs, "Don't drive outputs") - choice(menuIvoaSet_output_to_IVOV, "Set output to IVOV") -} -menu(stringoutPOST) { - choice(stringoutPOST_OnChange, "On Change") - choice(stringoutPOST_Always, "Always") -} -menu(serialSBIT) { - choice(serialSBIT_unknown, "Unknown") - choice(serialSBIT_1, "1") - choice(serialSBIT_2, "2") +menu(selSELM) { + choice(selSELM_Specified, "Specified") + choice(selSELM_High_Signal, "High Signal") + choice(selSELM_Low_Signal, "Low Signal") + choice(selSELM_Median_Signal, "Median Signal") +} +menu(scalcoutDOPT) { + choice(scalcoutDOPT_Use_VAL, "Use CALC") + choice(scalcoutDOPT_Use_OVAL, "Use OCAL") +} +menu(aoOIF) { + choice(aoOIF_Full, "Full") + choice(aoOIF_Incremental, "Incremental") +} +menu(asynINTERFACE) { + choice(asynINTERFACE_OCTET, "asynOctet") + choice(asynINTERFACE_INT32, "asynInt32") + choice(asynINTERFACE_UINT32, "asynUInt32Digital") + choice(asynINTERFACE_FLOAT64, "asynFloat64") +} +menu(acalcoutINAP) { + choice(acalcoutINAP_No, "No PROC on Change") + choice(acalcoutINAP_Yes, "PROC on Change") +} +menu(aaiPOST) { + choice(aaiPOST_Always, "Always") + choice(aaiPOST_OnChange, "On Change") +} +menu(calcoutOOPT) { + choice(calcoutOOPT_Every_Time, "Every Time") + choice(calcoutOOPT_On_Change, "On Change") + choice(calcoutOOPT_When_Zero, "When Zero") + choice(calcoutOOPT_When_Non_zero, "When Non-zero") + choice(calcoutOOPT_Transition_To_Zero, "Transition To Zero") + choice(calcoutOOPT_Transition_To_Non_zero, "Transition To Non-zero") } menu(acalcoutWAIT) { choice(acalcoutWAIT_NoWait, "NoWait") choice(acalcoutWAIT_Wait, "Wait") } -menu(fanoutSELM) { - choice(fanoutSELM_All, "All") - choice(fanoutSELM_Specified, "Specified") - choice(fanoutSELM_Mask, "Mask") -} -menu(serialPRTY) { - choice(serialPRTY_unknown, "Unknown") - choice(serialPRTY_None, "None") - choice(serialPRTY_Even, "Even") - choice(serialPRTY_Odd, "Odd") -} menu(serialBAUD) { choice(serialBAUD_unknown, "Unknown") choice(serialBAUD_300, "300") @@ -422,17 +415,1949 @@ choice(serialBAUD_921600, "921600") choice(serialBAUD_1152000, "1152000") } -menu(asynEOMREASON) { - choice(asynEOMREASONNone, "None") - choice(asynEOMREASONCNT, "Count") - choice(asynEOMREASONEOS, "Eos") - choice(asynEOMREASONCNTEOS, "Count Eos") - choice(asynEOMREASONEND, "End") - choice(asynEOMREASONCNTEND, "Count End") - choice(asynEOMREASONEOSEND, "Eos End") - choice(asynEOMREASONCNTEOSEND, "Count Eos End") -} -recordtype(int64in) { +menu(swaitDOPT) { + choice(swaitDOPT_Use_VAL, "Use VAL") + choice(swaitDOPT_Use_DOL, "Use DOL") +} +menu(fanoutSELM) { + choice(fanoutSELM_All, "All") + choice(fanoutSELM_Specified, "Specified") + choice(fanoutSELM_Mask, "Mask") +} +menu(asynAUTOCONNECT) { + choice(asynAUTOCONNECT_noAutoConnect, "noAutoConnect") + choice(asynAUTOCONNECT_autoConnect, "autoConnect") +} +menu(menuOmsl) { + choice(menuOmslsupervisory, "supervisory") + choice(menuOmslclosed_loop, "closed_loop") +} +recordtype(busy) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + field(NAME, DBF_STRING) { + special(SPC_NOMOD) + prompt("Record Name") + size(61) + } + field(DESC, DBF_STRING) { + promptgroup("10 - Common") + prompt("Descriptor") + size(41) + } + field(ASG, DBF_STRING) { + prompt("Access Security Group") + size(29) + promptgroup("10 - Common") + special(SPC_AS) + } + field(SCAN, DBF_MENU) { + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + menu(menuScan) + prompt("Scan Mechanism") + } + field(PINI, DBF_MENU) { + promptgroup("20 - Scan") + interest(1) + menu(menuPini) + prompt("Process at iocInit") + } + field(PHAS, DBF_SHORT) { + special(SPC_SCAN) + interest(1) + promptgroup("20 - Scan") + prompt("Scan Phase") + } + field(EVNT, DBF_STRING) { + size(40) + prompt("Event Name") + special(SPC_SCAN) + interest(1) + promptgroup("20 - Scan") + } + field(TSE, DBF_SHORT) { + prompt("Time Stamp Event") + interest(1) + promptgroup("20 - Scan") + } + field(TSEL, DBF_INLINK) { + prompt("Time Stamp Link") + interest(1) + promptgroup("20 - Scan") + } + field(DTYP, DBF_DEVICE) { + prompt("Device Type") + interest(1) + promptgroup("10 - Common") + } + field(DISV, DBF_SHORT) { + promptgroup("20 - Scan") + prompt("Disable Value") + initial("1") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + prompt("Scanning Disable") + interest(1) + promptgroup("20 - Scan") + } + field(MLOK, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("epicsMutexId mlok") + prompt("Monitor lock") + } + field(MLIS, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("ELLLIST mlis") + prompt("Monitor List") + } + field(BKLNK, DBF_NOACCESS) { + prompt("Backwards link tracking") + extra("ELLLIST bklnk") + special(SPC_NOMOD) + interest(4) + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + interest(3) + pp(TRUE) + prompt("Force Processing") + } + field(STAT, DBF_MENU) { + special(SPC_NOMOD) + menu(menuAlarmStat) + initial("UDF") + prompt("Alarm Status") + } + field(SEVR, DBF_MENU) { + menu(menuAlarmSevr) + special(SPC_NOMOD) + prompt("Alarm Severity") + } + field(NSTA, DBF_MENU) { + prompt("New Alarm Status") + special(SPC_NOMOD) + interest(2) + menu(menuAlarmStat) + } + field(NSEV, DBF_MENU) { + interest(2) + menu(menuAlarmSevr) + special(SPC_NOMOD) + prompt("New Alarm Severity") + } + field(ACKS, DBF_MENU) { + prompt("Alarm Ack Severity") + special(SPC_NOMOD) + menu(menuAlarmSevr) + interest(2) + } + field(ACKT, DBF_MENU) { + initial("YES") + prompt("Alarm Ack Transient") + special(SPC_NOMOD) + interest(2) + menu(menuYesNo) + promptgroup("70 - Alarm") + } + field(DISS, DBF_MENU) { + prompt("Disable Alarm Sevrty") + interest(1) + menu(menuAlarmSevr) + promptgroup("70 - Alarm") + } + field(LCNT, DBF_UCHAR) { + prompt("Lock Count") + special(SPC_NOMOD) + interest(2) + } + field(PACT, DBF_UCHAR) { + prompt("Record active") + special(SPC_NOMOD) + interest(1) + } + field(PUTF, DBF_UCHAR) { + prompt("dbPutField process") + interest(1) + special(SPC_NOMOD) + } + field(RPRO, DBF_UCHAR) { + prompt("Reprocess ") + interest(1) + special(SPC_NOMOD) + } + field(ASP, DBF_NOACCESS) { + extra("struct asgMember *asp") + prompt("Access Security Pvt") + interest(4) + special(SPC_NOMOD) + } + field(PPN, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("pprocessNotify") + extra("struct processNotify *ppn") + } + field(PPNR, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("pprocessNotifyRecord") + extra("struct processNotifyRecord *ppnr") + } + field(SPVT, DBF_NOACCESS) { + extra("struct scan_element *spvt") + prompt("Scan Private") + interest(4) + special(SPC_NOMOD) + } + field(RSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct typed_rset *rset") + prompt("Address of RSET") + } + field(DSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("DSET address") + extra("struct dset *dset") + } + field(DPVT, DBF_NOACCESS) { + prompt("Device Private") + extra("void *dpvt") + interest(4) + special(SPC_NOMOD) + } + field(RDES, DBF_NOACCESS) { + extra("struct dbRecordType *rdes") + prompt("Address of dbRecordType") + special(SPC_NOMOD) + interest(4) + } + field(LSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct lockRecord *lset") + prompt("Lock Set") + } + field(PRIO, DBF_MENU) { + menu(menuPriority) + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + prompt("Scheduling Priority") + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(1) + prompt("Break Point") + extra("char bkpt") + } + field(UDF, DBF_UCHAR) { + prompt("Undefined") + initial("1") + pp(TRUE) + promptgroup("10 - Common") + interest(1) + } + field(UDFS, DBF_MENU) { + initial("INVALID") + prompt("Undefined Alarm Sevrty") + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + } + field(TIME, DBF_NOACCESS) { + prompt("Time") + extra("epicsTimeStamp time") + interest(2) + special(SPC_NOMOD) + } + field(FLNK, DBF_FWDLINK) { + promptgroup("20 - Scan") + interest(1) + prompt("Forward Process Link") + } + field(VAL, DBF_ENUM) { + pp(TRUE) + promptgroup("50 - Output") + asl(ASL0) + prompt("Current Value") + } + field(OMSL, DBF_MENU) { + prompt("Output Mode Select") + promptgroup("50 - Output") + menu(menuOmsl) + interest(1) + } + field(DOL, DBF_INLINK) { + prompt("Desired Output Loc") + promptgroup("50 - Output") + interest(1) + } + field(OUT, DBF_OUTLINK) { + prompt("Output Specification") + promptgroup("50 - Output") + interest(1) + } + field(HIGH, DBF_DOUBLE) { + prompt("Seconds to Hold High") + interest(1) + promptgroup("50 - Output") + } + field(ZNAM, DBF_STRING) { + pp(TRUE) + promptgroup("80 - Display") + interest(1) + prompt("Zero Name") + size(26) + initial("Done") + } + field(ONAM, DBF_STRING) { + promptgroup("80 - Display") + pp(TRUE) + interest(1) + prompt("One Name") + size(26) + initial("Busy") + } + field(RVAL, DBF_ULONG) { + prompt("Raw Value") + pp(TRUE) + } + field(ORAW, DBF_ULONG) { + special(SPC_NOMOD) + interest(3) + prompt("prev Raw Value") + } + field(OVAL, DBF_ULONG) { + special(SPC_NOMOD) + interest(3) + prompt("prev Value") + } + field(MASK, DBF_ULONG) { + interest(1) + special(SPC_NOMOD) + promptgroup("50 - Output") + prompt("Hardware Mask") + } + field(RPVT, DBF_NOACCESS) { + prompt("Record Private") + extra("void * rpvt") + special(SPC_NOMOD) + interest(4) + } + field(WDPT, DBF_NOACCESS) { + extra("void * wdpt") + prompt("Watch Dog Timer ID") + interest(4) + special(SPC_NOMOD) + } + field(ZSV, DBF_MENU) { + promptgroup("70 - Alarm") + pp(TRUE) + menu(menuAlarmSevr) + interest(1) + prompt("Zero Error Severity") + } + field(OSV, DBF_MENU) { + prompt("One Error Severity") + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + pp(TRUE) + } + field(COSV, DBF_MENU) { + pp(TRUE) + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + prompt("Change of State Sevr") + } + field(RBV, DBF_ULONG) { + prompt("Readback Value") + special(SPC_NOMOD) + } + field(ORBV, DBF_ULONG) { + prompt("Prev Readback Value") + interest(3) + special(SPC_NOMOD) + } + field(MLST, DBF_USHORT) { + prompt("Last Value Monitored") + special(SPC_NOMOD) + interest(3) + } + field(LALM, DBF_USHORT) { + special(SPC_NOMOD) + interest(3) + prompt("Last Value Alarmed") + } + field(SIOL, DBF_OUTLINK) { + prompt("Sim Output Specifctn") + interest(1) + promptgroup("40 - Input") + } + field(SIML, DBF_INLINK) { + prompt("Sim Mode Location") + interest(1) + promptgroup("40 - Input") + } + field(SIMM, DBF_MENU) { + prompt("Simulation Mode") + interest(1) + menu(menuYesNo) + } + field(SIMS, DBF_MENU) { + prompt("Sim mode Alarm Svrty") + menu(menuAlarmSevr) + interest(2) + promptgroup("40 - Input") + } + field(IVOA, DBF_MENU) { + prompt("INVALID outpt action") + promptgroup("50 - Output") + menu(menuIvoa) + interest(2) + } + field(IVOV, DBF_USHORT) { + interest(2) + promptgroup("50 - Output") + prompt("INVALID output value") + } +} +device(busy, CONSTANT, devBusySoft, "Soft Channel") +device(busy, CONSTANT, devBusySoftRaw, "Raw Soft Channel") +device(busy, INST_IO, asynBusyInt32, "asynInt32") +recordtype(compress) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + field(NAME, DBF_STRING) { + size(61) + prompt("Record Name") + special(SPC_NOMOD) + } + field(DESC, DBF_STRING) { + prompt("Descriptor") + size(41) + promptgroup("10 - Common") + } + field(ASG, DBF_STRING) { + promptgroup("10 - Common") + special(SPC_AS) + prompt("Access Security Group") + size(29) + } + field(SCAN, DBF_MENU) { + prompt("Scan Mechanism") + promptgroup("20 - Scan") + special(SPC_SCAN) + menu(menuScan) + interest(1) + } + field(PINI, DBF_MENU) { + prompt("Process at iocInit") + menu(menuPini) + interest(1) + promptgroup("20 - Scan") + } + field(PHAS, DBF_SHORT) { + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + prompt("Scan Phase") + } + field(EVNT, DBF_STRING) { + size(40) + prompt("Event Name") + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + } + field(TSE, DBF_SHORT) { + prompt("Time Stamp Event") + promptgroup("20 - Scan") + interest(1) + } + field(TSEL, DBF_INLINK) { + prompt("Time Stamp Link") + promptgroup("20 - Scan") + interest(1) + } + field(DTYP, DBF_DEVICE) { + interest(1) + promptgroup("10 - Common") + prompt("Device Type") + } + field(DISV, DBF_SHORT) { + prompt("Disable Value") + initial("1") + promptgroup("20 - Scan") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + prompt("Scanning Disable") + promptgroup("20 - Scan") + interest(1) + } + field(MLOK, DBF_NOACCESS) { + extra("epicsMutexId mlok") + prompt("Monitor lock") + interest(4) + special(SPC_NOMOD) + } + field(MLIS, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("ELLLIST mlis") + prompt("Monitor List") + } + field(BKLNK, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Backwards link tracking") + extra("ELLLIST bklnk") + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + interest(3) + pp(TRUE) + prompt("Force Processing") + } + field(STAT, DBF_MENU) { + special(SPC_NOMOD) + menu(menuAlarmStat) + initial("UDF") + prompt("Alarm Status") + } + field(SEVR, DBF_MENU) { + prompt("Alarm Severity") + special(SPC_NOMOD) + menu(menuAlarmSevr) + } + field(NSTA, DBF_MENU) { + special(SPC_NOMOD) + interest(2) + menu(menuAlarmStat) + prompt("New Alarm Status") + } + field(NSEV, DBF_MENU) { + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) + prompt("New Alarm Severity") + } + field(ACKS, DBF_MENU) { + prompt("Alarm Ack Severity") + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) + } + field(ACKT, DBF_MENU) { + prompt("Alarm Ack Transient") + initial("YES") + promptgroup("70 - Alarm") + special(SPC_NOMOD) + interest(2) + menu(menuYesNo) + } + field(DISS, DBF_MENU) { + prompt("Disable Alarm Sevrty") + interest(1) + menu(menuAlarmSevr) + promptgroup("70 - Alarm") + } + field(LCNT, DBF_UCHAR) { + interest(2) + special(SPC_NOMOD) + prompt("Lock Count") + } + field(PACT, DBF_UCHAR) { + prompt("Record active") + interest(1) + special(SPC_NOMOD) + } + field(PUTF, DBF_UCHAR) { + prompt("dbPutField process") + interest(1) + special(SPC_NOMOD) + } + field(RPRO, DBF_UCHAR) { + prompt("Reprocess ") + interest(1) + special(SPC_NOMOD) + } + field(ASP, DBF_NOACCESS) { + extra("struct asgMember *asp") + prompt("Access Security Pvt") + special(SPC_NOMOD) + interest(4) + } + field(PPN, DBF_NOACCESS) { + extra("struct processNotify *ppn") + prompt("pprocessNotify") + interest(4) + special(SPC_NOMOD) + } + field(PPNR, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("pprocessNotifyRecord") + extra("struct processNotifyRecord *ppnr") + } + field(SPVT, DBF_NOACCESS) { + extra("struct scan_element *spvt") + prompt("Scan Private") + interest(4) + special(SPC_NOMOD) + } + field(RSET, DBF_NOACCESS) { + prompt("Address of RSET") + extra("struct typed_rset *rset") + special(SPC_NOMOD) + interest(4) + } + field(DSET, DBF_NOACCESS) { + extra("struct dset *dset") + prompt("DSET address") + interest(4) + special(SPC_NOMOD) + } + field(DPVT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("void *dpvt") + prompt("Device Private") + } + field(RDES, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Address of dbRecordType") + extra("struct dbRecordType *rdes") + } + field(LSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct lockRecord *lset") + prompt("Lock Set") + } + field(PRIO, DBF_MENU) { + interest(1) + menu(menuPriority) + special(SPC_SCAN) + promptgroup("20 - Scan") + prompt("Scheduling Priority") + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + extra("char bkpt") + prompt("Break Point") + special(SPC_NOMOD) + interest(1) + } + field(UDF, DBF_UCHAR) { + promptgroup("10 - Common") + pp(TRUE) + interest(1) + prompt("Undefined") + initial("1") + } + field(UDFS, DBF_MENU) { + initial("INVALID") + prompt("Undefined Alarm Sevrty") + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + } + field(TIME, DBF_NOACCESS) { + interest(2) + special(SPC_NOMOD) + prompt("Time") + extra("epicsTimeStamp time") + } + field(FLNK, DBF_FWDLINK) { + prompt("Forward Process Link") + promptgroup("20 - Scan") + interest(1) + } + field(VAL, DBF_NOACCESS) { + prompt("Value") + extra("void * val") + asl(ASL0) + pp(TRUE) + special(SPC_DBADDR) + } + field(INP, DBF_INLINK) { + interest(1) + promptgroup("40 - Input") + prompt("Input Specification") + } + field(RES, DBF_SHORT) { + prompt("Reset") + asl(ASL0) + interest(3) + special(SPC_RESET) + } + field(ALG, DBF_MENU) { + promptgroup("30 - Action") + menu(compressALG) + interest(1) + special(SPC_RESET) + prompt("Compression Algorithm") + } + field(BALG, DBF_MENU) { + prompt("Buffering Algorithm") + promptgroup("30 - Action") + special(SPC_RESET) + interest(1) + menu(bufferingALG) + } + field(NSAM, DBF_ULONG) { + prompt("Number of Values") + initial("1") + promptgroup("30 - Action") + special(SPC_NOMOD) + interest(1) + } + field(N, DBF_ULONG) { + initial("1") + prompt("N to 1 Compression") + special(SPC_RESET) + interest(1) + promptgroup("30 - Action") + } + field(IHIL, DBF_DOUBLE) { + promptgroup("30 - Action") + interest(1) + prompt("Init High Interest Lim") + } + field(ILIL, DBF_DOUBLE) { + prompt("Init Low Interest Lim") + promptgroup("30 - Action") + interest(1) + } + field(HOPR, DBF_DOUBLE) { + prompt("High Operating Range") + promptgroup("80 - Display") + prop(YES) + interest(1) + } + field(LOPR, DBF_DOUBLE) { + prompt("Low Operating Range") + interest(1) + prop(YES) + promptgroup("80 - Display") + } + field(PREC, DBF_SHORT) { + prompt("Display Precision") + promptgroup("80 - Display") + interest(1) + prop(YES) + } + field(EGU, DBF_STRING) { + promptgroup("80 - Display") + prop(YES) + interest(1) + prompt("Engineering Units") + size(16) + } + field(OFF, DBF_ULONG) { + special(SPC_NOMOD) + prompt("Offset") + } + field(NUSE, DBF_ULONG) { + special(SPC_NOMOD) + prompt("Number Used") + } + field(OUSE, DBF_ULONG) { + special(SPC_NOMOD) + prompt("Old Number Used") + } + field(BPTR, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("double *bptr") + prompt("Buffer Pointer") + } + field(SPTR, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("double *sptr") + prompt("Summing Buffer Ptr") + } + field(WPTR, DBF_NOACCESS) { + extra("double *wptr") + prompt("Working Buffer Ptr") + interest(4) + special(SPC_NOMOD) + } + field(INPN, DBF_LONG) { + prompt("Number of elements in Working Buffer") + interest(4) + special(SPC_NOMOD) + } + field(CVB, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Compress Value Buffer") + } + field(INX, DBF_ULONG) { + prompt("Compressed Array Inx") + interest(3) + special(SPC_NOMOD) + } +} +recordtype(sub) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + %struct subRecord; + %typedef long (*SUBFUNCPTR)(struct subRecord *); + field(NAME, DBF_STRING) { + special(SPC_NOMOD) + size(61) + prompt("Record Name") + } + field(DESC, DBF_STRING) { + prompt("Descriptor") + size(41) + promptgroup("10 - Common") + } + field(ASG, DBF_STRING) { + special(SPC_AS) + promptgroup("10 - Common") + size(29) + prompt("Access Security Group") + } + field(SCAN, DBF_MENU) { + promptgroup("20 - Scan") + interest(1) + menu(menuScan) + special(SPC_SCAN) + prompt("Scan Mechanism") + } + field(PINI, DBF_MENU) { + interest(1) + menu(menuPini) + promptgroup("20 - Scan") + prompt("Process at iocInit") + } + field(PHAS, DBF_SHORT) { + promptgroup("20 - Scan") + interest(1) + special(SPC_SCAN) + prompt("Scan Phase") + } + field(EVNT, DBF_STRING) { + promptgroup("20 - Scan") + interest(1) + special(SPC_SCAN) + prompt("Event Name") + size(40) + } + field(TSE, DBF_SHORT) { + prompt("Time Stamp Event") + interest(1) + promptgroup("20 - Scan") + } + field(TSEL, DBF_INLINK) { + promptgroup("20 - Scan") + interest(1) + prompt("Time Stamp Link") + } + field(DTYP, DBF_DEVICE) { + prompt("Device Type") + interest(1) + promptgroup("10 - Common") + } + field(DISV, DBF_SHORT) { + promptgroup("20 - Scan") + initial("1") + prompt("Disable Value") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + prompt("Scanning Disable") + promptgroup("20 - Scan") + interest(1) + } + field(MLOK, DBF_NOACCESS) { + prompt("Monitor lock") + extra("epicsMutexId mlok") + interest(4) + special(SPC_NOMOD) + } + field(MLIS, DBF_NOACCESS) { + extra("ELLLIST mlis") + prompt("Monitor List") + interest(4) + special(SPC_NOMOD) + } + field(BKLNK, DBF_NOACCESS) { + prompt("Backwards link tracking") + extra("ELLLIST bklnk") + special(SPC_NOMOD) + interest(4) + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + interest(3) + pp(TRUE) + prompt("Force Processing") + } + field(STAT, DBF_MENU) { + special(SPC_NOMOD) + menu(menuAlarmStat) + prompt("Alarm Status") + initial("UDF") + } + field(SEVR, DBF_MENU) { + special(SPC_NOMOD) + menu(menuAlarmSevr) + prompt("Alarm Severity") + } + field(NSTA, DBF_MENU) { + interest(2) + menu(menuAlarmStat) + special(SPC_NOMOD) + prompt("New Alarm Status") + } + field(NSEV, DBF_MENU) { + interest(2) + menu(menuAlarmSevr) + special(SPC_NOMOD) + prompt("New Alarm Severity") + } + field(ACKS, DBF_MENU) { + prompt("Alarm Ack Severity") + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) + } + field(ACKT, DBF_MENU) { + interest(2) + menu(menuYesNo) + special(SPC_NOMOD) + promptgroup("70 - Alarm") + initial("YES") + prompt("Alarm Ack Transient") + } + field(DISS, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + prompt("Disable Alarm Sevrty") + } + field(LCNT, DBF_UCHAR) { + prompt("Lock Count") + special(SPC_NOMOD) + interest(2) + } + field(PACT, DBF_UCHAR) { + prompt("Record active") + interest(1) + special(SPC_NOMOD) + } + field(PUTF, DBF_UCHAR) { + prompt("dbPutField process") + interest(1) + special(SPC_NOMOD) + } + field(RPRO, DBF_UCHAR) { + prompt("Reprocess ") + interest(1) + special(SPC_NOMOD) + } + field(ASP, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Access Security Pvt") + extra("struct asgMember *asp") + } + field(PPN, DBF_NOACCESS) { + extra("struct processNotify *ppn") + prompt("pprocessNotify") + special(SPC_NOMOD) + interest(4) + } + field(PPNR, DBF_NOACCESS) { + extra("struct processNotifyRecord *ppnr") + prompt("pprocessNotifyRecord") + special(SPC_NOMOD) + interest(4) + } + field(SPVT, DBF_NOACCESS) { + prompt("Scan Private") + extra("struct scan_element *spvt") + special(SPC_NOMOD) + interest(4) + } + field(RSET, DBF_NOACCESS) { + extra("struct typed_rset *rset") + prompt("Address of RSET") + interest(4) + special(SPC_NOMOD) + } + field(DSET, DBF_NOACCESS) { + extra("struct dset *dset") + prompt("DSET address") + special(SPC_NOMOD) + interest(4) + } + field(DPVT, DBF_NOACCESS) { + prompt("Device Private") + extra("void *dpvt") + special(SPC_NOMOD) + interest(4) + } + field(RDES, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct dbRecordType *rdes") + prompt("Address of dbRecordType") + } + field(LSET, DBF_NOACCESS) { + prompt("Lock Set") + extra("struct lockRecord *lset") + interest(4) + special(SPC_NOMOD) + } + field(PRIO, DBF_MENU) { + interest(1) + menu(menuPriority) + special(SPC_SCAN) + promptgroup("20 - Scan") + prompt("Scheduling Priority") + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(1) + prompt("Break Point") + extra("char bkpt") + } + field(UDF, DBF_UCHAR) { + pp(TRUE) + promptgroup("10 - Common") + interest(1) + prompt("Undefined") + initial("1") + } + field(UDFS, DBF_MENU) { + prompt("Undefined Alarm Sevrty") + initial("INVALID") + promptgroup("70 - Alarm") + interest(1) + menu(menuAlarmSevr) + } + field(TIME, DBF_NOACCESS) { + prompt("Time") + extra("epicsTimeStamp time") + special(SPC_NOMOD) + interest(2) + } + field(FLNK, DBF_FWDLINK) { + interest(1) + promptgroup("20 - Scan") + prompt("Forward Process Link") + } + field(VAL, DBF_DOUBLE) { + prompt("Result") + asl(ASL0) + pp(TRUE) + } + field(INAM, DBF_STRING) { + special(SPC_NOMOD) + interest(1) + promptgroup("30 - Action") + size(40) + prompt("Init Routine Name") + } + field(SNAM, DBF_STRING) { + size(40) + prompt("Subroutine Name") + special(SPC_MOD) + interest(1) + promptgroup("30 - Action") + } + field(SADR, DBF_NOACCESS) { + extra("SUBFUNCPTR sadr") + prompt("Subroutine Address") + interest(4) + special(SPC_NOMOD) + } + field(INPA, DBF_INLINK) { + prompt("Input A") + interest(1) + promptgroup("41 - Input A-F") + } + field(INPB, DBF_INLINK) { + promptgroup("41 - Input A-F") + interest(1) + prompt("Input B") + } + field(INPC, DBF_INLINK) { + prompt("Input C") + interest(1) + promptgroup("41 - Input A-F") + } + field(INPD, DBF_INLINK) { + promptgroup("41 - Input A-F") + interest(1) + prompt("Input D") + } + field(INPE, DBF_INLINK) { + prompt("Input E") + promptgroup("41 - Input A-F") + interest(1) + } + field(INPF, DBF_INLINK) { + interest(1) + promptgroup("41 - Input A-F") + prompt("Input F") + } + field(INPG, DBF_INLINK) { + promptgroup("42 - Input G-L") + interest(1) + prompt("Input G") + } + field(INPH, DBF_INLINK) { + prompt("Input H") + interest(1) + promptgroup("42 - Input G-L") + } + field(INPI, DBF_INLINK) { + prompt("Input I") + interest(1) + promptgroup("42 - Input G-L") + } + field(INPJ, DBF_INLINK) { + interest(1) + promptgroup("42 - Input G-L") + prompt("Input J") + } + field(INPK, DBF_INLINK) { + interest(1) + promptgroup("42 - Input G-L") + prompt("Input K") + } + field(INPL, DBF_INLINK) { + prompt("Input L") + interest(1) + promptgroup("42 - Input G-L") + } + field(EGU, DBF_STRING) { + prompt("Engineering Units") + size(16) + promptgroup("80 - Display") + prop(YES) + interest(1) + } + field(HOPR, DBF_DOUBLE) { + prop(YES) + interest(1) + promptgroup("80 - Display") + prompt("High Operating Range") + } + field(LOPR, DBF_DOUBLE) { + prompt("Low Operating Range") + prop(YES) + interest(1) + promptgroup("80 - Display") + } + field(HIHI, DBF_DOUBLE) { + promptgroup("70 - Alarm") + pp(TRUE) + interest(1) + prop(YES) + prompt("Hihi Alarm Limit") + } + field(LOLO, DBF_DOUBLE) { + prompt("Lolo Alarm Limit") + prop(YES) + interest(1) + promptgroup("70 - Alarm") + pp(TRUE) + } + field(HIGH, DBF_DOUBLE) { + prompt("High Alarm Limit") + pp(TRUE) + promptgroup("70 - Alarm") + interest(1) + prop(YES) + } + field(LOW, DBF_DOUBLE) { + interest(1) + prop(YES) + promptgroup("70 - Alarm") + pp(TRUE) + prompt("Low Alarm Limit") + } + field(PREC, DBF_SHORT) { + promptgroup("80 - Display") + interest(1) + prop(YES) + prompt("Display Precision") + } + field(BRSV, DBF_MENU) { + promptgroup("70 - Alarm") + pp(TRUE) + interest(1) + menu(menuAlarmSevr) + prompt("Bad Return Severity") + } + field(HHSV, DBF_MENU) { + prompt("Hihi Severity") + promptgroup("70 - Alarm") + pp(TRUE) + menu(menuAlarmSevr) + interest(1) + prop(YES) + } + field(LLSV, DBF_MENU) { + promptgroup("70 - Alarm") + pp(TRUE) + interest(1) + menu(menuAlarmSevr) + prop(YES) + prompt("Lolo Severity") + } + field(HSV, DBF_MENU) { + prompt("High Severity") + interest(1) + menu(menuAlarmSevr) + prop(YES) + promptgroup("70 - Alarm") + pp(TRUE) + } + field(LSV, DBF_MENU) { + menu(menuAlarmSevr) + prop(YES) + interest(1) + pp(TRUE) + promptgroup("70 - Alarm") + prompt("Low Severity") + } + field(HYST, DBF_DOUBLE) { + prompt("Alarm Deadband") + interest(1) + promptgroup("70 - Alarm") + } + field(ADEL, DBF_DOUBLE) { + prompt("Archive Deadband") + promptgroup("80 - Display") + interest(1) + } + field(MDEL, DBF_DOUBLE) { + promptgroup("80 - Display") + interest(1) + prompt("Monitor Deadband") + } + field(A, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input A") + } + field(B, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input B") + } + field(C, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input C") + } + field(D, DBF_DOUBLE) { + prompt("Value of Input D") + pp(TRUE) + } + field(E, DBF_DOUBLE) { + prompt("Value of Input E") + pp(TRUE) + } + field(F, DBF_DOUBLE) { + prompt("Value of Input F") + pp(TRUE) + } + field(G, DBF_DOUBLE) { + prompt("Value of Input G") + pp(TRUE) + } + field(H, DBF_DOUBLE) { + prompt("Value of Input H") + pp(TRUE) + } + field(I, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input I") + } + field(J, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input J") + } + field(K, DBF_DOUBLE) { + prompt("Value of Input K") + pp(TRUE) + } + field(L, DBF_DOUBLE) { + prompt("Value of Input L") + pp(TRUE) + } + field(LA, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Value of A") + } + field(LB, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of B") + } + field(LC, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of C") + } + field(LD, DBF_DOUBLE) { + prompt("Prev Value of D") + special(SPC_NOMOD) + interest(3) + } + field(LE, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of E") + } + field(LF, DBF_DOUBLE) { + prompt("Prev Value of F") + interest(3) + special(SPC_NOMOD) + } + field(LG, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of G") + } + field(LH, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of H") + } + field(LI, DBF_DOUBLE) { + prompt("Prev Value of I") + interest(3) + special(SPC_NOMOD) + } + field(LJ, DBF_DOUBLE) { + prompt("Prev Value of J") + interest(3) + special(SPC_NOMOD) + } + field(LK, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Value of K") + } + field(LL, DBF_DOUBLE) { + prompt("Prev Value of L") + interest(3) + special(SPC_NOMOD) + } + field(LALM, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Last Value Alarmed") + } + field(ALST, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Last Value Archived") + } + field(MLST, DBF_DOUBLE) { + prompt("Last Value Monitored") + interest(3) + special(SPC_NOMOD) + } +} +recordtype(ai) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + %#include "callback.h" + field(NAME, DBF_STRING) { + special(SPC_NOMOD) + size(61) + prompt("Record Name") + } + field(DESC, DBF_STRING) { + size(41) + prompt("Descriptor") + promptgroup("10 - Common") + } + field(ASG, DBF_STRING) { + promptgroup("10 - Common") + special(SPC_AS) + prompt("Access Security Group") + size(29) + } + field(SCAN, DBF_MENU) { + menu(menuScan) + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + prompt("Scan Mechanism") + } + field(PINI, DBF_MENU) { + promptgroup("20 - Scan") + menu(menuPini) + interest(1) + prompt("Process at iocInit") + } + field(PHAS, DBF_SHORT) { + prompt("Scan Phase") + special(SPC_SCAN) + interest(1) + promptgroup("20 - Scan") + } + field(EVNT, DBF_STRING) { + prompt("Event Name") + size(40) + promptgroup("20 - Scan") + interest(1) + special(SPC_SCAN) + } + field(TSE, DBF_SHORT) { + prompt("Time Stamp Event") + promptgroup("20 - Scan") + interest(1) + } + field(TSEL, DBF_INLINK) { + promptgroup("20 - Scan") + interest(1) + prompt("Time Stamp Link") + } + field(DTYP, DBF_DEVICE) { + prompt("Device Type") + interest(1) + promptgroup("10 - Common") + } + field(DISV, DBF_SHORT) { + promptgroup("20 - Scan") + initial("1") + prompt("Disable Value") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + prompt("Scanning Disable") + promptgroup("20 - Scan") + interest(1) + } + field(MLOK, DBF_NOACCESS) { + extra("epicsMutexId mlok") + prompt("Monitor lock") + interest(4) + special(SPC_NOMOD) + } + field(MLIS, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("ELLLIST mlis") + prompt("Monitor List") + } + field(BKLNK, DBF_NOACCESS) { + prompt("Backwards link tracking") + extra("ELLLIST bklnk") + interest(4) + special(SPC_NOMOD) + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + prompt("Force Processing") + pp(TRUE) + interest(3) + } + field(STAT, DBF_MENU) { + prompt("Alarm Status") + initial("UDF") + special(SPC_NOMOD) + menu(menuAlarmStat) + } + field(SEVR, DBF_MENU) { + menu(menuAlarmSevr) + special(SPC_NOMOD) + prompt("Alarm Severity") + } + field(NSTA, DBF_MENU) { + prompt("New Alarm Status") + special(SPC_NOMOD) + menu(menuAlarmStat) + interest(2) + } + field(NSEV, DBF_MENU) { + prompt("New Alarm Severity") + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) + } + field(ACKS, DBF_MENU) { + menu(menuAlarmSevr) + interest(2) + special(SPC_NOMOD) + prompt("Alarm Ack Severity") + } + field(ACKT, DBF_MENU) { + special(SPC_NOMOD) + menu(menuYesNo) + interest(2) + promptgroup("70 - Alarm") + initial("YES") + prompt("Alarm Ack Transient") + } + field(DISS, DBF_MENU) { + prompt("Disable Alarm Sevrty") + interest(1) + menu(menuAlarmSevr) + promptgroup("70 - Alarm") + } + field(LCNT, DBF_UCHAR) { + special(SPC_NOMOD) + interest(2) + prompt("Lock Count") + } + field(PACT, DBF_UCHAR) { + special(SPC_NOMOD) + interest(1) + prompt("Record active") + } + field(PUTF, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("dbPutField process") + } + field(RPRO, DBF_UCHAR) { + special(SPC_NOMOD) + interest(1) + prompt("Reprocess ") + } + field(ASP, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct asgMember *asp") + prompt("Access Security Pvt") + } + field(PPN, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("pprocessNotify") + extra("struct processNotify *ppn") + } + field(PPNR, DBF_NOACCESS) { + prompt("pprocessNotifyRecord") + extra("struct processNotifyRecord *ppnr") + special(SPC_NOMOD) + interest(4) + } + field(SPVT, DBF_NOACCESS) { + prompt("Scan Private") + extra("struct scan_element *spvt") + interest(4) + special(SPC_NOMOD) + } + field(RSET, DBF_NOACCESS) { + prompt("Address of RSET") + extra("struct typed_rset *rset") + interest(4) + special(SPC_NOMOD) + } + field(DSET, DBF_NOACCESS) { + extra("struct dset *dset") + prompt("DSET address") + interest(4) + special(SPC_NOMOD) + } + field(DPVT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("void *dpvt") + prompt("Device Private") + } + field(RDES, DBF_NOACCESS) { + prompt("Address of dbRecordType") + extra("struct dbRecordType *rdes") + special(SPC_NOMOD) + interest(4) + } + field(LSET, DBF_NOACCESS) { + prompt("Lock Set") + extra("struct lockRecord *lset") + special(SPC_NOMOD) + interest(4) + } + field(PRIO, DBF_MENU) { + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + menu(menuPriority) + prompt("Scheduling Priority") + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + extra("char bkpt") + prompt("Break Point") + special(SPC_NOMOD) + interest(1) + } + field(UDF, DBF_UCHAR) { + prompt("Undefined") + initial("1") + pp(TRUE) + promptgroup("10 - Common") + interest(1) + } + field(UDFS, DBF_MENU) { + interest(1) + menu(menuAlarmSevr) + promptgroup("70 - Alarm") + initial("INVALID") + prompt("Undefined Alarm Sevrty") + } + field(TIME, DBF_NOACCESS) { + interest(2) + special(SPC_NOMOD) + prompt("Time") + extra("epicsTimeStamp time") + } + field(FLNK, DBF_FWDLINK) { + prompt("Forward Process Link") + interest(1) + promptgroup("20 - Scan") + } + field(VAL, DBF_DOUBLE) { + asl(ASL0) + prompt("Current EGU Value") + pp(TRUE) + promptgroup("40 - Input") + } + field(INP, DBF_INLINK) { + prompt("Input Specification") + interest(1) + promptgroup("40 - Input") + } + field(PREC, DBF_SHORT) { + promptgroup("80 - Display") + prop(YES) + interest(1) + prompt("Display Precision") + } + field(LINR, DBF_MENU) { + prompt("Linearization") + special(SPC_LINCONV) + menu(menuConvert) + interest(1) + promptgroup("60 - Convert") + pp(TRUE) + } + field(EGUF, DBF_DOUBLE) { + prompt("Engineer Units Full") + special(SPC_LINCONV) + interest(1) + pp(TRUE) + promptgroup("60 - Convert") + } + field(EGUL, DBF_DOUBLE) { + special(SPC_LINCONV) + interest(1) + promptgroup("60 - Convert") + pp(TRUE) + prompt("Engineer Units Low") + } + field(EGU, DBF_STRING) { + promptgroup("80 - Display") + prop(YES) + interest(1) + prompt("Engineering Units") + size(16) + } + field(HOPR, DBF_DOUBLE) { + prompt("High Operating Range") + promptgroup("80 - Display") + interest(1) + prop(YES) + } + field(LOPR, DBF_DOUBLE) { + prompt("Low Operating Range") + interest(1) + prop(YES) + promptgroup("80 - Display") + } + field(AOFF, DBF_DOUBLE) { + prompt("Adjustment Offset") + interest(1) + promptgroup("60 - Convert") + pp(TRUE) + } + field(ASLO, DBF_DOUBLE) { + interest(1) + pp(TRUE) + promptgroup("60 - Convert") + initial("1") + prompt("Adjustment Slope") + } + field(SMOO, DBF_DOUBLE) { + promptgroup("60 - Convert") + interest(1) + prompt("Smoothing") + } + field(HIHI, DBF_DOUBLE) { + prompt("Hihi Alarm Limit") + pp(TRUE) + promptgroup("70 - Alarm") + interest(1) + prop(YES) + } + field(LOLO, DBF_DOUBLE) { + prompt("Lolo Alarm Limit") + pp(TRUE) + promptgroup("70 - Alarm") + prop(YES) + interest(1) + } + field(HIGH, DBF_DOUBLE) { + promptgroup("70 - Alarm") + pp(TRUE) + interest(1) + prop(YES) + prompt("High Alarm Limit") + } + field(LOW, DBF_DOUBLE) { + prompt("Low Alarm Limit") + interest(1) + prop(YES) + pp(TRUE) + promptgroup("70 - Alarm") + } + field(HHSV, DBF_MENU) { + interest(1) + menu(menuAlarmSevr) + prop(YES) + pp(TRUE) + promptgroup("70 - Alarm") + prompt("Hihi Severity") + } + field(LLSV, DBF_MENU) { + pp(TRUE) + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + prop(YES) + interest(1) + prompt("Lolo Severity") + } + field(HSV, DBF_MENU) { + pp(TRUE) + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + prop(YES) + prompt("High Severity") + } + field(LSV, DBF_MENU) { + pp(TRUE) + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + prop(YES) + prompt("Low Severity") + } + field(HYST, DBF_DOUBLE) { + interest(1) + promptgroup("70 - Alarm") + prompt("Alarm Deadband") + } + field(AFTC, DBF_DOUBLE) { + prompt("Alarm Filter Time Constant") + promptgroup("70 - Alarm") + interest(1) + } + field(ADEL, DBF_DOUBLE) { + interest(1) + promptgroup("80 - Display") + prompt("Archive Deadband") + } + field(MDEL, DBF_DOUBLE) { + prompt("Monitor Deadband") + interest(1) + promptgroup("80 - Display") + } + field(LALM, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Last Value Alarmed") + } + field(AFVL, DBF_DOUBLE) { + prompt("Alarm Filter Value") + interest(3) + special(SPC_NOMOD) + } + field(ALST, DBF_DOUBLE) { + prompt("Last Value Archived") + special(SPC_NOMOD) + interest(3) + } + field(MLST, DBF_DOUBLE) { + prompt("Last Val Monitored") + special(SPC_NOMOD) + interest(3) + } + field(ESLO, DBF_DOUBLE) { + initial("1") + prompt("Raw to EGU Slope") + interest(2) + promptgroup("60 - Convert") + pp(TRUE) + } + field(EOFF, DBF_DOUBLE) { + prompt("Raw to EGU Offset") + pp(TRUE) + promptgroup("60 - Convert") + interest(2) + } + field(ROFF, DBF_ULONG) { + interest(2) + pp(TRUE) + prompt("Raw Offset") + } + field(PBRK, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("void * pbrk") + prompt("Ptrto brkTable") + } + field(INIT, DBF_SHORT) { + prompt("Initialized?") + special(SPC_NOMOD) + interest(3) + } + field(LBRK, DBF_SHORT) { + prompt("LastBreak Point") + special(SPC_NOMOD) + interest(3) + } + field(RVAL, DBF_LONG) { + pp(TRUE) + prompt("Current Raw Value") + } + field(ORAW, DBF_LONG) { + interest(3) + special(SPC_NOMOD) + prompt("Previous Raw Value") + } + field(SIOL, DBF_INLINK) { + prompt("Simulation Input Link") + promptgroup("90 - Simulate") + interest(1) + } + field(SVAL, DBF_DOUBLE) { + prompt("Simulation Value") + } + field(SIML, DBF_INLINK) { + prompt("Simulation Mode Link") + interest(1) + promptgroup("90 - Simulate") + } + field(SIMM, DBF_MENU) { + special(SPC_MOD) + interest(1) + menu(menuSimm) + prompt("Simulation Mode") + } + field(SIMS, DBF_MENU) { + prompt("Simulation Mode Severity") + interest(2) + menu(menuAlarmSevr) + promptgroup("90 - Simulate") + } + field(OLDSIMM, DBF_MENU) { + prompt("Prev. Simulation Mode") + special(SPC_NOMOD) + menu(menuSimm) + interest(4) + } + field(SSCN, DBF_MENU) { + menu(menuScan) + interest(1) + promptgroup("90 - Simulate") + initial("65535") + prompt("Sim. Mode Scan") + } + field(SDLY, DBF_DOUBLE) { + promptgroup("90 - Simulate") + interest(2) + prompt("Sim. Mode Async Delay") + initial("-1.0") + } + field(SIMPVT, DBF_NOACCESS) { + extra("CALLBACK *simpvt") + prompt("Sim. Mode Private") + interest(4) + special(SPC_NOMOD) + } +} +device(ai, CONSTANT, devAiSoft, "Soft Channel") +device(ai, CONSTANT, devAiSoftRaw, "Raw Soft Channel") +device(ai, CONSTANT, devAiSoftCallback, "Async Soft Channel") +device(ai, INST_IO, devTimestampAI, "Soft Timestamp") +device(ai, INST_IO, devAiGeneralTime, "General Time") +device(ai, INST_IO, asynAiInt32, "asynInt32") +device(ai, INST_IO, asynAiInt32Average, "asynInt32Average") +device(ai, INST_IO, asynAiFloat64, "asynFloat64") +device(ai, INST_IO, asynAiFloat64Average, "asynFloat64Average") +device(ai, INST_IO, devaiStream, "stream") +device(ai, INST_IO, devAiStrParm, "asyn ai stringParm") +device(ai, INST_IO, devAiHeidND261, "asyn ai HeidND261") +device(ai, INST_IO, devAiMKS, "HPS SensaVac 937") +device(ai, INST_IO, devAiMPC, "asyn MPC") +device(ai, GPIB_IO, devAiGP307Gpib, "Vg307 GPIB Instrument") +device(ai, BBGPIB_IO, devAiAX301, "PZT Bug") +device(ai, INST_IO, devAiTelevac, "asyn Televac") +device(ai, INST_IO, devAiTPG261, "asyn TPG261") +recordtype(bi) { %#include "epicsTypes.h" %#include "link.h" %#include "epicsMutex.h" @@ -441,32 +2366,1824 @@ %#include "callback.h" field(NAME, DBF_STRING) { size(61) - special(SPC_NOMOD) prompt("Record Name") + special(SPC_NOMOD) + } + field(DESC, DBF_STRING) { + size(41) + prompt("Descriptor") + promptgroup("10 - Common") + } + field(ASG, DBF_STRING) { + promptgroup("10 - Common") + special(SPC_AS) + prompt("Access Security Group") + size(29) + } + field(SCAN, DBF_MENU) { + prompt("Scan Mechanism") + promptgroup("20 - Scan") + menu(menuScan) + interest(1) + special(SPC_SCAN) + } + field(PINI, DBF_MENU) { + prompt("Process at iocInit") + interest(1) + menu(menuPini) + promptgroup("20 - Scan") + } + field(PHAS, DBF_SHORT) { + prompt("Scan Phase") + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + } + field(EVNT, DBF_STRING) { + prompt("Event Name") + size(40) + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + } + field(TSE, DBF_SHORT) { + prompt("Time Stamp Event") + interest(1) + promptgroup("20 - Scan") + } + field(TSEL, DBF_INLINK) { + interest(1) + promptgroup("20 - Scan") + prompt("Time Stamp Link") + } + field(DTYP, DBF_DEVICE) { + promptgroup("10 - Common") + interest(1) + prompt("Device Type") + } + field(DISV, DBF_SHORT) { + prompt("Disable Value") + initial("1") + promptgroup("20 - Scan") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + prompt("Scanning Disable") + promptgroup("20 - Scan") + interest(1) + } + field(MLOK, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Monitor lock") + extra("epicsMutexId mlok") + } + field(MLIS, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Monitor List") + extra("ELLLIST mlis") + } + field(BKLNK, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Backwards link tracking") + extra("ELLLIST bklnk") + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + pp(TRUE) + interest(3) + prompt("Force Processing") + } + field(STAT, DBF_MENU) { + initial("UDF") + prompt("Alarm Status") + special(SPC_NOMOD) + menu(menuAlarmStat) + } + field(SEVR, DBF_MENU) { + prompt("Alarm Severity") + menu(menuAlarmSevr) + special(SPC_NOMOD) + } + field(NSTA, DBF_MENU) { + prompt("New Alarm Status") + special(SPC_NOMOD) + interest(2) + menu(menuAlarmStat) + } + field(NSEV, DBF_MENU) { + prompt("New Alarm Severity") + menu(menuAlarmSevr) + interest(2) + special(SPC_NOMOD) + } + field(ACKS, DBF_MENU) { + prompt("Alarm Ack Severity") + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) + } + field(ACKT, DBF_MENU) { + prompt("Alarm Ack Transient") + initial("YES") + promptgroup("70 - Alarm") + special(SPC_NOMOD) + interest(2) + menu(menuYesNo) + } + field(DISS, DBF_MENU) { + prompt("Disable Alarm Sevrty") + promptgroup("70 - Alarm") + interest(1) + menu(menuAlarmSevr) + } + field(LCNT, DBF_UCHAR) { + prompt("Lock Count") + interest(2) + special(SPC_NOMOD) + } + field(PACT, DBF_UCHAR) { + prompt("Record active") + special(SPC_NOMOD) + interest(1) + } + field(PUTF, DBF_UCHAR) { + prompt("dbPutField process") + interest(1) + special(SPC_NOMOD) + } + field(RPRO, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("Reprocess ") + } + field(ASP, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct asgMember *asp") + prompt("Access Security Pvt") + } + field(PPN, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct processNotify *ppn") + prompt("pprocessNotify") + } + field(PPNR, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("pprocessNotifyRecord") + extra("struct processNotifyRecord *ppnr") + } + field(SPVT, DBF_NOACCESS) { + extra("struct scan_element *spvt") + prompt("Scan Private") + special(SPC_NOMOD) + interest(4) + } + field(RSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct typed_rset *rset") + prompt("Address of RSET") + } + field(DSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("DSET address") + extra("struct dset *dset") + } + field(DPVT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Device Private") + extra("void *dpvt") + } + field(RDES, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Address of dbRecordType") + extra("struct dbRecordType *rdes") + } + field(LSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct lockRecord *lset") + prompt("Lock Set") + } + field(PRIO, DBF_MENU) { + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + menu(menuPriority) + prompt("Scheduling Priority") + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + interest(1) + special(SPC_NOMOD) + prompt("Break Point") + extra("char bkpt") + } + field(UDF, DBF_UCHAR) { + interest(1) + pp(TRUE) + promptgroup("10 - Common") + initial("1") + prompt("Undefined") + } + field(UDFS, DBF_MENU) { + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + prompt("Undefined Alarm Sevrty") + initial("INVALID") + } + field(TIME, DBF_NOACCESS) { + interest(2) + special(SPC_NOMOD) + extra("epicsTimeStamp time") + prompt("Time") + } + field(FLNK, DBF_FWDLINK) { + prompt("Forward Process Link") + interest(1) + promptgroup("20 - Scan") + } + field(INP, DBF_INLINK) { + interest(1) + promptgroup("40 - Input") + prompt("Input Specification") + } + field(VAL, DBF_ENUM) { + prompt("Current Value") + asl(ASL0) + pp(TRUE) + promptgroup("40 - Input") + } + field(ZSV, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + pp(TRUE) + prompt("Zero Error Severity") + } + field(OSV, DBF_MENU) { + interest(1) + menu(menuAlarmSevr) + promptgroup("70 - Alarm") + pp(TRUE) + prompt("One Error Severity") + } + field(COSV, DBF_MENU) { + prompt("Change of State Svr") + pp(TRUE) + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + } + field(ZNAM, DBF_STRING) { + prompt("Zero Name") + size(26) + pp(TRUE) + promptgroup("80 - Display") + interest(1) + prop(YES) + } + field(ONAM, DBF_STRING) { + promptgroup("80 - Display") + pp(TRUE) + interest(1) + prop(YES) + prompt("One Name") + size(26) + } + field(RVAL, DBF_ULONG) { + prompt("Raw Value") + pp(TRUE) + } + field(ORAW, DBF_ULONG) { + interest(3) + special(SPC_NOMOD) + prompt("prev Raw Value") + } + field(MASK, DBF_ULONG) { + prompt("Hardware Mask") + special(SPC_NOMOD) + interest(1) + } + field(LALM, DBF_USHORT) { + interest(3) + special(SPC_NOMOD) + prompt("Last Value Alarmed") + } + field(MLST, DBF_USHORT) { + interest(3) + special(SPC_NOMOD) + prompt("Last Value Monitored") + } + field(SIOL, DBF_INLINK) { + prompt("Simulation Input Link") + promptgroup("90 - Simulate") + interest(1) + } + field(SVAL, DBF_ULONG) { + prompt("Simulation Value") + } + field(SIML, DBF_INLINK) { + promptgroup("90 - Simulate") + interest(1) + prompt("Simulation Mode Link") + } + field(SIMM, DBF_MENU) { + prompt("Simulation Mode") + special(SPC_MOD) + menu(menuSimm) + interest(1) + } + field(SIMS, DBF_MENU) { + menu(menuAlarmSevr) + interest(2) + promptgroup("90 - Simulate") + prompt("Simulation Mode Severity") + } + field(OLDSIMM, DBF_MENU) { + prompt("Prev. Simulation Mode") + menu(menuSimm) + interest(4) + special(SPC_NOMOD) + } + field(SSCN, DBF_MENU) { + prompt("Sim. Mode Scan") + initial("65535") + promptgroup("90 - Simulate") + menu(menuScan) + interest(1) + } + field(SDLY, DBF_DOUBLE) { + promptgroup("90 - Simulate") + interest(2) + prompt("Sim. Mode Async Delay") + initial("-1.0") + } + field(SIMPVT, DBF_NOACCESS) { + extra("CALLBACK *simpvt") + prompt("Sim. Mode Private") + interest(4) + special(SPC_NOMOD) + } +} +device(bi, CONSTANT, devBiSoft, "Soft Channel") +device(bi, CONSTANT, devBiSoftRaw, "Raw Soft Channel") +device(bi, CONSTANT, devBiSoftCallback, "Async Soft Channel") +device(bi, INST_IO, devBiDbState, "Db State") +device(bi, INST_IO, asynBiInt32, "asynInt32") +device(bi, INST_IO, asynBiUInt32Digital, "asynUInt32Digital") +device(bi, INST_IO, devbiStream, "stream") +device(bi, INST_IO, devBiStrParm, "asyn bi stringParm") +device(bi, INST_IO, devBiMPC, "asyn MPC") +device(bi, GPIB_IO, devBiGP307Gpib, "Vg307 GPIB Instrument") +device(bi, INST_IO, devBiTelevac, "asyn Televac") +device(bi, INST_IO, devBiTPG261, "asyn TPG261") +recordtype(scalcout) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + field(NAME, DBF_STRING) { + size(61) + prompt("Record Name") + special(SPC_NOMOD) } field(DESC, DBF_STRING) { - size(41) - promptgroup("10 - Common") + prompt("Descriptor") + size(41) + promptgroup("10 - Common") + } + field(ASG, DBF_STRING) { + promptgroup("10 - Common") + special(SPC_AS) + prompt("Access Security Group") + size(29) + } + field(SCAN, DBF_MENU) { + prompt("Scan Mechanism") + special(SPC_SCAN) + interest(1) + menu(menuScan) + promptgroup("20 - Scan") + } + field(PINI, DBF_MENU) { + menu(menuPini) + interest(1) + promptgroup("20 - Scan") + prompt("Process at iocInit") + } + field(PHAS, DBF_SHORT) { + special(SPC_SCAN) + interest(1) + promptgroup("20 - Scan") + prompt("Scan Phase") + } + field(EVNT, DBF_STRING) { + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + size(40) + prompt("Event Name") + } + field(TSE, DBF_SHORT) { + prompt("Time Stamp Event") + interest(1) + promptgroup("20 - Scan") + } + field(TSEL, DBF_INLINK) { + promptgroup("20 - Scan") + interest(1) + prompt("Time Stamp Link") + } + field(DTYP, DBF_DEVICE) { + prompt("Device Type") + promptgroup("10 - Common") + interest(1) + } + field(DISV, DBF_SHORT) { + promptgroup("20 - Scan") + prompt("Disable Value") + initial("1") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + prompt("Scanning Disable") + interest(1) + promptgroup("20 - Scan") + } + field(MLOK, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Monitor lock") + extra("epicsMutexId mlok") + } + field(MLIS, DBF_NOACCESS) { + prompt("Monitor List") + extra("ELLLIST mlis") + special(SPC_NOMOD) + interest(4) + } + field(BKLNK, DBF_NOACCESS) { + prompt("Backwards link tracking") + extra("ELLLIST bklnk") + special(SPC_NOMOD) + interest(4) + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + prompt("Force Processing") + interest(3) + pp(TRUE) + } + field(STAT, DBF_MENU) { + menu(menuAlarmStat) + special(SPC_NOMOD) + prompt("Alarm Status") + initial("UDF") + } + field(SEVR, DBF_MENU) { + prompt("Alarm Severity") + special(SPC_NOMOD) + menu(menuAlarmSevr) + } + field(NSTA, DBF_MENU) { + prompt("New Alarm Status") + menu(menuAlarmStat) + interest(2) + special(SPC_NOMOD) + } + field(NSEV, DBF_MENU) { + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) + prompt("New Alarm Severity") + } + field(ACKS, DBF_MENU) { + special(SPC_NOMOD) + menu(menuAlarmSevr) + interest(2) + prompt("Alarm Ack Severity") + } + field(ACKT, DBF_MENU) { + promptgroup("70 - Alarm") + special(SPC_NOMOD) + interest(2) + menu(menuYesNo) + prompt("Alarm Ack Transient") + initial("YES") + } + field(DISS, DBF_MENU) { + prompt("Disable Alarm Sevrty") + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + } + field(LCNT, DBF_UCHAR) { + prompt("Lock Count") + interest(2) + special(SPC_NOMOD) + } + field(PACT, DBF_UCHAR) { + prompt("Record active") + interest(1) + special(SPC_NOMOD) + } + field(PUTF, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("dbPutField process") + } + field(RPRO, DBF_UCHAR) { + prompt("Reprocess ") + special(SPC_NOMOD) + interest(1) + } + field(ASP, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct asgMember *asp") + prompt("Access Security Pvt") + } + field(PPN, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct processNotify *ppn") + prompt("pprocessNotify") + } + field(PPNR, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("pprocessNotifyRecord") + extra("struct processNotifyRecord *ppnr") + } + field(SPVT, DBF_NOACCESS) { + extra("struct scan_element *spvt") + prompt("Scan Private") + interest(4) + special(SPC_NOMOD) + } + field(RSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Address of RSET") + extra("struct typed_rset *rset") + } + field(DSET, DBF_NOACCESS) { + prompt("DSET address") + extra("struct dset *dset") + interest(4) + special(SPC_NOMOD) + } + field(DPVT, DBF_NOACCESS) { + prompt("Device Private") + extra("void *dpvt") + interest(4) + special(SPC_NOMOD) + } + field(RDES, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct dbRecordType *rdes") + prompt("Address of dbRecordType") + } + field(LSET, DBF_NOACCESS) { + prompt("Lock Set") + extra("struct lockRecord *lset") + special(SPC_NOMOD) + interest(4) + } + field(PRIO, DBF_MENU) { + promptgroup("20 - Scan") + special(SPC_SCAN) + menu(menuPriority) + interest(1) + prompt("Scheduling Priority") + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + extra("char bkpt") + prompt("Break Point") + special(SPC_NOMOD) + interest(1) + } + field(UDF, DBF_UCHAR) { + interest(1) + promptgroup("10 - Common") + pp(TRUE) + initial("1") + prompt("Undefined") + } + field(UDFS, DBF_MENU) { + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + prompt("Undefined Alarm Sevrty") + initial("INVALID") + } + field(TIME, DBF_NOACCESS) { + interest(2) + special(SPC_NOMOD) + extra("epicsTimeStamp time") + prompt("Time") + } + field(FLNK, DBF_FWDLINK) { + prompt("Forward Process Link") + promptgroup("20 - Scan") + interest(1) + } + field(VERS, DBF_DOUBLE) { + initial("1") + prompt("Code Version") + special(SPC_NOMOD) + } + field(RPVT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("void *rpvt") + size(4) + prompt("Record Private") + } + field(VAL, DBF_DOUBLE) { + prompt("Result") + asl(ASL0) + } + field(SVAL, DBF_STRING) { + prompt("String result") + size(40) + asl(ASL0) + } + field(PVAL, DBF_DOUBLE) { + prompt("Previous Value") + } + field(PSVL, DBF_STRING) { + size(40) + prompt("Previous string result") + special(SPC_NOMOD) + } + field(CALC, DBF_STRING) { + pp(TRUE) + promptgroup("30 - Action") + special(SPC_MOD) + prompt("Calculation") + size(80) + } + field(CLCV, DBF_LONG) { + interest(1) + prompt("CALC Valid") + } + field(INPA, DBF_INLINK) { + prompt("Input A") + promptgroup("30 - Action") + interest(1) + special(SPC_MOD) + } + field(INPB, DBF_INLINK) { + promptgroup("30 - Action") + interest(1) + special(SPC_MOD) + prompt("Input B") + } + field(INPC, DBF_INLINK) { + prompt("Input C") + special(SPC_MOD) + interest(1) + promptgroup("30 - Action") + } + field(INPD, DBF_INLINK) { + promptgroup("30 - Action") + special(SPC_MOD) + interest(1) + prompt("Input D") + } + field(INPE, DBF_INLINK) { + promptgroup("30 - Action") + special(SPC_MOD) + interest(1) + prompt("Input E") + } + field(INPF, DBF_INLINK) { + special(SPC_MOD) + interest(1) + promptgroup("30 - Action") + prompt("Input F") + } + field(INPG, DBF_INLINK) { + promptgroup("30 - Action") + special(SPC_MOD) + interest(1) + prompt("Input G") + } + field(INPH, DBF_INLINK) { + promptgroup("30 - Action") + interest(1) + special(SPC_MOD) + prompt("Input H") + } + field(INPI, DBF_INLINK) { + prompt("Input I") + interest(1) + special(SPC_MOD) + promptgroup("30 - Action") + } + field(INPJ, DBF_INLINK) { + promptgroup("30 - Action") + special(SPC_MOD) + interest(1) + prompt("Input J") + } + field(INPK, DBF_INLINK) { + prompt("Input K") + promptgroup("30 - Action") + special(SPC_MOD) + interest(1) + } + field(INPL, DBF_INLINK) { + prompt("Input L") + promptgroup("30 - Action") + special(SPC_MOD) + interest(1) + } + field(INAA, DBF_INLINK) { + promptgroup("30 - Action") + special(SPC_MOD) + interest(1) + prompt("String input AA") + } + field(INBB, DBF_INLINK) { + prompt("String input BB") + promptgroup("30 - Action") + special(SPC_MOD) + interest(1) + } + field(INCC, DBF_INLINK) { + promptgroup("30 - Action") + special(SPC_MOD) + interest(1) + prompt("String input CC") + } + field(INDD, DBF_INLINK) { + prompt("String input DD") + promptgroup("30 - Action") + interest(1) + special(SPC_MOD) + } + field(INEE, DBF_INLINK) { + promptgroup("30 - Action") + special(SPC_MOD) + interest(1) + prompt("String input EE") + } + field(INFF, DBF_INLINK) { + special(SPC_MOD) + interest(1) + promptgroup("30 - Action") + prompt("String input FF") + } + field(INGG, DBF_INLINK) { + promptgroup("30 - Action") + interest(1) + special(SPC_MOD) + prompt("String input GG") + } + field(INHH, DBF_INLINK) { + promptgroup("30 - Action") + interest(1) + special(SPC_MOD) + prompt("String input HH") + } + field(INII, DBF_INLINK) { + prompt("String input II") + promptgroup("30 - Action") + interest(1) + special(SPC_MOD) + } + field(INJJ, DBF_INLINK) { + prompt("String input JJ") + interest(1) + special(SPC_MOD) + promptgroup("30 - Action") + } + field(INKK, DBF_INLINK) { + interest(1) + special(SPC_MOD) + promptgroup("30 - Action") + prompt("String input KK") + } + field(INLL, DBF_INLINK) { + promptgroup("30 - Action") + special(SPC_MOD) + interest(1) + prompt("String input LL") + } + field(OUT, DBF_OUTLINK) { + prompt("Output Link") + special(SPC_MOD) + interest(1) + promptgroup("50 - Output") + } + field(INAV, DBF_MENU) { + special(SPC_NOMOD) + interest(1) + menu(scalcoutINAV) + initial("1") + prompt("INPA PV Status") + } + field(INBV, DBF_MENU) { + prompt("INPB PV Status") + initial("1") + menu(scalcoutINAV) + interest(1) + special(SPC_NOMOD) + } + field(INCV, DBF_MENU) { + special(SPC_NOMOD) + menu(scalcoutINAV) + interest(1) + prompt("INPC PV Status") + initial("1") + } + field(INDV, DBF_MENU) { + special(SPC_NOMOD) + menu(scalcoutINAV) + interest(1) + initial("1") + prompt("INPD PV Status") + } + field(INEV, DBF_MENU) { + prompt("INPE PV Status") + initial("1") + interest(1) + menu(scalcoutINAV) + special(SPC_NOMOD) + } + field(INFV, DBF_MENU) { + menu(scalcoutINAV) + interest(1) + special(SPC_NOMOD) + initial("1") + prompt("INPF PV Status") + } + field(INGV, DBF_MENU) { + initial("1") + prompt("INPG PV Status") + interest(1) + menu(scalcoutINAV) + special(SPC_NOMOD) + } + field(INHV, DBF_MENU) { + prompt("INPH PV Status") + initial("1") + interest(1) + menu(scalcoutINAV) + special(SPC_NOMOD) + } + field(INIV, DBF_MENU) { + interest(1) + menu(scalcoutINAV) + special(SPC_NOMOD) + initial("1") + prompt("INPI PV Status") + } + field(INJV, DBF_MENU) { + initial("1") + prompt("INPJ PV Status") + special(SPC_NOMOD) + menu(scalcoutINAV) + interest(1) + } + field(INKV, DBF_MENU) { + interest(1) + menu(scalcoutINAV) + special(SPC_NOMOD) + initial("1") + prompt("INPK PV Status") + } + field(INLV, DBF_MENU) { + interest(1) + menu(scalcoutINAV) + special(SPC_NOMOD) + prompt("INPL PV Status") + initial("1") + } + field(IAAV, DBF_MENU) { + interest(1) + menu(scalcoutINAV) + special(SPC_NOMOD) + initial("1") + prompt("INAA PV Status") + } + field(IBBV, DBF_MENU) { + initial("1") + prompt("INBB PV Status") + special(SPC_NOMOD) + menu(scalcoutINAV) + interest(1) + } + field(ICCV, DBF_MENU) { + initial("1") + prompt("INCC PV Status") + special(SPC_NOMOD) + interest(1) + menu(scalcoutINAV) + } + field(IDDV, DBF_MENU) { + special(SPC_NOMOD) + interest(1) + menu(scalcoutINAV) + initial("1") + prompt("INDD PV Status") + } + field(IEEV, DBF_MENU) { + special(SPC_NOMOD) + interest(1) + menu(scalcoutINAV) + initial("1") + prompt("INEE PV Status") + } + field(IFFV, DBF_MENU) { + interest(1) + menu(scalcoutINAV) + special(SPC_NOMOD) + prompt("INFF PV Status") + initial("1") + } + field(IGGV, DBF_MENU) { + initial("1") + prompt("INGG PV Status") + menu(scalcoutINAV) + interest(1) + special(SPC_NOMOD) + } + field(IHHV, DBF_MENU) { + interest(1) + menu(scalcoutINAV) + special(SPC_NOMOD) + initial("1") + prompt("INHH PV Status") + } + field(IIIV, DBF_MENU) { + interest(1) + menu(scalcoutINAV) + special(SPC_NOMOD) + initial("1") + prompt("INII PV Status") + } + field(IJJV, DBF_MENU) { + special(SPC_NOMOD) + menu(scalcoutINAV) + interest(1) + initial("1") + prompt("INJJ PV Status") + } + field(IKKV, DBF_MENU) { + special(SPC_NOMOD) + menu(scalcoutINAV) + interest(1) + initial("1") + prompt("INKK PV Status") + } + field(ILLV, DBF_MENU) { + interest(1) + menu(scalcoutINAV) + special(SPC_NOMOD) + prompt("INLL PV Status") + initial("1") + } + field(OUTV, DBF_MENU) { + menu(scalcoutINAV) + interest(1) + special(SPC_NOMOD) + prompt("OUT PV Status") + } + field(OOPT, DBF_MENU) { + menu(scalcoutOOPT) + interest(1) + promptgroup("30 - Action") + prompt("Output Execute Opt") + } + field(ODLY, DBF_DOUBLE) { + promptgroup("70 - Alarm") + interest(1) + prompt("Output Execute Delay") + asl(ASL0) + } + field(WAIT, DBF_MENU) { + interest(1) + menu(scalcoutWAIT) + prompt("Wait for completion?") + } + field(DLYA, DBF_USHORT) { + prompt("Output Delay Active") + asl(ASL0) + special(SPC_NOMOD) + } + field(DOPT, DBF_MENU) { + menu(scalcoutDOPT) + interest(1) + promptgroup("30 - Action") + prompt("Output Data Opt") + } + field(OCAL, DBF_STRING) { + promptgroup("30 - Action") + pp(TRUE) + special(SPC_MOD) + prompt("Output Calculation") + size(80) + } + field(OCLV, DBF_LONG) { + prompt("OCAL Valid") + interest(1) + } + field(OEVT, DBF_USHORT) { + prompt("Event To Issue") + asl(ASL0) + promptgroup("30 - Action") + } + field(IVOA, DBF_MENU) { + promptgroup("50 - Output") + menu(menuIvoa) + interest(2) + prompt("INVALID output action") + } + field(IVOV, DBF_DOUBLE) { + prompt("INVALID output value") + interest(2) + promptgroup("50 - Output") + } + field(EGU, DBF_STRING) { + promptgroup("80 - Display") + interest(1) + prompt("Units Name") + size(16) + } + field(PREC, DBF_SHORT) { + prompt("Display Precision") + promptgroup("80 - Display") + interest(1) + } + field(HOPR, DBF_DOUBLE) { + prompt("High Operating Rng") + interest(1) + promptgroup("80 - Display") + } + field(LOPR, DBF_DOUBLE) { + interest(1) + promptgroup("80 - Display") + prompt("Low Operating Range") + } + field(HIHI, DBF_DOUBLE) { + promptgroup("70 - Alarm") + pp(TRUE) + interest(1) + prompt("Hihi Alarm Limit") + } + field(LOLO, DBF_DOUBLE) { + promptgroup("70 - Alarm") + pp(TRUE) + interest(1) + prompt("Lolo Alarm Limit") + } + field(HIGH, DBF_DOUBLE) { + prompt("High Alarm Limit") + interest(1) + promptgroup("70 - Alarm") + pp(TRUE) + } + field(LOW, DBF_DOUBLE) { + promptgroup("70 - Alarm") + pp(TRUE) + interest(1) + prompt("Low Alarm Limit") + } + field(HHSV, DBF_MENU) { + prompt("Hihi Severity") + menu(menuAlarmSevr) + interest(1) + pp(TRUE) + promptgroup("70 - Alarm") + } + field(LLSV, DBF_MENU) { + prompt("Lolo Severity") + pp(TRUE) + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + } + field(HSV, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + pp(TRUE) + prompt("High Severity") + } + field(LSV, DBF_MENU) { + promptgroup("70 - Alarm") + pp(TRUE) + interest(1) + menu(menuAlarmSevr) + prompt("Low Severity") + } + field(HYST, DBF_DOUBLE) { + prompt("Alarm Deadband") + promptgroup("70 - Alarm") + interest(1) + } + field(ADEL, DBF_DOUBLE) { + prompt("Archive Deadband") + promptgroup("80 - Display") + interest(1) + } + field(MDEL, DBF_DOUBLE) { + interest(1) + promptgroup("80 - Display") + prompt("Monitor Deadband") + } + field(A, DBF_DOUBLE) { + prompt("Value of Input A") + promptgroup("10 - Common") + pp(TRUE) + } + field(B, DBF_DOUBLE) { + prompt("Value of Input B") + promptgroup("10 - Common") + pp(TRUE) + } + field(C, DBF_DOUBLE) { + prompt("Value of Input C") + pp(TRUE) + promptgroup("10 - Common") + } + field(D, DBF_DOUBLE) { + prompt("Value of Input D") + promptgroup("10 - Common") + pp(TRUE) + } + field(E, DBF_DOUBLE) { + prompt("Value of Input E") + pp(TRUE) + promptgroup("10 - Common") + } + field(F, DBF_DOUBLE) { + prompt("Value of Input F") + promptgroup("10 - Common") + pp(TRUE) + } + field(G, DBF_DOUBLE) { + prompt("Value of Input G") + promptgroup("10 - Common") + pp(TRUE) + } + field(H, DBF_DOUBLE) { + pp(TRUE) + promptgroup("10 - Common") + prompt("Value of Input H") + } + field(I, DBF_DOUBLE) { + pp(TRUE) + promptgroup("10 - Common") + prompt("Value of Input I") + } + field(J, DBF_DOUBLE) { + promptgroup("10 - Common") + pp(TRUE) + prompt("Value of Input J") + } + field(K, DBF_DOUBLE) { + pp(TRUE) + promptgroup("10 - Common") + prompt("Value of Input K") + } + field(L, DBF_DOUBLE) { + prompt("Value of Input L") + promptgroup("10 - Common") + pp(TRUE) + } + field(STRS, DBF_NOACCESS) { + interest(4) + prompt("Array of string pointers") + extra("char **strs") + size(4) + } + field(AA, DBF_STRING) { + promptgroup("10 - Common") + pp(TRUE) + interest(4) + prompt("Value of string input AA") + size(40) + } + field(BB, DBF_STRING) { + size(40) + prompt("Value of string input BB") + interest(4) + pp(TRUE) + promptgroup("10 - Common") + } + field(CC, DBF_STRING) { + pp(TRUE) + promptgroup("10 - Common") + interest(4) + prompt("Value of string input CC") + size(40) + } + field(DD, DBF_STRING) { + interest(4) + promptgroup("10 - Common") + pp(TRUE) + size(40) + prompt("Value of string input DD") + } + field(EE, DBF_STRING) { + promptgroup("10 - Common") + pp(TRUE) + interest(4) + prompt("Value of string input EE") + size(40) + } + field(FF, DBF_STRING) { + prompt("Value of string input FF") + size(40) + promptgroup("10 - Common") + pp(TRUE) + interest(4) + } + field(GG, DBF_STRING) { + interest(4) + promptgroup("10 - Common") + pp(TRUE) + size(40) + prompt("Value of string input GG") + } + field(HH, DBF_STRING) { + size(40) + prompt("Value of string input HH") + interest(4) + pp(TRUE) + promptgroup("10 - Common") + } + field(II, DBF_STRING) { + prompt("Value of string input II") + size(40) + pp(TRUE) + promptgroup("10 - Common") + interest(4) + } + field(JJ, DBF_STRING) { + prompt("Value of string input JJ") + size(40) + promptgroup("10 - Common") + pp(TRUE) + interest(4) + } + field(KK, DBF_STRING) { + size(40) + prompt("Value of string input KK") + interest(4) + promptgroup("10 - Common") + pp(TRUE) + } + field(LL, DBF_STRING) { + prompt("Value of string input LL") + size(40) + promptgroup("10 - Common") + pp(TRUE) + interest(4) + } + field(PAA, DBF_NOACCESS) { + interest(4) + special(SPC_DBADDR) + prompt("Prev Value of AA") + size(4) + extra("char *paa") + } + field(PBB, DBF_NOACCESS) { + extra("char *pbb") + size(4) + prompt("Prev Value of BB") + interest(4) + special(SPC_DBADDR) + } + field(PCC, DBF_NOACCESS) { + interest(4) + special(SPC_DBADDR) + size(4) + extra("char *pcc") + prompt("Prev Value of CC") + } + field(PDD, DBF_NOACCESS) { + interest(4) + special(SPC_DBADDR) + size(4) + extra("char *pdd") + prompt("Prev Value of DD") + } + field(PEE, DBF_NOACCESS) { + size(4) + extra("char *pee") + prompt("Prev Value of EE") + special(SPC_DBADDR) + interest(4) + } + field(PFF, DBF_NOACCESS) { + special(SPC_DBADDR) + interest(4) + prompt("Prev Value of FF") + extra("char *pff") + size(4) + } + field(PGG, DBF_NOACCESS) { + interest(4) + special(SPC_DBADDR) + prompt("Prev Value of GG") + size(4) + extra("char *pgg") + } + field(PHH, DBF_NOACCESS) { + interest(4) + special(SPC_DBADDR) + extra("char *phh") + size(4) + prompt("Prev Value of HH") + } + field(PII, DBF_NOACCESS) { + interest(4) + special(SPC_DBADDR) + size(4) + extra("char *pii") + prompt("Prev Value of II") + } + field(PJJ, DBF_NOACCESS) { + prompt("Prev Value of JJ") + extra("char *pjj") + size(4) + special(SPC_DBADDR) + interest(4) + } + field(PKK, DBF_NOACCESS) { + prompt("Prev Value of KK") + extra("char *pkk") + size(4) + interest(4) + special(SPC_DBADDR) + } + field(PLL, DBF_NOACCESS) { + special(SPC_DBADDR) + interest(4) + extra("char *pll") + size(4) + prompt("Prev Value of LL") + } + field(OVAL, DBF_DOUBLE) { + asl(ASL0) + prompt("Output Value") + } + field(OSV, DBF_STRING) { + prompt("Output string value") + asl(ASL0) + size(40) + } + field(POSV, DBF_STRING) { + special(SPC_NOMOD) + prompt("Previous output string value") + size(40) + } + field(PA, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Value of A") + } + field(PB, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of B") + } + field(PC, DBF_DOUBLE) { + prompt("Prev Value of C") + interest(3) + special(SPC_NOMOD) + } + field(PD, DBF_DOUBLE) { + prompt("Prev Value of D") + interest(3) + special(SPC_NOMOD) + } + field(PE, DBF_DOUBLE) { + prompt("Prev Value of E") + special(SPC_NOMOD) + interest(3) + } + field(PF, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Value of F") + } + field(PG, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of G") + } + field(PH, DBF_DOUBLE) { + prompt("Prev Value of H") + special(SPC_NOMOD) + interest(3) + } + field(PI, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of I") + } + field(PJ, DBF_DOUBLE) { + prompt("Prev Value of J") + special(SPC_NOMOD) + interest(3) + } + field(PK, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of K") + } + field(PL, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of L") + } + field(POVL, DBF_DOUBLE) { + prompt("Prev Value of OVAL") + asl(ASL0) + } + field(LALM, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Last Value Alarmed") + } + field(ALST, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Last Value Archived") + } + field(MLST, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Last Val Monitored") + } + field(RPCL, DBF_NOACCESS) { + extra("unsigned char rpcl[282]") + prompt("Postfix Calc") + special(SPC_NOMOD) + interest(4) + } + field(ORPC, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Postfix OCalc") + extra("unsigned char orpc[282]") + } +} +device(scalcout, CONSTANT, devsCalcoutSoft, "Soft Channel") +device(scalcout, INST_IO, devscalcoutStream, "stream") +recordtype(permissive) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + field(NAME, DBF_STRING) { + prompt("Record Name") + size(61) + special(SPC_NOMOD) + } + field(DESC, DBF_STRING) { + promptgroup("10 - Common") + prompt("Descriptor") + size(41) + } + field(ASG, DBF_STRING) { + promptgroup("10 - Common") + special(SPC_AS) + prompt("Access Security Group") + size(29) + } + field(SCAN, DBF_MENU) { + special(SPC_SCAN) + menu(menuScan) + interest(1) + promptgroup("20 - Scan") + prompt("Scan Mechanism") + } + field(PINI, DBF_MENU) { + menu(menuPini) + interest(1) + promptgroup("20 - Scan") + prompt("Process at iocInit") + } + field(PHAS, DBF_SHORT) { + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + prompt("Scan Phase") + } + field(EVNT, DBF_STRING) { + size(40) + prompt("Event Name") + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + } + field(TSE, DBF_SHORT) { + promptgroup("20 - Scan") + interest(1) + prompt("Time Stamp Event") + } + field(TSEL, DBF_INLINK) { + prompt("Time Stamp Link") + promptgroup("20 - Scan") + interest(1) + } + field(DTYP, DBF_DEVICE) { + interest(1) + promptgroup("10 - Common") + prompt("Device Type") + } + field(DISV, DBF_SHORT) { + prompt("Disable Value") + initial("1") + promptgroup("20 - Scan") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + prompt("Scanning Disable") + interest(1) + promptgroup("20 - Scan") + } + field(MLOK, DBF_NOACCESS) { + prompt("Monitor lock") + extra("epicsMutexId mlok") + interest(4) + special(SPC_NOMOD) + } + field(MLIS, DBF_NOACCESS) { + extra("ELLLIST mlis") + prompt("Monitor List") + interest(4) + special(SPC_NOMOD) + } + field(BKLNK, DBF_NOACCESS) { + extra("ELLLIST bklnk") + prompt("Backwards link tracking") + special(SPC_NOMOD) + interest(4) + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + prompt("Force Processing") + interest(3) + pp(TRUE) + } + field(STAT, DBF_MENU) { + initial("UDF") + prompt("Alarm Status") + special(SPC_NOMOD) + menu(menuAlarmStat) + } + field(SEVR, DBF_MENU) { + prompt("Alarm Severity") + menu(menuAlarmSevr) + special(SPC_NOMOD) + } + field(NSTA, DBF_MENU) { + menu(menuAlarmStat) + interest(2) + special(SPC_NOMOD) + prompt("New Alarm Status") + } + field(NSEV, DBF_MENU) { + prompt("New Alarm Severity") + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) + } + field(ACKS, DBF_MENU) { + special(SPC_NOMOD) + menu(menuAlarmSevr) + interest(2) + prompt("Alarm Ack Severity") + } + field(ACKT, DBF_MENU) { + initial("YES") + prompt("Alarm Ack Transient") + special(SPC_NOMOD) + menu(menuYesNo) + interest(2) + promptgroup("70 - Alarm") + } + field(DISS, DBF_MENU) { + promptgroup("70 - Alarm") + interest(1) + menu(menuAlarmSevr) + prompt("Disable Alarm Sevrty") + } + field(LCNT, DBF_UCHAR) { + prompt("Lock Count") + special(SPC_NOMOD) + interest(2) + } + field(PACT, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("Record active") + } + field(PUTF, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("dbPutField process") + } + field(RPRO, DBF_UCHAR) { + special(SPC_NOMOD) + interest(1) + prompt("Reprocess ") + } + field(ASP, DBF_NOACCESS) { + extra("struct asgMember *asp") + prompt("Access Security Pvt") + interest(4) + special(SPC_NOMOD) + } + field(PPN, DBF_NOACCESS) { + extra("struct processNotify *ppn") + prompt("pprocessNotify") + interest(4) + special(SPC_NOMOD) + } + field(PPNR, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct processNotifyRecord *ppnr") + prompt("pprocessNotifyRecord") + } + field(SPVT, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Scan Private") + extra("struct scan_element *spvt") + } + field(RSET, DBF_NOACCESS) { + prompt("Address of RSET") + extra("struct typed_rset *rset") + interest(4) + special(SPC_NOMOD) + } + field(DSET, DBF_NOACCESS) { + prompt("DSET address") + extra("struct dset *dset") + interest(4) + special(SPC_NOMOD) + } + field(DPVT, DBF_NOACCESS) { + prompt("Device Private") + extra("void *dpvt") + interest(4) + special(SPC_NOMOD) + } + field(RDES, DBF_NOACCESS) { + extra("struct dbRecordType *rdes") + prompt("Address of dbRecordType") + special(SPC_NOMOD) + interest(4) + } + field(LSET, DBF_NOACCESS) { + extra("struct lockRecord *lset") + prompt("Lock Set") + interest(4) + special(SPC_NOMOD) + } + field(PRIO, DBF_MENU) { + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + menu(menuPriority) + prompt("Scheduling Priority") + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + extra("char bkpt") + prompt("Break Point") + interest(1) + special(SPC_NOMOD) + } + field(UDF, DBF_UCHAR) { + promptgroup("10 - Common") + pp(TRUE) + interest(1) + prompt("Undefined") + initial("1") + } + field(UDFS, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + initial("INVALID") + prompt("Undefined Alarm Sevrty") + } + field(TIME, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(2) + prompt("Time") + extra("epicsTimeStamp time") + } + field(FLNK, DBF_FWDLINK) { + prompt("Forward Process Link") + promptgroup("20 - Scan") + interest(1) + } + field(LABL, DBF_STRING) { + prompt("Button Label") + size(20) + pp(TRUE) + promptgroup("80 - Display") + interest(1) + } + field(VAL, DBF_USHORT) { + asl(ASL0) + prompt("Status") + pp(TRUE) + promptgroup("40 - Input") + } + field(OVAL, DBF_USHORT) { + prompt("Old Status") + special(SPC_NOMOD) + interest(3) + } + field(WFLG, DBF_USHORT) { + prompt("Wait Flag") + pp(TRUE) + } + field(OFLG, DBF_USHORT) { + prompt("Old Flag") + special(SPC_NOMOD) + interest(3) + } +} +recordtype(subArray) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + field(NAME, DBF_STRING) { + prompt("Record Name") + size(61) + special(SPC_NOMOD) + } + field(DESC, DBF_STRING) { + promptgroup("10 - Common") + size(41) prompt("Descriptor") } field(ASG, DBF_STRING) { - size(29) - prompt("Access Security Group") promptgroup("10 - Common") special(SPC_AS) + prompt("Access Security Group") + size(29) } field(SCAN, DBF_MENU) { + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + menu(menuScan) prompt("Scan Mechanism") - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - menu(menuScan) } field(PINI, DBF_MENU) { - prompt("Process at iocInit") - interest(1) promptgroup("20 - Scan") menu(menuPini) + interest(1) + prompt("Process at iocInit") } field(PHAS, DBF_SHORT) { interest(1) @@ -476,10 +4193,681 @@ } field(EVNT, DBF_STRING) { size(40) - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") prompt("Event Name") + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + } + field(TSE, DBF_SHORT) { + promptgroup("20 - Scan") + interest(1) + prompt("Time Stamp Event") + } + field(TSEL, DBF_INLINK) { + promptgroup("20 - Scan") + interest(1) + prompt("Time Stamp Link") + } + field(DTYP, DBF_DEVICE) { + interest(1) + promptgroup("10 - Common") + prompt("Device Type") + } + field(DISV, DBF_SHORT) { + prompt("Disable Value") + initial("1") + promptgroup("20 - Scan") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + prompt("Scanning Disable") + promptgroup("20 - Scan") + interest(1) + } + field(MLOK, DBF_NOACCESS) { + extra("epicsMutexId mlok") + prompt("Monitor lock") + interest(4) + special(SPC_NOMOD) + } + field(MLIS, DBF_NOACCESS) { + prompt("Monitor List") + extra("ELLLIST mlis") + special(SPC_NOMOD) + interest(4) + } + field(BKLNK, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("ELLLIST bklnk") + prompt("Backwards link tracking") + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + interest(3) + pp(TRUE) + prompt("Force Processing") + } + field(STAT, DBF_MENU) { + initial("UDF") + prompt("Alarm Status") + special(SPC_NOMOD) + menu(menuAlarmStat) + } + field(SEVR, DBF_MENU) { + prompt("Alarm Severity") + menu(menuAlarmSevr) + special(SPC_NOMOD) + } + field(NSTA, DBF_MENU) { + prompt("New Alarm Status") + special(SPC_NOMOD) + menu(menuAlarmStat) + interest(2) + } + field(NSEV, DBF_MENU) { + prompt("New Alarm Severity") + menu(menuAlarmSevr) + interest(2) + special(SPC_NOMOD) + } + field(ACKS, DBF_MENU) { + special(SPC_NOMOD) + menu(menuAlarmSevr) + interest(2) + prompt("Alarm Ack Severity") + } + field(ACKT, DBF_MENU) { + special(SPC_NOMOD) + menu(menuYesNo) + interest(2) + promptgroup("70 - Alarm") + initial("YES") + prompt("Alarm Ack Transient") + } + field(DISS, DBF_MENU) { + interest(1) + menu(menuAlarmSevr) + promptgroup("70 - Alarm") + prompt("Disable Alarm Sevrty") + } + field(LCNT, DBF_UCHAR) { + special(SPC_NOMOD) + interest(2) + prompt("Lock Count") + } + field(PACT, DBF_UCHAR) { + prompt("Record active") + special(SPC_NOMOD) + interest(1) + } + field(PUTF, DBF_UCHAR) { + prompt("dbPutField process") + special(SPC_NOMOD) + interest(1) + } + field(RPRO, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("Reprocess ") + } + field(ASP, DBF_NOACCESS) { + prompt("Access Security Pvt") + extra("struct asgMember *asp") + interest(4) + special(SPC_NOMOD) + } + field(PPN, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct processNotify *ppn") + prompt("pprocessNotify") + } + field(PPNR, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct processNotifyRecord *ppnr") + prompt("pprocessNotifyRecord") + } + field(SPVT, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Scan Private") + extra("struct scan_element *spvt") + } + field(RSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Address of RSET") + extra("struct typed_rset *rset") + } + field(DSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("DSET address") + extra("struct dset *dset") + } + field(DPVT, DBF_NOACCESS) { + extra("void *dpvt") + prompt("Device Private") + interest(4) + special(SPC_NOMOD) + } + field(RDES, DBF_NOACCESS) { + prompt("Address of dbRecordType") + extra("struct dbRecordType *rdes") + interest(4) + special(SPC_NOMOD) + } + field(LSET, DBF_NOACCESS) { + extra("struct lockRecord *lset") + prompt("Lock Set") + interest(4) + special(SPC_NOMOD) + } + field(PRIO, DBF_MENU) { + prompt("Scheduling Priority") + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + menu(menuPriority) + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(1) + prompt("Break Point") + extra("char bkpt") + } + field(UDF, DBF_UCHAR) { + prompt("Undefined") + initial("1") + pp(TRUE) + promptgroup("10 - Common") + interest(1) + } + field(UDFS, DBF_MENU) { + promptgroup("70 - Alarm") + interest(1) + menu(menuAlarmSevr) + prompt("Undefined Alarm Sevrty") + initial("INVALID") + } + field(TIME, DBF_NOACCESS) { + prompt("Time") + extra("epicsTimeStamp time") + special(SPC_NOMOD) + interest(2) + } + field(FLNK, DBF_FWDLINK) { + interest(1) + promptgroup("20 - Scan") + prompt("Forward Process Link") + } + field(VAL, DBF_NOACCESS) { + pp(TRUE) + special(SPC_DBADDR) + prompt("Value") + extra("void * val") + asl(ASL0) + } + field(PREC, DBF_SHORT) { + promptgroup("80 - Display") + interest(1) + prop(YES) + prompt("Display Precision") + } + field(FTVL, DBF_MENU) { + interest(1) + menu(menuFtype) + special(SPC_NOMOD) + promptgroup("30 - Action") + prompt("Field Type of Value") + } + field(INP, DBF_INLINK) { + interest(1) + promptgroup("40 - Input") + prompt("Input Specification") + } + field(EGU, DBF_STRING) { + promptgroup("80 - Display") + interest(1) + prop(YES) + prompt("Engineering Units") + size(16) + } + field(HOPR, DBF_DOUBLE) { + promptgroup("80 - Display") + prop(YES) + interest(1) + prompt("High Operating Range") + } + field(LOPR, DBF_DOUBLE) { + prompt("Low Operating Range") + promptgroup("80 - Display") + prop(YES) + interest(1) + } + field(MALM, DBF_ULONG) { + promptgroup("30 - Action") + interest(1) + special(SPC_NOMOD) + prompt("Maximum Elements") + initial("1") + } + field(NELM, DBF_ULONG) { + initial("1") + prompt("Number of Elements") + pp(TRUE) + promptgroup("30 - Action") + } + field(INDX, DBF_ULONG) { + pp(TRUE) + promptgroup("30 - Action") + prompt("Substring Index") + } + field(BUSY, DBF_SHORT) { + special(SPC_NOMOD) + prompt("Busy Indicator") + } + field(NORD, DBF_LONG) { + special(SPC_NOMOD) + prompt("Number elements read") + } + field(BPTR, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Buffer Pointer") + extra("void * bptr") + } +} +device(subArray, CONSTANT, devSASoft, "Soft Channel") +recordtype(event) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + %#include "dbScan.h" + %#include "callback.h" + field(NAME, DBF_STRING) { + special(SPC_NOMOD) + size(61) + prompt("Record Name") + } + field(DESC, DBF_STRING) { + promptgroup("10 - Common") + size(41) + prompt("Descriptor") + } + field(ASG, DBF_STRING) { + promptgroup("10 - Common") + special(SPC_AS) + prompt("Access Security Group") + size(29) + } + field(SCAN, DBF_MENU) { + prompt("Scan Mechanism") + menu(menuScan) + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + } + field(PINI, DBF_MENU) { + promptgroup("20 - Scan") + menu(menuPini) + interest(1) + prompt("Process at iocInit") + } + field(PHAS, DBF_SHORT) { + prompt("Scan Phase") + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + } + field(EVNT, DBF_STRING) { + prompt("Event Name") + size(40) + promptgroup("20 - Scan") + interest(1) + special(SPC_SCAN) + } + field(TSE, DBF_SHORT) { + promptgroup("20 - Scan") + interest(1) + prompt("Time Stamp Event") + } + field(TSEL, DBF_INLINK) { + prompt("Time Stamp Link") + interest(1) + promptgroup("20 - Scan") + } + field(DTYP, DBF_DEVICE) { + promptgroup("10 - Common") + interest(1) + prompt("Device Type") + } + field(DISV, DBF_SHORT) { + initial("1") + prompt("Disable Value") + promptgroup("20 - Scan") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + prompt("Scanning Disable") + promptgroup("20 - Scan") + interest(1) + } + field(MLOK, DBF_NOACCESS) { + extra("epicsMutexId mlok") + prompt("Monitor lock") + interest(4) + special(SPC_NOMOD) + } + field(MLIS, DBF_NOACCESS) { + prompt("Monitor List") + extra("ELLLIST mlis") + special(SPC_NOMOD) + interest(4) + } + field(BKLNK, DBF_NOACCESS) { + extra("ELLLIST bklnk") + prompt("Backwards link tracking") + interest(4) + special(SPC_NOMOD) + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + prompt("Force Processing") + pp(TRUE) + interest(3) + } + field(STAT, DBF_MENU) { + special(SPC_NOMOD) + menu(menuAlarmStat) + initial("UDF") + prompt("Alarm Status") + } + field(SEVR, DBF_MENU) { + menu(menuAlarmSevr) + special(SPC_NOMOD) + prompt("Alarm Severity") + } + field(NSTA, DBF_MENU) { + prompt("New Alarm Status") + menu(menuAlarmStat) + interest(2) + special(SPC_NOMOD) + } + field(NSEV, DBF_MENU) { + prompt("New Alarm Severity") + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) + } + field(ACKS, DBF_MENU) { + interest(2) + menu(menuAlarmSevr) + special(SPC_NOMOD) + prompt("Alarm Ack Severity") + } + field(ACKT, DBF_MENU) { + promptgroup("70 - Alarm") + interest(2) + menu(menuYesNo) + special(SPC_NOMOD) + prompt("Alarm Ack Transient") + initial("YES") + } + field(DISS, DBF_MENU) { + prompt("Disable Alarm Sevrty") + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + } + field(LCNT, DBF_UCHAR) { + special(SPC_NOMOD) + interest(2) + prompt("Lock Count") + } + field(PACT, DBF_UCHAR) { + prompt("Record active") + interest(1) + special(SPC_NOMOD) + } + field(PUTF, DBF_UCHAR) { + prompt("dbPutField process") + interest(1) + special(SPC_NOMOD) + } + field(RPRO, DBF_UCHAR) { + prompt("Reprocess ") + interest(1) + special(SPC_NOMOD) + } + field(ASP, DBF_NOACCESS) { + prompt("Access Security Pvt") + extra("struct asgMember *asp") + special(SPC_NOMOD) + interest(4) + } + field(PPN, DBF_NOACCESS) { + prompt("pprocessNotify") + extra("struct processNotify *ppn") + special(SPC_NOMOD) + interest(4) + } + field(PPNR, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("pprocessNotifyRecord") + extra("struct processNotifyRecord *ppnr") + } + field(SPVT, DBF_NOACCESS) { + extra("struct scan_element *spvt") + prompt("Scan Private") + interest(4) + special(SPC_NOMOD) + } + field(RSET, DBF_NOACCESS) { + prompt("Address of RSET") + extra("struct typed_rset *rset") + special(SPC_NOMOD) + interest(4) + } + field(DSET, DBF_NOACCESS) { + extra("struct dset *dset") + prompt("DSET address") + special(SPC_NOMOD) + interest(4) + } + field(DPVT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("void *dpvt") + prompt("Device Private") + } + field(RDES, DBF_NOACCESS) { + prompt("Address of dbRecordType") + extra("struct dbRecordType *rdes") + interest(4) + special(SPC_NOMOD) + } + field(LSET, DBF_NOACCESS) { + extra("struct lockRecord *lset") + prompt("Lock Set") + interest(4) + special(SPC_NOMOD) + } + field(PRIO, DBF_MENU) { + special(SPC_SCAN) + interest(1) + menu(menuPriority) + promptgroup("20 - Scan") + prompt("Scheduling Priority") + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + extra("char bkpt") + prompt("Break Point") + interest(1) + special(SPC_NOMOD) + } + field(UDF, DBF_UCHAR) { + promptgroup("10 - Common") + pp(TRUE) + interest(1) + prompt("Undefined") + initial("1") + } + field(UDFS, DBF_MENU) { + initial("INVALID") + prompt("Undefined Alarm Sevrty") + interest(1) + menu(menuAlarmSevr) + promptgroup("70 - Alarm") + } + field(TIME, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(2) + extra("epicsTimeStamp time") + prompt("Time") + } + field(FLNK, DBF_FWDLINK) { + prompt("Forward Process Link") + interest(1) + promptgroup("20 - Scan") + } + field(VAL, DBF_STRING) { + promptgroup("40 - Input") + special(SPC_MOD) + prompt("Event Name To Post") + asl(ASL0) + size(40) + } + field(EPVT, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Event private") + extra("EVENTPVT epvt") + } + field(INP, DBF_INLINK) { + prompt("Input Specification") + promptgroup("40 - Input") + interest(1) + } + field(SIOL, DBF_INLINK) { + prompt("Simulation Input Link") + interest(1) + promptgroup("90 - Simulate") + } + field(SVAL, DBF_STRING) { + prompt("Simulation Value") + size(40) + } + field(SIML, DBF_INLINK) { + prompt("Simulation Mode Link") + interest(1) + promptgroup("90 - Simulate") + } + field(SIMM, DBF_MENU) { + prompt("Simulation Mode") + special(SPC_MOD) + interest(1) + menu(menuYesNo) + } + field(SIMS, DBF_MENU) { + prompt("Simulation Mode Severity") + promptgroup("90 - Simulate") + interest(2) + menu(menuAlarmSevr) + } + field(OLDSIMM, DBF_MENU) { + prompt("Prev. Simulation Mode") + special(SPC_NOMOD) + interest(4) + menu(menuSimm) + } + field(SSCN, DBF_MENU) { + initial("65535") + prompt("Sim. Mode Scan") + interest(1) + menu(menuScan) + promptgroup("90 - Simulate") + } + field(SDLY, DBF_DOUBLE) { + prompt("Sim. Mode Async Delay") + initial("-1.0") + promptgroup("90 - Simulate") + interest(2) + } + field(SIMPVT, DBF_NOACCESS) { + prompt("Sim. Mode Private") + extra("CALLBACK *simpvt") + special(SPC_NOMOD) + interest(4) + } +} +device(event, CONSTANT, devEventSoft, "Soft Channel") +recordtype(state) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + field(NAME, DBF_STRING) { + special(SPC_NOMOD) + size(61) + prompt("Record Name") + } + field(DESC, DBF_STRING) { + size(41) + prompt("Descriptor") + promptgroup("10 - Common") + } + field(ASG, DBF_STRING) { + special(SPC_AS) + promptgroup("10 - Common") + size(29) + prompt("Access Security Group") + } + field(SCAN, DBF_MENU) { + promptgroup("20 - Scan") + interest(1) + menu(menuScan) + special(SPC_SCAN) + prompt("Scan Mechanism") + } + field(PINI, DBF_MENU) { + interest(1) + menu(menuPini) + promptgroup("20 - Scan") + prompt("Process at iocInit") + } + field(PHAS, DBF_SHORT) { + prompt("Scan Phase") + promptgroup("20 - Scan") + interest(1) + special(SPC_SCAN) + } + field(EVNT, DBF_STRING) { + prompt("Event Name") + size(40) + promptgroup("20 - Scan") + interest(1) + special(SPC_SCAN) } field(TSE, DBF_SHORT) { interest(1) @@ -487,6 +4875,5975 @@ prompt("Time Stamp Event") } field(TSEL, DBF_INLINK) { + prompt("Time Stamp Link") + interest(1) + promptgroup("20 - Scan") + } + field(DTYP, DBF_DEVICE) { + interest(1) + promptgroup("10 - Common") + prompt("Device Type") + } + field(DISV, DBF_SHORT) { + promptgroup("20 - Scan") + prompt("Disable Value") + initial("1") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + prompt("Scanning Disable") + promptgroup("20 - Scan") + interest(1) + } + field(MLOK, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("epicsMutexId mlok") + prompt("Monitor lock") + } + field(MLIS, DBF_NOACCESS) { + prompt("Monitor List") + extra("ELLLIST mlis") + interest(4) + special(SPC_NOMOD) + } + field(BKLNK, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("ELLLIST bklnk") + prompt("Backwards link tracking") + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + pp(TRUE) + interest(3) + prompt("Force Processing") + } + field(STAT, DBF_MENU) { + prompt("Alarm Status") + initial("UDF") + menu(menuAlarmStat) + special(SPC_NOMOD) + } + field(SEVR, DBF_MENU) { + prompt("Alarm Severity") + special(SPC_NOMOD) + menu(menuAlarmSevr) + } + field(NSTA, DBF_MENU) { + menu(menuAlarmStat) + interest(2) + special(SPC_NOMOD) + prompt("New Alarm Status") + } + field(NSEV, DBF_MENU) { + prompt("New Alarm Severity") + interest(2) + menu(menuAlarmSevr) + special(SPC_NOMOD) + } + field(ACKS, DBF_MENU) { + prompt("Alarm Ack Severity") + interest(2) + menu(menuAlarmSevr) + special(SPC_NOMOD) + } + field(ACKT, DBF_MENU) { + interest(2) + menu(menuYesNo) + special(SPC_NOMOD) + promptgroup("70 - Alarm") + initial("YES") + prompt("Alarm Ack Transient") + } + field(DISS, DBF_MENU) { + prompt("Disable Alarm Sevrty") + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + } + field(LCNT, DBF_UCHAR) { + special(SPC_NOMOD) + interest(2) + prompt("Lock Count") + } + field(PACT, DBF_UCHAR) { + prompt("Record active") + special(SPC_NOMOD) + interest(1) + } + field(PUTF, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("dbPutField process") + } + field(RPRO, DBF_UCHAR) { + prompt("Reprocess ") + special(SPC_NOMOD) + interest(1) + } + field(ASP, DBF_NOACCESS) { + prompt("Access Security Pvt") + extra("struct asgMember *asp") + special(SPC_NOMOD) + interest(4) + } + field(PPN, DBF_NOACCESS) { + prompt("pprocessNotify") + extra("struct processNotify *ppn") + interest(4) + special(SPC_NOMOD) + } + field(PPNR, DBF_NOACCESS) { + extra("struct processNotifyRecord *ppnr") + prompt("pprocessNotifyRecord") + interest(4) + special(SPC_NOMOD) + } + field(SPVT, DBF_NOACCESS) { + prompt("Scan Private") + extra("struct scan_element *spvt") + special(SPC_NOMOD) + interest(4) + } + field(RSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct typed_rset *rset") + prompt("Address of RSET") + } + field(DSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("DSET address") + extra("struct dset *dset") + } + field(DPVT, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Device Private") + extra("void *dpvt") + } + field(RDES, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct dbRecordType *rdes") + prompt("Address of dbRecordType") + } + field(LSET, DBF_NOACCESS) { + prompt("Lock Set") + extra("struct lockRecord *lset") + interest(4) + special(SPC_NOMOD) + } + field(PRIO, DBF_MENU) { + prompt("Scheduling Priority") + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + menu(menuPriority) + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + interest(1) + special(SPC_NOMOD) + extra("char bkpt") + prompt("Break Point") + } + field(UDF, DBF_UCHAR) { + initial("1") + prompt("Undefined") + interest(1) + pp(TRUE) + promptgroup("10 - Common") + } + field(UDFS, DBF_MENU) { + promptgroup("70 - Alarm") + interest(1) + menu(menuAlarmSevr) + prompt("Undefined Alarm Sevrty") + initial("INVALID") + } + field(TIME, DBF_NOACCESS) { + interest(2) + special(SPC_NOMOD) + extra("epicsTimeStamp time") + prompt("Time") + } + field(FLNK, DBF_FWDLINK) { + prompt("Forward Process Link") + interest(1) + promptgroup("20 - Scan") + } + field(VAL, DBF_STRING) { + promptgroup("40 - Input") + pp(TRUE) + prompt("Value") + size(20) + asl(ASL0) + } + field(OVAL, DBF_STRING) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Value") + size(20) + } +} +recordtype(dfanout) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + field(NAME, DBF_STRING) { + special(SPC_NOMOD) + prompt("Record Name") + size(61) + } + field(DESC, DBF_STRING) { + promptgroup("10 - Common") + size(41) + prompt("Descriptor") + } + field(ASG, DBF_STRING) { + prompt("Access Security Group") + size(29) + promptgroup("10 - Common") + special(SPC_AS) + } + field(SCAN, DBF_MENU) { + special(SPC_SCAN) + interest(1) + menu(menuScan) + promptgroup("20 - Scan") + prompt("Scan Mechanism") + } + field(PINI, DBF_MENU) { + prompt("Process at iocInit") + promptgroup("20 - Scan") + menu(menuPini) + interest(1) + } + field(PHAS, DBF_SHORT) { + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + prompt("Scan Phase") + } + field(EVNT, DBF_STRING) { + special(SPC_SCAN) + interest(1) + promptgroup("20 - Scan") + size(40) + prompt("Event Name") + } + field(TSE, DBF_SHORT) { + prompt("Time Stamp Event") + promptgroup("20 - Scan") + interest(1) + } + field(TSEL, DBF_INLINK) { + prompt("Time Stamp Link") + promptgroup("20 - Scan") + interest(1) + } + field(DTYP, DBF_DEVICE) { + promptgroup("10 - Common") + interest(1) + prompt("Device Type") + } + field(DISV, DBF_SHORT) { + prompt("Disable Value") + initial("1") + promptgroup("20 - Scan") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + prompt("Scanning Disable") + promptgroup("20 - Scan") + interest(1) + } + field(MLOK, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("epicsMutexId mlok") + prompt("Monitor lock") + } + field(MLIS, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("ELLLIST mlis") + prompt("Monitor List") + } + field(BKLNK, DBF_NOACCESS) { + extra("ELLLIST bklnk") + prompt("Backwards link tracking") + special(SPC_NOMOD) + interest(4) + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + prompt("Force Processing") + interest(3) + pp(TRUE) + } + field(STAT, DBF_MENU) { + initial("UDF") + prompt("Alarm Status") + menu(menuAlarmStat) + special(SPC_NOMOD) + } + field(SEVR, DBF_MENU) { + prompt("Alarm Severity") + menu(menuAlarmSevr) + special(SPC_NOMOD) + } + field(NSTA, DBF_MENU) { + interest(2) + menu(menuAlarmStat) + special(SPC_NOMOD) + prompt("New Alarm Status") + } + field(NSEV, DBF_MENU) { + prompt("New Alarm Severity") + special(SPC_NOMOD) + menu(menuAlarmSevr) + interest(2) + } + field(ACKS, DBF_MENU) { + prompt("Alarm Ack Severity") + interest(2) + menu(menuAlarmSevr) + special(SPC_NOMOD) + } + field(ACKT, DBF_MENU) { + interest(2) + menu(menuYesNo) + special(SPC_NOMOD) + promptgroup("70 - Alarm") + initial("YES") + prompt("Alarm Ack Transient") + } + field(DISS, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + prompt("Disable Alarm Sevrty") + } + field(LCNT, DBF_UCHAR) { + prompt("Lock Count") + interest(2) + special(SPC_NOMOD) + } + field(PACT, DBF_UCHAR) { + special(SPC_NOMOD) + interest(1) + prompt("Record active") + } + field(PUTF, DBF_UCHAR) { + prompt("dbPutField process") + special(SPC_NOMOD) + interest(1) + } + field(RPRO, DBF_UCHAR) { + prompt("Reprocess ") + interest(1) + special(SPC_NOMOD) + } + field(ASP, DBF_NOACCESS) { + extra("struct asgMember *asp") + prompt("Access Security Pvt") + interest(4) + special(SPC_NOMOD) + } + field(PPN, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("pprocessNotify") + extra("struct processNotify *ppn") + } + field(PPNR, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct processNotifyRecord *ppnr") + prompt("pprocessNotifyRecord") + } + field(SPVT, DBF_NOACCESS) { + prompt("Scan Private") + extra("struct scan_element *spvt") + special(SPC_NOMOD) + interest(4) + } + field(RSET, DBF_NOACCESS) { + prompt("Address of RSET") + extra("struct typed_rset *rset") + interest(4) + special(SPC_NOMOD) + } + field(DSET, DBF_NOACCESS) { + prompt("DSET address") + extra("struct dset *dset") + interest(4) + special(SPC_NOMOD) + } + field(DPVT, DBF_NOACCESS) { + prompt("Device Private") + extra("void *dpvt") + special(SPC_NOMOD) + interest(4) + } + field(RDES, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct dbRecordType *rdes") + prompt("Address of dbRecordType") + } + field(LSET, DBF_NOACCESS) { + extra("struct lockRecord *lset") + prompt("Lock Set") + interest(4) + special(SPC_NOMOD) + } + field(PRIO, DBF_MENU) { + promptgroup("20 - Scan") + interest(1) + menu(menuPriority) + special(SPC_SCAN) + prompt("Scheduling Priority") + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + extra("char bkpt") + prompt("Break Point") + interest(1) + special(SPC_NOMOD) + } + field(UDF, DBF_UCHAR) { + prompt("Undefined") + initial("1") + promptgroup("10 - Common") + pp(TRUE) + interest(1) + } + field(UDFS, DBF_MENU) { + prompt("Undefined Alarm Sevrty") + initial("INVALID") + promptgroup("70 - Alarm") + interest(1) + menu(menuAlarmSevr) + } + field(TIME, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(2) + extra("epicsTimeStamp time") + prompt("Time") + } + field(FLNK, DBF_FWDLINK) { + prompt("Forward Process Link") + interest(1) + promptgroup("20 - Scan") + } + field(VAL, DBF_DOUBLE) { + asl(ASL0) + prompt("Desired Output") + promptgroup("40 - Input") + pp(TRUE) + } + field(SELM, DBF_MENU) { + prompt("Select Mechanism") + interest(1) + menu(dfanoutSELM) + promptgroup("30 - Action") + } + field(SELN, DBF_USHORT) { + interest(1) + initial("1") + prompt("Link Selection") + } + field(SELL, DBF_INLINK) { + promptgroup("30 - Action") + interest(1) + prompt("Link Selection Loc") + } + field(OUTA, DBF_OUTLINK) { + interest(1) + promptgroup("50 - Output") + prompt("Output Spec A") + } + field(OUTB, DBF_OUTLINK) { + promptgroup("50 - Output") + interest(1) + prompt("Output Spec B") + } + field(OUTC, DBF_OUTLINK) { + interest(1) + promptgroup("50 - Output") + prompt("Output Spec C") + } + field(OUTD, DBF_OUTLINK) { + interest(1) + promptgroup("50 - Output") + prompt("Output Spec D") + } + field(OUTE, DBF_OUTLINK) { + prompt("Output Spec E") + promptgroup("50 - Output") + interest(1) + } + field(OUTF, DBF_OUTLINK) { + interest(1) + promptgroup("50 - Output") + prompt("Output Spec F") + } + field(OUTG, DBF_OUTLINK) { + promptgroup("50 - Output") + interest(1) + prompt("Output Spec G") + } + field(OUTH, DBF_OUTLINK) { + promptgroup("50 - Output") + interest(1) + prompt("Output Spec H") + } + field(DOL, DBF_INLINK) { + prompt("Desired Output Loc") + promptgroup("40 - Input") + interest(1) + } + field(OMSL, DBF_MENU) { + promptgroup("50 - Output") + interest(1) + menu(menuOmsl) + prompt("Output Mode Select") + } + field(EGU, DBF_STRING) { + promptgroup("80 - Display") + prop(YES) + interest(1) + prompt("Engineering Units") + size(16) + } + field(PREC, DBF_SHORT) { + promptgroup("80 - Display") + prop(YES) + interest(1) + prompt("Display Precision") + } + field(HOPR, DBF_DOUBLE) { + interest(1) + prop(YES) + promptgroup("80 - Display") + prompt("High Operating Range") + } + field(LOPR, DBF_DOUBLE) { + prompt("Low Operating Range") + promptgroup("80 - Display") + prop(YES) + interest(1) + } + field(HIHI, DBF_DOUBLE) { + promptgroup("70 - Alarm") + pp(TRUE) + prop(YES) + interest(1) + prompt("Hihi Alarm Limit") + } + field(LOLO, DBF_DOUBLE) { + prop(YES) + interest(1) + promptgroup("70 - Alarm") + pp(TRUE) + prompt("Lolo Alarm Limit") + } + field(HIGH, DBF_DOUBLE) { + prompt("High Alarm Limit") + interest(1) + prop(YES) + pp(TRUE) + promptgroup("70 - Alarm") + } + field(LOW, DBF_DOUBLE) { + prompt("Low Alarm Limit") + pp(TRUE) + promptgroup("70 - Alarm") + interest(1) + prop(YES) + } + field(HHSV, DBF_MENU) { + pp(TRUE) + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + prop(YES) + interest(1) + prompt("Hihi Severity") + } + field(LLSV, DBF_MENU) { + promptgroup("70 - Alarm") + pp(TRUE) + menu(menuAlarmSevr) + prop(YES) + interest(1) + prompt("Lolo Severity") + } + field(HSV, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + prop(YES) + pp(TRUE) + promptgroup("70 - Alarm") + prompt("High Severity") + } + field(LSV, DBF_MENU) { + pp(TRUE) + promptgroup("70 - Alarm") + interest(1) + menu(menuAlarmSevr) + prop(YES) + prompt("Low Severity") + } + field(HYST, DBF_DOUBLE) { + prompt("Alarm Deadband") + interest(1) + promptgroup("70 - Alarm") + } + field(ADEL, DBF_DOUBLE) { + prompt("Archive Deadband") + interest(1) + promptgroup("80 - Display") + } + field(MDEL, DBF_DOUBLE) { + interest(1) + promptgroup("80 - Display") + prompt("Monitor Deadband") + } + field(LALM, DBF_DOUBLE) { + prompt("Last Value Alarmed") + interest(3) + special(SPC_NOMOD) + } + field(ALST, DBF_DOUBLE) { + prompt("Last Value Archived") + special(SPC_NOMOD) + interest(3) + } + field(MLST, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Last Val Monitored") + } +} +recordtype(aSub) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + %struct aSubRecord; + field(NAME, DBF_STRING) { + special(SPC_NOMOD) + prompt("Record Name") + size(61) + } + field(DESC, DBF_STRING) { + promptgroup("10 - Common") + size(41) + prompt("Descriptor") + } + field(ASG, DBF_STRING) { + size(29) + prompt("Access Security Group") + special(SPC_AS) + promptgroup("10 - Common") + } + field(SCAN, DBF_MENU) { + prompt("Scan Mechanism") + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + menu(menuScan) + } + field(PINI, DBF_MENU) { + prompt("Process at iocInit") + promptgroup("20 - Scan") + menu(menuPini) + interest(1) + } + field(PHAS, DBF_SHORT) { + prompt("Scan Phase") + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + } + field(EVNT, DBF_STRING) { + size(40) + prompt("Event Name") + special(SPC_SCAN) + interest(1) + promptgroup("20 - Scan") + } + field(TSE, DBF_SHORT) { + prompt("Time Stamp Event") + promptgroup("20 - Scan") + interest(1) + } + field(TSEL, DBF_INLINK) { + prompt("Time Stamp Link") + interest(1) + promptgroup("20 - Scan") + } + field(DTYP, DBF_DEVICE) { + promptgroup("10 - Common") + interest(1) + prompt("Device Type") + } + field(DISV, DBF_SHORT) { + promptgroup("20 - Scan") + prompt("Disable Value") + initial("1") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + prompt("Scanning Disable") + promptgroup("20 - Scan") + interest(1) + } + field(MLOK, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Monitor lock") + extra("epicsMutexId mlok") + } + field(MLIS, DBF_NOACCESS) { + extra("ELLLIST mlis") + prompt("Monitor List") + special(SPC_NOMOD) + interest(4) + } + field(BKLNK, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("ELLLIST bklnk") + prompt("Backwards link tracking") + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + interest(3) + pp(TRUE) + prompt("Force Processing") + } + field(STAT, DBF_MENU) { + initial("UDF") + prompt("Alarm Status") + special(SPC_NOMOD) + menu(menuAlarmStat) + } + field(SEVR, DBF_MENU) { + menu(menuAlarmSevr) + special(SPC_NOMOD) + prompt("Alarm Severity") + } + field(NSTA, DBF_MENU) { + special(SPC_NOMOD) + interest(2) + menu(menuAlarmStat) + prompt("New Alarm Status") + } + field(NSEV, DBF_MENU) { + prompt("New Alarm Severity") + menu(menuAlarmSevr) + interest(2) + special(SPC_NOMOD) + } + field(ACKS, DBF_MENU) { + menu(menuAlarmSevr) + interest(2) + special(SPC_NOMOD) + prompt("Alarm Ack Severity") + } + field(ACKT, DBF_MENU) { + initial("YES") + prompt("Alarm Ack Transient") + special(SPC_NOMOD) + menu(menuYesNo) + interest(2) + promptgroup("70 - Alarm") + } + field(DISS, DBF_MENU) { + promptgroup("70 - Alarm") + interest(1) + menu(menuAlarmSevr) + prompt("Disable Alarm Sevrty") + } + field(LCNT, DBF_UCHAR) { + prompt("Lock Count") + interest(2) + special(SPC_NOMOD) + } + field(PACT, DBF_UCHAR) { + prompt("Record active") + interest(1) + special(SPC_NOMOD) + } + field(PUTF, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("dbPutField process") + } + field(RPRO, DBF_UCHAR) { + special(SPC_NOMOD) + interest(1) + prompt("Reprocess ") + } + field(ASP, DBF_NOACCESS) { + extra("struct asgMember *asp") + prompt("Access Security Pvt") + special(SPC_NOMOD) + interest(4) + } + field(PPN, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("pprocessNotify") + extra("struct processNotify *ppn") + } + field(PPNR, DBF_NOACCESS) { + extra("struct processNotifyRecord *ppnr") + prompt("pprocessNotifyRecord") + special(SPC_NOMOD) + interest(4) + } + field(SPVT, DBF_NOACCESS) { + prompt("Scan Private") + extra("struct scan_element *spvt") + special(SPC_NOMOD) + interest(4) + } + field(RSET, DBF_NOACCESS) { + prompt("Address of RSET") + extra("struct typed_rset *rset") + special(SPC_NOMOD) + interest(4) + } + field(DSET, DBF_NOACCESS) { + extra("struct dset *dset") + prompt("DSET address") + interest(4) + special(SPC_NOMOD) + } + field(DPVT, DBF_NOACCESS) { + prompt("Device Private") + extra("void *dpvt") + special(SPC_NOMOD) + interest(4) + } + field(RDES, DBF_NOACCESS) { + extra("struct dbRecordType *rdes") + prompt("Address of dbRecordType") + special(SPC_NOMOD) + interest(4) + } + field(LSET, DBF_NOACCESS) { + extra("struct lockRecord *lset") + prompt("Lock Set") + special(SPC_NOMOD) + interest(4) + } + field(PRIO, DBF_MENU) { + prompt("Scheduling Priority") + special(SPC_SCAN) + interest(1) + menu(menuPriority) + promptgroup("20 - Scan") + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + interest(1) + special(SPC_NOMOD) + extra("char bkpt") + prompt("Break Point") + } + field(UDF, DBF_UCHAR) { + initial("1") + prompt("Undefined") + interest(1) + pp(TRUE) + promptgroup("10 - Common") + } + field(UDFS, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + initial("INVALID") + prompt("Undefined Alarm Sevrty") + } + field(TIME, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(2) + extra("epicsTimeStamp time") + prompt("Time") + } + field(FLNK, DBF_FWDLINK) { + interest(1) + promptgroup("20 - Scan") + prompt("Forward Process Link") + } + field(VAL, DBF_LONG) { + asl(ASL0) + prompt("Subr. return value") + } + field(OVAL, DBF_LONG) { + special(SPC_NOMOD) + interest(3) + prompt("Old return value") + } + field(INAM, DBF_STRING) { + promptgroup("30 - Action") + interest(1) + special(SPC_NOMOD) + prompt("Initialize Subr. Name") + size(41) + } + field(LFLG, DBF_MENU) { + prompt("Subr. Input Enable") + promptgroup("30 - Action") + menu(aSubLFLG) + interest(1) + } + field(SUBL, DBF_INLINK) { + prompt("Subroutine Name Link") + special(SPC_NOMOD) + interest(1) + promptgroup("30 - Action") + } + field(SNAM, DBF_STRING) { + size(41) + prompt("Process Subr. Name") + special(SPC_MOD) + interest(1) + promptgroup("30 - Action") + } + field(ONAM, DBF_STRING) { + size(41) + prompt("Old Subr. Name") + special(SPC_NOMOD) + interest(3) + promptgroup("30 - Action") + } + field(SADR, DBF_NOACCESS) { + extra("long (*sadr)(struct aSubRecord *)") + prompt("Subroutine Address") + special(SPC_NOMOD) + interest(2) + } + field(CADR, DBF_NOACCESS) { + interest(2) + special(SPC_NOMOD) + prompt("Subroutine Cleanup Address") + extra("void (*cadr)(struct aSubRecord *)") + } + field(BRSV, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + pp(TRUE) + prompt("Bad Return Severity") + } + field(PREC, DBF_SHORT) { + prompt("Display Precision") + interest(1) + prop(YES) + promptgroup("80 - Display") + } + field(EFLG, DBF_MENU) { + initial("1") + prompt("Output Event Flag") + menu(aSubEFLG) + interest(1) + promptgroup("50 - Output") + } + field(INPA, DBF_INLINK) { + prompt("Input Link A") + promptgroup("41 - Input A-G") + interest(1) + } + field(INPB, DBF_INLINK) { + prompt("Input Link B") + promptgroup("41 - Input A-G") + interest(1) + } + field(INPC, DBF_INLINK) { + prompt("Input Link C") + interest(1) + promptgroup("41 - Input A-G") + } + field(INPD, DBF_INLINK) { + prompt("Input Link D") + promptgroup("41 - Input A-G") + interest(1) + } + field(INPE, DBF_INLINK) { + interest(1) + promptgroup("41 - Input A-G") + prompt("Input Link E") + } + field(INPF, DBF_INLINK) { + prompt("Input Link F") + interest(1) + promptgroup("41 - Input A-G") + } + field(INPG, DBF_INLINK) { + interest(1) + promptgroup("41 - Input A-G") + prompt("Input Link G") + } + field(INPH, DBF_INLINK) { + prompt("Input Link H") + interest(1) + promptgroup("42 - Input H-N") + } + field(INPI, DBF_INLINK) { + interest(1) + promptgroup("42 - Input H-N") + prompt("Input Link I") + } + field(INPJ, DBF_INLINK) { + prompt("Input Link J") + interest(1) + promptgroup("42 - Input H-N") + } + field(INPK, DBF_INLINK) { + prompt("Input Link K") + promptgroup("42 - Input H-N") + interest(1) + } + field(INPL, DBF_INLINK) { + promptgroup("42 - Input H-N") + interest(1) + prompt("Input Link L") + } + field(INPM, DBF_INLINK) { + interest(1) + promptgroup("42 - Input H-N") + prompt("Input Link M") + } + field(INPN, DBF_INLINK) { + prompt("Input Link N") + promptgroup("42 - Input H-N") + interest(1) + } + field(INPO, DBF_INLINK) { + interest(1) + promptgroup("43 - Input O-U") + prompt("Input Link O") + } + field(INPP, DBF_INLINK) { + interest(1) + promptgroup("43 - Input O-U") + prompt("Input Link P") + } + field(INPQ, DBF_INLINK) { + promptgroup("43 - Input O-U") + interest(1) + prompt("Input Link Q") + } + field(INPR, DBF_INLINK) { + prompt("Input Link R") + promptgroup("43 - Input O-U") + interest(1) + } + field(INPS, DBF_INLINK) { + interest(1) + promptgroup("43 - Input O-U") + prompt("Input Link S") + } + field(INPT, DBF_INLINK) { + promptgroup("43 - Input O-U") + interest(1) + prompt("Input Link T") + } + field(INPU, DBF_INLINK) { + prompt("Input Link U") + interest(1) + promptgroup("43 - Input O-U") + } + field(A, DBF_NOACCESS) { + special(SPC_DBADDR) + interest(2) + extra("void *a") + asl(ASL0) + prompt("Input value A") + } + field(B, DBF_NOACCESS) { + asl(ASL0) + extra("void *b") + prompt("Input value B") + interest(2) + special(SPC_DBADDR) + } + field(C, DBF_NOACCESS) { + extra("void *c") + asl(ASL0) + prompt("Input value C") + special(SPC_DBADDR) + interest(2) + } + field(D, DBF_NOACCESS) { + interest(2) + special(SPC_DBADDR) + prompt("Input value D") + asl(ASL0) + extra("void *d") + } + field(E, DBF_NOACCESS) { + interest(2) + special(SPC_DBADDR) + asl(ASL0) + extra("void *e") + prompt("Input value E") + } + field(F, DBF_NOACCESS) { + prompt("Input value F") + extra("void *f") + asl(ASL0) + special(SPC_DBADDR) + interest(2) + } + field(G, DBF_NOACCESS) { + special(SPC_DBADDR) + interest(2) + extra("void *g") + asl(ASL0) + prompt("Input value G") + } + field(H, DBF_NOACCESS) { + prompt("Input value H") + extra("void *h") + asl(ASL0) + special(SPC_DBADDR) + interest(2) + } + field(I, DBF_NOACCESS) { + special(SPC_DBADDR) + interest(2) + extra("void *i") + asl(ASL0) + prompt("Input value I") + } + field(J, DBF_NOACCESS) { + extra("void *j") + asl(ASL0) + prompt("Input value J") + special(SPC_DBADDR) + interest(2) + } + field(K, DBF_NOACCESS) { + special(SPC_DBADDR) + interest(2) + extra("void *k") + asl(ASL0) + prompt("Input value K") + } + field(L, DBF_NOACCESS) { + prompt("Input value L") + asl(ASL0) + extra("void *l") + interest(2) + special(SPC_DBADDR) + } + field(M, DBF_NOACCESS) { + special(SPC_DBADDR) + interest(2) + extra("void *m") + asl(ASL0) + prompt("Input value M") + } + field(N, DBF_NOACCESS) { + interest(2) + special(SPC_DBADDR) + asl(ASL0) + extra("void *n") + prompt("Input value N") + } + field(O, DBF_NOACCESS) { + interest(2) + special(SPC_DBADDR) + prompt("Input value O") + asl(ASL0) + extra("void *o") + } + field(P, DBF_NOACCESS) { + special(SPC_DBADDR) + interest(2) + extra("void *p") + asl(ASL0) + prompt("Input value P") + } + field(Q, DBF_NOACCESS) { + asl(ASL0) + extra("void *q") + prompt("Input value Q") + interest(2) + special(SPC_DBADDR) + } + field(R, DBF_NOACCESS) { + prompt("Input value R") + extra("void *r") + asl(ASL0) + special(SPC_DBADDR) + interest(2) + } + field(S, DBF_NOACCESS) { + prompt("Input value S") + asl(ASL0) + extra("void *s") + interest(2) + special(SPC_DBADDR) + } + field(T, DBF_NOACCESS) { + extra("void *t") + asl(ASL0) + prompt("Input value T") + special(SPC_DBADDR) + interest(2) + } + field(U, DBF_NOACCESS) { + special(SPC_DBADDR) + interest(2) + extra("void *u") + asl(ASL0) + prompt("Input value U") + } + field(FTA, DBF_MENU) { + promptgroup("41 - Input A-G") + menu(menuFtype) + interest(1) + special(SPC_NOMOD) + prompt("Type of A") + initial("DOUBLE") + } + field(FTB, DBF_MENU) { + prompt("Type of B") + initial("DOUBLE") + promptgroup("41 - Input A-G") + interest(1) + menu(menuFtype) + special(SPC_NOMOD) + } + field(FTC, DBF_MENU) { + promptgroup("41 - Input A-G") + interest(1) + menu(menuFtype) + special(SPC_NOMOD) + prompt("Type of C") + initial("DOUBLE") + } + field(FTD, DBF_MENU) { + promptgroup("41 - Input A-G") + menu(menuFtype) + interest(1) + special(SPC_NOMOD) + prompt("Type of D") + initial("DOUBLE") + } + field(FTE, DBF_MENU) { + special(SPC_NOMOD) + interest(1) + menu(menuFtype) + promptgroup("41 - Input A-G") + initial("DOUBLE") + prompt("Type of E") + } + field(FTF, DBF_MENU) { + promptgroup("41 - Input A-G") + interest(1) + menu(menuFtype) + special(SPC_NOMOD) + prompt("Type of F") + initial("DOUBLE") + } + field(FTG, DBF_MENU) { + special(SPC_NOMOD) + menu(menuFtype) + interest(1) + promptgroup("41 - Input A-G") + initial("DOUBLE") + prompt("Type of G") + } + field(FTH, DBF_MENU) { + special(SPC_NOMOD) + interest(1) + menu(menuFtype) + promptgroup("42 - Input H-N") + initial("DOUBLE") + prompt("Type of H") + } + field(FTI, DBF_MENU) { + special(SPC_NOMOD) + menu(menuFtype) + interest(1) + promptgroup("42 - Input H-N") + initial("DOUBLE") + prompt("Type of I") + } + field(FTJ, DBF_MENU) { + interest(1) + menu(menuFtype) + special(SPC_NOMOD) + promptgroup("42 - Input H-N") + initial("DOUBLE") + prompt("Type of J") + } + field(FTK, DBF_MENU) { + special(SPC_NOMOD) + interest(1) + menu(menuFtype) + promptgroup("42 - Input H-N") + initial("DOUBLE") + prompt("Type of K") + } + field(FTL, DBF_MENU) { + special(SPC_NOMOD) + menu(menuFtype) + interest(1) + promptgroup("42 - Input H-N") + initial("DOUBLE") + prompt("Type of L") + } + field(FTM, DBF_MENU) { + special(SPC_NOMOD) + menu(menuFtype) + interest(1) + promptgroup("42 - Input H-N") + initial("DOUBLE") + prompt("Type of M") + } + field(FTN, DBF_MENU) { + prompt("Type of N") + initial("DOUBLE") + promptgroup("42 - Input H-N") + menu(menuFtype) + interest(1) + special(SPC_NOMOD) + } + field(FTO, DBF_MENU) { + interest(1) + menu(menuFtype) + special(SPC_NOMOD) + promptgroup("43 - Input O-U") + initial("DOUBLE") + prompt("Type of O") + } + field(FTP, DBF_MENU) { + prompt("Type of P") + initial("DOUBLE") + promptgroup("43 - Input O-U") + special(SPC_NOMOD) + interest(1) + menu(menuFtype) + } + field(FTQ, DBF_MENU) { + promptgroup("43 - Input O-U") + special(SPC_NOMOD) + interest(1) + menu(menuFtype) + prompt("Type of Q") + initial("DOUBLE") + } + field(FTR, DBF_MENU) { + prompt("Type of R") + initial("DOUBLE") + promptgroup("43 - Input O-U") + interest(1) + menu(menuFtype) + special(SPC_NOMOD) + } + field(FTS, DBF_MENU) { + promptgroup("43 - Input O-U") + special(SPC_NOMOD) + menu(menuFtype) + interest(1) + prompt("Type of S") + initial("DOUBLE") + } + field(FTT, DBF_MENU) { + initial("DOUBLE") + prompt("Type of T") + special(SPC_NOMOD) + menu(menuFtype) + interest(1) + promptgroup("43 - Input O-U") + } + field(FTU, DBF_MENU) { + promptgroup("43 - Input O-U") + menu(menuFtype) + interest(1) + special(SPC_NOMOD) + prompt("Type of U") + initial("DOUBLE") + } + field(NOA, DBF_ULONG) { + interest(1) + special(SPC_NOMOD) + promptgroup("41 - Input A-G") + initial("1") + prompt("Max. elements in A") + } + field(NOB, DBF_ULONG) { + special(SPC_NOMOD) + interest(1) + promptgroup("41 - Input A-G") + initial("1") + prompt("Max. elements in B") + } + field(NOC, DBF_ULONG) { + prompt("Max. elements in C") + initial("1") + promptgroup("41 - Input A-G") + interest(1) + special(SPC_NOMOD) + } + field(NOD, DBF_ULONG) { + interest(1) + special(SPC_NOMOD) + promptgroup("41 - Input A-G") + initial("1") + prompt("Max. elements in D") + } + field(NOE, DBF_ULONG) { + interest(1) + special(SPC_NOMOD) + promptgroup("41 - Input A-G") + initial("1") + prompt("Max. elements in E") + } + field(NOF, DBF_ULONG) { + initial("1") + prompt("Max. elements in F") + special(SPC_NOMOD) + interest(1) + promptgroup("41 - Input A-G") + } + field(NOG, DBF_ULONG) { + prompt("Max. elements in G") + initial("1") + promptgroup("41 - Input A-G") + special(SPC_NOMOD) + interest(1) + } + field(NOH, DBF_ULONG) { + promptgroup("42 - Input H-N") + interest(1) + special(SPC_NOMOD) + prompt("Max. elements in H") + initial("1") + } + field(NOI, DBF_ULONG) { + prompt("Max. elements in I") + initial("1") + promptgroup("42 - Input H-N") + special(SPC_NOMOD) + interest(1) + } + field(NOJ, DBF_ULONG) { + special(SPC_NOMOD) + interest(1) + promptgroup("42 - Input H-N") + initial("1") + prompt("Max. elements in J") + } + field(NOK, DBF_ULONG) { + prompt("Max. elements in K") + initial("1") + promptgroup("42 - Input H-N") + special(SPC_NOMOD) + interest(1) + } + field(NOL, DBF_ULONG) { + interest(1) + special(SPC_NOMOD) + promptgroup("42 - Input H-N") + initial("1") + prompt("Max. elements in L") + } + field(NOM, DBF_ULONG) { + special(SPC_NOMOD) + interest(1) + promptgroup("42 - Input H-N") + initial("1") + prompt("Max. elements in M") + } + field(NON, DBF_ULONG) { + special(SPC_NOMOD) + interest(1) + promptgroup("42 - Input H-N") + initial("1") + prompt("Max. elements in N") + } + field(NOO, DBF_ULONG) { + initial("1") + prompt("Max. elements in O") + interest(1) + special(SPC_NOMOD) + promptgroup("43 - Input O-U") + } + field(NOP, DBF_ULONG) { + promptgroup("43 - Input O-U") + special(SPC_NOMOD) + interest(1) + prompt("Max. elements in P") + initial("1") + } + field(NOQ, DBF_ULONG) { + special(SPC_NOMOD) + interest(1) + promptgroup("43 - Input O-U") + initial("1") + prompt("Max. elements in Q") + } + field(NOR, DBF_ULONG) { + initial("1") + prompt("Max. elements in R") + interest(1) + special(SPC_NOMOD) + promptgroup("43 - Input O-U") + } + field(NOS, DBF_ULONG) { + special(SPC_NOMOD) + interest(1) + promptgroup("43 - Input O-U") + initial("1") + prompt("Max. elements in S") + } + field(NOT, DBF_ULONG) { + promptgroup("43 - Input O-U") + interest(1) + special(SPC_NOMOD) + prompt("Max. elements in T") + initial("1") + } + field(NOU, DBF_ULONG) { + prompt("Max. elements in U") + initial("1") + promptgroup("43 - Input O-U") + special(SPC_NOMOD) + interest(1) + } + field(NEA, DBF_ULONG) { + special(SPC_NOMOD) + interest(3) + prompt("Num. elements in A") + initial("1") + } + field(NEB, DBF_ULONG) { + special(SPC_NOMOD) + interest(3) + initial("1") + prompt("Num. elements in B") + } + field(NEC, DBF_ULONG) { + interest(3) + special(SPC_NOMOD) + initial("1") + prompt("Num. elements in C") + } + field(NED, DBF_ULONG) { + initial("1") + prompt("Num. elements in D") + special(SPC_NOMOD) + interest(3) + } + field(NEE, DBF_ULONG) { + initial("1") + prompt("Num. elements in E") + special(SPC_NOMOD) + interest(3) + } + field(NEF, DBF_ULONG) { + interest(3) + special(SPC_NOMOD) + initial("1") + prompt("Num. elements in F") + } + field(NEG, DBF_ULONG) { + initial("1") + prompt("Num. elements in G") + special(SPC_NOMOD) + interest(3) + } + field(NEH, DBF_ULONG) { + initial("1") + prompt("Num. elements in H") + interest(3) + special(SPC_NOMOD) + } + field(NEI, DBF_ULONG) { + initial("1") + prompt("Num. elements in I") + special(SPC_NOMOD) + interest(3) + } + field(NEJ, DBF_ULONG) { + interest(3) + special(SPC_NOMOD) + prompt("Num. elements in J") + initial("1") + } + field(NEK, DBF_ULONG) { + interest(3) + special(SPC_NOMOD) + initial("1") + prompt("Num. elements in K") + } + field(NEL, DBF_ULONG) { + initial("1") + prompt("Num. elements in L") + interest(3) + special(SPC_NOMOD) + } + field(NEM, DBF_ULONG) { + special(SPC_NOMOD) + interest(3) + initial("1") + prompt("Num. elements in M") + } + field(NEN, DBF_ULONG) { + interest(3) + special(SPC_NOMOD) + initial("1") + prompt("Num. elements in N") + } + field(NEO, DBF_ULONG) { + initial("1") + prompt("Num. elements in O") + special(SPC_NOMOD) + interest(3) + } + field(NEP, DBF_ULONG) { + interest(3) + special(SPC_NOMOD) + initial("1") + prompt("Num. elements in P") + } + field(NEQ, DBF_ULONG) { + interest(3) + special(SPC_NOMOD) + initial("1") + prompt("Num. elements in Q") + } + field(NER, DBF_ULONG) { + prompt("Num. elements in R") + initial("1") + interest(3) + special(SPC_NOMOD) + } + field(NES, DBF_ULONG) { + interest(3) + special(SPC_NOMOD) + prompt("Num. elements in S") + initial("1") + } + field(NET, DBF_ULONG) { + prompt("Num. elements in T") + initial("1") + special(SPC_NOMOD) + interest(3) + } + field(NEU, DBF_ULONG) { + prompt("Num. elements in U") + initial("1") + special(SPC_NOMOD) + interest(3) + } + field(OUTA, DBF_OUTLINK) { + promptgroup("51 - Output A-G") + interest(1) + prompt("Output Link A") + } + field(OUTB, DBF_OUTLINK) { + interest(1) + promptgroup("51 - Output A-G") + prompt("Output Link B") + } + field(OUTC, DBF_OUTLINK) { + promptgroup("51 - Output A-G") + interest(1) + prompt("Output Link C") + } + field(OUTD, DBF_OUTLINK) { + promptgroup("51 - Output A-G") + interest(1) + prompt("Output Link D") + } + field(OUTE, DBF_OUTLINK) { + prompt("Output Link E") + promptgroup("51 - Output A-G") + interest(1) + } + field(OUTF, DBF_OUTLINK) { + prompt("Output Link F") + interest(1) + promptgroup("51 - Output A-G") + } + field(OUTG, DBF_OUTLINK) { + promptgroup("51 - Output A-G") + interest(1) + prompt("Output Link G") + } + field(OUTH, DBF_OUTLINK) { + interest(1) + promptgroup("52 - Output H-N") + prompt("Output Link H") + } + field(OUTI, DBF_OUTLINK) { + prompt("Output Link I") + promptgroup("52 - Output H-N") + interest(1) + } + field(OUTJ, DBF_OUTLINK) { + prompt("Output Link J") + promptgroup("52 - Output H-N") + interest(1) + } + field(OUTK, DBF_OUTLINK) { + prompt("Output Link K") + interest(1) + promptgroup("52 - Output H-N") + } + field(OUTL, DBF_OUTLINK) { + prompt("Output Link L") + promptgroup("52 - Output H-N") + interest(1) + } + field(OUTM, DBF_OUTLINK) { + prompt("Output Link M") + promptgroup("52 - Output H-N") + interest(1) + } + field(OUTN, DBF_OUTLINK) { + prompt("Output Link N") + promptgroup("52 - Output H-N") + interest(1) + } + field(OUTO, DBF_OUTLINK) { + prompt("Output Link O") + interest(1) + promptgroup("53 - Output O-U") + } + field(OUTP, DBF_OUTLINK) { + prompt("Output Link P") + promptgroup("53 - Output O-U") + interest(1) + } + field(OUTQ, DBF_OUTLINK) { + promptgroup("53 - Output O-U") + interest(1) + prompt("Output Link Q") + } + field(OUTR, DBF_OUTLINK) { + prompt("Output Link R") + interest(1) + promptgroup("53 - Output O-U") + } + field(OUTS, DBF_OUTLINK) { + prompt("Output Link S") + promptgroup("53 - Output O-U") + interest(1) + } + field(OUTT, DBF_OUTLINK) { + promptgroup("53 - Output O-U") + interest(1) + prompt("Output Link T") + } + field(OUTU, DBF_OUTLINK) { + prompt("Output Link U") + interest(1) + promptgroup("53 - Output O-U") + } + field(VALA, DBF_NOACCESS) { + interest(2) + special(SPC_DBADDR) + prompt("Output value A") + asl(ASL0) + extra("void *vala") + } + field(VALB, DBF_NOACCESS) { + special(SPC_DBADDR) + interest(2) + prompt("Output value B") + extra("void *valb") + asl(ASL0) + } + field(VALC, DBF_NOACCESS) { + extra("void *valc") + asl(ASL0) + prompt("Output value C") + special(SPC_DBADDR) + interest(2) + } + field(VALD, DBF_NOACCESS) { + interest(2) + special(SPC_DBADDR) + asl(ASL0) + extra("void *vald") + prompt("Output value D") + } + field(VALE, DBF_NOACCESS) { + asl(ASL0) + extra("void *vale") + prompt("Output value E") + interest(2) + special(SPC_DBADDR) + } + field(VALF, DBF_NOACCESS) { + interest(2) + special(SPC_DBADDR) + prompt("Output value F") + asl(ASL0) + extra("void *valf") + } + field(VALG, DBF_NOACCESS) { + special(SPC_DBADDR) + interest(2) + extra("void *valg") + asl(ASL0) + prompt("Output value G") + } + field(VALH, DBF_NOACCESS) { + asl(ASL0) + extra("void *valh") + prompt("Output value H") + interest(2) + special(SPC_DBADDR) + } + field(VALI, DBF_NOACCESS) { + prompt("Output value I") + extra("void *vali") + asl(ASL0) + special(SPC_DBADDR) + interest(2) + } + field(VALJ, DBF_NOACCESS) { + extra("void *valj") + asl(ASL0) + prompt("Output value J") + special(SPC_DBADDR) + interest(2) + } + field(VALK, DBF_NOACCESS) { + prompt("Output value K") + asl(ASL0) + extra("void *valk") + interest(2) + special(SPC_DBADDR) + } + field(VALL, DBF_NOACCESS) { + asl(ASL0) + extra("void *vall") + prompt("Output value L") + interest(2) + special(SPC_DBADDR) + } + field(VALM, DBF_NOACCESS) { + interest(2) + special(SPC_DBADDR) + asl(ASL0) + extra("void *valm") + prompt("Output value M") + } + field(VALN, DBF_NOACCESS) { + asl(ASL0) + extra("void *valn") + prompt("Output value N") + interest(2) + special(SPC_DBADDR) + } + field(VALO, DBF_NOACCESS) { + special(SPC_DBADDR) + interest(2) + extra("void *valo") + asl(ASL0) + prompt("Output value O") + } + field(VALP, DBF_NOACCESS) { + prompt("Output value P") + extra("void *valp") + asl(ASL0) + special(SPC_DBADDR) + interest(2) + } + field(VALQ, DBF_NOACCESS) { + interest(2) + special(SPC_DBADDR) + prompt("Output value Q") + asl(ASL0) + extra("void *valq") + } + field(VALR, DBF_NOACCESS) { + prompt("Output value R") + asl(ASL0) + extra("void *valr") + interest(2) + special(SPC_DBADDR) + } + field(VALS, DBF_NOACCESS) { + special(SPC_DBADDR) + interest(2) + prompt("Output value S") + extra("void *vals") + asl(ASL0) + } + field(VALT, DBF_NOACCESS) { + extra("void *valt") + asl(ASL0) + prompt("Output value T") + special(SPC_DBADDR) + interest(2) + } + field(VALU, DBF_NOACCESS) { + interest(2) + special(SPC_DBADDR) + prompt("Output value U") + asl(ASL0) + extra("void *valu") + } + field(OVLA, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("void *ovla") + asl(ASL0) + prompt("Old Output A") + } + field(OVLB, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("void *ovlb") + asl(ASL0) + prompt("Old Output B") + } + field(OVLC, DBF_NOACCESS) { + extra("void *ovlc") + asl(ASL0) + prompt("Old Output C") + special(SPC_NOMOD) + interest(4) + } + field(OVLD, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Old Output D") + asl(ASL0) + extra("void *ovld") + } + field(OVLE, DBF_NOACCESS) { + prompt("Old Output E") + asl(ASL0) + extra("void *ovle") + interest(4) + special(SPC_NOMOD) + } + field(OVLF, DBF_NOACCESS) { + extra("void *ovlf") + asl(ASL0) + prompt("Old Output F") + special(SPC_NOMOD) + interest(4) + } + field(OVLG, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Old Output G") + asl(ASL0) + extra("void *ovlg") + } + field(OVLH, DBF_NOACCESS) { + prompt("Old Output H") + extra("void *ovlh") + asl(ASL0) + special(SPC_NOMOD) + interest(4) + } + field(OVLI, DBF_NOACCESS) { + extra("void *ovli") + asl(ASL0) + prompt("Old Output I") + special(SPC_NOMOD) + interest(4) + } + field(OVLJ, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Old Output J") + asl(ASL0) + extra("void *ovlj") + } + field(OVLK, DBF_NOACCESS) { + prompt("Old Output K") + asl(ASL0) + extra("void *ovlk") + interest(4) + special(SPC_NOMOD) + } + field(OVLL, DBF_NOACCESS) { + prompt("Old Output L") + asl(ASL0) + extra("void *ovll") + interest(4) + special(SPC_NOMOD) + } + field(OVLM, DBF_NOACCESS) { + asl(ASL0) + extra("void *ovlm") + prompt("Old Output M") + interest(4) + special(SPC_NOMOD) + } + field(OVLN, DBF_NOACCESS) { + extra("void *ovln") + asl(ASL0) + prompt("Old Output N") + special(SPC_NOMOD) + interest(4) + } + field(OVLO, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Old Output O") + extra("void *ovlo") + asl(ASL0) + } + field(OVLP, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + asl(ASL0) + extra("void *ovlp") + prompt("Old Output P") + } + field(OVLQ, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Old Output Q") + asl(ASL0) + extra("void *ovlq") + } + field(OVLR, DBF_NOACCESS) { + prompt("Old Output R") + asl(ASL0) + extra("void *ovlr") + interest(4) + special(SPC_NOMOD) + } + field(OVLS, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("void *ovls") + asl(ASL0) + prompt("Old Output S") + } + field(OVLT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("void *ovlt") + asl(ASL0) + prompt("Old Output T") + } + field(OVLU, DBF_NOACCESS) { + prompt("Old Output U") + asl(ASL0) + extra("void *ovlu") + interest(4) + special(SPC_NOMOD) + } + field(FTVA, DBF_MENU) { + initial("DOUBLE") + prompt("Type of VALA") + menu(menuFtype) + interest(1) + special(SPC_NOMOD) + promptgroup("51 - Output A-G") + } + field(FTVB, DBF_MENU) { + interest(1) + menu(menuFtype) + special(SPC_NOMOD) + promptgroup("51 - Output A-G") + initial("DOUBLE") + prompt("Type of VALB") + } + field(FTVC, DBF_MENU) { + prompt("Type of VALC") + initial("DOUBLE") + promptgroup("51 - Output A-G") + menu(menuFtype) + interest(1) + special(SPC_NOMOD) + } + field(FTVD, DBF_MENU) { + prompt("Type of VALD") + initial("DOUBLE") + promptgroup("51 - Output A-G") + menu(menuFtype) + interest(1) + special(SPC_NOMOD) + } + field(FTVE, DBF_MENU) { + prompt("Type of VALE") + initial("DOUBLE") + promptgroup("51 - Output A-G") + interest(1) + menu(menuFtype) + special(SPC_NOMOD) + } + field(FTVF, DBF_MENU) { + initial("DOUBLE") + prompt("Type of VALF") + menu(menuFtype) + interest(1) + special(SPC_NOMOD) + promptgroup("51 - Output A-G") + } + field(FTVG, DBF_MENU) { + initial("DOUBLE") + prompt("Type of VALG") + menu(menuFtype) + interest(1) + special(SPC_NOMOD) + promptgroup("51 - Output A-G") + } + field(FTVH, DBF_MENU) { + initial("DOUBLE") + prompt("Type of VALH") + special(SPC_NOMOD) + menu(menuFtype) + interest(1) + promptgroup("52 - Output H-N") + } + field(FTVI, DBF_MENU) { + promptgroup("52 - Output H-N") + special(SPC_NOMOD) + menu(menuFtype) + interest(1) + prompt("Type of VALI") + initial("DOUBLE") + } + field(FTVJ, DBF_MENU) { + prompt("Type of VALJ") + initial("DOUBLE") + promptgroup("52 - Output H-N") + special(SPC_NOMOD) + interest(1) + menu(menuFtype) + } + field(FTVK, DBF_MENU) { + promptgroup("52 - Output H-N") + special(SPC_NOMOD) + interest(1) + menu(menuFtype) + prompt("Type of VALK") + initial("DOUBLE") + } + field(FTVL, DBF_MENU) { + promptgroup("52 - Output H-N") + special(SPC_NOMOD) + menu(menuFtype) + interest(1) + prompt("Type of VALL") + initial("DOUBLE") + } + field(FTVM, DBF_MENU) { + promptgroup("52 - Output H-N") + special(SPC_NOMOD) + menu(menuFtype) + interest(1) + prompt("Type of VALM") + initial("DOUBLE") + } + field(FTVN, DBF_MENU) { + promptgroup("52 - Output H-N") + menu(menuFtype) + interest(1) + special(SPC_NOMOD) + prompt("Type of VALN") + initial("DOUBLE") + } + field(FTVO, DBF_MENU) { + promptgroup("53 - Output O-U") + interest(1) + menu(menuFtype) + special(SPC_NOMOD) + prompt("Type of VALO") + initial("DOUBLE") + } + field(FTVP, DBF_MENU) { + promptgroup("53 - Output O-U") + special(SPC_NOMOD) + interest(1) + menu(menuFtype) + prompt("Type of VALP") + initial("DOUBLE") + } + field(FTVQ, DBF_MENU) { + promptgroup("53 - Output O-U") + special(SPC_NOMOD) + interest(1) + menu(menuFtype) + prompt("Type of VALQ") + initial("DOUBLE") + } + field(FTVR, DBF_MENU) { + menu(menuFtype) + interest(1) + special(SPC_NOMOD) + promptgroup("53 - Output O-U") + initial("DOUBLE") + prompt("Type of VALR") + } + field(FTVS, DBF_MENU) { + interest(1) + menu(menuFtype) + special(SPC_NOMOD) + promptgroup("53 - Output O-U") + initial("DOUBLE") + prompt("Type of VALS") + } + field(FTVT, DBF_MENU) { + interest(1) + menu(menuFtype) + special(SPC_NOMOD) + promptgroup("53 - Output O-U") + initial("DOUBLE") + prompt("Type of VALT") + } + field(FTVU, DBF_MENU) { + initial("DOUBLE") + prompt("Type of VALU") + special(SPC_NOMOD) + menu(menuFtype) + interest(1) + promptgroup("53 - Output O-U") + } + field(NOVA, DBF_ULONG) { + prompt("Max. elements in VALA") + initial("1") + promptgroup("51 - Output A-G") + special(SPC_NOMOD) + interest(1) + } + field(NOVB, DBF_ULONG) { + prompt("Max. elements in VALB") + initial("1") + promptgroup("51 - Output A-G") + interest(1) + special(SPC_NOMOD) + } + field(NOVC, DBF_ULONG) { + prompt("Max. elements in VALC") + initial("1") + promptgroup("51 - Output A-G") + interest(1) + special(SPC_NOMOD) + } + field(NOVD, DBF_ULONG) { + promptgroup("51 - Output A-G") + interest(1) + special(SPC_NOMOD) + prompt("Max. elements in VALD") + initial("1") + } + field(NOVE, DBF_ULONG) { + prompt("Max. elements in VALE") + initial("1") + promptgroup("51 - Output A-G") + interest(1) + special(SPC_NOMOD) + } + field(NOVF, DBF_ULONG) { + initial("1") + prompt("Max. elements in VALF") + special(SPC_NOMOD) + interest(1) + promptgroup("51 - Output A-G") + } + field(NOVG, DBF_ULONG) { + promptgroup("51 - Output A-G") + special(SPC_NOMOD) + interest(1) + prompt("Max. elements in VALG") + initial("1") + } + field(NOVH, DBF_ULONG) { + special(SPC_NOMOD) + interest(1) + promptgroup("52 - Output H-N") + initial("1") + prompt("Max. elements in VAlH") + } + field(NOVI, DBF_ULONG) { + special(SPC_NOMOD) + interest(1) + promptgroup("52 - Output H-N") + initial("1") + prompt("Max. elements in VALI") + } + field(NOVJ, DBF_ULONG) { + prompt("Max. elements in VALJ") + initial("1") + promptgroup("52 - Output H-N") + interest(1) + special(SPC_NOMOD) + } + field(NOVK, DBF_ULONG) { + promptgroup("52 - Output H-N") + special(SPC_NOMOD) + interest(1) + prompt("Max. elements in VALK") + initial("1") + } + field(NOVL, DBF_ULONG) { + initial("1") + prompt("Max. elements in VALL") + interest(1) + special(SPC_NOMOD) + promptgroup("52 - Output H-N") + } + field(NOVM, DBF_ULONG) { + prompt("Max. elements in VALM") + initial("1") + promptgroup("52 - Output H-N") + interest(1) + special(SPC_NOMOD) + } + field(NOVN, DBF_ULONG) { + initial("1") + prompt("Max. elements in VALN") + interest(1) + special(SPC_NOMOD) + promptgroup("52 - Output H-N") + } + field(NOVO, DBF_ULONG) { + prompt("Max. elements in VALO") + initial("1") + promptgroup("53 - Output O-U") + special(SPC_NOMOD) + interest(1) + } + field(NOVP, DBF_ULONG) { + interest(1) + special(SPC_NOMOD) + promptgroup("53 - Output O-U") + initial("1") + prompt("Max. elements in VALP") + } + field(NOVQ, DBF_ULONG) { + promptgroup("53 - Output O-U") + special(SPC_NOMOD) + interest(1) + prompt("Max. elements in VALQ") + initial("1") + } + field(NOVR, DBF_ULONG) { + initial("1") + prompt("Max. elements in VALR") + interest(1) + special(SPC_NOMOD) + promptgroup("53 - Output O-U") + } + field(NOVS, DBF_ULONG) { + prompt("Max. elements in VALS") + initial("1") + promptgroup("53 - Output O-U") + special(SPC_NOMOD) + interest(1) + } + field(NOVT, DBF_ULONG) { + promptgroup("53 - Output O-U") + special(SPC_NOMOD) + interest(1) + prompt("Max. elements in VALT") + initial("1") + } + field(NOVU, DBF_ULONG) { + interest(1) + special(SPC_NOMOD) + promptgroup("53 - Output O-U") + initial("1") + prompt("Max. elements in VALU") + } + field(NEVA, DBF_ULONG) { + prompt("Num. elements in VALA") + initial("1") + special(SPC_NOMOD) + interest(3) + } + field(NEVB, DBF_ULONG) { + prompt("Num. elements in VALB") + initial("1") + special(SPC_NOMOD) + interest(3) + } + field(NEVC, DBF_ULONG) { + special(SPC_NOMOD) + interest(3) + initial("1") + prompt("Num. elements in VALC") + } + field(NEVD, DBF_ULONG) { + interest(3) + special(SPC_NOMOD) + prompt("Num. elements in VALD") + initial("1") + } + field(NEVE, DBF_ULONG) { + special(SPC_NOMOD) + interest(3) + prompt("Num. elements in VALE") + initial("1") + } + field(NEVF, DBF_ULONG) { + special(SPC_NOMOD) + interest(3) + initial("1") + prompt("Num. elements in VALF") + } + field(NEVG, DBF_ULONG) { + special(SPC_NOMOD) + interest(3) + initial("1") + prompt("Num. elements in VALG") + } + field(NEVH, DBF_ULONG) { + special(SPC_NOMOD) + interest(3) + prompt("Num. elements in VAlH") + initial("1") + } + field(NEVI, DBF_ULONG) { + initial("1") + prompt("Num. elements in VALI") + interest(3) + special(SPC_NOMOD) + } + field(NEVJ, DBF_ULONG) { + interest(3) + special(SPC_NOMOD) + prompt("Num. elements in VALJ") + initial("1") + } + field(NEVK, DBF_ULONG) { + interest(3) + special(SPC_NOMOD) + initial("1") + prompt("Num. elements in VALK") + } + field(NEVL, DBF_ULONG) { + special(SPC_NOMOD) + interest(3) + prompt("Num. elements in VALL") + initial("1") + } + field(NEVM, DBF_ULONG) { + prompt("Num. elements in VALM") + initial("1") + interest(3) + special(SPC_NOMOD) + } + field(NEVN, DBF_ULONG) { + prompt("Num. elements in VALN") + initial("1") + interest(3) + special(SPC_NOMOD) + } + field(NEVO, DBF_ULONG) { + interest(3) + special(SPC_NOMOD) + prompt("Num. elements in VALO") + initial("1") + } + field(NEVP, DBF_ULONG) { + prompt("Num. elements in VALP") + initial("1") + special(SPC_NOMOD) + interest(3) + } + field(NEVQ, DBF_ULONG) { + initial("1") + prompt("Num. elements in VALQ") + interest(3) + special(SPC_NOMOD) + } + field(NEVR, DBF_ULONG) { + interest(3) + special(SPC_NOMOD) + prompt("Num. elements in VALR") + initial("1") + } + field(NEVS, DBF_ULONG) { + prompt("Num. elements in VALS") + initial("1") + special(SPC_NOMOD) + interest(3) + } + field(NEVT, DBF_ULONG) { + initial("1") + prompt("Num. elements in VALT") + interest(3) + special(SPC_NOMOD) + } + field(NEVU, DBF_ULONG) { + initial("1") + prompt("Num. elements in VALU") + interest(3) + special(SPC_NOMOD) + } + field(ONVA, DBF_ULONG) { + interest(4) + special(SPC_NOMOD) + initial("1") + prompt("Num. elements in OVLA") + } + field(ONVB, DBF_ULONG) { + prompt("Num. elements in OVLB") + initial("1") + special(SPC_NOMOD) + interest(4) + } + field(ONVC, DBF_ULONG) { + interest(4) + special(SPC_NOMOD) + initial("1") + prompt("Num. elements in OVLC") + } + field(ONVD, DBF_ULONG) { + prompt("Num. elements in OVLD") + initial("1") + special(SPC_NOMOD) + interest(4) + } + field(ONVE, DBF_ULONG) { + initial("1") + prompt("Num. elements in OVLE") + interest(4) + special(SPC_NOMOD) + } + field(ONVF, DBF_ULONG) { + special(SPC_NOMOD) + interest(4) + prompt("Num. elements in OVLF") + initial("1") + } + field(ONVG, DBF_ULONG) { + interest(4) + special(SPC_NOMOD) + prompt("Num. elements in OVLG") + initial("1") + } + field(ONVH, DBF_ULONG) { + prompt("Num. elements in VAlH") + initial("1") + interest(4) + special(SPC_NOMOD) + } + field(ONVI, DBF_ULONG) { + initial("1") + prompt("Num. elements in OVLI") + interest(4) + special(SPC_NOMOD) + } + field(ONVJ, DBF_ULONG) { + initial("1") + prompt("Num. elements in OVLJ") + interest(4) + special(SPC_NOMOD) + } + field(ONVK, DBF_ULONG) { + interest(4) + special(SPC_NOMOD) + initial("1") + prompt("Num. elements in OVLK") + } + field(ONVL, DBF_ULONG) { + special(SPC_NOMOD) + interest(4) + prompt("Num. elements in OVLL") + initial("1") + } + field(ONVM, DBF_ULONG) { + special(SPC_NOMOD) + interest(4) + initial("1") + prompt("Num. elements in OVLM") + } + field(ONVN, DBF_ULONG) { + prompt("Num. elements in OVLN") + initial("1") + interest(4) + special(SPC_NOMOD) + } + field(ONVO, DBF_ULONG) { + prompt("Num. elements in OVLO") + initial("1") + special(SPC_NOMOD) + interest(4) + } + field(ONVP, DBF_ULONG) { + interest(4) + special(SPC_NOMOD) + initial("1") + prompt("Num. elements in OVLP") + } + field(ONVQ, DBF_ULONG) { + interest(4) + special(SPC_NOMOD) + initial("1") + prompt("Num. elements in OVLQ") + } + field(ONVR, DBF_ULONG) { + special(SPC_NOMOD) + interest(4) + initial("1") + prompt("Num. elements in OVLR") + } + field(ONVS, DBF_ULONG) { + special(SPC_NOMOD) + interest(4) + initial("1") + prompt("Num. elements in OVLS") + } + field(ONVT, DBF_ULONG) { + interest(4) + special(SPC_NOMOD) + initial("1") + prompt("Num. elements in OVLT") + } + field(ONVU, DBF_ULONG) { + interest(4) + special(SPC_NOMOD) + initial("1") + prompt("Num. elements in OVLU") + } +} +recordtype(mbbo) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + %#include "callback.h" + field(NAME, DBF_STRING) { + prompt("Record Name") + size(61) + special(SPC_NOMOD) + } + field(DESC, DBF_STRING) { + promptgroup("10 - Common") + size(41) + prompt("Descriptor") + } + field(ASG, DBF_STRING) { + promptgroup("10 - Common") + special(SPC_AS) + prompt("Access Security Group") + size(29) + } + field(SCAN, DBF_MENU) { + prompt("Scan Mechanism") + promptgroup("20 - Scan") + menu(menuScan) + interest(1) + special(SPC_SCAN) + } + field(PINI, DBF_MENU) { + prompt("Process at iocInit") + promptgroup("20 - Scan") + interest(1) + menu(menuPini) + } + field(PHAS, DBF_SHORT) { + prompt("Scan Phase") + special(SPC_SCAN) + interest(1) + promptgroup("20 - Scan") + } + field(EVNT, DBF_STRING) { + promptgroup("20 - Scan") + interest(1) + special(SPC_SCAN) + prompt("Event Name") + size(40) + } + field(TSE, DBF_SHORT) { + promptgroup("20 - Scan") + interest(1) + prompt("Time Stamp Event") + } + field(TSEL, DBF_INLINK) { + prompt("Time Stamp Link") + interest(1) + promptgroup("20 - Scan") + } + field(DTYP, DBF_DEVICE) { + interest(1) + promptgroup("10 - Common") + prompt("Device Type") + } + field(DISV, DBF_SHORT) { + prompt("Disable Value") + initial("1") + promptgroup("20 - Scan") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + interest(1) + promptgroup("20 - Scan") + prompt("Scanning Disable") + } + field(MLOK, DBF_NOACCESS) { + extra("epicsMutexId mlok") + prompt("Monitor lock") + special(SPC_NOMOD) + interest(4) + } + field(MLIS, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Monitor List") + extra("ELLLIST mlis") + } + field(BKLNK, DBF_NOACCESS) { + prompt("Backwards link tracking") + extra("ELLLIST bklnk") + interest(4) + special(SPC_NOMOD) + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + prompt("Force Processing") + interest(3) + pp(TRUE) + } + field(STAT, DBF_MENU) { + menu(menuAlarmStat) + special(SPC_NOMOD) + initial("UDF") + prompt("Alarm Status") + } + field(SEVR, DBF_MENU) { + prompt("Alarm Severity") + special(SPC_NOMOD) + menu(menuAlarmSevr) + } + field(NSTA, DBF_MENU) { + prompt("New Alarm Status") + menu(menuAlarmStat) + interest(2) + special(SPC_NOMOD) + } + field(NSEV, DBF_MENU) { + menu(menuAlarmSevr) + interest(2) + special(SPC_NOMOD) + prompt("New Alarm Severity") + } + field(ACKS, DBF_MENU) { + prompt("Alarm Ack Severity") + special(SPC_NOMOD) + menu(menuAlarmSevr) + interest(2) + } + field(ACKT, DBF_MENU) { + prompt("Alarm Ack Transient") + initial("YES") + promptgroup("70 - Alarm") + special(SPC_NOMOD) + menu(menuYesNo) + interest(2) + } + field(DISS, DBF_MENU) { + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + prompt("Disable Alarm Sevrty") + } + field(LCNT, DBF_UCHAR) { + special(SPC_NOMOD) + interest(2) + prompt("Lock Count") + } + field(PACT, DBF_UCHAR) { + special(SPC_NOMOD) + interest(1) + prompt("Record active") + } + field(PUTF, DBF_UCHAR) { + prompt("dbPutField process") + interest(1) + special(SPC_NOMOD) + } + field(RPRO, DBF_UCHAR) { + prompt("Reprocess ") + interest(1) + special(SPC_NOMOD) + } + field(ASP, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Access Security Pvt") + extra("struct asgMember *asp") + } + field(PPN, DBF_NOACCESS) { + extra("struct processNotify *ppn") + prompt("pprocessNotify") + interest(4) + special(SPC_NOMOD) + } + field(PPNR, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("pprocessNotifyRecord") + extra("struct processNotifyRecord *ppnr") + } + field(SPVT, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Scan Private") + extra("struct scan_element *spvt") + } + field(RSET, DBF_NOACCESS) { + prompt("Address of RSET") + extra("struct typed_rset *rset") + special(SPC_NOMOD) + interest(4) + } + field(DSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct dset *dset") + prompt("DSET address") + } + field(DPVT, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Device Private") + extra("void *dpvt") + } + field(RDES, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Address of dbRecordType") + extra("struct dbRecordType *rdes") + } + field(LSET, DBF_NOACCESS) { + extra("struct lockRecord *lset") + prompt("Lock Set") + special(SPC_NOMOD) + interest(4) + } + field(PRIO, DBF_MENU) { + prompt("Scheduling Priority") + special(SPC_SCAN) + menu(menuPriority) + interest(1) + promptgroup("20 - Scan") + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + prompt("Break Point") + extra("char bkpt") + interest(1) + special(SPC_NOMOD) + } + field(UDF, DBF_UCHAR) { + prompt("Undefined") + initial("1") + promptgroup("10 - Common") + pp(TRUE) + interest(1) + } + field(UDFS, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + initial("INVALID") + prompt("Undefined Alarm Sevrty") + } + field(TIME, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(2) + prompt("Time") + extra("epicsTimeStamp time") + } + field(FLNK, DBF_FWDLINK) { + prompt("Forward Process Link") + interest(1) + promptgroup("20 - Scan") + } + field(VAL, DBF_ENUM) { + promptgroup("50 - Output") + pp(TRUE) + special(SPC_DBADDR) + prompt("Desired Value") + asl(ASL0) + } + field(DOL, DBF_INLINK) { + prompt("Desired Output Loc") + interest(1) + promptgroup("40 - Input") + } + field(OMSL, DBF_MENU) { + prompt("Output Mode Select") + interest(1) + menu(menuOmsl) + promptgroup("50 - Output") + } + field(NOBT, DBF_USHORT) { + special(SPC_NOMOD) + interest(1) + promptgroup("50 - Output") + prompt("Number of Bits") + } + field(OUT, DBF_OUTLINK) { + promptgroup("50 - Output") + interest(1) + prompt("Output Specification") + } + field(ZRVL, DBF_ULONG) { + base(HEX) + prompt("Zero Value") + interest(1) + special(SPC_MOD) + promptgroup("51 - Output 0-7") + pp(TRUE) + } + field(ONVL, DBF_ULONG) { + promptgroup("51 - Output 0-7") + pp(TRUE) + special(SPC_MOD) + interest(1) + prompt("One Value") + base(HEX) + } + field(TWVL, DBF_ULONG) { + special(SPC_MOD) + interest(1) + pp(TRUE) + promptgroup("51 - Output 0-7") + prompt("Two Value") + base(HEX) + } + field(THVL, DBF_ULONG) { + base(HEX) + prompt("Three Value") + interest(1) + special(SPC_MOD) + pp(TRUE) + promptgroup("51 - Output 0-7") + } + field(FRVL, DBF_ULONG) { + prompt("Four Value") + base(HEX) + special(SPC_MOD) + interest(1) + promptgroup("51 - Output 0-7") + pp(TRUE) + } + field(FVVL, DBF_ULONG) { + pp(TRUE) + promptgroup("51 - Output 0-7") + special(SPC_MOD) + interest(1) + prompt("Five Value") + base(HEX) + } + field(SXVL, DBF_ULONG) { + promptgroup("51 - Output 0-7") + pp(TRUE) + interest(1) + special(SPC_MOD) + base(HEX) + prompt("Six Value") + } + field(SVVL, DBF_ULONG) { + prompt("Seven Value") + base(HEX) + promptgroup("51 - Output 0-7") + pp(TRUE) + special(SPC_MOD) + interest(1) + } + field(EIVL, DBF_ULONG) { + base(HEX) + prompt("Eight Value") + interest(1) + special(SPC_MOD) + pp(TRUE) + promptgroup("52 - Output 8-15") + } + field(NIVL, DBF_ULONG) { + interest(1) + special(SPC_MOD) + pp(TRUE) + promptgroup("52 - Output 8-15") + base(HEX) + prompt("Nine Value") + } + field(TEVL, DBF_ULONG) { + base(HEX) + prompt("Ten Value") + interest(1) + special(SPC_MOD) + promptgroup("52 - Output 8-15") + pp(TRUE) + } + field(ELVL, DBF_ULONG) { + prompt("Eleven Value") + base(HEX) + special(SPC_MOD) + interest(1) + promptgroup("52 - Output 8-15") + pp(TRUE) + } + field(TVVL, DBF_ULONG) { + base(HEX) + prompt("Twelve Value") + interest(1) + special(SPC_MOD) + pp(TRUE) + promptgroup("52 - Output 8-15") + } + field(TTVL, DBF_ULONG) { + promptgroup("52 - Output 8-15") + pp(TRUE) + special(SPC_MOD) + interest(1) + prompt("Thirteen Value") + base(HEX) + } + field(FTVL, DBF_ULONG) { + prompt("Fourteen Value") + base(HEX) + special(SPC_MOD) + interest(1) + promptgroup("52 - Output 8-15") + pp(TRUE) + } + field(FFVL, DBF_ULONG) { + pp(TRUE) + promptgroup("52 - Output 8-15") + interest(1) + special(SPC_MOD) + base(HEX) + prompt("Fifteen Value") + } + field(ZRST, DBF_STRING) { + size(26) + prompt("Zero String") + special(SPC_MOD) + interest(1) + promptgroup("81 - Display 0-7") + pp(TRUE) + } + field(ONST, DBF_STRING) { + special(SPC_MOD) + interest(1) + pp(TRUE) + promptgroup("81 - Display 0-7") + size(26) + prompt("One String") + } + field(TWST, DBF_STRING) { + promptgroup("81 - Display 0-7") + pp(TRUE) + interest(1) + special(SPC_MOD) + prompt("Two String") + size(26) + } + field(THST, DBF_STRING) { + pp(TRUE) + promptgroup("81 - Display 0-7") + interest(1) + special(SPC_MOD) + prompt("Three String") + size(26) + } + field(FRST, DBF_STRING) { + prompt("Four String") + size(26) + promptgroup("81 - Display 0-7") + pp(TRUE) + interest(1) + special(SPC_MOD) + } + field(FVST, DBF_STRING) { + special(SPC_MOD) + interest(1) + promptgroup("81 - Display 0-7") + pp(TRUE) + size(26) + prompt("Five String") + } + field(SXST, DBF_STRING) { + promptgroup("81 - Display 0-7") + pp(TRUE) + special(SPC_MOD) + interest(1) + prompt("Six String") + size(26) + } + field(SVST, DBF_STRING) { + prompt("Seven String") + size(26) + promptgroup("81 - Display 0-7") + pp(TRUE) + interest(1) + special(SPC_MOD) + } + field(EIST, DBF_STRING) { + special(SPC_MOD) + interest(1) + pp(TRUE) + promptgroup("82 - Display 8-15") + size(26) + prompt("Eight String") + } + field(NIST, DBF_STRING) { + size(26) + prompt("Nine String") + interest(1) + special(SPC_MOD) + promptgroup("82 - Display 8-15") + pp(TRUE) + } + field(TEST, DBF_STRING) { + size(26) + prompt("Ten String") + interest(1) + special(SPC_MOD) + promptgroup("82 - Display 8-15") + pp(TRUE) + } + field(ELST, DBF_STRING) { + special(SPC_MOD) + interest(1) + promptgroup("82 - Display 8-15") + pp(TRUE) + size(26) + prompt("Eleven String") + } + field(TVST, DBF_STRING) { + size(26) + prompt("Twelve String") + interest(1) + special(SPC_MOD) + pp(TRUE) + promptgroup("82 - Display 8-15") + } + field(TTST, DBF_STRING) { + pp(TRUE) + promptgroup("82 - Display 8-15") + interest(1) + special(SPC_MOD) + prompt("Thirteen String") + size(26) + } + field(FTST, DBF_STRING) { + size(26) + prompt("Fourteen String") + interest(1) + special(SPC_MOD) + pp(TRUE) + promptgroup("82 - Display 8-15") + } + field(FFST, DBF_STRING) { + prompt("Fifteen String") + size(26) + promptgroup("82 - Display 8-15") + pp(TRUE) + special(SPC_MOD) + interest(1) + } + field(ZRSV, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + promptgroup("71 - Alarm 0-7") + pp(TRUE) + prompt("State Zero Severity") + } + field(ONSV, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + pp(TRUE) + promptgroup("71 - Alarm 0-7") + prompt("State One Severity") + } + field(TWSV, DBF_MENU) { + prompt("State Two Severity") + menu(menuAlarmSevr) + interest(1) + pp(TRUE) + promptgroup("71 - Alarm 0-7") + } + field(THSV, DBF_MENU) { + prompt("State Three Severity") + promptgroup("71 - Alarm 0-7") + pp(TRUE) + interest(1) + menu(menuAlarmSevr) + } + field(FRSV, DBF_MENU) { + prompt("State Four Severity") + menu(menuAlarmSevr) + interest(1) + pp(TRUE) + promptgroup("71 - Alarm 0-7") + } + field(FVSV, DBF_MENU) { + promptgroup("71 - Alarm 0-7") + pp(TRUE) + interest(1) + menu(menuAlarmSevr) + prompt("State Five Severity") + } + field(SXSV, DBF_MENU) { + pp(TRUE) + promptgroup("71 - Alarm 0-7") + interest(1) + menu(menuAlarmSevr) + prompt("State Six Severity") + } + field(SVSV, DBF_MENU) { + prompt("State Seven Severity") + promptgroup("71 - Alarm 0-7") + pp(TRUE) + menu(menuAlarmSevr) + interest(1) + } + field(EISV, DBF_MENU) { + prompt("State Eight Severity") + promptgroup("72 - Alarm 8-15") + pp(TRUE) + interest(1) + menu(menuAlarmSevr) + } + field(NISV, DBF_MENU) { + prompt("State Nine Severity") + interest(1) + menu(menuAlarmSevr) + promptgroup("72 - Alarm 8-15") + pp(TRUE) + } + field(TESV, DBF_MENU) { + interest(1) + menu(menuAlarmSevr) + pp(TRUE) + promptgroup("72 - Alarm 8-15") + prompt("State Ten Severity") + } + field(ELSV, DBF_MENU) { + promptgroup("72 - Alarm 8-15") + pp(TRUE) + interest(1) + menu(menuAlarmSevr) + prompt("State Eleven Severity") + } + field(TVSV, DBF_MENU) { + interest(1) + menu(menuAlarmSevr) + pp(TRUE) + promptgroup("72 - Alarm 8-15") + prompt("State Twelve Severity") + } + field(TTSV, DBF_MENU) { + promptgroup("72 - Alarm 8-15") + pp(TRUE) + interest(1) + menu(menuAlarmSevr) + prompt("State Thirteen Sevr") + } + field(FTSV, DBF_MENU) { + promptgroup("72 - Alarm 8-15") + pp(TRUE) + interest(1) + menu(menuAlarmSevr) + prompt("State Fourteen Sevr") + } + field(FFSV, DBF_MENU) { + prompt("State Fifteen Sevr") + pp(TRUE) + promptgroup("72 - Alarm 8-15") + menu(menuAlarmSevr) + interest(1) + } + field(UNSV, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + pp(TRUE) + promptgroup("70 - Alarm") + prompt("Unknown State Sevr") + } + field(COSV, DBF_MENU) { + prompt("Change of State Sevr") + promptgroup("70 - Alarm") + pp(TRUE) + interest(1) + menu(menuAlarmSevr) + } + field(RVAL, DBF_ULONG) { + pp(TRUE) + prompt("Raw Value") + } + field(ORAW, DBF_ULONG) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Raw Value") + } + field(RBV, DBF_ULONG) { + special(SPC_NOMOD) + prompt("Readback Value") + } + field(ORBV, DBF_ULONG) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Readback Value") + } + field(MASK, DBF_ULONG) { + special(SPC_NOMOD) + interest(1) + prompt("Hardware Mask") + } + field(MLST, DBF_USHORT) { + prompt("Last Value Monitored") + special(SPC_NOMOD) + interest(3) + } + field(LALM, DBF_USHORT) { + interest(3) + special(SPC_NOMOD) + prompt("Last Value Alarmed") + } + field(SDEF, DBF_SHORT) { + special(SPC_NOMOD) + interest(3) + prompt("States Defined") + } + field(SHFT, DBF_USHORT) { + promptgroup("50 - Output") + interest(1) + prompt("Shift") + } + field(SIOL, DBF_OUTLINK) { + promptgroup("90 - Simulate") + interest(1) + prompt("Simulation Output Link") + } + field(SIML, DBF_INLINK) { + interest(1) + promptgroup("90 - Simulate") + prompt("Simulation Mode Link") + } + field(SIMM, DBF_MENU) { + prompt("Simulation Mode") + special(SPC_MOD) + menu(menuYesNo) + interest(1) + } + field(SIMS, DBF_MENU) { + prompt("Simulation Mode Severity") + menu(menuAlarmSevr) + interest(2) + promptgroup("90 - Simulate") + } + field(OLDSIMM, DBF_MENU) { + interest(4) + menu(menuSimm) + special(SPC_NOMOD) + prompt("Prev. Simulation Mode") + } + field(SSCN, DBF_MENU) { + prompt("Sim. Mode Scan") + initial("65535") + promptgroup("90 - Simulate") + interest(1) + menu(menuScan) + } + field(SDLY, DBF_DOUBLE) { + initial("-1.0") + prompt("Sim. Mode Async Delay") + interest(2) + promptgroup("90 - Simulate") + } + field(SIMPVT, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Sim. Mode Private") + extra("CALLBACK *simpvt") + } + field(IVOA, DBF_MENU) { + prompt("INVALID outpt action") + promptgroup("50 - Output") + interest(2) + menu(menuIvoa) + } + field(IVOV, DBF_USHORT) { + prompt("INVALID output value") + promptgroup("50 - Output") + interest(2) + } +} +device(mbbo, CONSTANT, devMbboSoft, "Soft Channel") +device(mbbo, CONSTANT, devMbboSoftRaw, "Raw Soft Channel") +device(mbbo, CONSTANT, devMbboSoftCallback, "Async Soft Channel") +device(mbbo, INST_IO, asynMbboInt32, "asynInt32") +device(mbbo, INST_IO, asynMbboUInt32Digital, "asynUInt32Digital") +device(mbbo, INST_IO, devmbboStream, "stream") +device(mbbo, INST_IO, devMbboMPC, "asyn MPC") +device(mbbo, INST_IO, devMbboTPG261, "asyn TPG261") +recordtype(longout) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + %#include "callback.h" + field(NAME, DBF_STRING) { + size(61) + prompt("Record Name") + special(SPC_NOMOD) + } + field(DESC, DBF_STRING) { + promptgroup("10 - Common") + size(41) + prompt("Descriptor") + } + field(ASG, DBF_STRING) { + size(29) + prompt("Access Security Group") + special(SPC_AS) + promptgroup("10 - Common") + } + field(SCAN, DBF_MENU) { + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + menu(menuScan) + prompt("Scan Mechanism") + } + field(PINI, DBF_MENU) { + promptgroup("20 - Scan") + interest(1) + menu(menuPini) + prompt("Process at iocInit") + } + field(PHAS, DBF_SHORT) { + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + prompt("Scan Phase") + } + field(EVNT, DBF_STRING) { + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + size(40) + prompt("Event Name") + } + field(TSE, DBF_SHORT) { + promptgroup("20 - Scan") + interest(1) + prompt("Time Stamp Event") + } + field(TSEL, DBF_INLINK) { + promptgroup("20 - Scan") + interest(1) + prompt("Time Stamp Link") + } + field(DTYP, DBF_DEVICE) { + prompt("Device Type") + promptgroup("10 - Common") + interest(1) + } + field(DISV, DBF_SHORT) { + prompt("Disable Value") + initial("1") + promptgroup("20 - Scan") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + prompt("Scanning Disable") + interest(1) + promptgroup("20 - Scan") + } + field(MLOK, DBF_NOACCESS) { + extra("epicsMutexId mlok") + prompt("Monitor lock") + special(SPC_NOMOD) + interest(4) + } + field(MLIS, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("ELLLIST mlis") + prompt("Monitor List") + } + field(BKLNK, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("ELLLIST bklnk") + prompt("Backwards link tracking") + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + prompt("Force Processing") + interest(3) + pp(TRUE) + } + field(STAT, DBF_MENU) { + special(SPC_NOMOD) + menu(menuAlarmStat) + initial("UDF") + prompt("Alarm Status") + } + field(SEVR, DBF_MENU) { + special(SPC_NOMOD) + menu(menuAlarmSevr) + prompt("Alarm Severity") + } + field(NSTA, DBF_MENU) { + prompt("New Alarm Status") + menu(menuAlarmStat) + interest(2) + special(SPC_NOMOD) + } + field(NSEV, DBF_MENU) { + special(SPC_NOMOD) + menu(menuAlarmSevr) + interest(2) + prompt("New Alarm Severity") + } + field(ACKS, DBF_MENU) { + prompt("Alarm Ack Severity") + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) + } + field(ACKT, DBF_MENU) { + prompt("Alarm Ack Transient") + initial("YES") + promptgroup("70 - Alarm") + interest(2) + menu(menuYesNo) + special(SPC_NOMOD) + } + field(DISS, DBF_MENU) { + prompt("Disable Alarm Sevrty") + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + } + field(LCNT, DBF_UCHAR) { + prompt("Lock Count") + special(SPC_NOMOD) + interest(2) + } + field(PACT, DBF_UCHAR) { + prompt("Record active") + special(SPC_NOMOD) + interest(1) + } + field(PUTF, DBF_UCHAR) { + special(SPC_NOMOD) + interest(1) + prompt("dbPutField process") + } + field(RPRO, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("Reprocess ") + } + field(ASP, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Access Security Pvt") + extra("struct asgMember *asp") + } + field(PPN, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct processNotify *ppn") + prompt("pprocessNotify") + } + field(PPNR, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("pprocessNotifyRecord") + extra("struct processNotifyRecord *ppnr") + } + field(SPVT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Scan Private") + extra("struct scan_element *spvt") + } + field(RSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct typed_rset *rset") + prompt("Address of RSET") + } + field(DSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("DSET address") + extra("struct dset *dset") + } + field(DPVT, DBF_NOACCESS) { + extra("void *dpvt") + prompt("Device Private") + special(SPC_NOMOD) + interest(4) + } + field(RDES, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Address of dbRecordType") + extra("struct dbRecordType *rdes") + } + field(LSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Lock Set") + extra("struct lockRecord *lset") + } + field(PRIO, DBF_MENU) { + promptgroup("20 - Scan") + special(SPC_SCAN) + menu(menuPriority) + interest(1) + prompt("Scheduling Priority") + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + interest(1) + special(SPC_NOMOD) + extra("char bkpt") + prompt("Break Point") + } + field(UDF, DBF_UCHAR) { + initial("1") + prompt("Undefined") + interest(1) + promptgroup("10 - Common") + pp(TRUE) + } + field(UDFS, DBF_MENU) { + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + prompt("Undefined Alarm Sevrty") + initial("INVALID") + } + field(TIME, DBF_NOACCESS) { + interest(2) + special(SPC_NOMOD) + extra("epicsTimeStamp time") + prompt("Time") + } + field(FLNK, DBF_FWDLINK) { + promptgroup("20 - Scan") + interest(1) + prompt("Forward Process Link") + } + field(VAL, DBF_LONG) { + pp(TRUE) + promptgroup("50 - Output") + prompt("Desired Output") + asl(ASL0) + } + field(OUT, DBF_OUTLINK) { + interest(1) + promptgroup("50 - Output") + prompt("Output Specification") + } + field(DOL, DBF_INLINK) { + promptgroup("40 - Input") + interest(1) + prompt("Desired Output Loc") + } + field(OMSL, DBF_MENU) { + interest(1) + menu(menuOmsl) + promptgroup("50 - Output") + prompt("Output Mode Select") + } + field(EGU, DBF_STRING) { + interest(1) + prop(YES) + promptgroup("80 - Display") + size(16) + prompt("Engineering Units") + } + field(DRVH, DBF_LONG) { + prompt("Drive High Limit") + pp(TRUE) + promptgroup("30 - Action") + prop(YES) + interest(1) + } + field(DRVL, DBF_LONG) { + interest(1) + prop(YES) + promptgroup("30 - Action") + pp(TRUE) + prompt("Drive Low Limit") + } + field(HOPR, DBF_LONG) { + prompt("High Operating Range") + promptgroup("80 - Display") + interest(1) + prop(YES) + } + field(LOPR, DBF_LONG) { + promptgroup("80 - Display") + prop(YES) + interest(1) + prompt("Low Operating Range") + } + field(HIHI, DBF_LONG) { + prompt("Hihi Alarm Limit") + promptgroup("70 - Alarm") + pp(TRUE) + prop(YES) + interest(1) + } + field(LOLO, DBF_LONG) { + prompt("Lolo Alarm Limit") + interest(1) + prop(YES) + promptgroup("70 - Alarm") + pp(TRUE) + } + field(HIGH, DBF_LONG) { + prompt("High Alarm Limit") + pp(TRUE) + promptgroup("70 - Alarm") + interest(1) + prop(YES) + } + field(LOW, DBF_LONG) { + interest(1) + prop(YES) + promptgroup("70 - Alarm") + pp(TRUE) + prompt("Low Alarm Limit") + } + field(HHSV, DBF_MENU) { + interest(1) + menu(menuAlarmSevr) + promptgroup("70 - Alarm") + pp(TRUE) + prompt("Hihi Severity") + } + field(LLSV, DBF_MENU) { + prompt("Lolo Severity") + interest(1) + menu(menuAlarmSevr) + promptgroup("70 - Alarm") + pp(TRUE) + } + field(HSV, DBF_MENU) { + promptgroup("70 - Alarm") + pp(TRUE) + interest(1) + menu(menuAlarmSevr) + prompt("High Severity") + } + field(LSV, DBF_MENU) { + interest(1) + menu(menuAlarmSevr) + pp(TRUE) + promptgroup("70 - Alarm") + prompt("Low Severity") + } + field(HYST, DBF_LONG) { + promptgroup("70 - Alarm") + interest(1) + prompt("Alarm Deadband") + } + field(ADEL, DBF_LONG) { + prompt("Archive Deadband") + promptgroup("80 - Display") + interest(1) + } + field(MDEL, DBF_LONG) { + prompt("Monitor Deadband") + interest(1) + promptgroup("80 - Display") + } + field(LALM, DBF_LONG) { + prompt("Last Value Alarmed") + interest(3) + special(SPC_NOMOD) + } + field(ALST, DBF_LONG) { + interest(3) + special(SPC_NOMOD) + prompt("Last Value Archived") + } + field(MLST, DBF_LONG) { + special(SPC_NOMOD) + interest(3) + prompt("Last Val Monitored") + } + field(SIOL, DBF_OUTLINK) { + prompt("Simulation Output Link") + promptgroup("90 - Simulate") + interest(1) + } + field(SIML, DBF_INLINK) { + promptgroup("90 - Simulate") + interest(1) + prompt("Simulation Mode Link") + } + field(SIMM, DBF_MENU) { + prompt("Simulation Mode") + special(SPC_MOD) + interest(1) + menu(menuYesNo) + } + field(SIMS, DBF_MENU) { + promptgroup("90 - Simulate") + interest(2) + menu(menuAlarmSevr) + prompt("Simulation Mode Severity") + } + field(OLDSIMM, DBF_MENU) { + special(SPC_NOMOD) + interest(4) + menu(menuSimm) + prompt("Prev. Simulation Mode") + } + field(SSCN, DBF_MENU) { + menu(menuScan) + interest(1) + promptgroup("90 - Simulate") + initial("65535") + prompt("Sim. Mode Scan") + } + field(SDLY, DBF_DOUBLE) { + prompt("Sim. Mode Async Delay") + initial("-1.0") + promptgroup("90 - Simulate") + interest(2) + } + field(SIMPVT, DBF_NOACCESS) { + prompt("Sim. Mode Private") + extra("CALLBACK *simpvt") + special(SPC_NOMOD) + interest(4) + } + field(IVOA, DBF_MENU) { + promptgroup("50 - Output") + interest(2) + menu(menuIvoa) + prompt("INVALID output action") + } + field(IVOV, DBF_LONG) { + prompt("INVALID output value") + promptgroup("50 - Output") + interest(2) + } +} +device(longout, CONSTANT, devLoSoft, "Soft Channel") +device(longout, CONSTANT, devLoSoftCallback, "Async Soft Channel") +device(longout, INST_IO, asynLoInt32, "asynInt32") +device(longout, INST_IO, asynLoUInt32Digital, "asynUInt32Digital") +device(longout, INST_IO, devlongoutStream, "stream") +device(longout, INST_IO, devLoStrParm, "asyn lo stringParm") +device(longout, BBGPIB_IO, devLoAX301, "PZT Bug") +recordtype(acalcout) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + field(NAME, DBF_STRING) { + size(61) + prompt("Record Name") + special(SPC_NOMOD) + } + field(DESC, DBF_STRING) { + promptgroup("10 - Common") + size(41) + prompt("Descriptor") + } + field(ASG, DBF_STRING) { + size(29) + prompt("Access Security Group") + special(SPC_AS) + promptgroup("10 - Common") + } + field(SCAN, DBF_MENU) { + prompt("Scan Mechanism") + promptgroup("20 - Scan") + special(SPC_SCAN) + menu(menuScan) + interest(1) + } + field(PINI, DBF_MENU) { + promptgroup("20 - Scan") + interest(1) + menu(menuPini) + prompt("Process at iocInit") + } + field(PHAS, DBF_SHORT) { + special(SPC_SCAN) + interest(1) + promptgroup("20 - Scan") + prompt("Scan Phase") + } + field(EVNT, DBF_STRING) { + special(SPC_SCAN) + interest(1) + promptgroup("20 - Scan") + size(40) + prompt("Event Name") + } + field(TSE, DBF_SHORT) { + promptgroup("20 - Scan") + interest(1) + prompt("Time Stamp Event") + } + field(TSEL, DBF_INLINK) { + interest(1) + promptgroup("20 - Scan") + prompt("Time Stamp Link") + } + field(DTYP, DBF_DEVICE) { + prompt("Device Type") + promptgroup("10 - Common") + interest(1) + } + field(DISV, DBF_SHORT) { + initial("1") + prompt("Disable Value") + promptgroup("20 - Scan") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + prompt("Scanning Disable") + interest(1) + promptgroup("20 - Scan") + } + field(MLOK, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Monitor lock") + extra("epicsMutexId mlok") + } + field(MLIS, DBF_NOACCESS) { + extra("ELLLIST mlis") + prompt("Monitor List") + interest(4) + special(SPC_NOMOD) + } + field(BKLNK, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Backwards link tracking") + extra("ELLLIST bklnk") + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + prompt("Force Processing") + pp(TRUE) + interest(3) + } + field(STAT, DBF_MENU) { + prompt("Alarm Status") + initial("UDF") + menu(menuAlarmStat) + special(SPC_NOMOD) + } + field(SEVR, DBF_MENU) { + prompt("Alarm Severity") + special(SPC_NOMOD) + menu(menuAlarmSevr) + } + field(NSTA, DBF_MENU) { + prompt("New Alarm Status") + menu(menuAlarmStat) + interest(2) + special(SPC_NOMOD) + } + field(NSEV, DBF_MENU) { + prompt("New Alarm Severity") + interest(2) + menu(menuAlarmSevr) + special(SPC_NOMOD) + } + field(ACKS, DBF_MENU) { + prompt("Alarm Ack Severity") + interest(2) + menu(menuAlarmSevr) + special(SPC_NOMOD) + } + field(ACKT, DBF_MENU) { + special(SPC_NOMOD) + menu(menuYesNo) + interest(2) + promptgroup("70 - Alarm") + initial("YES") + prompt("Alarm Ack Transient") + } + field(DISS, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + prompt("Disable Alarm Sevrty") + } + field(LCNT, DBF_UCHAR) { + prompt("Lock Count") + interest(2) + special(SPC_NOMOD) + } + field(PACT, DBF_UCHAR) { + prompt("Record active") + interest(1) + special(SPC_NOMOD) + } + field(PUTF, DBF_UCHAR) { + prompt("dbPutField process") + interest(1) + special(SPC_NOMOD) + } + field(RPRO, DBF_UCHAR) { + prompt("Reprocess ") + special(SPC_NOMOD) + interest(1) + } + field(ASP, DBF_NOACCESS) { + extra("struct asgMember *asp") + prompt("Access Security Pvt") + special(SPC_NOMOD) + interest(4) + } + field(PPN, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct processNotify *ppn") + prompt("pprocessNotify") + } + field(PPNR, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct processNotifyRecord *ppnr") + prompt("pprocessNotifyRecord") + } + field(SPVT, DBF_NOACCESS) { + extra("struct scan_element *spvt") + prompt("Scan Private") + special(SPC_NOMOD) + interest(4) + } + field(RSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Address of RSET") + extra("struct typed_rset *rset") + } + field(DSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct dset *dset") + prompt("DSET address") + } + field(DPVT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Device Private") + extra("void *dpvt") + } + field(RDES, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Address of dbRecordType") + extra("struct dbRecordType *rdes") + } + field(LSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Lock Set") + extra("struct lockRecord *lset") + } + field(PRIO, DBF_MENU) { + prompt("Scheduling Priority") + promptgroup("20 - Scan") + special(SPC_SCAN) + menu(menuPriority) + interest(1) + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(1) + extra("char bkpt") + prompt("Break Point") + } + field(UDF, DBF_UCHAR) { + promptgroup("10 - Common") + pp(TRUE) + interest(1) + prompt("Undefined") + initial("1") + } + field(UDFS, DBF_MENU) { + interest(1) + menu(menuAlarmSevr) + promptgroup("70 - Alarm") + initial("INVALID") + prompt("Undefined Alarm Sevrty") + } + field(TIME, DBF_NOACCESS) { + extra("epicsTimeStamp time") + prompt("Time") + interest(2) + special(SPC_NOMOD) + } + field(FLNK, DBF_FWDLINK) { + prompt("Forward Process Link") + interest(1) + promptgroup("20 - Scan") + } + field(VERS, DBF_DOUBLE) { + initial("1") + prompt("Code Version") + special(SPC_NOMOD) + } + field(RPVT, DBF_NOACCESS) { + prompt("Record Private") + extra("void *rpvt") + size(4) + interest(4) + special(SPC_NOMOD) + } + field(VAL, DBF_DOUBLE) { + asl(ASL0) + prompt("Result") + } + field(AVAL, DBF_NOACCESS) { + prompt("Array Value") + asl(ASL0) + extra("double *aval") + pp(TRUE) + special(SPC_DBADDR) + } + field(NELM, DBF_ULONG) { + prompt("Number of Elements") + initial("1") + promptgroup("30 - Action") + interest(1) + special(SPC_NOMOD) + } + field(NUSE, DBF_ULONG) { + promptgroup("30 - Action") + pp(TRUE) + special(SPC_MOD) + interest(1) + prompt("# elem's in use") + initial("0") + } + field(PVAL, DBF_DOUBLE) { + prompt("Previous Value") + } + field(PAVL, DBF_NOACCESS) { + pp(TRUE) + asl(ASL0) + extra("double *pavl") + prompt("Prev. Array Value") + } + field(CALC, DBF_STRING) { + prompt("Calculation") + size(80) + pp(TRUE) + promptgroup("30 - Action") + special(SPC_MOD) + } + field(CLCV, DBF_LONG) { + interest(1) + prompt("CALC Valid") + } + field(INPA, DBF_INLINK) { + prompt("Input A") + special(SPC_MOD) + interest(1) + promptgroup("30 - Action") + } + field(INPB, DBF_INLINK) { + prompt("Input B") + promptgroup("30 - Action") + interest(1) + special(SPC_MOD) + } + field(INPC, DBF_INLINK) { + prompt("Input C") + special(SPC_MOD) + interest(1) + promptgroup("30 - Action") + } + field(INPD, DBF_INLINK) { + special(SPC_MOD) + interest(1) + promptgroup("30 - Action") + prompt("Input D") + } + field(INPE, DBF_INLINK) { + prompt("Input E") + special(SPC_MOD) + interest(1) + promptgroup("30 - Action") + } + field(INPF, DBF_INLINK) { + prompt("Input F") + promptgroup("30 - Action") + special(SPC_MOD) + interest(1) + } + field(INPG, DBF_INLINK) { + interest(1) + special(SPC_MOD) + promptgroup("30 - Action") + prompt("Input G") + } + field(INPH, DBF_INLINK) { + interest(1) + special(SPC_MOD) + promptgroup("30 - Action") + prompt("Input H") + } + field(INPI, DBF_INLINK) { + special(SPC_MOD) + interest(1) + promptgroup("30 - Action") + prompt("Input I") + } + field(INPJ, DBF_INLINK) { + promptgroup("30 - Action") + special(SPC_MOD) + interest(1) + prompt("Input J") + } + field(INPK, DBF_INLINK) { + special(SPC_MOD) + interest(1) + promptgroup("30 - Action") + prompt("Input K") + } + field(INPL, DBF_INLINK) { + special(SPC_MOD) + interest(1) + promptgroup("30 - Action") + prompt("Input L") + } + field(INAA, DBF_INLINK) { + prompt("Array input AA") + promptgroup("30 - Action") + interest(1) + special(SPC_MOD) + } + field(INBB, DBF_INLINK) { + promptgroup("30 - Action") + interest(1) + special(SPC_MOD) + prompt("Array input BB") + } + field(INCC, DBF_INLINK) { + interest(1) + special(SPC_MOD) + promptgroup("30 - Action") + prompt("Array input CC") + } + field(INDD, DBF_INLINK) { + promptgroup("30 - Action") + interest(1) + special(SPC_MOD) + prompt("Array input DD") + } + field(INEE, DBF_INLINK) { + prompt("Array input EE") + interest(1) + special(SPC_MOD) + promptgroup("30 - Action") + } + field(INFF, DBF_INLINK) { + interest(1) + special(SPC_MOD) + promptgroup("30 - Action") + prompt("Array input FF") + } + field(INGG, DBF_INLINK) { + prompt("Array input GG") + promptgroup("30 - Action") + interest(1) + special(SPC_MOD) + } + field(INHH, DBF_INLINK) { + prompt("Array input HH") + promptgroup("30 - Action") + special(SPC_MOD) + interest(1) + } + field(INII, DBF_INLINK) { + prompt("Array input II") + promptgroup("30 - Action") + special(SPC_MOD) + interest(1) + } + field(INJJ, DBF_INLINK) { + prompt("Array input JJ") + promptgroup("30 - Action") + special(SPC_MOD) + interest(1) + } + field(INKK, DBF_INLINK) { + interest(1) + special(SPC_MOD) + promptgroup("30 - Action") + prompt("Array input KK") + } + field(INLL, DBF_INLINK) { + promptgroup("30 - Action") + interest(1) + special(SPC_MOD) + prompt("Array input LL") + } + field(OUT, DBF_OUTLINK) { + promptgroup("50 - Output") + interest(1) + special(SPC_MOD) + prompt("Output Link") + } + field(INAV, DBF_MENU) { + menu(acalcoutINAV) + interest(1) + special(SPC_NOMOD) + initial("1") + prompt("INPA PV Status") + } + field(INBV, DBF_MENU) { + interest(1) + menu(acalcoutINAV) + special(SPC_NOMOD) + initial("1") + prompt("INPB PV Status") + } + field(INCV, DBF_MENU) { + interest(1) + menu(acalcoutINAV) + special(SPC_NOMOD) + prompt("INPC PV Status") + initial("1") + } + field(INDV, DBF_MENU) { + prompt("INPD PV Status") + initial("1") + interest(1) + menu(acalcoutINAV) + special(SPC_NOMOD) + } + field(INEV, DBF_MENU) { + special(SPC_NOMOD) + interest(1) + menu(acalcoutINAV) + prompt("INPE PV Status") + initial("1") + } + field(INFV, DBF_MENU) { + special(SPC_NOMOD) + interest(1) + menu(acalcoutINAV) + initial("1") + prompt("INPF PV Status") + } + field(INGV, DBF_MENU) { + prompt("INPG PV Status") + initial("1") + interest(1) + menu(acalcoutINAV) + special(SPC_NOMOD) + } + field(INHV, DBF_MENU) { + initial("1") + prompt("INPH PV Status") + interest(1) + menu(acalcoutINAV) + special(SPC_NOMOD) + } + field(INIV, DBF_MENU) { + special(SPC_NOMOD) + interest(1) + menu(acalcoutINAV) + prompt("INPI PV Status") + initial("1") + } + field(INJV, DBF_MENU) { + interest(1) + menu(acalcoutINAV) + special(SPC_NOMOD) + initial("1") + prompt("INPJ PV Status") + } + field(INKV, DBF_MENU) { + interest(1) + menu(acalcoutINAV) + special(SPC_NOMOD) + initial("1") + prompt("INPK PV Status") + } + field(INLV, DBF_MENU) { + interest(1) + menu(acalcoutINAV) + special(SPC_NOMOD) + prompt("INPL PV Status") + initial("1") + } + field(IAAV, DBF_MENU) { + initial("1") + prompt("INAA PV Status") + menu(acalcoutINAV) + interest(1) + special(SPC_NOMOD) + } + field(IBBV, DBF_MENU) { + initial("1") + prompt("INBB PV Status") + interest(1) + menu(acalcoutINAV) + special(SPC_NOMOD) + } + field(ICCV, DBF_MENU) { + initial("1") + prompt("INCC PV Status") + special(SPC_NOMOD) + interest(1) + menu(acalcoutINAV) + } + field(IDDV, DBF_MENU) { + menu(acalcoutINAV) + interest(1) + special(SPC_NOMOD) + initial("1") + prompt("INDD PV Status") + } + field(IEEV, DBF_MENU) { + prompt("INEE PV Status") + initial("1") + special(SPC_NOMOD) + interest(1) + menu(acalcoutINAV) + } + field(IFFV, DBF_MENU) { + special(SPC_NOMOD) + interest(1) + menu(acalcoutINAV) + prompt("INFF PV Status") + initial("1") + } + field(IGGV, DBF_MENU) { + initial("1") + prompt("INGG PV Status") + special(SPC_NOMOD) + menu(acalcoutINAV) + interest(1) + } + field(IHHV, DBF_MENU) { + initial("1") + prompt("INHH PV Status") + interest(1) + menu(acalcoutINAV) + special(SPC_NOMOD) + } + field(IIIV, DBF_MENU) { + prompt("INII PV Status") + initial("1") + menu(acalcoutINAV) + interest(1) + special(SPC_NOMOD) + } + field(IJJV, DBF_MENU) { + prompt("INJJ PV Status") + initial("1") + special(SPC_NOMOD) + menu(acalcoutINAV) + interest(1) + } + field(IKKV, DBF_MENU) { + special(SPC_NOMOD) + menu(acalcoutINAV) + interest(1) + prompt("INKK PV Status") + initial("1") + } + field(ILLV, DBF_MENU) { + special(SPC_NOMOD) + menu(acalcoutINAV) + interest(1) + prompt("INLL PV Status") + initial("1") + } + field(OUTV, DBF_MENU) { + prompt("OUT PV Status") + menu(acalcoutINAV) + interest(1) + special(SPC_NOMOD) + } + field(OOPT, DBF_MENU) { + prompt("Output Execute Opt") + menu(acalcoutOOPT) + interest(1) + promptgroup("30 - Action") + } + field(ODLY, DBF_DOUBLE) { + prompt("Output Execute Delay") + asl(ASL0) + promptgroup("70 - Alarm") + interest(1) + } + field(WAIT, DBF_MENU) { + prompt("Wait for completion?") + interest(1) + menu(acalcoutWAIT) + } + field(DLYA, DBF_USHORT) { + prompt("Output Delay Active") + asl(ASL0) + special(SPC_NOMOD) + } + field(DOPT, DBF_MENU) { + promptgroup("30 - Action") + interest(1) + menu(acalcoutDOPT) + prompt("Output Data Opt") + } + field(OCAL, DBF_STRING) { + prompt("Output Calculation") + size(80) + promptgroup("30 - Action") + pp(TRUE) + special(SPC_MOD) + } + field(OCLV, DBF_LONG) { + interest(1) + prompt("OCAL Valid") + } + field(OEVT, DBF_USHORT) { + promptgroup("30 - Action") + asl(ASL0) + prompt("Event To Issue") + } + field(IVOA, DBF_MENU) { + prompt("INVALID output action") + promptgroup("50 - Output") + interest(2) + menu(menuIvoa) + } + field(IVOV, DBF_DOUBLE) { + prompt("INVALID output value") + promptgroup("50 - Output") + interest(2) + } + field(EGU, DBF_STRING) { + interest(1) + promptgroup("80 - Display") + size(16) + prompt("Units Name") + } + field(PREC, DBF_SHORT) { + interest(1) + promptgroup("80 - Display") + prompt("Display Precision") + } + field(HOPR, DBF_DOUBLE) { + prompt("High Operating Rng") + promptgroup("80 - Display") + interest(1) + } + field(LOPR, DBF_DOUBLE) { + prompt("Low Operating Range") + promptgroup("80 - Display") + interest(1) + } + field(HIHI, DBF_DOUBLE) { + prompt("Hihi Alarm Limit") + interest(1) + promptgroup("70 - Alarm") + pp(TRUE) + } + field(LOLO, DBF_DOUBLE) { + prompt("Lolo Alarm Limit") + pp(TRUE) + promptgroup("70 - Alarm") + interest(1) + } + field(HIGH, DBF_DOUBLE) { + promptgroup("70 - Alarm") + pp(TRUE) + interest(1) + prompt("High Alarm Limit") + } + field(LOW, DBF_DOUBLE) { + interest(1) + promptgroup("70 - Alarm") + pp(TRUE) + prompt("Low Alarm Limit") + } + field(HHSV, DBF_MENU) { + interest(1) + menu(menuAlarmSevr) + pp(TRUE) + promptgroup("70 - Alarm") + prompt("Hihi Severity") + } + field(LLSV, DBF_MENU) { + pp(TRUE) + promptgroup("70 - Alarm") + interest(1) + menu(menuAlarmSevr) + prompt("Lolo Severity") + } + field(HSV, DBF_MENU) { + prompt("High Severity") + interest(1) + menu(menuAlarmSevr) + pp(TRUE) + promptgroup("70 - Alarm") + } + field(LSV, DBF_MENU) { + prompt("Low Severity") + menu(menuAlarmSevr) + interest(1) + pp(TRUE) + promptgroup("70 - Alarm") + } + field(HYST, DBF_DOUBLE) { + prompt("Alarm Deadband") + interest(1) + promptgroup("70 - Alarm") + } + field(ADEL, DBF_DOUBLE) { + interest(1) + promptgroup("80 - Display") + prompt("Archive Deadband") + } + field(MDEL, DBF_DOUBLE) { + promptgroup("80 - Display") + interest(1) + prompt("Monitor Deadband") + } + field(A, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input A") + } + field(B, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input B") + } + field(C, DBF_DOUBLE) { + prompt("Value of Input C") + pp(TRUE) + } + field(D, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input D") + } + field(E, DBF_DOUBLE) { + prompt("Value of Input E") + pp(TRUE) + } + field(F, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input F") + } + field(G, DBF_DOUBLE) { + prompt("Value of Input G") + pp(TRUE) + } + field(H, DBF_DOUBLE) { + prompt("Value of Input H") + pp(TRUE) + } + field(I, DBF_DOUBLE) { + prompt("Value of Input I") + pp(TRUE) + } + field(J, DBF_DOUBLE) { + prompt("Value of Input J") + pp(TRUE) + } + field(K, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input K") + } + field(L, DBF_DOUBLE) { + prompt("Value of Input L") + pp(TRUE) + } + field(AA, DBF_NOACCESS) { + asl(ASL0) + extra("double *aa") + prompt("Value of array input") + special(SPC_DBADDR) + pp(TRUE) + } + field(BB, DBF_NOACCESS) { + pp(TRUE) + special(SPC_DBADDR) + prompt("Value of array input") + extra("double *bb") + asl(ASL0) + } + field(CC, DBF_NOACCESS) { + pp(TRUE) + special(SPC_DBADDR) + prompt("Value of array input") + extra("double *cc") + asl(ASL0) + } + field(DD, DBF_NOACCESS) { + asl(ASL0) + extra("double *dd") + prompt("Value of array input") + special(SPC_DBADDR) + pp(TRUE) + } + field(EE, DBF_NOACCESS) { + pp(TRUE) + special(SPC_DBADDR) + prompt("Value of array input") + extra("double *ee") + asl(ASL0) + } + field(FF, DBF_NOACCESS) { + special(SPC_DBADDR) + pp(TRUE) + extra("double *ff") + asl(ASL0) + prompt("Value of array input") + } + field(GG, DBF_NOACCESS) { + pp(TRUE) + special(SPC_DBADDR) + prompt("Value of array input") + asl(ASL0) + extra("double *gg") + } + field(HH, DBF_NOACCESS) { + prompt("Value of array input") + extra("double *hh") + asl(ASL0) + pp(TRUE) + special(SPC_DBADDR) + } + field(II, DBF_NOACCESS) { + extra("double *ii") + asl(ASL0) + prompt("Value of array input") + special(SPC_DBADDR) + pp(TRUE) + } + field(JJ, DBF_NOACCESS) { + pp(TRUE) + special(SPC_DBADDR) + prompt("Value of array input") + extra("double *jj") + asl(ASL0) + } + field(KK, DBF_NOACCESS) { + special(SPC_DBADDR) + pp(TRUE) + asl(ASL0) + extra("double *kk") + prompt("Value of array input") + } + field(LL, DBF_NOACCESS) { + pp(TRUE) + special(SPC_DBADDR) + prompt("Value of array input") + extra("double *ll") + asl(ASL0) + } + field(PAA, DBF_NOACCESS) { + asl(ASL0) + extra("double *paa") + prompt("Prev Val of array input") + } + field(NEWM, DBF_ULONG) { + special(SPC_NOMOD) + asl(ASL0) + prompt("new array value mask") + } + field(OVAL, DBF_DOUBLE) { + asl(ASL0) + prompt("Output Value") + } + field(OAV, DBF_NOACCESS) { + pp(TRUE) + special(SPC_DBADDR) + prompt("Output array value") + asl(ASL0) + extra("double *oav") + } + field(POAV, DBF_NOACCESS) { + pp(TRUE) + asl(ASL0) + extra("double *poav") + prompt("Output array value") + } + field(PA, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of A") + } + field(PB, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of B") + } + field(PC, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Value of C") + } + field(PD, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Value of D") + } + field(PE, DBF_DOUBLE) { + prompt("Prev Value of E") + special(SPC_NOMOD) + interest(3) + } + field(PF, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Value of F") + } + field(PG, DBF_DOUBLE) { + prompt("Prev Value of G") + special(SPC_NOMOD) + interest(3) + } + field(PH, DBF_DOUBLE) { + prompt("Prev Value of H") + interest(3) + special(SPC_NOMOD) + } + field(PI, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of I") + } + field(PJ, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of J") + } + field(PK, DBF_DOUBLE) { + prompt("Prev Value of K") + interest(3) + special(SPC_NOMOD) + } + field(PL, DBF_DOUBLE) { + prompt("Prev Value of L") + special(SPC_NOMOD) + interest(3) + } + field(POVL, DBF_DOUBLE) { + prompt("Prev Value of OVAL") + asl(ASL0) + } + field(LALM, DBF_DOUBLE) { + prompt("Last Value Alarmed") + special(SPC_NOMOD) + interest(3) + } + field(ALST, DBF_DOUBLE) { + prompt("Last Value Archived") + special(SPC_NOMOD) + interest(3) + } + field(MLST, DBF_DOUBLE) { + prompt("Last Val Monitored") + special(SPC_NOMOD) + interest(3) + } + field(RPCL, DBF_NOACCESS) { + prompt("Reverse Polish Calc") + extra("unsigned char rpcl[282]") + interest(4) + special(SPC_NOMOD) + } + field(ORPC, DBF_NOACCESS) { + extra("unsigned char orpc[282]") + prompt("Reverse Polish OCalc") + special(SPC_NOMOD) + interest(4) + } + field(CACT, DBF_UCHAR) { + prompt("Calc active") + special(SPC_NOMOD) + interest(1) + } + field(CSTAT, DBF_LONG) { + interest(1) + special(SPC_NOMOD) + prompt("Calc status") + } + field(AMASK, DBF_ULONG) { + interest(1) + special(SPC_NOMOD) + prompt("Array mod") + } + field(SIZE, DBF_MENU) { + prompt("Array size reported to clients") + menu(acalcoutSIZE) + interest(1) + } + field(AMEM, DBF_LONG) { + interest(1) + special(SPC_NOMOD) + prompt("Allocated array memory") + } + field(PMEM, DBF_LONG) { + prompt("Prev array memory") + interest(1) + special(SPC_NOMOD) + } +} +device(acalcout, CONSTANT, devaCalcoutSoft, "Soft Channel") +recordtype(waveform) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + %#include "callback.h" + field(NAME, DBF_STRING) { + special(SPC_NOMOD) + prompt("Record Name") + size(61) + } + field(DESC, DBF_STRING) { + size(41) + prompt("Descriptor") + promptgroup("10 - Common") + } + field(ASG, DBF_STRING) { + special(SPC_AS) + promptgroup("10 - Common") + size(29) + prompt("Access Security Group") + } + field(SCAN, DBF_MENU) { + prompt("Scan Mechanism") + promptgroup("20 - Scan") + interest(1) + menu(menuScan) + special(SPC_SCAN) + } + field(PINI, DBF_MENU) { + menu(menuPini) + interest(1) + promptgroup("20 - Scan") + prompt("Process at iocInit") + } + field(PHAS, DBF_SHORT) { + prompt("Scan Phase") + special(SPC_SCAN) + interest(1) + promptgroup("20 - Scan") + } + field(EVNT, DBF_STRING) { + size(40) + prompt("Event Name") + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + } + field(TSE, DBF_SHORT) { + interest(1) + promptgroup("20 - Scan") + prompt("Time Stamp Event") + } + field(TSEL, DBF_INLINK) { + prompt("Time Stamp Link") + interest(1) + promptgroup("20 - Scan") + } + field(DTYP, DBF_DEVICE) { + interest(1) + promptgroup("10 - Common") + prompt("Device Type") + } + field(DISV, DBF_SHORT) { + prompt("Disable Value") + initial("1") + promptgroup("20 - Scan") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + interest(1) + promptgroup("20 - Scan") + prompt("Scanning Disable") + } + field(MLOK, DBF_NOACCESS) { + extra("epicsMutexId mlok") + prompt("Monitor lock") + interest(4) + special(SPC_NOMOD) + } + field(MLIS, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Monitor List") + extra("ELLLIST mlis") + } + field(BKLNK, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Backwards link tracking") + extra("ELLLIST bklnk") + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + prompt("Force Processing") + interest(3) + pp(TRUE) + } + field(STAT, DBF_MENU) { + prompt("Alarm Status") + initial("UDF") + special(SPC_NOMOD) + menu(menuAlarmStat) + } + field(SEVR, DBF_MENU) { + prompt("Alarm Severity") + menu(menuAlarmSevr) + special(SPC_NOMOD) + } + field(NSTA, DBF_MENU) { + special(SPC_NOMOD) + interest(2) + menu(menuAlarmStat) + prompt("New Alarm Status") + } + field(NSEV, DBF_MENU) { + prompt("New Alarm Severity") + interest(2) + menu(menuAlarmSevr) + special(SPC_NOMOD) + } + field(ACKS, DBF_MENU) { + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) + prompt("Alarm Ack Severity") + } + field(ACKT, DBF_MENU) { + promptgroup("70 - Alarm") + menu(menuYesNo) + interest(2) + special(SPC_NOMOD) + prompt("Alarm Ack Transient") + initial("YES") + } + field(DISS, DBF_MENU) { + prompt("Disable Alarm Sevrty") + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + } + field(LCNT, DBF_UCHAR) { + interest(2) + special(SPC_NOMOD) + prompt("Lock Count") + } + field(PACT, DBF_UCHAR) { + prompt("Record active") + interest(1) + special(SPC_NOMOD) + } + field(PUTF, DBF_UCHAR) { + prompt("dbPutField process") + special(SPC_NOMOD) + interest(1) + } + field(RPRO, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("Reprocess ") + } + field(ASP, DBF_NOACCESS) { + extra("struct asgMember *asp") + prompt("Access Security Pvt") + interest(4) + special(SPC_NOMOD) + } + field(PPN, DBF_NOACCESS) { + prompt("pprocessNotify") + extra("struct processNotify *ppn") + interest(4) + special(SPC_NOMOD) + } + field(PPNR, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct processNotifyRecord *ppnr") + prompt("pprocessNotifyRecord") + } + field(SPVT, DBF_NOACCESS) { + extra("struct scan_element *spvt") + prompt("Scan Private") + special(SPC_NOMOD) + interest(4) + } + field(RSET, DBF_NOACCESS) { + prompt("Address of RSET") + extra("struct typed_rset *rset") + interest(4) + special(SPC_NOMOD) + } + field(DSET, DBF_NOACCESS) { + prompt("DSET address") + extra("struct dset *dset") + special(SPC_NOMOD) + interest(4) + } + field(DPVT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("void *dpvt") + prompt("Device Private") + } + field(RDES, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct dbRecordType *rdes") + prompt("Address of dbRecordType") + } + field(LSET, DBF_NOACCESS) { + extra("struct lockRecord *lset") + prompt("Lock Set") + interest(4) + special(SPC_NOMOD) + } + field(PRIO, DBF_MENU) { + promptgroup("20 - Scan") + special(SPC_SCAN) + menu(menuPriority) + interest(1) + prompt("Scheduling Priority") + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(1) + extra("char bkpt") + prompt("Break Point") + } + field(UDF, DBF_UCHAR) { + interest(1) + pp(TRUE) + promptgroup("10 - Common") + initial("1") + prompt("Undefined") + } + field(UDFS, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + initial("INVALID") + prompt("Undefined Alarm Sevrty") + } + field(TIME, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(2) + extra("epicsTimeStamp time") + prompt("Time") + } + field(FLNK, DBF_FWDLINK) { + promptgroup("20 - Scan") + interest(1) + prompt("Forward Process Link") + } + field(VAL, DBF_NOACCESS) { + prompt("Value") + asl(ASL0) + extra("void * val") + pp(TRUE) + special(SPC_DBADDR) + } + field(RARM, DBF_SHORT) { + interest(1) + pp(TRUE) + promptgroup("30 - Action") + prompt("Rearm the waveform") + } + field(PREC, DBF_SHORT) { + interest(1) + prop(YES) + promptgroup("80 - Display") + prompt("Display Precision") + } + field(INP, DBF_INLINK) { + promptgroup("40 - Input") + interest(1) + prompt("Input Specification") + } + field(EGU, DBF_STRING) { + size(16) + prompt("Engineering Units") + prop(YES) + interest(1) + promptgroup("80 - Display") + } + field(HOPR, DBF_DOUBLE) { + interest(1) + prop(YES) + promptgroup("80 - Display") + prompt("High Operating Range") + } + field(LOPR, DBF_DOUBLE) { + interest(1) + prop(YES) + promptgroup("80 - Display") + prompt("Low Operating Range") + } + field(NELM, DBF_ULONG) { + prompt("Number of Elements") + initial("1") + promptgroup("30 - Action") + special(SPC_NOMOD) + interest(1) + } + field(FTVL, DBF_MENU) { + prompt("Field Type of Value") + interest(1) + menu(menuFtype) + special(SPC_NOMOD) + promptgroup("30 - Action") + } + field(BUSY, DBF_SHORT) { + prompt("Busy Indicator") + special(SPC_NOMOD) + } + field(NORD, DBF_ULONG) { + prompt("Number elements read") + special(SPC_NOMOD) + } + field(BPTR, DBF_NOACCESS) { + extra("void * bptr") + prompt("Buffer Pointer") + special(SPC_NOMOD) + interest(4) + } + field(SIOL, DBF_INLINK) { + promptgroup("90 - Simulate") + interest(1) + prompt("Simulation Input Link") + } + field(SIML, DBF_INLINK) { + prompt("Simulation Mode Link") + promptgroup("90 - Simulate") + interest(1) + } + field(SIMM, DBF_MENU) { + interest(1) + menu(menuYesNo) + special(SPC_MOD) + prompt("Simulation Mode") + } + field(SIMS, DBF_MENU) { + promptgroup("90 - Simulate") + menu(menuAlarmSevr) + interest(2) + prompt("Simulation Mode Severity") + } + field(OLDSIMM, DBF_MENU) { + special(SPC_NOMOD) + interest(4) + menu(menuSimm) + prompt("Prev. Simulation Mode") + } + field(SSCN, DBF_MENU) { + prompt("Sim. Mode Scan") + initial("65535") + promptgroup("90 - Simulate") + interest(1) + menu(menuScan) + } + field(SDLY, DBF_DOUBLE) { + interest(2) + promptgroup("90 - Simulate") + initial("-1.0") + prompt("Sim. Mode Async Delay") + } + field(SIMPVT, DBF_NOACCESS) { + prompt("Sim. Mode Private") + extra("CALLBACK *simpvt") + special(SPC_NOMOD) + interest(4) + } + field(MPST, DBF_MENU) { + promptgroup("80 - Display") + interest(1) + menu(waveformPOST) + prompt("Post Value Monitors") + } + field(APST, DBF_MENU) { + prompt("Post Archive Monitors") + promptgroup("80 - Display") + interest(1) + menu(waveformPOST) + } + field(HASH, DBF_ULONG) { + interest(3) + prompt("Hash of OnChange data.") + } +} +device(waveform, CONSTANT, devWfSoft, "Soft Channel") +device(waveform, INST_IO, asynWfOctetCmdResponse, "asynOctetCmdResponse") +device(waveform, INST_IO, asynWfOctetWriteRead, "asynOctetWriteRead") +device(waveform, INST_IO, asynWfOctetRead, "asynOctetRead") +device(waveform, INST_IO, asynWfOctetWrite, "asynOctetWrite") +device(waveform, INST_IO, asynWfOctetWriteBinary, "asynOctetWriteBinary") +device(waveform, INST_IO, asynInt8ArrayWfIn, "asynInt8ArrayIn") +device(waveform, INST_IO, asynInt8ArrayWfOut, "asynInt8ArrayOut") +device(waveform, INST_IO, asynInt16ArrayWfIn, "asynInt16ArrayIn") +device(waveform, INST_IO, asynInt16ArrayWfOut, "asynInt16ArrayOut") +device(waveform, INST_IO, asynInt32ArrayWfIn, "asynInt32ArrayIn") +device(waveform, INST_IO, asynInt32ArrayWfOut, "asynInt32ArrayOut") +device(waveform, INST_IO, asynInt32TimeSeries, "asynInt32TimeSeries") +device(waveform, INST_IO, asynFloat32ArrayWfIn, "asynFloat32ArrayIn") +device(waveform, INST_IO, asynFloat32ArrayWfOut, "asynFloat32ArrayOut") +device(waveform, INST_IO, asynFloat64ArrayWfIn, "asynFloat64ArrayIn") +device(waveform, INST_IO, asynFloat64ArrayWfOut, "asynFloat64ArrayOut") +device(waveform, INST_IO, asynFloat64TimeSeries, "asynFloat64TimeSeries") +device(waveform, INST_IO, devwaveformStream, "stream") +recordtype(mbbiDirect) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + %#include "callback.h" + field(NAME, DBF_STRING) { + special(SPC_NOMOD) + size(61) + prompt("Record Name") + } + field(DESC, DBF_STRING) { + promptgroup("10 - Common") + size(41) + prompt("Descriptor") + } + field(ASG, DBF_STRING) { + size(29) + prompt("Access Security Group") + special(SPC_AS) + promptgroup("10 - Common") + } + field(SCAN, DBF_MENU) { + special(SPC_SCAN) + menu(menuScan) + interest(1) + promptgroup("20 - Scan") + prompt("Scan Mechanism") + } + field(PINI, DBF_MENU) { + interest(1) + menu(menuPini) + promptgroup("20 - Scan") + prompt("Process at iocInit") + } + field(PHAS, DBF_SHORT) { + prompt("Scan Phase") + promptgroup("20 - Scan") + interest(1) + special(SPC_SCAN) + } + field(EVNT, DBF_STRING) { + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + size(40) + prompt("Event Name") + } + field(TSE, DBF_SHORT) { + prompt("Time Stamp Event") + interest(1) + promptgroup("20 - Scan") + } + field(TSEL, DBF_INLINK) { + promptgroup("20 - Scan") + interest(1) + prompt("Time Stamp Link") + } + field(DTYP, DBF_DEVICE) { + prompt("Device Type") + promptgroup("10 - Common") + interest(1) + } + field(DISV, DBF_SHORT) { + prompt("Disable Value") + initial("1") + promptgroup("20 - Scan") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + prompt("Scanning Disable") + promptgroup("20 - Scan") + interest(1) + } + field(MLOK, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Monitor lock") + extra("epicsMutexId mlok") + } + field(MLIS, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Monitor List") + extra("ELLLIST mlis") + } + field(BKLNK, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("ELLLIST bklnk") + prompt("Backwards link tracking") + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + pp(TRUE) + interest(3) + prompt("Force Processing") + } + field(STAT, DBF_MENU) { + prompt("Alarm Status") + initial("UDF") + special(SPC_NOMOD) + menu(menuAlarmStat) + } + field(SEVR, DBF_MENU) { + prompt("Alarm Severity") + menu(menuAlarmSevr) + special(SPC_NOMOD) + } + field(NSTA, DBF_MENU) { + interest(2) + menu(menuAlarmStat) + special(SPC_NOMOD) + prompt("New Alarm Status") + } + field(NSEV, DBF_MENU) { + menu(menuAlarmSevr) + interest(2) + special(SPC_NOMOD) + prompt("New Alarm Severity") + } + field(ACKS, DBF_MENU) { + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) + prompt("Alarm Ack Severity") + } + field(ACKT, DBF_MENU) { + initial("YES") + prompt("Alarm Ack Transient") + menu(menuYesNo) + interest(2) + special(SPC_NOMOD) + promptgroup("70 - Alarm") + } + field(DISS, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + prompt("Disable Alarm Sevrty") + } + field(LCNT, DBF_UCHAR) { + special(SPC_NOMOD) + interest(2) + prompt("Lock Count") + } + field(PACT, DBF_UCHAR) { + prompt("Record active") + special(SPC_NOMOD) + interest(1) + } + field(PUTF, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("dbPutField process") + } + field(RPRO, DBF_UCHAR) { + prompt("Reprocess ") + interest(1) + special(SPC_NOMOD) + } + field(ASP, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Access Security Pvt") + extra("struct asgMember *asp") + } + field(PPN, DBF_NOACCESS) { + prompt("pprocessNotify") + extra("struct processNotify *ppn") + special(SPC_NOMOD) + interest(4) + } + field(PPNR, DBF_NOACCESS) { + prompt("pprocessNotifyRecord") + extra("struct processNotifyRecord *ppnr") + interest(4) + special(SPC_NOMOD) + } + field(SPVT, DBF_NOACCESS) { + extra("struct scan_element *spvt") + prompt("Scan Private") + special(SPC_NOMOD) + interest(4) + } + field(RSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct typed_rset *rset") + prompt("Address of RSET") + } + field(DSET, DBF_NOACCESS) { + extra("struct dset *dset") + prompt("DSET address") + interest(4) + special(SPC_NOMOD) + } + field(DPVT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Device Private") + extra("void *dpvt") + } + field(RDES, DBF_NOACCESS) { + prompt("Address of dbRecordType") + extra("struct dbRecordType *rdes") + special(SPC_NOMOD) + interest(4) + } + field(LSET, DBF_NOACCESS) { + prompt("Lock Set") + extra("struct lockRecord *lset") + interest(4) + special(SPC_NOMOD) + } + field(PRIO, DBF_MENU) { + special(SPC_SCAN) + menu(menuPriority) + interest(1) + promptgroup("20 - Scan") + prompt("Scheduling Priority") + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + extra("char bkpt") + prompt("Break Point") + special(SPC_NOMOD) + interest(1) + } + field(UDF, DBF_UCHAR) { + prompt("Undefined") + initial("1") + pp(TRUE) + promptgroup("10 - Common") + interest(1) + } + field(UDFS, DBF_MENU) { + initial("INVALID") + prompt("Undefined Alarm Sevrty") + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + } + field(TIME, DBF_NOACCESS) { + interest(2) + special(SPC_NOMOD) + extra("epicsTimeStamp time") + prompt("Time") + } + field(FLNK, DBF_FWDLINK) { + promptgroup("20 - Scan") + interest(1) + prompt("Forward Process Link") + } + field(VAL, DBF_LONG) { + promptgroup("40 - Input") + pp(TRUE) + prompt("Current Value") + asl(ASL0) + } + field(NOBT, DBF_SHORT) { + prompt("Number of Bits") + interest(1) + special(SPC_NOMOD) + promptgroup("40 - Input") + } + field(INP, DBF_INLINK) { + interest(1) + promptgroup("40 - Input") + prompt("Input Specification") + } + field(RVAL, DBF_ULONG) { + prompt("Raw Value") + pp(TRUE) + } + field(ORAW, DBF_ULONG) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Raw Value") + } + field(MASK, DBF_ULONG) { + prompt("Hardware Mask") + interest(1) + special(SPC_NOMOD) + } + field(MLST, DBF_LONG) { + prompt("Last Value Monitored") + special(SPC_NOMOD) + interest(3) + } + field(SHFT, DBF_USHORT) { + prompt("Shift") + interest(1) + promptgroup("40 - Input") + } + field(SIOL, DBF_INLINK) { + interest(1) + promptgroup("90 - Simulate") + prompt("Simulation Input Link") + } + field(SVAL, DBF_LONG) { + prompt("Simulation Value") + } + field(SIML, DBF_INLINK) { + prompt("Simulation Mode Link") + promptgroup("90 - Simulate") + interest(1) + } + field(SIMM, DBF_MENU) { + interest(1) + menu(menuSimm) + special(SPC_MOD) + prompt("Simulation Mode") + } + field(SIMS, DBF_MENU) { + prompt("Simulation Mode Severity") + interest(2) + menu(menuAlarmSevr) + promptgroup("90 - Simulate") + } + field(OLDSIMM, DBF_MENU) { + prompt("Prev. Simulation Mode") + interest(4) + menu(menuSimm) + special(SPC_NOMOD) + } + field(SSCN, DBF_MENU) { + initial("65535") + prompt("Sim. Mode Scan") + interest(1) + menu(menuScan) + promptgroup("90 - Simulate") + } + field(SDLY, DBF_DOUBLE) { + promptgroup("90 - Simulate") + interest(2) + prompt("Sim. Mode Async Delay") + initial("-1.0") + } + field(SIMPVT, DBF_NOACCESS) { + prompt("Sim. Mode Private") + extra("CALLBACK *simpvt") + special(SPC_NOMOD) + interest(4) + } + field(B0, DBF_UCHAR) { + pp(TRUE) + interest(1) + prompt("Bit 0") + } + field(B1, DBF_UCHAR) { + prompt("Bit 1") + pp(TRUE) + interest(1) + } + field(B2, DBF_UCHAR) { + prompt("Bit 2") + pp(TRUE) + interest(1) + } + field(B3, DBF_UCHAR) { + prompt("Bit 3") + pp(TRUE) + interest(1) + } + field(B4, DBF_UCHAR) { + prompt("Bit 4") + interest(1) + pp(TRUE) + } + field(B5, DBF_UCHAR) { + interest(1) + pp(TRUE) + prompt("Bit 5") + } + field(B6, DBF_UCHAR) { + pp(TRUE) + interest(1) + prompt("Bit 6") + } + field(B7, DBF_UCHAR) { + interest(1) + pp(TRUE) + prompt("Bit 7") + } + field(B8, DBF_UCHAR) { + interest(1) + pp(TRUE) + prompt("Bit 8") + } + field(B9, DBF_UCHAR) { + prompt("Bit 9") + pp(TRUE) + interest(1) + } + field(BA, DBF_UCHAR) { + interest(1) + pp(TRUE) + prompt("Bit 10") + } + field(BB, DBF_UCHAR) { + pp(TRUE) + interest(1) + prompt("Bit 11") + } + field(BC, DBF_UCHAR) { + prompt("Bit 12") + interest(1) + pp(TRUE) + } + field(BD, DBF_UCHAR) { + prompt("Bit 13") + interest(1) + pp(TRUE) + } + field(BE, DBF_UCHAR) { + prompt("Bit 14") + interest(1) + pp(TRUE) + } + field(BF, DBF_UCHAR) { + prompt("Bit 15") + interest(1) + pp(TRUE) + } + field(B10, DBF_UCHAR) { + interest(1) + pp(TRUE) + prompt("Bit 16") + } + field(B11, DBF_UCHAR) { + pp(TRUE) + interest(1) + prompt("Bit 17") + } + field(B12, DBF_UCHAR) { + pp(TRUE) + interest(1) + prompt("Bit 18") + } + field(B13, DBF_UCHAR) { + prompt("Bit 19") + interest(1) + pp(TRUE) + } + field(B14, DBF_UCHAR) { + prompt("Bit 20") + interest(1) + pp(TRUE) + } + field(B15, DBF_UCHAR) { + pp(TRUE) + interest(1) + prompt("Bit 21") + } + field(B16, DBF_UCHAR) { + interest(1) + pp(TRUE) + prompt("Bit 22") + } + field(B17, DBF_UCHAR) { + interest(1) + pp(TRUE) + prompt("Bit 23") + } + field(B18, DBF_UCHAR) { + interest(1) + pp(TRUE) + prompt("Bit 24") + } + field(B19, DBF_UCHAR) { + prompt("Bit 25") + interest(1) + pp(TRUE) + } + field(B1A, DBF_UCHAR) { + pp(TRUE) + interest(1) + prompt("Bit 26") + } + field(B1B, DBF_UCHAR) { + prompt("Bit 27") + interest(1) + pp(TRUE) + } + field(B1C, DBF_UCHAR) { + prompt("Bit 28") + pp(TRUE) + interest(1) + } + field(B1D, DBF_UCHAR) { + prompt("Bit 29") + interest(1) + pp(TRUE) + } + field(B1E, DBF_UCHAR) { + prompt("Bit 30") + interest(1) + pp(TRUE) + } + field(B1F, DBF_UCHAR) { + prompt("Bit 31") + interest(1) + pp(TRUE) + } +} +device(mbbiDirect, CONSTANT, devMbbiDirectSoft, "Soft Channel") +device(mbbiDirect, CONSTANT, devMbbiDirectSoftRaw, "Raw Soft Channel") +device(mbbiDirect, CONSTANT, devMbbiDirectSoftCallback, "Async Soft Channel") +device(mbbiDirect, INST_IO, asynMbbiDirectUInt32Digital, "asynUInt32Digital") +device(mbbiDirect, INST_IO, devmbbiDirectStream, "stream") +recordtype(aao) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + %#include "callback.h" + field(NAME, DBF_STRING) { + prompt("Record Name") + size(61) + special(SPC_NOMOD) + } + field(DESC, DBF_STRING) { + promptgroup("10 - Common") + size(41) + prompt("Descriptor") + } + field(ASG, DBF_STRING) { + size(29) + prompt("Access Security Group") + special(SPC_AS) + promptgroup("10 - Common") + } + field(SCAN, DBF_MENU) { + interest(1) + menu(menuScan) + special(SPC_SCAN) + promptgroup("20 - Scan") + prompt("Scan Mechanism") + } + field(PINI, DBF_MENU) { + menu(menuPini) + interest(1) + promptgroup("20 - Scan") + prompt("Process at iocInit") + } + field(PHAS, DBF_SHORT) { + prompt("Scan Phase") + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + } + field(EVNT, DBF_STRING) { + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + prompt("Event Name") + size(40) + } + field(TSE, DBF_SHORT) { + prompt("Time Stamp Event") + promptgroup("20 - Scan") + interest(1) + } + field(TSEL, DBF_INLINK) { promptgroup("20 - Scan") interest(1) prompt("Time Stamp Link") @@ -505,27 +10862,27 @@ prompt("Disable") } field(SDIS, DBF_INLINK) { + interest(1) + promptgroup("20 - Scan") prompt("Scanning Disable") - interest(1) - promptgroup("20 - Scan") } field(MLOK, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) extra("epicsMutexId mlok") prompt("Monitor lock") - interest(4) - special(SPC_NOMOD) } field(MLIS, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) extra("ELLLIST mlis") - special(SPC_NOMOD) - interest(4) prompt("Monitor List") } field(BKLNK, DBF_NOACCESS) { + prompt("Backwards link tracking") extra("ELLLIST bklnk") - special(SPC_NOMOD) - interest(4) - prompt("Backwards link tracking") + interest(4) + special(SPC_NOMOD) } field(DISP, DBF_UCHAR) { prompt("Disable putField") @@ -536,445 +10893,6 @@ pp(TRUE) } field(STAT, DBF_MENU) { - prompt("Alarm Status") - special(SPC_NOMOD) - menu(menuAlarmStat) - initial("UDF") - } - field(SEVR, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Alarm Severity") - special(SPC_NOMOD) - } - field(NSTA, DBF_MENU) { - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Status") - menu(menuAlarmStat) - } - field(NSEV, DBF_MENU) { - menu(menuAlarmSevr) - prompt("New Alarm Severity") - special(SPC_NOMOD) - interest(2) - } - field(ACKS, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Alarm Ack Severity") - special(SPC_NOMOD) - interest(2) - } - field(ACKT, DBF_MENU) { - initial("YES") - menu(menuYesNo) - prompt("Alarm Ack Transient") - promptgroup("70 - Alarm") - interest(2) - special(SPC_NOMOD) - } - field(DISS, DBF_MENU) { - prompt("Disable Alarm Sevrty") - promptgroup("70 - Alarm") - interest(1) - menu(menuAlarmSevr) - } - field(LCNT, DBF_UCHAR) { - prompt("Lock Count") - interest(2) - special(SPC_NOMOD) - } - field(PACT, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Record active") - } - field(PUTF, DBF_UCHAR) { - prompt("dbPutField process") - special(SPC_NOMOD) - interest(1) - } - field(RPRO, DBF_UCHAR) { - prompt("Reprocess ") - interest(1) - special(SPC_NOMOD) - } - field(ASP, DBF_NOACCESS) { - extra("struct asgMember *asp") - prompt("Access Security Pvt") - special(SPC_NOMOD) - interest(4) - } - field(PPN, DBF_NOACCESS) { - prompt("pprocessNotify") - special(SPC_NOMOD) - interest(4) - extra("struct processNotify *ppn") - } - field(PPNR, DBF_NOACCESS) { - extra("struct processNotifyRecord *ppnr") - special(SPC_NOMOD) - interest(4) - prompt("pprocessNotifyRecord") - } - field(SPVT, DBF_NOACCESS) { - extra("struct scan_element *spvt") - interest(4) - special(SPC_NOMOD) - prompt("Scan Private") - } - field(RSET, DBF_NOACCESS) { - prompt("Address of RSET") - interest(4) - special(SPC_NOMOD) - extra("struct typed_rset *rset") - } - field(DSET, DBF_NOACCESS) { - extra("struct dset *dset") - special(SPC_NOMOD) - interest(4) - prompt("DSET address") - } - field(DPVT, DBF_NOACCESS) { - extra("void *dpvt") - prompt("Device Private") - special(SPC_NOMOD) - interest(4) - } - field(RDES, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Address of dbRecordType") - extra("struct dbRecordType *rdes") - } - field(LSET, DBF_NOACCESS) { - extra("struct lockRecord *lset") - special(SPC_NOMOD) - interest(4) - prompt("Lock Set") - } - field(PRIO, DBF_MENU) { - menu(menuPriority) - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - prompt("Scheduling Priority") - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - interest(1) - special(SPC_NOMOD) - prompt("Break Point") - extra("char bkpt") - } - field(UDF, DBF_UCHAR) { - prompt("Undefined") - interest(1) - promptgroup("10 - Common") - pp(TRUE) - initial("1") - } - field(UDFS, DBF_MENU) { - initial("INVALID") - prompt("Undefined Alarm Sevrty") - interest(1) - promptgroup("70 - Alarm") - menu(menuAlarmSevr) - } - field(TIME, DBF_NOACCESS) { - extra("epicsTimeStamp time") - prompt("Time") - special(SPC_NOMOD) - interest(2) - } - field(FLNK, DBF_FWDLINK) { - prompt("Forward Process Link") - interest(1) - promptgroup("20 - Scan") - } - field(VAL, DBF_INT64) { - asl(ASL0) - prompt("Current value") - promptgroup("40 - Input") - pp(TRUE) - } - field(INP, DBF_INLINK) { - promptgroup("40 - Input") - interest(1) - prompt("Input Specification") - } - field(EGU, DBF_STRING) { - prop(YES) - promptgroup("80 - Display") - interest(1) - prompt("Units name") - size(16) - } - field(HOPR, DBF_INT64) { - prompt("High Operating Range") - prop(YES) - interest(1) - promptgroup("80 - Display") - } - field(LOPR, DBF_INT64) { - prompt("Low Operating Range") - interest(1) - prop(YES) - promptgroup("80 - Display") - } - field(HIHI, DBF_INT64) { - prompt("Hihi Alarm Limit") - prop(YES) - interest(1) - promptgroup("70 - Alarm") - pp(TRUE) - } - field(LOLO, DBF_INT64) { - prompt("Lolo Alarm Limit") - promptgroup("70 - Alarm") - prop(YES) - interest(1) - pp(TRUE) - } - field(HIGH, DBF_INT64) { - prompt("High Alarm Limit") - prop(YES) - promptgroup("70 - Alarm") - interest(1) - pp(TRUE) - } - field(LOW, DBF_INT64) { - prompt("Low Alarm Limit") - prop(YES) - interest(1) - promptgroup("70 - Alarm") - pp(TRUE) - } - field(HHSV, DBF_MENU) { - pp(TRUE) - prompt("Hihi Severity") - promptgroup("70 - Alarm") - interest(1) - menu(menuAlarmSevr) - } - field(LLSV, DBF_MENU) { - menu(menuAlarmSevr) - interest(1) - promptgroup("70 - Alarm") - prompt("Lolo Severity") - pp(TRUE) - } - field(HSV, DBF_MENU) { - prompt("High Severity") - promptgroup("70 - Alarm") - interest(1) - menu(menuAlarmSevr) - pp(TRUE) - } - field(LSV, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Low Severity") - interest(1) - promptgroup("70 - Alarm") - pp(TRUE) - } - field(HYST, DBF_INT64) { - prompt("Alarm Deadband") - promptgroup("70 - Alarm") - interest(1) - } - field(AFTC, DBF_DOUBLE) { - interest(1) - promptgroup("70 - Alarm") - prompt("Alarm Filter Time Constant") - } - field(AFVL, DBF_DOUBLE) { - prompt("Alarm Filter Value") - special(SPC_NOMOD) - interest(3) - } - field(ADEL, DBF_INT64) { - prompt("Archive Deadband") - interest(1) - promptgroup("80 - Display") - } - field(MDEL, DBF_INT64) { - interest(1) - promptgroup("80 - Display") - prompt("Monitor Deadband") - } - field(LALM, DBF_INT64) { - prompt("Last Value Alarmed") - interest(3) - special(SPC_NOMOD) - } - field(ALST, DBF_INT64) { - special(SPC_NOMOD) - interest(3) - prompt("Last Value Archived") - } - field(MLST, DBF_INT64) { - interest(3) - special(SPC_NOMOD) - prompt("Last Val Monitored") - } - field(SIOL, DBF_INLINK) { - interest(1) - promptgroup("90 - Simulate") - prompt("Simulation Input Link") - } - field(SVAL, DBF_INT64) { - prompt("Simulation Value") - } - field(SIML, DBF_INLINK) { - prompt("Simulation Mode Link") - interest(1) - promptgroup("90 - Simulate") - } - field(SIMM, DBF_MENU) { - menu(menuYesNo) - prompt("Simulation Mode") - special(SPC_MOD) - interest(1) - } - field(SIMS, DBF_MENU) { - interest(2) - promptgroup("90 - Simulate") - prompt("Simulation Mode Severity") - menu(menuAlarmSevr) - } - field(OLDSIMM, DBF_MENU) { - prompt("Prev. Simulation Mode") - special(SPC_NOMOD) - interest(4) - menu(menuSimm) - } - field(SSCN, DBF_MENU) { - promptgroup("90 - Simulate") - interest(1) - prompt("Sim. Mode Scan") - menu(menuScan) - initial("65535") - } - field(SDLY, DBF_DOUBLE) { - initial("-1.0") - interest(2) - promptgroup("90 - Simulate") - prompt("Sim. Mode Async Delay") - } - field(SIMPVT, DBF_NOACCESS) { - prompt("Sim. Mode Private") - interest(4) - special(SPC_NOMOD) - extra("CALLBACK *simpvt") - } -} -device(int64in, CONSTANT, devI64inSoft, "Soft Channel") -device(int64in, CONSTANT, devI64inSoftCallback, "Async Soft Channel") -recordtype(sseq) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - field(NAME, DBF_STRING) { - size(61) - prompt("Record Name") - special(SPC_NOMOD) - } - field(DESC, DBF_STRING) { - prompt("Descriptor") - promptgroup("10 - Common") - size(41) - } - field(ASG, DBF_STRING) { - size(29) - prompt("Access Security Group") - promptgroup("10 - Common") - special(SPC_AS) - } - field(SCAN, DBF_MENU) { - menu(menuScan) - prompt("Scan Mechanism") - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - } - field(PINI, DBF_MENU) { - promptgroup("20 - Scan") - interest(1) - prompt("Process at iocInit") - menu(menuPini) - } - field(PHAS, DBF_SHORT) { - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - prompt("Scan Phase") - } - field(EVNT, DBF_STRING) { - prompt("Event Name") - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) - size(40) - } - field(TSE, DBF_SHORT) { - promptgroup("20 - Scan") - interest(1) - prompt("Time Stamp Event") - } - field(TSEL, DBF_INLINK) { - prompt("Time Stamp Link") - promptgroup("20 - Scan") - interest(1) - } - field(DTYP, DBF_DEVICE) { - prompt("Device Type") - interest(1) - promptgroup("10 - Common") - } - field(DISV, DBF_SHORT) { - promptgroup("20 - Scan") - prompt("Disable Value") - initial("1") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Scanning Disable") - } - field(MLOK, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Monitor lock") - extra("epicsMutexId mlok") - } - field(MLIS, DBF_NOACCESS) { - extra("ELLLIST mlis") - interest(4) - special(SPC_NOMOD) - prompt("Monitor List") - } - field(BKLNK, DBF_NOACCESS) { - extra("ELLLIST bklnk") - prompt("Backwards link tracking") - special(SPC_NOMOD) - interest(4) - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - pp(TRUE) - interest(3) - prompt("Force Processing") - } - field(STAT, DBF_MENU) { menu(menuAlarmStat) special(SPC_NOMOD) prompt("Alarm Status") @@ -992,35 +10910,35 @@ prompt("New Alarm Status") } field(NSEV, DBF_MENU) { - menu(menuAlarmSevr) + interest(2) + menu(menuAlarmSevr) + special(SPC_NOMOD) prompt("New Alarm Severity") - special(SPC_NOMOD) - interest(2) } field(ACKS, DBF_MENU) { - menu(menuAlarmSevr) - special(SPC_NOMOD) - interest(2) prompt("Alarm Ack Severity") + special(SPC_NOMOD) + menu(menuAlarmSevr) + interest(2) } field(ACKT, DBF_MENU) { - menu(menuYesNo) - promptgroup("70 - Alarm") - interest(2) - special(SPC_NOMOD) + promptgroup("70 - Alarm") + special(SPC_NOMOD) + interest(2) + menu(menuYesNo) prompt("Alarm Ack Transient") initial("YES") } field(DISS, DBF_MENU) { + promptgroup("70 - Alarm") + interest(1) + menu(menuAlarmSevr) prompt("Disable Alarm Sevrty") - promptgroup("70 - Alarm") - interest(1) - menu(menuAlarmSevr) } field(LCNT, DBF_UCHAR) { prompt("Lock Count") - special(SPC_NOMOD) - interest(2) + interest(2) + special(SPC_NOMOD) } field(PACT, DBF_UCHAR) { special(SPC_NOMOD) @@ -1028,38 +10946,38 @@ prompt("Record active") } field(PUTF, DBF_UCHAR) { + special(SPC_NOMOD) + interest(1) prompt("dbPutField process") - special(SPC_NOMOD) - interest(1) } field(RPRO, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) prompt("Reprocess ") - interest(1) - special(SPC_NOMOD) } field(ASP, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) extra("struct asgMember *asp") - interest(4) - special(SPC_NOMOD) prompt("Access Security Pvt") } field(PPN, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) extra("struct processNotify *ppn") prompt("pprocessNotify") - interest(4) - special(SPC_NOMOD) } field(PPNR, DBF_NOACCESS) { interest(4) special(SPC_NOMOD) + extra("struct processNotifyRecord *ppnr") prompt("pprocessNotifyRecord") - extra("struct processNotifyRecord *ppnr") } field(SPVT, DBF_NOACCESS) { prompt("Scan Private") - special(SPC_NOMOD) - interest(4) extra("struct scan_element *spvt") + interest(4) + special(SPC_NOMOD) } field(RSET, DBF_NOACCESS) { interest(4) @@ -1074,10 +10992,10 @@ interest(4) } field(DPVT, DBF_NOACCESS) { + prompt("Device Private") extra("void *dpvt") - special(SPC_NOMOD) - interest(4) - prompt("Device Private") + interest(4) + special(SPC_NOMOD) } field(RDES, DBF_NOACCESS) { extra("struct dbRecordType *rdes") @@ -1086,17 +11004,819 @@ special(SPC_NOMOD) } field(LSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct lockRecord *lset") prompt("Lock Set") - special(SPC_NOMOD) - interest(4) + } + field(PRIO, DBF_MENU) { + special(SPC_SCAN) + menu(menuPriority) + interest(1) + promptgroup("20 - Scan") + prompt("Scheduling Priority") + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + prompt("Break Point") + extra("char bkpt") + interest(1) + special(SPC_NOMOD) + } + field(UDF, DBF_UCHAR) { + promptgroup("10 - Common") + pp(TRUE) + interest(1) + prompt("Undefined") + initial("1") + } + field(UDFS, DBF_MENU) { + initial("INVALID") + prompt("Undefined Alarm Sevrty") + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + } + field(TIME, DBF_NOACCESS) { + interest(2) + special(SPC_NOMOD) + prompt("Time") + extra("epicsTimeStamp time") + } + field(FLNK, DBF_FWDLINK) { + prompt("Forward Process Link") + promptgroup("20 - Scan") + interest(1) + } + field(VAL, DBF_NOACCESS) { + extra("void * val") + asl(ASL0) + prompt("Value") + special(SPC_DBADDR) + pp(TRUE) + } + field(PREC, DBF_SHORT) { + prompt("Display Precision") + prop(YES) + interest(1) + promptgroup("80 - Display") + } + field(OUT, DBF_OUTLINK) { + interest(1) + promptgroup("50 - Output") + prompt("Output Specification") + } + field(EGU, DBF_STRING) { + size(16) + prompt("Engineering Units") + interest(1) + prop(YES) + promptgroup("80 - Display") + } + field(HOPR, DBF_DOUBLE) { + prompt("High Operating Range") + promptgroup("80 - Display") + interest(1) + prop(YES) + } + field(LOPR, DBF_DOUBLE) { + promptgroup("80 - Display") + prop(YES) + interest(1) + prompt("Low Operating Range") + } + field(NELM, DBF_ULONG) { + initial("1") + prompt("Number of Elements") + interest(1) + special(SPC_NOMOD) + promptgroup("30 - Action") + } + field(FTVL, DBF_MENU) { + promptgroup("30 - Action") + special(SPC_NOMOD) + interest(1) + menu(menuFtype) + prompt("Field Type of Value") + } + field(NORD, DBF_ULONG) { + prompt("Number elements read") + special(SPC_NOMOD) + } + field(BPTR, DBF_NOACCESS) { + prompt("Buffer Pointer") + extra("void * bptr") + interest(4) + special(SPC_NOMOD) + } + field(SIML, DBF_INLINK) { + prompt("Simulation Mode Link") + interest(1) + promptgroup("90 - Simulate") + } + field(SIMM, DBF_MENU) { + prompt("Simulation Mode") + interest(1) + menu(menuYesNo) + special(SPC_MOD) + } + field(SIMS, DBF_MENU) { + interest(2) + menu(menuAlarmSevr) + promptgroup("90 - Simulate") + prompt("Simulation Mode Severity") + } + field(SIOL, DBF_OUTLINK) { + prompt("Simulation Output Link") + promptgroup("90 - Simulate") + interest(1) + } + field(OLDSIMM, DBF_MENU) { + interest(4) + menu(menuSimm) + special(SPC_NOMOD) + prompt("Prev. Simulation Mode") + } + field(SSCN, DBF_MENU) { + promptgroup("90 - Simulate") + menu(menuScan) + interest(1) + prompt("Sim. Mode Scan") + initial("65535") + } + field(SDLY, DBF_DOUBLE) { + initial("-1.0") + prompt("Sim. Mode Async Delay") + interest(2) + promptgroup("90 - Simulate") + } + field(SIMPVT, DBF_NOACCESS) { + prompt("Sim. Mode Private") + extra("CALLBACK *simpvt") + special(SPC_NOMOD) + interest(4) + } + field(MPST, DBF_MENU) { + prompt("Post Value Monitors") + interest(1) + menu(aaoPOST) + promptgroup("80 - Display") + } + field(APST, DBF_MENU) { + prompt("Post Archive Monitors") + menu(aaoPOST) + interest(1) + promptgroup("80 - Display") + } + field(HASH, DBF_ULONG) { + interest(3) + prompt("Hash of OnChange data.") + } +} +device(aao, CONSTANT, devAaoSoft, "Soft Channel") +device(aao, INST_IO, devaaoStream, "stream") +recordtype(histogram) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + %#include "callback.h" + field(NAME, DBF_STRING) { + prompt("Record Name") + size(61) + special(SPC_NOMOD) + } + field(DESC, DBF_STRING) { + promptgroup("10 - Common") + prompt("Descriptor") + size(41) + } + field(ASG, DBF_STRING) { + size(29) + prompt("Access Security Group") + special(SPC_AS) + promptgroup("10 - Common") + } + field(SCAN, DBF_MENU) { + prompt("Scan Mechanism") + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + menu(menuScan) + } + field(PINI, DBF_MENU) { + prompt("Process at iocInit") + menu(menuPini) + interest(1) + promptgroup("20 - Scan") + } + field(PHAS, DBF_SHORT) { + prompt("Scan Phase") + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + } + field(EVNT, DBF_STRING) { + special(SPC_SCAN) + interest(1) + promptgroup("20 - Scan") + size(40) + prompt("Event Name") + } + field(TSE, DBF_SHORT) { + prompt("Time Stamp Event") + promptgroup("20 - Scan") + interest(1) + } + field(TSEL, DBF_INLINK) { + prompt("Time Stamp Link") + interest(1) + promptgroup("20 - Scan") + } + field(DTYP, DBF_DEVICE) { + prompt("Device Type") + promptgroup("10 - Common") + interest(1) + } + field(DISV, DBF_SHORT) { + promptgroup("20 - Scan") + prompt("Disable Value") + initial("1") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + prompt("Scanning Disable") + promptgroup("20 - Scan") + interest(1) + } + field(MLOK, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Monitor lock") + extra("epicsMutexId mlok") + } + field(MLIS, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("ELLLIST mlis") + prompt("Monitor List") + } + field(BKLNK, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("ELLLIST bklnk") + prompt("Backwards link tracking") + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + prompt("Force Processing") + interest(3) + pp(TRUE) + } + field(STAT, DBF_MENU) { + initial("UDF") + prompt("Alarm Status") + special(SPC_NOMOD) + menu(menuAlarmStat) + } + field(SEVR, DBF_MENU) { + prompt("Alarm Severity") + special(SPC_NOMOD) + menu(menuAlarmSevr) + } + field(NSTA, DBF_MENU) { + prompt("New Alarm Status") + special(SPC_NOMOD) + menu(menuAlarmStat) + interest(2) + } + field(NSEV, DBF_MENU) { + prompt("New Alarm Severity") + special(SPC_NOMOD) + menu(menuAlarmSevr) + interest(2) + } + field(ACKS, DBF_MENU) { + prompt("Alarm Ack Severity") + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) + } + field(ACKT, DBF_MENU) { + promptgroup("70 - Alarm") + interest(2) + menu(menuYesNo) + special(SPC_NOMOD) + prompt("Alarm Ack Transient") + initial("YES") + } + field(DISS, DBF_MENU) { + prompt("Disable Alarm Sevrty") + promptgroup("70 - Alarm") + interest(1) + menu(menuAlarmSevr) + } + field(LCNT, DBF_UCHAR) { + prompt("Lock Count") + interest(2) + special(SPC_NOMOD) + } + field(PACT, DBF_UCHAR) { + special(SPC_NOMOD) + interest(1) + prompt("Record active") + } + field(PUTF, DBF_UCHAR) { + special(SPC_NOMOD) + interest(1) + prompt("dbPutField process") + } + field(RPRO, DBF_UCHAR) { + prompt("Reprocess ") + special(SPC_NOMOD) + interest(1) + } + field(ASP, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Access Security Pvt") + extra("struct asgMember *asp") + } + field(PPN, DBF_NOACCESS) { + prompt("pprocessNotify") + extra("struct processNotify *ppn") + interest(4) + special(SPC_NOMOD) + } + field(PPNR, DBF_NOACCESS) { + prompt("pprocessNotifyRecord") + extra("struct processNotifyRecord *ppnr") + special(SPC_NOMOD) + interest(4) + } + field(SPVT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Scan Private") + extra("struct scan_element *spvt") + } + field(RSET, DBF_NOACCESS) { + extra("struct typed_rset *rset") + prompt("Address of RSET") + interest(4) + special(SPC_NOMOD) + } + field(DSET, DBF_NOACCESS) { + prompt("DSET address") + extra("struct dset *dset") + special(SPC_NOMOD) + interest(4) + } + field(DPVT, DBF_NOACCESS) { + extra("void *dpvt") + prompt("Device Private") + special(SPC_NOMOD) + interest(4) + } + field(RDES, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Address of dbRecordType") + extra("struct dbRecordType *rdes") + } + field(LSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct lockRecord *lset") + prompt("Lock Set") + } + field(PRIO, DBF_MENU) { + prompt("Scheduling Priority") + promptgroup("20 - Scan") + menu(menuPriority) + interest(1) + special(SPC_SCAN) + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(1) + prompt("Break Point") + extra("char bkpt") + } + field(UDF, DBF_UCHAR) { + interest(1) + pp(TRUE) + promptgroup("10 - Common") + initial("1") + prompt("Undefined") + } + field(UDFS, DBF_MENU) { + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + prompt("Undefined Alarm Sevrty") + initial("INVALID") + } + field(TIME, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(2) + extra("epicsTimeStamp time") + prompt("Time") + } + field(FLNK, DBF_FWDLINK) { + prompt("Forward Process Link") + promptgroup("20 - Scan") + interest(1) + } + field(VAL, DBF_NOACCESS) { + special(SPC_DBADDR) + prompt("Value") + extra("void * val") + asl(ASL0) + } + field(NELM, DBF_USHORT) { + interest(1) + special(SPC_NOMOD) + promptgroup("30 - Action") + initial("1") + prompt("Num of Array Elements") + } + field(CSTA, DBF_SHORT) { + special(SPC_NOMOD) + interest(1) + prompt("Collection Status") + initial("1") + } + field(CMD, DBF_MENU) { + prompt("Collection Control") + asl(ASL0) + interest(1) + menu(histogramCMD) + special(SPC_CALC) + } + field(ULIM, DBF_DOUBLE) { + prompt("Upper Signal Limit") + promptgroup("30 - Action") + interest(1) + prop(YES) + special(SPC_RESET) + } + field(LLIM, DBF_DOUBLE) { + prompt("Lower Signal Limit ") + promptgroup("30 - Action") + interest(1) + prop(YES) + special(SPC_RESET) + } + field(WDTH, DBF_DOUBLE) { + prompt("Element Width") + special(SPC_NOMOD) + interest(3) + } + field(SGNL, DBF_DOUBLE) { + special(SPC_MOD) + prompt("Signal Value") + } + field(PREC, DBF_SHORT) { + prompt("Display Precision") + promptgroup("80 - Display") + interest(1) + prop(YES) + } + field(SVL, DBF_INLINK) { + prompt("Signal Value Location") + interest(1) + promptgroup("40 - Input") + } + field(BPTR, DBF_NOACCESS) { + prompt("Buffer Pointer") + extra("epicsUInt32 *bptr") + interest(4) + special(SPC_NOMOD) + } + field(WDOG, DBF_NOACCESS) { + extra("void * wdog") + prompt("Watchdog callback") + interest(4) + special(SPC_NOMOD) + } + field(MDEL, DBF_SHORT) { + promptgroup("80 - Display") + interest(1) + prompt("Monitor Count Deadband") + } + field(MCNT, DBF_SHORT) { + prompt("Counts Since Monitor") + interest(3) + special(SPC_NOMOD) + } + field(SDEL, DBF_DOUBLE) { + promptgroup("80 - Display") + special(SPC_RESET) + interest(1) + prompt("Monitor Seconds Dband") + } + field(SIOL, DBF_INLINK) { + interest(1) + promptgroup("90 - Simulate") + prompt("Simulation Input Link") + } + field(SVAL, DBF_DOUBLE) { + prompt("Simulation Value") + } + field(SIML, DBF_INLINK) { + prompt("Simulation Mode Link") + promptgroup("90 - Simulate") + interest(1) + } + field(SIMM, DBF_MENU) { + prompt("Simulation Mode") + special(SPC_MOD) + menu(menuYesNo) + interest(1) + } + field(SIMS, DBF_MENU) { + prompt("Simulation Mode Severity") + promptgroup("90 - Simulate") + menu(menuAlarmSevr) + interest(2) + } + field(OLDSIMM, DBF_MENU) { + interest(4) + menu(menuSimm) + special(SPC_NOMOD) + prompt("Prev. Simulation Mode") + } + field(SSCN, DBF_MENU) { + promptgroup("90 - Simulate") + menu(menuScan) + interest(1) + prompt("Sim. Mode Scan") + initial("65535") + } + field(SDLY, DBF_DOUBLE) { + initial("-1.0") + prompt("Sim. Mode Async Delay") + interest(2) + promptgroup("90 - Simulate") + } + field(SIMPVT, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Sim. Mode Private") + extra("CALLBACK *simpvt") + } + field(HOPR, DBF_ULONG) { + interest(1) + prop(YES) + promptgroup("80 - Display") + prompt("High Operating Range") + } + field(LOPR, DBF_ULONG) { + promptgroup("80 - Display") + interest(1) + prop(YES) + prompt("Low Operating Range") + } +} +device(histogram, CONSTANT, devHistogramSoft, "Soft Channel") +recordtype(calcout) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + %#include "dbScan.h" + %#include "postfix.h" + field(NAME, DBF_STRING) { + special(SPC_NOMOD) + size(61) + prompt("Record Name") + } + field(DESC, DBF_STRING) { + promptgroup("10 - Common") + prompt("Descriptor") + size(41) + } + field(ASG, DBF_STRING) { + special(SPC_AS) + promptgroup("10 - Common") + size(29) + prompt("Access Security Group") + } + field(SCAN, DBF_MENU) { + prompt("Scan Mechanism") + promptgroup("20 - Scan") + interest(1) + menu(menuScan) + special(SPC_SCAN) + } + field(PINI, DBF_MENU) { + prompt("Process at iocInit") + promptgroup("20 - Scan") + interest(1) + menu(menuPini) + } + field(PHAS, DBF_SHORT) { + prompt("Scan Phase") + promptgroup("20 - Scan") + interest(1) + special(SPC_SCAN) + } + field(EVNT, DBF_STRING) { + size(40) + prompt("Event Name") + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + } + field(TSE, DBF_SHORT) { + interest(1) + promptgroup("20 - Scan") + prompt("Time Stamp Event") + } + field(TSEL, DBF_INLINK) { + promptgroup("20 - Scan") + interest(1) + prompt("Time Stamp Link") + } + field(DTYP, DBF_DEVICE) { + prompt("Device Type") + promptgroup("10 - Common") + interest(1) + } + field(DISV, DBF_SHORT) { + initial("1") + prompt("Disable Value") + promptgroup("20 - Scan") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + prompt("Scanning Disable") + promptgroup("20 - Scan") + interest(1) + } + field(MLOK, DBF_NOACCESS) { + prompt("Monitor lock") + extra("epicsMutexId mlok") + interest(4) + special(SPC_NOMOD) + } + field(MLIS, DBF_NOACCESS) { + prompt("Monitor List") + extra("ELLLIST mlis") + special(SPC_NOMOD) + interest(4) + } + field(BKLNK, DBF_NOACCESS) { + extra("ELLLIST bklnk") + prompt("Backwards link tracking") + interest(4) + special(SPC_NOMOD) + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + pp(TRUE) + interest(3) + prompt("Force Processing") + } + field(STAT, DBF_MENU) { + menu(menuAlarmStat) + special(SPC_NOMOD) + initial("UDF") + prompt("Alarm Status") + } + field(SEVR, DBF_MENU) { + prompt("Alarm Severity") + menu(menuAlarmSevr) + special(SPC_NOMOD) + } + field(NSTA, DBF_MENU) { + special(SPC_NOMOD) + interest(2) + menu(menuAlarmStat) + prompt("New Alarm Status") + } + field(NSEV, DBF_MENU) { + prompt("New Alarm Severity") + special(SPC_NOMOD) + menu(menuAlarmSevr) + interest(2) + } + field(ACKS, DBF_MENU) { + menu(menuAlarmSevr) + interest(2) + special(SPC_NOMOD) + prompt("Alarm Ack Severity") + } + field(ACKT, DBF_MENU) { + prompt("Alarm Ack Transient") + initial("YES") + promptgroup("70 - Alarm") + special(SPC_NOMOD) + menu(menuYesNo) + interest(2) + } + field(DISS, DBF_MENU) { + interest(1) + menu(menuAlarmSevr) + promptgroup("70 - Alarm") + prompt("Disable Alarm Sevrty") + } + field(LCNT, DBF_UCHAR) { + interest(2) + special(SPC_NOMOD) + prompt("Lock Count") + } + field(PACT, DBF_UCHAR) { + prompt("Record active") + special(SPC_NOMOD) + interest(1) + } + field(PUTF, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("dbPutField process") + } + field(RPRO, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("Reprocess ") + } + field(ASP, DBF_NOACCESS) { + prompt("Access Security Pvt") + extra("struct asgMember *asp") + interest(4) + special(SPC_NOMOD) + } + field(PPN, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("pprocessNotify") + extra("struct processNotify *ppn") + } + field(PPNR, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct processNotifyRecord *ppnr") + prompt("pprocessNotifyRecord") + } + field(SPVT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Scan Private") + extra("struct scan_element *spvt") + } + field(RSET, DBF_NOACCESS) { + prompt("Address of RSET") + extra("struct typed_rset *rset") + interest(4) + special(SPC_NOMOD) + } + field(DSET, DBF_NOACCESS) { + prompt("DSET address") + extra("struct dset *dset") + special(SPC_NOMOD) + interest(4) + } + field(DPVT, DBF_NOACCESS) { + prompt("Device Private") + extra("void *dpvt") + interest(4) + special(SPC_NOMOD) + } + field(RDES, DBF_NOACCESS) { + prompt("Address of dbRecordType") + extra("struct dbRecordType *rdes") + interest(4) + special(SPC_NOMOD) + } + field(LSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Lock Set") extra("struct lockRecord *lset") } field(PRIO, DBF_MENU) { + interest(1) menu(menuPriority) + special(SPC_SCAN) + promptgroup("20 - Scan") prompt("Scheduling Priority") - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) } field(TPRO, DBF_UCHAR) { prompt("Trace Processing") @@ -1108,40 +11828,3642 @@ special(SPC_NOMOD) } field(UDF, DBF_UCHAR) { - initial("1") - pp(TRUE) + interest(1) + promptgroup("10 - Common") + pp(TRUE) + initial("1") prompt("Undefined") - interest(1) - promptgroup("10 - Common") } field(UDFS, DBF_MENU) { initial("INVALID") - menu(menuAlarmSevr) prompt("Undefined Alarm Sevrty") + menu(menuAlarmSevr) interest(1) promptgroup("70 - Alarm") } field(TIME, DBF_NOACCESS) { + interest(2) + special(SPC_NOMOD) + prompt("Time") + extra("epicsTimeStamp time") + } + field(FLNK, DBF_FWDLINK) { + prompt("Forward Process Link") + promptgroup("20 - Scan") + interest(1) + } + field(RPVT, DBF_NOACCESS) { + prompt("Record Private") + extra("struct rpvtStruct *rpvt") + special(SPC_NOMOD) + interest(4) + } + field(VAL, DBF_DOUBLE) { + asl(ASL0) + prompt("Result") + promptgroup("50 - Output") + } + field(PVAL, DBF_DOUBLE) { + prompt("Previous Value") + } + field(CALC, DBF_STRING) { + pp(TRUE) + promptgroup("30 - Action") + special(SPC_CALC) + prompt("Calculation") + initial("0") + size(80) + } + field(CLCV, DBF_LONG) { + prompt("CALC Valid") + interest(1) + } + field(INPA, DBF_INLINK) { + promptgroup("41 - Input A-F") + special(SPC_MOD) + interest(1) + prompt("Input A") + } + field(INPB, DBF_INLINK) { + prompt("Input B") + special(SPC_MOD) + interest(1) + promptgroup("41 - Input A-F") + } + field(INPC, DBF_INLINK) { + prompt("Input C") + special(SPC_MOD) + interest(1) + promptgroup("41 - Input A-F") + } + field(INPD, DBF_INLINK) { + prompt("Input D") + promptgroup("41 - Input A-F") + interest(1) + special(SPC_MOD) + } + field(INPE, DBF_INLINK) { + prompt("Input E") + interest(1) + special(SPC_MOD) + promptgroup("41 - Input A-F") + } + field(INPF, DBF_INLINK) { + prompt("Input F") + interest(1) + special(SPC_MOD) + promptgroup("41 - Input A-F") + } + field(INPG, DBF_INLINK) { + special(SPC_MOD) + interest(1) + promptgroup("42 - Input G-L") + prompt("Input G") + } + field(INPH, DBF_INLINK) { + prompt("Input H") + promptgroup("42 - Input G-L") + special(SPC_MOD) + interest(1) + } + field(INPI, DBF_INLINK) { + interest(1) + special(SPC_MOD) + promptgroup("42 - Input G-L") + prompt("Input I") + } + field(INPJ, DBF_INLINK) { + promptgroup("42 - Input G-L") + special(SPC_MOD) + interest(1) + prompt("Input J") + } + field(INPK, DBF_INLINK) { + prompt("Input K") + promptgroup("42 - Input G-L") + interest(1) + special(SPC_MOD) + } + field(INPL, DBF_INLINK) { + prompt("Input L") + promptgroup("42 - Input G-L") + special(SPC_MOD) + interest(1) + } + field(OUT, DBF_OUTLINK) { + prompt("Output Specification") + special(SPC_MOD) + interest(1) + promptgroup("50 - Output") + } + field(INAV, DBF_MENU) { + initial("1") + prompt("INPA PV Status") + interest(1) + menu(calcoutINAV) + special(SPC_NOMOD) + } + field(INBV, DBF_MENU) { + initial("1") + prompt("INPB PV Status") + special(SPC_NOMOD) + interest(1) + menu(calcoutINAV) + } + field(INCV, DBF_MENU) { + special(SPC_NOMOD) + menu(calcoutINAV) + interest(1) + prompt("INPC PV Status") + initial("1") + } + field(INDV, DBF_MENU) { + special(SPC_NOMOD) + interest(1) + menu(calcoutINAV) + initial("1") + prompt("INPD PV Status") + } + field(INEV, DBF_MENU) { + prompt("INPE PV Status") + initial("1") + special(SPC_NOMOD) + interest(1) + menu(calcoutINAV) + } + field(INFV, DBF_MENU) { + prompt("INPF PV Status") + initial("1") + special(SPC_NOMOD) + interest(1) + menu(calcoutINAV) + } + field(INGV, DBF_MENU) { + prompt("INPG PV Status") + initial("1") + special(SPC_NOMOD) + menu(calcoutINAV) + interest(1) + } + field(INHV, DBF_MENU) { + special(SPC_NOMOD) + menu(calcoutINAV) + interest(1) + prompt("INPH PV Status") + initial("1") + } + field(INIV, DBF_MENU) { + interest(1) + menu(calcoutINAV) + special(SPC_NOMOD) + prompt("INPI PV Status") + initial("1") + } + field(INJV, DBF_MENU) { + menu(calcoutINAV) + interest(1) + special(SPC_NOMOD) + initial("1") + prompt("INPJ PV Status") + } + field(INKV, DBF_MENU) { + initial("1") + prompt("INPK PV Status") + special(SPC_NOMOD) + menu(calcoutINAV) + interest(1) + } + field(INLV, DBF_MENU) { + menu(calcoutINAV) + interest(1) + special(SPC_NOMOD) + prompt("INPL PV Status") + initial("1") + } + field(OUTV, DBF_MENU) { + menu(calcoutINAV) + interest(1) + special(SPC_NOMOD) + prompt("OUT PV Status") + } + field(OOPT, DBF_MENU) { + prompt("Output Execute Opt") + menu(calcoutOOPT) + interest(1) + promptgroup("50 - Output") + } + field(ODLY, DBF_DOUBLE) { + prompt("Output Execute Delay") + asl(ASL0) + promptgroup("50 - Output") + interest(1) + } + field(DLYA, DBF_USHORT) { + asl(ASL0) + prompt("Output Delay Active") + special(SPC_NOMOD) + } + field(DOPT, DBF_MENU) { + prompt("Output Data Opt") + promptgroup("30 - Action") + interest(1) + menu(calcoutDOPT) + } + field(OCAL, DBF_STRING) { + special(SPC_CALC) + pp(TRUE) + promptgroup("30 - Action") + size(80) + initial("0") + prompt("Output Calculation") + } + field(OCLV, DBF_LONG) { + prompt("OCAL Valid") + interest(1) + } + field(OEVT, DBF_STRING) { + size(40) + asl(ASL0) + prompt("Event To Issue") + special(SPC_MOD) + promptgroup("30 - Action") + } + field(EPVT, DBF_NOACCESS) { + extra("EVENTPVT epvt") + prompt("Event private") + special(SPC_NOMOD) + interest(4) + } + field(IVOA, DBF_MENU) { + interest(2) + menu(menuIvoa) + promptgroup("50 - Output") + prompt("INVALID output action") + } + field(IVOV, DBF_DOUBLE) { + prompt("INVALID output value") + promptgroup("50 - Output") + interest(2) + } + field(EGU, DBF_STRING) { + interest(1) + prop(YES) + promptgroup("80 - Display") + size(16) + prompt("Engineering Units") + } + field(PREC, DBF_SHORT) { + prompt("Display Precision") + promptgroup("80 - Display") + interest(1) + prop(YES) + } + field(HOPR, DBF_DOUBLE) { + promptgroup("80 - Display") + interest(1) + prop(YES) + prompt("High Operating Rng") + } + field(LOPR, DBF_DOUBLE) { + interest(1) + prop(YES) + promptgroup("80 - Display") + prompt("Low Operating Range") + } + field(HIHI, DBF_DOUBLE) { + pp(TRUE) + promptgroup("70 - Alarm") + prop(YES) + interest(1) + prompt("Hihi Alarm Limit") + } + field(LOLO, DBF_DOUBLE) { + prompt("Lolo Alarm Limit") + pp(TRUE) + promptgroup("70 - Alarm") + prop(YES) + interest(1) + } + field(HIGH, DBF_DOUBLE) { + prompt("High Alarm Limit") + prop(YES) + interest(1) + pp(TRUE) + promptgroup("70 - Alarm") + } + field(LOW, DBF_DOUBLE) { + interest(1) + prop(YES) + promptgroup("70 - Alarm") + pp(TRUE) + prompt("Low Alarm Limit") + } + field(HHSV, DBF_MENU) { + prompt("Hihi Severity") + promptgroup("70 - Alarm") + pp(TRUE) + interest(1) + menu(menuAlarmSevr) + prop(YES) + } + field(LLSV, DBF_MENU) { + promptgroup("70 - Alarm") + pp(TRUE) + menu(menuAlarmSevr) + prop(YES) + interest(1) + prompt("Lolo Severity") + } + field(HSV, DBF_MENU) { + pp(TRUE) + promptgroup("70 - Alarm") + prop(YES) + menu(menuAlarmSevr) + interest(1) + prompt("High Severity") + } + field(LSV, DBF_MENU) { + promptgroup("70 - Alarm") + pp(TRUE) + menu(menuAlarmSevr) + interest(1) + prop(YES) + prompt("Low Severity") + } + field(HYST, DBF_DOUBLE) { + interest(1) + promptgroup("70 - Alarm") + prompt("Alarm Deadband") + } + field(ADEL, DBF_DOUBLE) { + interest(1) + promptgroup("80 - Display") + prompt("Archive Deadband") + } + field(MDEL, DBF_DOUBLE) { + interest(1) + promptgroup("80 - Display") + prompt("Monitor Deadband") + } + field(A, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input A") + } + field(B, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input B") + } + field(C, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input C") + } + field(D, DBF_DOUBLE) { + prompt("Value of Input D") + pp(TRUE) + } + field(E, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input E") + } + field(F, DBF_DOUBLE) { + prompt("Value of Input F") + pp(TRUE) + } + field(G, DBF_DOUBLE) { + prompt("Value of Input G") + pp(TRUE) + } + field(H, DBF_DOUBLE) { + prompt("Value of Input H") + pp(TRUE) + } + field(I, DBF_DOUBLE) { + prompt("Value of Input I") + pp(TRUE) + } + field(J, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input J") + } + field(K, DBF_DOUBLE) { + prompt("Value of Input K") + pp(TRUE) + } + field(L, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input L") + } + field(OVAL, DBF_DOUBLE) { + asl(ASL0) + prompt("Output Value") + } + field(LA, DBF_DOUBLE) { + prompt("Prev Value of A") + interest(3) + special(SPC_NOMOD) + } + field(LB, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Value of B") + } + field(LC, DBF_DOUBLE) { + prompt("Prev Value of C") + special(SPC_NOMOD) + interest(3) + } + field(LD, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of D") + } + field(LE, DBF_DOUBLE) { + prompt("Prev Value of E") + special(SPC_NOMOD) + interest(3) + } + field(LF, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Value of F") + } + field(LG, DBF_DOUBLE) { + prompt("Prev Value of G") + special(SPC_NOMOD) + interest(3) + } + field(LH, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of H") + } + field(LI, DBF_DOUBLE) { + prompt("Prev Value of I") + special(SPC_NOMOD) + interest(3) + } + field(LJ, DBF_DOUBLE) { + prompt("Prev Value of J") + special(SPC_NOMOD) + interest(3) + } + field(LK, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Value of K") + } + field(LL, DBF_DOUBLE) { + prompt("Prev Value of L") + interest(3) + special(SPC_NOMOD) + } + field(POVL, DBF_DOUBLE) { + prompt("Prev Value of OVAL") + asl(ASL0) + } + field(LALM, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Last Value Alarmed") + } + field(ALST, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Last Value Archived") + } + field(MLST, DBF_DOUBLE) { + prompt("Last Val Monitored") + interest(3) + special(SPC_NOMOD) + } + field(RPCL, DBF_NOACCESS) { + extra("char rpcl[INFIX_TO_POSTFIX_SIZE(80)]") + prompt("Reverse Polish Calc") + special(SPC_NOMOD) + interest(4) + } + field(ORPC, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("char orpc[INFIX_TO_POSTFIX_SIZE(80)]") + prompt("Reverse Polish OCalc") + } +} +device(calcout, CONSTANT, devCalcoutSoft, "Soft Channel") +device(calcout, CONSTANT, devCalcoutSoftCallback, "Async Soft Channel") +device(calcout, INST_IO, devcalcoutStream, "stream") +recordtype(mbboDirect) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + %#include "callback.h" + field(NAME, DBF_STRING) { + special(SPC_NOMOD) + prompt("Record Name") + size(61) + } + field(DESC, DBF_STRING) { + promptgroup("10 - Common") + prompt("Descriptor") + size(41) + } + field(ASG, DBF_STRING) { + prompt("Access Security Group") + size(29) + promptgroup("10 - Common") + special(SPC_AS) + } + field(SCAN, DBF_MENU) { + interest(1) + menu(menuScan) + special(SPC_SCAN) + promptgroup("20 - Scan") + prompt("Scan Mechanism") + } + field(PINI, DBF_MENU) { + prompt("Process at iocInit") + interest(1) + menu(menuPini) + promptgroup("20 - Scan") + } + field(PHAS, DBF_SHORT) { + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + prompt("Scan Phase") + } + field(EVNT, DBF_STRING) { + promptgroup("20 - Scan") + interest(1) + special(SPC_SCAN) + prompt("Event Name") + size(40) + } + field(TSE, DBF_SHORT) { + prompt("Time Stamp Event") + promptgroup("20 - Scan") + interest(1) + } + field(TSEL, DBF_INLINK) { + interest(1) + promptgroup("20 - Scan") + prompt("Time Stamp Link") + } + field(DTYP, DBF_DEVICE) { + promptgroup("10 - Common") + interest(1) + prompt("Device Type") + } + field(DISV, DBF_SHORT) { + promptgroup("20 - Scan") + prompt("Disable Value") + initial("1") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + prompt("Scanning Disable") + interest(1) + promptgroup("20 - Scan") + } + field(MLOK, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Monitor lock") + extra("epicsMutexId mlok") + } + field(MLIS, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("ELLLIST mlis") + prompt("Monitor List") + } + field(BKLNK, DBF_NOACCESS) { + extra("ELLLIST bklnk") + prompt("Backwards link tracking") + interest(4) + special(SPC_NOMOD) + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + prompt("Force Processing") + interest(3) + pp(TRUE) + } + field(STAT, DBF_MENU) { + prompt("Alarm Status") + initial("UDF") + menu(menuAlarmStat) + special(SPC_NOMOD) + } + field(SEVR, DBF_MENU) { + menu(menuAlarmSevr) + special(SPC_NOMOD) + prompt("Alarm Severity") + } + field(NSTA, DBF_MENU) { + menu(menuAlarmStat) + interest(2) + special(SPC_NOMOD) + prompt("New Alarm Status") + } + field(NSEV, DBF_MENU) { + prompt("New Alarm Severity") + special(SPC_NOMOD) + menu(menuAlarmSevr) + interest(2) + } + field(ACKS, DBF_MENU) { + prompt("Alarm Ack Severity") + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) + } + field(ACKT, DBF_MENU) { + initial("YES") + prompt("Alarm Ack Transient") + special(SPC_NOMOD) + interest(2) + menu(menuYesNo) + promptgroup("70 - Alarm") + } + field(DISS, DBF_MENU) { + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + prompt("Disable Alarm Sevrty") + } + field(LCNT, DBF_UCHAR) { + prompt("Lock Count") + special(SPC_NOMOD) + interest(2) + } + field(PACT, DBF_UCHAR) { + special(SPC_NOMOD) + interest(1) + prompt("Record active") + } + field(PUTF, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("dbPutField process") + } + field(RPRO, DBF_UCHAR) { + prompt("Reprocess ") + interest(1) + special(SPC_NOMOD) + } + field(ASP, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct asgMember *asp") + prompt("Access Security Pvt") + } + field(PPN, DBF_NOACCESS) { + extra("struct processNotify *ppn") + prompt("pprocessNotify") + interest(4) + special(SPC_NOMOD) + } + field(PPNR, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct processNotifyRecord *ppnr") + prompt("pprocessNotifyRecord") + } + field(SPVT, DBF_NOACCESS) { + prompt("Scan Private") + extra("struct scan_element *spvt") + special(SPC_NOMOD) + interest(4) + } + field(RSET, DBF_NOACCESS) { + prompt("Address of RSET") + extra("struct typed_rset *rset") + special(SPC_NOMOD) + interest(4) + } + field(DSET, DBF_NOACCESS) { + prompt("DSET address") + extra("struct dset *dset") + interest(4) + special(SPC_NOMOD) + } + field(DPVT, DBF_NOACCESS) { + extra("void *dpvt") + prompt("Device Private") + special(SPC_NOMOD) + interest(4) + } + field(RDES, DBF_NOACCESS) { + extra("struct dbRecordType *rdes") + prompt("Address of dbRecordType") + interest(4) + special(SPC_NOMOD) + } + field(LSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct lockRecord *lset") + prompt("Lock Set") + } + field(PRIO, DBF_MENU) { + prompt("Scheduling Priority") + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + menu(menuPriority) + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(1) + extra("char bkpt") + prompt("Break Point") + } + field(UDF, DBF_UCHAR) { + pp(TRUE) + promptgroup("10 - Common") + interest(1) + prompt("Undefined") + initial("1") + } + field(UDFS, DBF_MENU) { + promptgroup("70 - Alarm") + interest(1) + menu(menuAlarmSevr) + prompt("Undefined Alarm Sevrty") + initial("INVALID") + } + field(TIME, DBF_NOACCESS) { + interest(2) + special(SPC_NOMOD) extra("epicsTimeStamp time") prompt("Time") + } + field(FLNK, DBF_FWDLINK) { + interest(1) + promptgroup("20 - Scan") + prompt("Forward Process Link") + } + field(VAL, DBF_LONG) { + pp(TRUE) + promptgroup("50 - Output") + asl(ASL0) + prompt("Word") + } + field(OMSL, DBF_MENU) { + prompt("Output Mode Select") + pp(TRUE) + promptgroup("50 - Output") + special(SPC_RESET) + interest(1) + menu(menuOmsl) + } + field(NOBT, DBF_SHORT) { + prompt("Number of Bits") + promptgroup("50 - Output") + special(SPC_NOMOD) + interest(1) + } + field(DOL, DBF_INLINK) { + promptgroup("40 - Input") + interest(1) + prompt("Desired Output Loc") + } + field(OUT, DBF_OUTLINK) { + interest(1) + promptgroup("50 - Output") + prompt("Output Specification") + } + field(RVAL, DBF_ULONG) { + special(SPC_NOMOD) + pp(TRUE) + prompt("Raw Value") + } + field(ORAW, DBF_ULONG) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Raw Value") + } + field(RBV, DBF_ULONG) { + prompt("Readback Value") + special(SPC_NOMOD) + } + field(ORBV, DBF_ULONG) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Readback Value") + } + field(MASK, DBF_ULONG) { + prompt("Hardware Mask") + interest(1) + special(SPC_NOMOD) + } + field(MLST, DBF_LONG) { + prompt("Last Value Monitored") + special(SPC_NOMOD) + interest(3) + } + field(SHFT, DBF_USHORT) { + promptgroup("50 - Output") + interest(1) + prompt("Shift") + } + field(SIOL, DBF_OUTLINK) { + prompt("Simulation Output Link") + interest(1) + promptgroup("90 - Simulate") + } + field(SIML, DBF_INLINK) { + prompt("Simulation Mode Link") + promptgroup("90 - Simulate") + interest(1) + } + field(SIMM, DBF_MENU) { + special(SPC_MOD) + interest(1) + menu(menuYesNo) + prompt("Simulation Mode") + } + field(SIMS, DBF_MENU) { + prompt("Simulation Mode Severity") + promptgroup("90 - Simulate") + menu(menuAlarmSevr) + interest(2) + } + field(OLDSIMM, DBF_MENU) { + prompt("Prev. Simulation Mode") + menu(menuSimm) + interest(4) + special(SPC_NOMOD) + } + field(SSCN, DBF_MENU) { + interest(1) + menu(menuScan) + promptgroup("90 - Simulate") + initial("65535") + prompt("Sim. Mode Scan") + } + field(SDLY, DBF_DOUBLE) { + promptgroup("90 - Simulate") + interest(2) + prompt("Sim. Mode Async Delay") + initial("-1.0") + } + field(SIMPVT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Sim. Mode Private") + extra("CALLBACK *simpvt") + } + field(IVOA, DBF_MENU) { + prompt("INVALID outpt action") + promptgroup("50 - Output") + menu(menuIvoa) + interest(2) + } + field(IVOV, DBF_LONG) { + interest(2) + promptgroup("50 - Output") + prompt("INVALID output value") + } + field(B0, DBF_UCHAR) { + prompt("Bit 0") + interest(1) + special(SPC_MOD) + promptgroup("51 - Output 0-7") + pp(TRUE) + } + field(B1, DBF_UCHAR) { + interest(1) + special(SPC_MOD) + promptgroup("51 - Output 0-7") + pp(TRUE) + prompt("Bit 1") + } + field(B2, DBF_UCHAR) { + prompt("Bit 2") + special(SPC_MOD) + interest(1) + promptgroup("51 - Output 0-7") + pp(TRUE) + } + field(B3, DBF_UCHAR) { + special(SPC_MOD) + interest(1) + pp(TRUE) + promptgroup("51 - Output 0-7") + prompt("Bit 3") + } + field(B4, DBF_UCHAR) { + interest(1) + special(SPC_MOD) + pp(TRUE) + promptgroup("51 - Output 0-7") + prompt("Bit 4") + } + field(B5, DBF_UCHAR) { + prompt("Bit 5") + promptgroup("51 - Output 0-7") + pp(TRUE) + interest(1) + special(SPC_MOD) + } + field(B6, DBF_UCHAR) { + special(SPC_MOD) + interest(1) + promptgroup("51 - Output 0-7") + pp(TRUE) + prompt("Bit 6") + } + field(B7, DBF_UCHAR) { + prompt("Bit 7") + special(SPC_MOD) + interest(1) + pp(TRUE) + promptgroup("51 - Output 0-7") + } + field(B8, DBF_UCHAR) { + prompt("Bit 8") + pp(TRUE) + promptgroup("52 - Output 8-15") + special(SPC_MOD) + interest(1) + } + field(B9, DBF_UCHAR) { + pp(TRUE) + promptgroup("52 - Output 8-15") + special(SPC_MOD) + interest(1) + prompt("Bit 9") + } + field(BA, DBF_UCHAR) { + prompt("Bit 10") + interest(1) + special(SPC_MOD) + pp(TRUE) + promptgroup("52 - Output 8-15") + } + field(BB, DBF_UCHAR) { + pp(TRUE) + promptgroup("52 - Output 8-15") + interest(1) + special(SPC_MOD) + prompt("Bit 11") + } + field(BC, DBF_UCHAR) { + promptgroup("52 - Output 8-15") + pp(TRUE) + interest(1) + special(SPC_MOD) + prompt("Bit 12") + } + field(BD, DBF_UCHAR) { + interest(1) + special(SPC_MOD) + pp(TRUE) + promptgroup("52 - Output 8-15") + prompt("Bit 13") + } + field(BE, DBF_UCHAR) { + prompt("Bit 14") + special(SPC_MOD) + interest(1) + promptgroup("52 - Output 8-15") + pp(TRUE) + } + field(BF, DBF_UCHAR) { + special(SPC_MOD) + interest(1) + pp(TRUE) + promptgroup("52 - Output 8-15") + prompt("Bit 15") + } + field(B10, DBF_UCHAR) { + pp(TRUE) + promptgroup("53 - Output 16-23") + interest(1) + special(SPC_MOD) + prompt("Bit 16") + } + field(B11, DBF_UCHAR) { + pp(TRUE) + promptgroup("53 - Output 16-23") + special(SPC_MOD) + interest(1) + prompt("Bit 17") + } + field(B12, DBF_UCHAR) { + prompt("Bit 18") + pp(TRUE) + promptgroup("53 - Output 16-23") + special(SPC_MOD) + interest(1) + } + field(B13, DBF_UCHAR) { + pp(TRUE) + promptgroup("53 - Output 16-23") + interest(1) + special(SPC_MOD) + prompt("Bit 19") + } + field(B14, DBF_UCHAR) { + prompt("Bit 20") + interest(1) + special(SPC_MOD) + promptgroup("53 - Output 16-23") + pp(TRUE) + } + field(B15, DBF_UCHAR) { + prompt("Bit 21") + promptgroup("53 - Output 16-23") + pp(TRUE) + special(SPC_MOD) + interest(1) + } + field(B16, DBF_UCHAR) { + promptgroup("53 - Output 16-23") + pp(TRUE) + special(SPC_MOD) + interest(1) + prompt("Bit 22") + } + field(B17, DBF_UCHAR) { + prompt("Bit 23") + promptgroup("53 - Output 16-23") + pp(TRUE) + special(SPC_MOD) + interest(1) + } + field(B18, DBF_UCHAR) { + pp(TRUE) + promptgroup("54 - Output 24-31") + special(SPC_MOD) + interest(1) + prompt("Bit 24") + } + field(B19, DBF_UCHAR) { + prompt("Bit 25") + pp(TRUE) + promptgroup("54 - Output 24-31") + special(SPC_MOD) + interest(1) + } + field(B1A, DBF_UCHAR) { + prompt("Bit 26") + interest(1) + special(SPC_MOD) + promptgroup("54 - Output 24-31") + pp(TRUE) + } + field(B1B, DBF_UCHAR) { + promptgroup("54 - Output 24-31") + pp(TRUE) + interest(1) + special(SPC_MOD) + prompt("Bit 27") + } + field(B1C, DBF_UCHAR) { + prompt("Bit 28") + pp(TRUE) + promptgroup("54 - Output 24-31") + special(SPC_MOD) + interest(1) + } + field(B1D, DBF_UCHAR) { + prompt("Bit 29") + pp(TRUE) + promptgroup("54 - Output 24-31") + interest(1) + special(SPC_MOD) + } + field(B1E, DBF_UCHAR) { + special(SPC_MOD) + interest(1) + promptgroup("54 - Output 24-31") + pp(TRUE) + prompt("Bit 30") + } + field(B1F, DBF_UCHAR) { + prompt("Bit 31") + special(SPC_MOD) + interest(1) + promptgroup("54 - Output 24-31") + pp(TRUE) + } +} +device(mbboDirect, CONSTANT, devMbboDirectSoft, "Soft Channel") +device(mbboDirect, CONSTANT, devMbboDirectSoftRaw, "Raw Soft Channel") +device(mbboDirect, CONSTANT, devMbboDirectSoftCallback, "Async Soft Channel") +device(mbboDirect, INST_IO, asynMbboDirectUInt32Digital, "asynUInt32Digital") +device(mbboDirect, INST_IO, devmbboDirectStream, "stream") +recordtype(aai) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + %#include "callback.h" + field(NAME, DBF_STRING) { + special(SPC_NOMOD) + prompt("Record Name") + size(61) + } + field(DESC, DBF_STRING) { + prompt("Descriptor") + size(41) + promptgroup("10 - Common") + } + field(ASG, DBF_STRING) { + special(SPC_AS) + promptgroup("10 - Common") + size(29) + prompt("Access Security Group") + } + field(SCAN, DBF_MENU) { + prompt("Scan Mechanism") + promptgroup("20 - Scan") + special(SPC_SCAN) + menu(menuScan) + interest(1) + } + field(PINI, DBF_MENU) { + interest(1) + menu(menuPini) + promptgroup("20 - Scan") + prompt("Process at iocInit") + } + field(PHAS, DBF_SHORT) { + promptgroup("20 - Scan") + interest(1) + special(SPC_SCAN) + prompt("Scan Phase") + } + field(EVNT, DBF_STRING) { + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + size(40) + prompt("Event Name") + } + field(TSE, DBF_SHORT) { + prompt("Time Stamp Event") + promptgroup("20 - Scan") + interest(1) + } + field(TSEL, DBF_INLINK) { + prompt("Time Stamp Link") + promptgroup("20 - Scan") + interest(1) + } + field(DTYP, DBF_DEVICE) { + interest(1) + promptgroup("10 - Common") + prompt("Device Type") + } + field(DISV, DBF_SHORT) { + initial("1") + prompt("Disable Value") + promptgroup("20 - Scan") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + prompt("Scanning Disable") + promptgroup("20 - Scan") + interest(1) + } + field(MLOK, DBF_NOACCESS) { + prompt("Monitor lock") + extra("epicsMutexId mlok") + special(SPC_NOMOD) + interest(4) + } + field(MLIS, DBF_NOACCESS) { + extra("ELLLIST mlis") + prompt("Monitor List") + special(SPC_NOMOD) + interest(4) + } + field(BKLNK, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("ELLLIST bklnk") + prompt("Backwards link tracking") + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + pp(TRUE) + interest(3) + prompt("Force Processing") + } + field(STAT, DBF_MENU) { + prompt("Alarm Status") + initial("UDF") + special(SPC_NOMOD) + menu(menuAlarmStat) + } + field(SEVR, DBF_MENU) { + prompt("Alarm Severity") + menu(menuAlarmSevr) + special(SPC_NOMOD) + } + field(NSTA, DBF_MENU) { + interest(2) + menu(menuAlarmStat) + special(SPC_NOMOD) + prompt("New Alarm Status") + } + field(NSEV, DBF_MENU) { + prompt("New Alarm Severity") + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) + } + field(ACKS, DBF_MENU) { + prompt("Alarm Ack Severity") + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) + } + field(ACKT, DBF_MENU) { + initial("YES") + prompt("Alarm Ack Transient") + special(SPC_NOMOD) + interest(2) + menu(menuYesNo) + promptgroup("70 - Alarm") + } + field(DISS, DBF_MENU) { + prompt("Disable Alarm Sevrty") + promptgroup("70 - Alarm") + interest(1) + menu(menuAlarmSevr) + } + field(LCNT, DBF_UCHAR) { + special(SPC_NOMOD) + interest(2) + prompt("Lock Count") + } + field(PACT, DBF_UCHAR) { + prompt("Record active") + interest(1) + special(SPC_NOMOD) + } + field(PUTF, DBF_UCHAR) { + prompt("dbPutField process") + special(SPC_NOMOD) + interest(1) + } + field(RPRO, DBF_UCHAR) { + prompt("Reprocess ") + special(SPC_NOMOD) + interest(1) + } + field(ASP, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Access Security Pvt") + extra("struct asgMember *asp") + } + field(PPN, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("pprocessNotify") + extra("struct processNotify *ppn") + } + field(PPNR, DBF_NOACCESS) { + extra("struct processNotifyRecord *ppnr") + prompt("pprocessNotifyRecord") + special(SPC_NOMOD) + interest(4) + } + field(SPVT, DBF_NOACCESS) { + prompt("Scan Private") + extra("struct scan_element *spvt") + interest(4) + special(SPC_NOMOD) + } + field(RSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct typed_rset *rset") + prompt("Address of RSET") + } + field(DSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct dset *dset") + prompt("DSET address") + } + field(DPVT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("void *dpvt") + prompt("Device Private") + } + field(RDES, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Address of dbRecordType") + extra("struct dbRecordType *rdes") + } + field(LSET, DBF_NOACCESS) { + extra("struct lockRecord *lset") + prompt("Lock Set") + interest(4) + special(SPC_NOMOD) + } + field(PRIO, DBF_MENU) { + prompt("Scheduling Priority") + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + menu(menuPriority) + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(1) + prompt("Break Point") + extra("char bkpt") + } + field(UDF, DBF_UCHAR) { + interest(1) + promptgroup("10 - Common") + pp(TRUE) + initial("1") + prompt("Undefined") + } + field(UDFS, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + initial("INVALID") + prompt("Undefined Alarm Sevrty") + } + field(TIME, DBF_NOACCESS) { + interest(2) + special(SPC_NOMOD) + prompt("Time") + extra("epicsTimeStamp time") + } + field(FLNK, DBF_FWDLINK) { + promptgroup("20 - Scan") + interest(1) + prompt("Forward Process Link") + } + field(VAL, DBF_NOACCESS) { + special(SPC_DBADDR) + pp(TRUE) + extra("void * val") + asl(ASL0) + prompt("Value") + } + field(PREC, DBF_SHORT) { + prompt("Display Precision") + promptgroup("80 - Display") + interest(1) + prop(YES) + } + field(INP, DBF_INLINK) { + promptgroup("40 - Input") + interest(1) + prompt("Input Specification") + } + field(EGU, DBF_STRING) { + promptgroup("80 - Display") + interest(1) + prop(YES) + prompt("Engineering Units") + size(16) + } + field(HOPR, DBF_DOUBLE) { + prompt("High Operating Range") + promptgroup("80 - Display") + prop(YES) + interest(1) + } + field(LOPR, DBF_DOUBLE) { + prompt("Low Operating Range") + promptgroup("80 - Display") + interest(1) + prop(YES) + } + field(NELM, DBF_ULONG) { + interest(1) + special(SPC_NOMOD) + promptgroup("30 - Action") + initial("1") + prompt("Number of Elements") + } + field(FTVL, DBF_MENU) { + promptgroup("30 - Action") + special(SPC_NOMOD) + interest(1) + menu(menuFtype) + prompt("Field Type of Value") + } + field(NORD, DBF_ULONG) { + prompt("Number elements read") + special(SPC_NOMOD) + } + field(BPTR, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Buffer Pointer") + extra("void * bptr") + } + field(SIML, DBF_INLINK) { + prompt("Simulation Mode Link") + promptgroup("90 - Simulate") + interest(1) + } + field(SIMM, DBF_MENU) { + menu(menuYesNo) + interest(1) + special(SPC_MOD) + prompt("Simulation Mode") + } + field(SIMS, DBF_MENU) { + interest(2) + menu(menuAlarmSevr) + promptgroup("90 - Simulate") + prompt("Simulation Mode Severity") + } + field(SIOL, DBF_INLINK) { + prompt("Simulation Input Link") + interest(1) + promptgroup("90 - Simulate") + } + field(OLDSIMM, DBF_MENU) { + special(SPC_NOMOD) + interest(4) + menu(menuSimm) + prompt("Prev. Simulation Mode") + } + field(SSCN, DBF_MENU) { + menu(menuScan) + interest(1) + promptgroup("90 - Simulate") + initial("65535") + prompt("Sim. Mode Scan") + } + field(SDLY, DBF_DOUBLE) { + interest(2) + promptgroup("90 - Simulate") + initial("-1.0") + prompt("Sim. Mode Async Delay") + } + field(SIMPVT, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Sim. Mode Private") + extra("CALLBACK *simpvt") + } + field(MPST, DBF_MENU) { + menu(aaiPOST) + interest(1) + promptgroup("80 - Display") + prompt("Post Value Monitors") + } + field(APST, DBF_MENU) { + menu(aaiPOST) + interest(1) + promptgroup("80 - Display") + prompt("Post Archive Monitors") + } + field(HASH, DBF_ULONG) { + prompt("Hash of OnChange data.") + interest(3) + } +} +device(aai, CONSTANT, devAaiSoft, "Soft Channel") +device(aai, INST_IO, devaaiStream, "stream") +recordtype(seq) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + field(NAME, DBF_STRING) { + special(SPC_NOMOD) + prompt("Record Name") + size(61) + } + field(DESC, DBF_STRING) { + promptgroup("10 - Common") + size(41) + prompt("Descriptor") + } + field(ASG, DBF_STRING) { + promptgroup("10 - Common") + special(SPC_AS) + prompt("Access Security Group") + size(29) + } + field(SCAN, DBF_MENU) { + promptgroup("20 - Scan") + menu(menuScan) + interest(1) + special(SPC_SCAN) + prompt("Scan Mechanism") + } + field(PINI, DBF_MENU) { + prompt("Process at iocInit") + promptgroup("20 - Scan") + interest(1) + menu(menuPini) + } + field(PHAS, DBF_SHORT) { + promptgroup("20 - Scan") + interest(1) + special(SPC_SCAN) + prompt("Scan Phase") + } + field(EVNT, DBF_STRING) { + size(40) + prompt("Event Name") + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + } + field(TSE, DBF_SHORT) { + prompt("Time Stamp Event") + interest(1) + promptgroup("20 - Scan") + } + field(TSEL, DBF_INLINK) { + interest(1) + promptgroup("20 - Scan") + prompt("Time Stamp Link") + } + field(DTYP, DBF_DEVICE) { + interest(1) + promptgroup("10 - Common") + prompt("Device Type") + } + field(DISV, DBF_SHORT) { + initial("1") + prompt("Disable Value") + promptgroup("20 - Scan") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + interest(1) + promptgroup("20 - Scan") + prompt("Scanning Disable") + } + field(MLOK, DBF_NOACCESS) { + prompt("Monitor lock") + extra("epicsMutexId mlok") + special(SPC_NOMOD) + interest(4) + } + field(MLIS, DBF_NOACCESS) { + prompt("Monitor List") + extra("ELLLIST mlis") + special(SPC_NOMOD) + interest(4) + } + field(BKLNK, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("ELLLIST bklnk") + prompt("Backwards link tracking") + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + prompt("Force Processing") + interest(3) + pp(TRUE) + } + field(STAT, DBF_MENU) { + special(SPC_NOMOD) + menu(menuAlarmStat) + prompt("Alarm Status") + initial("UDF") + } + field(SEVR, DBF_MENU) { + prompt("Alarm Severity") + menu(menuAlarmSevr) + special(SPC_NOMOD) + } + field(NSTA, DBF_MENU) { + menu(menuAlarmStat) + interest(2) + special(SPC_NOMOD) + prompt("New Alarm Status") + } + field(NSEV, DBF_MENU) { + prompt("New Alarm Severity") + special(SPC_NOMOD) + menu(menuAlarmSevr) + interest(2) + } + field(ACKS, DBF_MENU) { + prompt("Alarm Ack Severity") + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) + } + field(ACKT, DBF_MENU) { + interest(2) + menu(menuYesNo) + special(SPC_NOMOD) + promptgroup("70 - Alarm") + initial("YES") + prompt("Alarm Ack Transient") + } + field(DISS, DBF_MENU) { + prompt("Disable Alarm Sevrty") + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + } + field(LCNT, DBF_UCHAR) { + prompt("Lock Count") + interest(2) + special(SPC_NOMOD) + } + field(PACT, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("Record active") + } + field(PUTF, DBF_UCHAR) { + special(SPC_NOMOD) + interest(1) + prompt("dbPutField process") + } + field(RPRO, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("Reprocess ") + } + field(ASP, DBF_NOACCESS) { + prompt("Access Security Pvt") + extra("struct asgMember *asp") + interest(4) + special(SPC_NOMOD) + } + field(PPN, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("pprocessNotify") + extra("struct processNotify *ppn") + } + field(PPNR, DBF_NOACCESS) { + prompt("pprocessNotifyRecord") + extra("struct processNotifyRecord *ppnr") + special(SPC_NOMOD) + interest(4) + } + field(SPVT, DBF_NOACCESS) { + extra("struct scan_element *spvt") + prompt("Scan Private") + special(SPC_NOMOD) + interest(4) + } + field(RSET, DBF_NOACCESS) { + extra("struct typed_rset *rset") + prompt("Address of RSET") + interest(4) + special(SPC_NOMOD) + } + field(DSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("DSET address") + extra("struct dset *dset") + } + field(DPVT, DBF_NOACCESS) { + extra("void *dpvt") + prompt("Device Private") + special(SPC_NOMOD) + interest(4) + } + field(RDES, DBF_NOACCESS) { + extra("struct dbRecordType *rdes") + prompt("Address of dbRecordType") + interest(4) + special(SPC_NOMOD) + } + field(LSET, DBF_NOACCESS) { + prompt("Lock Set") + extra("struct lockRecord *lset") + special(SPC_NOMOD) + interest(4) + } + field(PRIO, DBF_MENU) { + special(SPC_SCAN) + menu(menuPriority) + interest(1) + promptgroup("20 - Scan") + prompt("Scheduling Priority") + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(1) + prompt("Break Point") + extra("char bkpt") + } + field(UDF, DBF_UCHAR) { + prompt("Undefined") + initial("1") + pp(TRUE) + promptgroup("10 - Common") + interest(1) + } + field(UDFS, DBF_MENU) { + initial("INVALID") + prompt("Undefined Alarm Sevrty") + interest(1) + menu(menuAlarmSevr) + promptgroup("70 - Alarm") + } + field(TIME, DBF_NOACCESS) { + interest(2) + special(SPC_NOMOD) + extra("epicsTimeStamp time") + prompt("Time") + } + field(FLNK, DBF_FWDLINK) { + promptgroup("20 - Scan") + interest(1) + prompt("Forward Process Link") + } + field(VAL, DBF_LONG) { + pp(TRUE) + prompt("Used to trigger") + asl(ASL0) + } + field(SELM, DBF_MENU) { + promptgroup("30 - Action") + interest(1) + menu(seqSELM) + prompt("Select Mechanism") + } + field(SELN, DBF_USHORT) { + interest(1) + prompt("Link Selection") + initial("1") + } + field(SELL, DBF_INLINK) { + promptgroup("30 - Action") + interest(1) + prompt("Link Selection Loc") + } + field(OFFS, DBF_SHORT) { + promptgroup("30 - Action") + interest(1) + prompt("Offset for Specified") + initial("0") + } + field(SHFT, DBF_SHORT) { + promptgroup("30 - Action") + interest(1) + prompt("Shift for Mask mode") + initial("-1") + } + field(OLDN, DBF_USHORT) { + prompt("Old Selection") + interest(4) + } + field(PREC, DBF_SHORT) { + interest(1) + promptgroup("80 - Display") + prompt("Display Precision") + } + field(DLY0, DBF_DOUBLE) { + prompt("Delay 0") + promptgroup("41 - Link 0-7") + interest(1) + } + field(DOL0, DBF_INLINK) { + prompt("Input link 0") + interest(1) + promptgroup("41 - Link 0-7") + } + field(DO0, DBF_DOUBLE) { + prompt("Value 0") + interest(1) + } + field(LNK0, DBF_OUTLINK) { + promptgroup("41 - Link 0-7") + interest(1) + prompt("Output Link 0") + } + field(DLY1, DBF_DOUBLE) { + promptgroup("41 - Link 0-7") + interest(1) + prompt("Delay 1") + } + field(DOL1, DBF_INLINK) { + promptgroup("41 - Link 0-7") + interest(1) + prompt("Input link1") + } + field(DO1, DBF_DOUBLE) { + prompt("Value 1") + interest(1) + } + field(LNK1, DBF_OUTLINK) { + interest(1) + promptgroup("41 - Link 0-7") + prompt("Output Link 1") + } + field(DLY2, DBF_DOUBLE) { + prompt("Delay 2") + promptgroup("41 - Link 0-7") + interest(1) + } + field(DOL2, DBF_INLINK) { + promptgroup("41 - Link 0-7") + interest(1) + prompt("Input link 2") + } + field(DO2, DBF_DOUBLE) { + interest(1) + prompt("Value 2") + } + field(LNK2, DBF_OUTLINK) { + promptgroup("41 - Link 0-7") + interest(1) + prompt("Output Link 2") + } + field(DLY3, DBF_DOUBLE) { + prompt("Delay 3") + promptgroup("41 - Link 0-7") + interest(1) + } + field(DOL3, DBF_INLINK) { + prompt("Input link 3") + promptgroup("41 - Link 0-7") + interest(1) + } + field(DO3, DBF_DOUBLE) { + interest(1) + prompt("Value 3") + } + field(LNK3, DBF_OUTLINK) { + interest(1) + promptgroup("41 - Link 0-7") + prompt("Output Link 3") + } + field(DLY4, DBF_DOUBLE) { + prompt("Delay 4") + interest(1) + promptgroup("41 - Link 0-7") + } + field(DOL4, DBF_INLINK) { + promptgroup("41 - Link 0-7") + interest(1) + prompt("Input link 4") + } + field(DO4, DBF_DOUBLE) { + prompt("Value 4") + interest(1) + } + field(LNK4, DBF_OUTLINK) { + promptgroup("41 - Link 0-7") + interest(1) + prompt("Output Link 4") + } + field(DLY5, DBF_DOUBLE) { + prompt("Delay 5") + promptgroup("41 - Link 0-7") + interest(1) + } + field(DOL5, DBF_INLINK) { + promptgroup("41 - Link 0-7") + interest(1) + prompt("Input link 5") + } + field(DO5, DBF_DOUBLE) { + interest(1) + prompt("Value 5") + } + field(LNK5, DBF_OUTLINK) { + interest(1) + promptgroup("41 - Link 0-7") + prompt("Output Link 5") + } + field(DLY6, DBF_DOUBLE) { + interest(1) + promptgroup("41 - Link 0-7") + prompt("Delay 6") + } + field(DOL6, DBF_INLINK) { + interest(1) + promptgroup("41 - Link 0-7") + prompt("Input link 6") + } + field(DO6, DBF_DOUBLE) { + prompt("Value 6") + interest(1) + } + field(LNK6, DBF_OUTLINK) { + promptgroup("41 - Link 0-7") + interest(1) + prompt("Output Link 6") + } + field(DLY7, DBF_DOUBLE) { + interest(1) + promptgroup("41 - Link 0-7") + prompt("Delay 7") + } + field(DOL7, DBF_INLINK) { + prompt("Input link 7") + interest(1) + promptgroup("41 - Link 0-7") + } + field(DO7, DBF_DOUBLE) { + prompt("Value 7") + interest(1) + } + field(LNK7, DBF_OUTLINK) { + promptgroup("41 - Link 0-7") + interest(1) + prompt("Output Link 7") + } + field(DLY8, DBF_DOUBLE) { + interest(1) + promptgroup("42 - Link 8-F") + prompt("Delay 8") + } + field(DOL8, DBF_INLINK) { + prompt("Input link 8") + interest(1) + promptgroup("42 - Link 8-F") + } + field(DO8, DBF_DOUBLE) { + prompt("Value 8") + interest(1) + } + field(LNK8, DBF_OUTLINK) { + promptgroup("42 - Link 8-F") + interest(1) + prompt("Output Link 8") + } + field(DLY9, DBF_DOUBLE) { + promptgroup("42 - Link 8-F") + interest(1) + prompt("Delay 9") + } + field(DOL9, DBF_INLINK) { + prompt("Input link 9") + promptgroup("42 - Link 8-F") + interest(1) + } + field(DO9, DBF_DOUBLE) { + interest(1) + prompt("Value 9") + } + field(LNK9, DBF_OUTLINK) { + prompt("Output Link 9") + interest(1) + promptgroup("42 - Link 8-F") + } + field(DLYA, DBF_DOUBLE) { + promptgroup("42 - Link 8-F") + interest(1) + prompt("Delay 10") + } + field(DOLA, DBF_INLINK) { + prompt("Input link 10") + promptgroup("42 - Link 8-F") + interest(1) + } + field(DOA, DBF_DOUBLE) { + interest(1) + prompt("Value 10") + } + field(LNKA, DBF_OUTLINK) { + interest(1) + promptgroup("42 - Link 8-F") + prompt("Output Link 10") + } + field(DLYB, DBF_DOUBLE) { + promptgroup("42 - Link 8-F") + interest(1) + prompt("Delay 11") + } + field(DOLB, DBF_INLINK) { + prompt("Input link 11") + promptgroup("42 - Link 8-F") + interest(1) + } + field(DOB, DBF_DOUBLE) { + interest(1) + prompt("Value 11") + } + field(LNKB, DBF_OUTLINK) { + prompt("Output Link 11") + promptgroup("42 - Link 8-F") + interest(1) + } + field(DLYC, DBF_DOUBLE) { + prompt("Delay 12") + promptgroup("42 - Link 8-F") + interest(1) + } + field(DOLC, DBF_INLINK) { + promptgroup("42 - Link 8-F") + interest(1) + prompt("Input link 12") + } + field(DOC, DBF_DOUBLE) { + interest(1) + prompt("Value 12") + } + field(LNKC, DBF_OUTLINK) { + prompt("Output Link 12") + promptgroup("42 - Link 8-F") + interest(1) + } + field(DLYD, DBF_DOUBLE) { + prompt("Delay 13") + interest(1) + promptgroup("42 - Link 8-F") + } + field(DOLD, DBF_INLINK) { + prompt("Input link 13") + promptgroup("42 - Link 8-F") + interest(1) + } + field(DOD, DBF_DOUBLE) { + prompt("Value 13") + interest(1) + } + field(LNKD, DBF_OUTLINK) { + interest(1) + promptgroup("42 - Link 8-F") + prompt("Output Link 13") + } + field(DLYE, DBF_DOUBLE) { + prompt("Delay 14") + interest(1) + promptgroup("42 - Link 8-F") + } + field(DOLE, DBF_INLINK) { + prompt("Input link 14") + interest(1) + promptgroup("42 - Link 8-F") + } + field(DOE, DBF_DOUBLE) { + prompt("Value 14") + interest(1) + } + field(LNKE, DBF_OUTLINK) { + prompt("Output Link 14") + interest(1) + promptgroup("42 - Link 8-F") + } + field(DLYF, DBF_DOUBLE) { + promptgroup("42 - Link 8-F") + interest(1) + prompt("Delay 15") + } + field(DOLF, DBF_INLINK) { + prompt("Input link 15") + interest(1) + promptgroup("42 - Link 8-F") + } + field(DOF, DBF_DOUBLE) { + interest(1) + prompt("Value 15") + } + field(LNKF, DBF_OUTLINK) { + prompt("Output Link 15") + interest(1) + promptgroup("42 - Link 8-F") + } +} +recordtype(transform) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + field(NAME, DBF_STRING) { + special(SPC_NOMOD) + prompt("Record Name") + size(61) + } + field(DESC, DBF_STRING) { + size(41) + prompt("Descriptor") + promptgroup("10 - Common") + } + field(ASG, DBF_STRING) { + size(29) + prompt("Access Security Group") + special(SPC_AS) + promptgroup("10 - Common") + } + field(SCAN, DBF_MENU) { + promptgroup("20 - Scan") + interest(1) + menu(menuScan) + special(SPC_SCAN) + prompt("Scan Mechanism") + } + field(PINI, DBF_MENU) { + prompt("Process at iocInit") + interest(1) + menu(menuPini) + promptgroup("20 - Scan") + } + field(PHAS, DBF_SHORT) { + prompt("Scan Phase") + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + } + field(EVNT, DBF_STRING) { + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + size(40) + prompt("Event Name") + } + field(TSE, DBF_SHORT) { + prompt("Time Stamp Event") + promptgroup("20 - Scan") + interest(1) + } + field(TSEL, DBF_INLINK) { + interest(1) + promptgroup("20 - Scan") + prompt("Time Stamp Link") + } + field(DTYP, DBF_DEVICE) { + prompt("Device Type") + interest(1) + promptgroup("10 - Common") + } + field(DISV, DBF_SHORT) { + promptgroup("20 - Scan") + initial("1") + prompt("Disable Value") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + interest(1) + promptgroup("20 - Scan") + prompt("Scanning Disable") + } + field(MLOK, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Monitor lock") + extra("epicsMutexId mlok") + } + field(MLIS, DBF_NOACCESS) { + prompt("Monitor List") + extra("ELLLIST mlis") + interest(4) + special(SPC_NOMOD) + } + field(BKLNK, DBF_NOACCESS) { + prompt("Backwards link tracking") + extra("ELLLIST bklnk") + interest(4) + special(SPC_NOMOD) + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + interest(3) + pp(TRUE) + prompt("Force Processing") + } + field(STAT, DBF_MENU) { + initial("UDF") + prompt("Alarm Status") + special(SPC_NOMOD) + menu(menuAlarmStat) + } + field(SEVR, DBF_MENU) { + prompt("Alarm Severity") + special(SPC_NOMOD) + menu(menuAlarmSevr) + } + field(NSTA, DBF_MENU) { + special(SPC_NOMOD) + interest(2) + menu(menuAlarmStat) + prompt("New Alarm Status") + } + field(NSEV, DBF_MENU) { + prompt("New Alarm Severity") + menu(menuAlarmSevr) + interest(2) + special(SPC_NOMOD) + } + field(ACKS, DBF_MENU) { + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) + prompt("Alarm Ack Severity") + } + field(ACKT, DBF_MENU) { + prompt("Alarm Ack Transient") + initial("YES") + promptgroup("70 - Alarm") + interest(2) + menu(menuYesNo) + special(SPC_NOMOD) + } + field(DISS, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + prompt("Disable Alarm Sevrty") + } + field(LCNT, DBF_UCHAR) { + prompt("Lock Count") + special(SPC_NOMOD) + interest(2) + } + field(PACT, DBF_UCHAR) { + prompt("Record active") + interest(1) + special(SPC_NOMOD) + } + field(PUTF, DBF_UCHAR) { + special(SPC_NOMOD) + interest(1) + prompt("dbPutField process") + } + field(RPRO, DBF_UCHAR) { + prompt("Reprocess ") + special(SPC_NOMOD) + interest(1) + } + field(ASP, DBF_NOACCESS) { + prompt("Access Security Pvt") + extra("struct asgMember *asp") + special(SPC_NOMOD) + interest(4) + } + field(PPN, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("pprocessNotify") + extra("struct processNotify *ppn") + } + field(PPNR, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct processNotifyRecord *ppnr") + prompt("pprocessNotifyRecord") + } + field(SPVT, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct scan_element *spvt") + prompt("Scan Private") + } + field(RSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct typed_rset *rset") + prompt("Address of RSET") + } + field(DSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("DSET address") + extra("struct dset *dset") + } + field(DPVT, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Device Private") + extra("void *dpvt") + } + field(RDES, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Address of dbRecordType") + extra("struct dbRecordType *rdes") + } + field(LSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct lockRecord *lset") + prompt("Lock Set") + } + field(PRIO, DBF_MENU) { + prompt("Scheduling Priority") + menu(menuPriority) + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(1) + prompt("Break Point") + extra("char bkpt") + } + field(UDF, DBF_UCHAR) { + initial("1") + prompt("Undefined") + interest(1) + pp(TRUE) + promptgroup("10 - Common") + } + field(UDFS, DBF_MENU) { + initial("INVALID") + prompt("Undefined Alarm Sevrty") + interest(1) + menu(menuAlarmSevr) + promptgroup("70 - Alarm") + } + field(TIME, DBF_NOACCESS) { + prompt("Time") + extra("epicsTimeStamp time") interest(2) special(SPC_NOMOD) } field(FLNK, DBF_FWDLINK) { + interest(1) + promptgroup("20 - Scan") prompt("Forward Process Link") - interest(1) - promptgroup("20 - Scan") + } + field(VERS, DBF_FLOAT) { + initial("1") + prompt("Code Version") + special(SPC_NOMOD) + } + field(RPVT, DBF_NOACCESS) { + prompt("Record Private") + size(4) + extra("void * rpvt") + special(SPC_NOMOD) + interest(4) + } + field(IVLA, DBF_MENU) { + prompt("Invalid link action") + initial("0") + promptgroup("10 - Common") + menu(transformIVLA) + interest(1) + } + field(COPT, DBF_MENU) { + initial("Conditional") + prompt("Calc option") + interest(1) + menu(transformCOPT) + promptgroup("10 - Common") + } + field(VAL, DBF_DOUBLE) { + prompt("Result") + } + field(CLCA, DBF_STRING) { + prompt("Calculation A") + size(120) + promptgroup("10 - Common") + special(SPC_MOD) + } + field(CLCB, DBF_STRING) { + prompt("Calculation B") + size(120) + promptgroup("10 - Common") + special(SPC_MOD) + } + field(CLCC, DBF_STRING) { + size(120) + prompt("Calculation C") + special(SPC_MOD) + promptgroup("10 - Common") + } + field(CLCD, DBF_STRING) { + special(SPC_MOD) + promptgroup("10 - Common") + size(120) + prompt("Calculation D") + } + field(CLCE, DBF_STRING) { + prompt("Calculation E") + size(120) + promptgroup("10 - Common") + special(SPC_MOD) + } + field(CLCF, DBF_STRING) { + promptgroup("10 - Common") + special(SPC_MOD) + prompt("Calculation F") + size(120) + } + field(CLCG, DBF_STRING) { + promptgroup("10 - Common") + special(SPC_MOD) + prompt("Calculation G") + size(120) + } + field(CLCH, DBF_STRING) { + special(SPC_MOD) + promptgroup("10 - Common") + size(120) + prompt("Calculation H") + } + field(CLCI, DBF_STRING) { + prompt("Calculation I") + size(120) + promptgroup("10 - Common") + special(SPC_MOD) + } + field(CLCJ, DBF_STRING) { + size(120) + prompt("Calculation J") + special(SPC_MOD) + promptgroup("10 - Common") + } + field(CLCK, DBF_STRING) { + special(SPC_MOD) + promptgroup("10 - Common") + size(120) + prompt("Calculation K") + } + field(CLCL, DBF_STRING) { + prompt("Calculation L") + size(120) + promptgroup("10 - Common") + special(SPC_MOD) + } + field(CLCM, DBF_STRING) { + size(120) + prompt("Calculation M") + special(SPC_MOD) + promptgroup("10 - Common") + } + field(CLCN, DBF_STRING) { + size(120) + prompt("Calculation N") + special(SPC_MOD) + promptgroup("10 - Common") + } + field(CLCO, DBF_STRING) { + special(SPC_MOD) + promptgroup("10 - Common") + size(120) + prompt("Calculation O") + } + field(CLCP, DBF_STRING) { + special(SPC_MOD) + promptgroup("10 - Common") + size(120) + prompt("Calculation P") + } + field(CAV, DBF_LONG) { + prompt("CALC Invalid") + interest(1) + } + field(CBV, DBF_LONG) { + prompt("CALC Invalid") + interest(1) + } + field(CCV, DBF_LONG) { + interest(1) + prompt("CALC Invalid") + } + field(CDV, DBF_LONG) { + prompt("CALC Invalid") + interest(1) + } + field(CEV, DBF_LONG) { + interest(1) + prompt("CALC Invalid") + } + field(CFV, DBF_LONG) { + interest(1) + prompt("CALC Invalid") + } + field(CGV, DBF_LONG) { + prompt("CALC Invalid") + interest(1) + } + field(CHV, DBF_LONG) { + interest(1) + prompt("CALC Invalid") + } + field(CIV, DBF_LONG) { + prompt("CALC Invalid") + interest(1) + } + field(CJV, DBF_LONG) { + prompt("CALC Invalid") + interest(1) + } + field(CKV, DBF_LONG) { + interest(1) + prompt("CALC Invalid") + } + field(CLV, DBF_LONG) { + interest(1) + prompt("CALC Invalid") + } + field(CMV, DBF_LONG) { + interest(1) + prompt("CALC Invalid") + } + field(CNV, DBF_LONG) { + prompt("CALC Invalid") + interest(1) + } + field(COV, DBF_LONG) { + prompt("CALC Invalid") + interest(1) + } + field(CPV, DBF_LONG) { + interest(1) + prompt("CALC Invalid") + } + field(INPA, DBF_INLINK) { + promptgroup("10 - Common") + special(SPC_MOD) + interest(1) + prompt("Input A") + } + field(INPB, DBF_INLINK) { + prompt("Input B") + promptgroup("10 - Common") + special(SPC_MOD) + interest(1) + } + field(INPC, DBF_INLINK) { + prompt("Input C") + promptgroup("10 - Common") + special(SPC_MOD) + interest(1) + } + field(INPD, DBF_INLINK) { + prompt("Input D") + promptgroup("10 - Common") + special(SPC_MOD) + interest(1) + } + field(INPE, DBF_INLINK) { + prompt("Input E") + interest(1) + special(SPC_MOD) + promptgroup("10 - Common") + } + field(INPF, DBF_INLINK) { + prompt("Input F") + special(SPC_MOD) + interest(1) + promptgroup("10 - Common") + } + field(INPG, DBF_INLINK) { + special(SPC_MOD) + interest(1) + promptgroup("10 - Common") + prompt("Input G") + } + field(INPH, DBF_INLINK) { + prompt("Input H") + interest(1) + special(SPC_MOD) + promptgroup("10 - Common") + } + field(INPI, DBF_INLINK) { + prompt("Input I") + special(SPC_MOD) + interest(1) + promptgroup("10 - Common") + } + field(INPJ, DBF_INLINK) { + prompt("Input J") + interest(1) + special(SPC_MOD) + promptgroup("10 - Common") + } + field(INPK, DBF_INLINK) { + prompt("Input K") + interest(1) + special(SPC_MOD) + promptgroup("10 - Common") + } + field(INPL, DBF_INLINK) { + prompt("Input L") + promptgroup("10 - Common") + special(SPC_MOD) + interest(1) + } + field(INPM, DBF_INLINK) { + promptgroup("10 - Common") + interest(1) + special(SPC_MOD) + prompt("Input M") + } + field(INPN, DBF_INLINK) { + prompt("Input N") + special(SPC_MOD) + interest(1) + promptgroup("10 - Common") + } + field(INPO, DBF_INLINK) { + prompt("Input O") + special(SPC_MOD) + interest(1) + promptgroup("10 - Common") + } + field(INPP, DBF_INLINK) { + prompt("Input P") + interest(1) + special(SPC_MOD) + promptgroup("10 - Common") + } + field(OUTA, DBF_OUTLINK) { + prompt("Output A") + interest(1) + special(SPC_MOD) + promptgroup("10 - Common") + } + field(OUTB, DBF_OUTLINK) { + promptgroup("10 - Common") + interest(1) + special(SPC_MOD) + prompt("Output B") + } + field(OUTC, DBF_OUTLINK) { + special(SPC_MOD) + interest(1) + promptgroup("10 - Common") + prompt("Output C") + } + field(OUTD, DBF_OUTLINK) { + prompt("Output D") + promptgroup("10 - Common") + special(SPC_MOD) + interest(1) + } + field(OUTE, DBF_OUTLINK) { + prompt("Output E") + interest(1) + special(SPC_MOD) + promptgroup("10 - Common") + } + field(OUTF, DBF_OUTLINK) { + interest(1) + special(SPC_MOD) + promptgroup("10 - Common") + prompt("Output F") + } + field(OUTG, DBF_OUTLINK) { + interest(1) + special(SPC_MOD) + promptgroup("10 - Common") + prompt("Output G") + } + field(OUTH, DBF_OUTLINK) { + promptgroup("10 - Common") + interest(1) + special(SPC_MOD) + prompt("Output H") + } + field(OUTI, DBF_OUTLINK) { + promptgroup("10 - Common") + interest(1) + special(SPC_MOD) + prompt("Output I") + } + field(OUTJ, DBF_OUTLINK) { + promptgroup("10 - Common") + special(SPC_MOD) + interest(1) + prompt("Output J") + } + field(OUTK, DBF_OUTLINK) { + promptgroup("10 - Common") + interest(1) + special(SPC_MOD) + prompt("Output K") + } + field(OUTL, DBF_OUTLINK) { + promptgroup("10 - Common") + interest(1) + special(SPC_MOD) + prompt("Output L") + } + field(OUTM, DBF_OUTLINK) { + interest(1) + special(SPC_MOD) + promptgroup("10 - Common") + prompt("Output M") + } + field(OUTN, DBF_OUTLINK) { + prompt("Output N") + promptgroup("10 - Common") + interest(1) + special(SPC_MOD) + } + field(OUTO, DBF_OUTLINK) { + prompt("Output O") + interest(1) + special(SPC_MOD) + promptgroup("10 - Common") + } + field(OUTP, DBF_OUTLINK) { + prompt("Output P") + promptgroup("10 - Common") + special(SPC_MOD) + interest(1) + } + field(EGU, DBF_STRING) { + interest(1) + promptgroup("10 - Common") + size(16) + prompt("Units Name") + } + field(PREC, DBF_SHORT) { + prompt("Display Precision") + promptgroup("10 - Common") + interest(1) + } + field(A, DBF_DOUBLE) { + special(SPC_MOD) + pp(TRUE) + promptgroup("10 - Common") + prompt("Value of A") + } + field(B, DBF_DOUBLE) { + prompt("Value of B") + promptgroup("10 - Common") + pp(TRUE) + special(SPC_MOD) + } + field(C, DBF_DOUBLE) { + prompt("Value of C") + promptgroup("10 - Common") + pp(TRUE) + special(SPC_MOD) + } + field(D, DBF_DOUBLE) { + prompt("Value of D") + pp(TRUE) + promptgroup("10 - Common") + special(SPC_MOD) + } + field(E, DBF_DOUBLE) { + special(SPC_MOD) + pp(TRUE) + promptgroup("10 - Common") + prompt("Value of E") + } + field(F, DBF_DOUBLE) { + special(SPC_MOD) + pp(TRUE) + promptgroup("10 - Common") + prompt("Value of F") + } + field(G, DBF_DOUBLE) { + prompt("Value of G") + special(SPC_MOD) + pp(TRUE) + promptgroup("10 - Common") + } + field(H, DBF_DOUBLE) { + promptgroup("10 - Common") + pp(TRUE) + special(SPC_MOD) + prompt("Value of H") + } + field(I, DBF_DOUBLE) { + promptgroup("10 - Common") + pp(TRUE) + special(SPC_MOD) + prompt("Value of I") + } + field(J, DBF_DOUBLE) { + prompt("Value of J") + special(SPC_MOD) + promptgroup("10 - Common") + pp(TRUE) + } + field(K, DBF_DOUBLE) { + prompt("Value of K") + special(SPC_MOD) + pp(TRUE) + promptgroup("10 - Common") + } + field(L, DBF_DOUBLE) { + promptgroup("10 - Common") + pp(TRUE) + special(SPC_MOD) + prompt("Value of L") + } + field(M, DBF_DOUBLE) { + prompt("Value of M") + pp(TRUE) + promptgroup("10 - Common") + special(SPC_MOD) + } + field(N, DBF_DOUBLE) { + promptgroup("10 - Common") + pp(TRUE) + special(SPC_MOD) + prompt("Value of N") + } + field(O, DBF_DOUBLE) { + prompt("Value of O") + special(SPC_MOD) + pp(TRUE) + promptgroup("10 - Common") + } + field(P, DBF_DOUBLE) { + prompt("Value of P") + special(SPC_MOD) + pp(TRUE) + promptgroup("10 - Common") + } + field(LA, DBF_DOUBLE) { + prompt("Prev Value of A") + special(SPC_NOMOD) + interest(3) + } + field(LB, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of B") + } + field(LC, DBF_DOUBLE) { + prompt("Prev Value of C") + special(SPC_NOMOD) + interest(3) + } + field(LD, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Value of D") + } + field(LE, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Value of E") + } + field(LF, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Value of F") + } + field(LG, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Value of G") + } + field(LH, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Value of H") + } + field(LI, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of I") + } + field(LJ, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Value of J") + } + field(LK, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of K") + } + field(LL, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of L") + } + field(LM, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of M") + } + field(LN, DBF_DOUBLE) { + prompt("Prev Value of N") + interest(3) + special(SPC_NOMOD) + } + field(LO, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of O") + } + field(LP, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Value of P") + } + field(RPCA, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Postfix Calc A") + extra("unsigned char rpca[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") + } + field(RPCB, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Postfix Calc B") + extra("unsigned char rpcb[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") + } + field(RPCC, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("unsigned char rpcc[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") + prompt("Postfix Calc C") + } + field(RPCD, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("unsigned char rpcd[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") + prompt("Postfix Calc D") + } + field(RPCE, DBF_NOACCESS) { + prompt("Postfix Calc E") + extra("unsigned char rpce[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") + special(SPC_NOMOD) + interest(4) + } + field(RPCF, DBF_NOACCESS) { + extra("unsigned char rpcf[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") + prompt("Postfix Calc F") + special(SPC_NOMOD) + interest(4) + } + field(RPCG, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("unsigned char rpcg[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") + prompt("Postfix Calc G") + } + field(RPCH, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Postfix Calc H") + extra("unsigned char rpch[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") + } + field(RPCI, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("unsigned char rpci[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") + prompt("Postfix Calc I") + } + field(RPCJ, DBF_NOACCESS) { + extra("unsigned char rpcj[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") + prompt("Postfix Calc J") + interest(4) + special(SPC_NOMOD) + } + field(RPCK, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Postfix Calc K") + extra("unsigned char rpck[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") + } + field(RPCL, DBF_NOACCESS) { + extra("unsigned char rpcl[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") + prompt("Postfix Calc L") + special(SPC_NOMOD) + interest(4) + } + field(RPCM, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("unsigned char rpcm[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") + prompt("Postfix Calc M") + } + field(RPCN, DBF_NOACCESS) { + prompt("Postfix Calc N") + extra("unsigned char rpcn[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") + interest(4) + special(SPC_NOMOD) + } + field(RPCO, DBF_NOACCESS) { + extra("unsigned char rpco[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") + prompt("Postfix Calc O") + interest(4) + special(SPC_NOMOD) + } + field(RPCP, DBF_NOACCESS) { + extra("unsigned char rpcp[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") + prompt("Postfix Calc P") + special(SPC_NOMOD) + interest(4) + } + field(CMTA, DBF_STRING) { + promptgroup("10 - Common") + prompt("Comment A") + size(39) + } + field(CMTB, DBF_STRING) { + promptgroup("10 - Common") + size(39) + prompt("Comment B") + } + field(CMTC, DBF_STRING) { + prompt("Comment C") + size(39) + promptgroup("10 - Common") + } + field(CMTD, DBF_STRING) { + prompt("Comment D") + size(39) + promptgroup("10 - Common") + } + field(CMTE, DBF_STRING) { + prompt("Comment E") + size(39) + promptgroup("10 - Common") + } + field(CMTF, DBF_STRING) { + prompt("Comment F") + size(39) + promptgroup("10 - Common") + } + field(CMTG, DBF_STRING) { + promptgroup("10 - Common") + size(39) + prompt("Comment G") + } + field(CMTH, DBF_STRING) { + promptgroup("10 - Common") + prompt("Comment H") + size(39) + } + field(CMTI, DBF_STRING) { + size(39) + prompt("Comment I") + promptgroup("10 - Common") + } + field(CMTJ, DBF_STRING) { + promptgroup("10 - Common") + prompt("Comment J") + size(39) + } + field(CMTK, DBF_STRING) { + prompt("Comment K") + size(39) + promptgroup("10 - Common") + } + field(CMTL, DBF_STRING) { + size(39) + prompt("Comment L") + promptgroup("10 - Common") + } + field(CMTM, DBF_STRING) { + promptgroup("10 - Common") + prompt("Comment M") + size(39) + } + field(CMTN, DBF_STRING) { + prompt("Comment N") + size(39) + promptgroup("10 - Common") + } + field(CMTO, DBF_STRING) { + size(39) + prompt("Comment O") + promptgroup("10 - Common") + } + field(CMTP, DBF_STRING) { + prompt("Comment P") + size(39) + promptgroup("10 - Common") + } + field(MAP, DBF_SHORT) { + prompt("Input bitmap") + interest(3) + promptgroup("10 - Common") + } + field(IAV, DBF_MENU) { + interest(1) + menu(transformIAV) + special(SPC_NOMOD) + initial("1") + prompt("Input link valid") + } + field(IBV, DBF_MENU) { + prompt("Input link valid") + initial("1") + special(SPC_NOMOD) + interest(1) + menu(transformIAV) + } + field(ICV, DBF_MENU) { + prompt("Input link valid") + initial("1") + special(SPC_NOMOD) + menu(transformIAV) + interest(1) + } + field(IDV, DBF_MENU) { + prompt("Input link valid") + initial("1") + special(SPC_NOMOD) + interest(1) + menu(transformIAV) + } + field(IEV, DBF_MENU) { + special(SPC_NOMOD) + interest(1) + menu(transformIAV) + initial("1") + prompt("Input link valid") + } + field(IFV, DBF_MENU) { + prompt("Input link valid") + initial("1") + special(SPC_NOMOD) + interest(1) + menu(transformIAV) + } + field(IGV, DBF_MENU) { + initial("1") + prompt("Input link valid") + special(SPC_NOMOD) + interest(1) + menu(transformIAV) + } + field(IHV, DBF_MENU) { + initial("1") + prompt("Input link valid") + interest(1) + menu(transformIAV) + special(SPC_NOMOD) + } + field(IIV, DBF_MENU) { + interest(1) + menu(transformIAV) + special(SPC_NOMOD) + initial("1") + prompt("Input link valid") + } + field(IJV, DBF_MENU) { + interest(1) + menu(transformIAV) + special(SPC_NOMOD) + initial("1") + prompt("Input link valid") + } + field(IKV, DBF_MENU) { + menu(transformIAV) + interest(1) + special(SPC_NOMOD) + initial("1") + prompt("Input link valid") + } + field(ILV, DBF_MENU) { + menu(transformIAV) + interest(1) + special(SPC_NOMOD) + prompt("Input link valid") + initial("1") + } + field(IMV, DBF_MENU) { + special(SPC_NOMOD) + interest(1) + menu(transformIAV) + prompt("Input link valid") + initial("1") + } + field(INV, DBF_MENU) { + special(SPC_NOMOD) + interest(1) + menu(transformIAV) + initial("1") + prompt("Input link valid") + } + field(IOV, DBF_MENU) { + prompt("Input link valid") + initial("1") + special(SPC_NOMOD) + menu(transformIAV) + interest(1) + } + field(IPV, DBF_MENU) { + menu(transformIAV) + interest(1) + special(SPC_NOMOD) + initial("1") + prompt("Input link valid") + } + field(OAV, DBF_MENU) { + prompt("Output link valid") + initial("1") + menu(transformIAV) + interest(1) + special(SPC_NOMOD) + } + field(OBV, DBF_MENU) { + interest(1) + menu(transformIAV) + special(SPC_NOMOD) + initial("1") + prompt("Output link valid") + } + field(OCV, DBF_MENU) { + initial("1") + prompt("Output link valid") + menu(transformIAV) + interest(1) + special(SPC_NOMOD) + } + field(ODV, DBF_MENU) { + interest(1) + menu(transformIAV) + special(SPC_NOMOD) + initial("1") + prompt("Output link valid") + } + field(OEV, DBF_MENU) { + menu(transformIAV) + interest(1) + special(SPC_NOMOD) + prompt("Output link valid") + initial("1") + } + field(OFV, DBF_MENU) { + special(SPC_NOMOD) + menu(transformIAV) + interest(1) + initial("1") + prompt("Output link valid") + } + field(OGV, DBF_MENU) { + initial("1") + prompt("Output link valid") + interest(1) + menu(transformIAV) + special(SPC_NOMOD) + } + field(OHV, DBF_MENU) { + prompt("Output link valid") + initial("1") + interest(1) + menu(transformIAV) + special(SPC_NOMOD) + } + field(OIV, DBF_MENU) { + initial("1") + prompt("Output link valid") + special(SPC_NOMOD) + menu(transformIAV) + interest(1) + } + field(OJV, DBF_MENU) { + initial("1") + prompt("Output link valid") + interest(1) + menu(transformIAV) + special(SPC_NOMOD) + } + field(OKV, DBF_MENU) { + initial("1") + prompt("Output link valid") + interest(1) + menu(transformIAV) + special(SPC_NOMOD) + } + field(OLV, DBF_MENU) { + prompt("Output link valid") + initial("1") + interest(1) + menu(transformIAV) + special(SPC_NOMOD) + } + field(OMV, DBF_MENU) { + special(SPC_NOMOD) + menu(transformIAV) + interest(1) + initial("1") + prompt("Output link valid") + } + field(ONV, DBF_MENU) { + special(SPC_NOMOD) + menu(transformIAV) + interest(1) + initial("1") + prompt("Output link valid") + } + field(OOV, DBF_MENU) { + initial("1") + prompt("Output link valid") + special(SPC_NOMOD) + interest(1) + menu(transformIAV) + } + field(OPV, DBF_MENU) { + special(SPC_NOMOD) + interest(1) + menu(transformIAV) + initial("1") + prompt("Output link valid") + } +} +recordtype(fanout) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + field(NAME, DBF_STRING) { + size(61) + prompt("Record Name") + special(SPC_NOMOD) + } + field(DESC, DBF_STRING) { + size(41) + prompt("Descriptor") + promptgroup("10 - Common") + } + field(ASG, DBF_STRING) { + special(SPC_AS) + promptgroup("10 - Common") + size(29) + prompt("Access Security Group") + } + field(SCAN, DBF_MENU) { + prompt("Scan Mechanism") + interest(1) + menu(menuScan) + special(SPC_SCAN) + promptgroup("20 - Scan") + } + field(PINI, DBF_MENU) { + prompt("Process at iocInit") + promptgroup("20 - Scan") + interest(1) + menu(menuPini) + } + field(PHAS, DBF_SHORT) { + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + prompt("Scan Phase") + } + field(EVNT, DBF_STRING) { + promptgroup("20 - Scan") + interest(1) + special(SPC_SCAN) + prompt("Event Name") + size(40) + } + field(TSE, DBF_SHORT) { + prompt("Time Stamp Event") + interest(1) + promptgroup("20 - Scan") + } + field(TSEL, DBF_INLINK) { + prompt("Time Stamp Link") + interest(1) + promptgroup("20 - Scan") + } + field(DTYP, DBF_DEVICE) { + promptgroup("10 - Common") + interest(1) + prompt("Device Type") + } + field(DISV, DBF_SHORT) { + initial("1") + prompt("Disable Value") + promptgroup("20 - Scan") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + prompt("Scanning Disable") + promptgroup("20 - Scan") + interest(1) + } + field(MLOK, DBF_NOACCESS) { + extra("epicsMutexId mlok") + prompt("Monitor lock") + interest(4) + special(SPC_NOMOD) + } + field(MLIS, DBF_NOACCESS) { + prompt("Monitor List") + extra("ELLLIST mlis") + special(SPC_NOMOD) + interest(4) + } + field(BKLNK, DBF_NOACCESS) { + prompt("Backwards link tracking") + extra("ELLLIST bklnk") + interest(4) + special(SPC_NOMOD) + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + prompt("Force Processing") + pp(TRUE) + interest(3) + } + field(STAT, DBF_MENU) { + initial("UDF") + prompt("Alarm Status") + menu(menuAlarmStat) + special(SPC_NOMOD) + } + field(SEVR, DBF_MENU) { + special(SPC_NOMOD) + menu(menuAlarmSevr) + prompt("Alarm Severity") + } + field(NSTA, DBF_MENU) { + prompt("New Alarm Status") + interest(2) + menu(menuAlarmStat) + special(SPC_NOMOD) + } + field(NSEV, DBF_MENU) { + menu(menuAlarmSevr) + interest(2) + special(SPC_NOMOD) + prompt("New Alarm Severity") + } + field(ACKS, DBF_MENU) { + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) + prompt("Alarm Ack Severity") + } + field(ACKT, DBF_MENU) { + special(SPC_NOMOD) + interest(2) + menu(menuYesNo) + promptgroup("70 - Alarm") + initial("YES") + prompt("Alarm Ack Transient") + } + field(DISS, DBF_MENU) { + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + prompt("Disable Alarm Sevrty") + } + field(LCNT, DBF_UCHAR) { + prompt("Lock Count") + interest(2) + special(SPC_NOMOD) + } + field(PACT, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("Record active") + } + field(PUTF, DBF_UCHAR) { + special(SPC_NOMOD) + interest(1) + prompt("dbPutField process") + } + field(RPRO, DBF_UCHAR) { + prompt("Reprocess ") + special(SPC_NOMOD) + interest(1) + } + field(ASP, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct asgMember *asp") + prompt("Access Security Pvt") + } + field(PPN, DBF_NOACCESS) { + prompt("pprocessNotify") + extra("struct processNotify *ppn") + special(SPC_NOMOD) + interest(4) + } + field(PPNR, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct processNotifyRecord *ppnr") + prompt("pprocessNotifyRecord") + } + field(SPVT, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Scan Private") + extra("struct scan_element *spvt") + } + field(RSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Address of RSET") + extra("struct typed_rset *rset") + } + field(DSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct dset *dset") + prompt("DSET address") + } + field(DPVT, DBF_NOACCESS) { + prompt("Device Private") + extra("void *dpvt") + special(SPC_NOMOD) + interest(4) + } + field(RDES, DBF_NOACCESS) { + prompt("Address of dbRecordType") + extra("struct dbRecordType *rdes") + special(SPC_NOMOD) + interest(4) + } + field(LSET, DBF_NOACCESS) { + prompt("Lock Set") + extra("struct lockRecord *lset") + special(SPC_NOMOD) + interest(4) + } + field(PRIO, DBF_MENU) { + prompt("Scheduling Priority") + menu(menuPriority) + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(1) + prompt("Break Point") + extra("char bkpt") + } + field(UDF, DBF_UCHAR) { + interest(1) + pp(TRUE) + promptgroup("10 - Common") + initial("1") + prompt("Undefined") + } + field(UDFS, DBF_MENU) { + initial("INVALID") + prompt("Undefined Alarm Sevrty") + interest(1) + menu(menuAlarmSevr) + promptgroup("70 - Alarm") + } + field(TIME, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(2) + prompt("Time") + extra("epicsTimeStamp time") + } + field(FLNK, DBF_FWDLINK) { + prompt("Forward Process Link") + promptgroup("20 - Scan") + interest(1) } field(VAL, DBF_LONG) { - pp(TRUE) asl(ASL0) prompt("Used to trigger") + pp(TRUE) } field(SELM, DBF_MENU) { - menu(sseqSELM) + promptgroup("30 - Action") + menu(fanoutSELM) + interest(1) prompt("Select Mechanism") - promptgroup("40 - Input") - interest(1) } field(SELN, DBF_USHORT) { initial("1") @@ -1149,20 +15471,1602 @@ interest(1) } field(SELL, DBF_INLINK) { - interest(1) - promptgroup("40 - Input") prompt("Link Selection Loc") + interest(1) + promptgroup("30 - Action") + } + field(OFFS, DBF_SHORT) { + promptgroup("30 - Action") + interest(1) + prompt("Offset for Specified") + initial("0") + } + field(SHFT, DBF_SHORT) { + prompt("Shift for Mask mode") + initial("-1") + promptgroup("30 - Action") + interest(1) + } + field(LNK0, DBF_FWDLINK) { + prompt("Forward Link 0") + interest(1) + promptgroup("51 - Output 0-7") + } + field(LNK1, DBF_FWDLINK) { + prompt("Forward Link 1") + interest(1) + promptgroup("51 - Output 0-7") + } + field(LNK2, DBF_FWDLINK) { + prompt("Forward Link 2") + promptgroup("51 - Output 0-7") + interest(1) + } + field(LNK3, DBF_FWDLINK) { + prompt("Forward Link 3") + interest(1) + promptgroup("51 - Output 0-7") + } + field(LNK4, DBF_FWDLINK) { + prompt("Forward Link 4") + promptgroup("51 - Output 0-7") + interest(1) + } + field(LNK5, DBF_FWDLINK) { + promptgroup("51 - Output 0-7") + interest(1) + prompt("Forward Link 5") + } + field(LNK6, DBF_FWDLINK) { + promptgroup("51 - Output 0-7") + interest(1) + prompt("Forward Link 6") + } + field(LNK7, DBF_FWDLINK) { + prompt("Forward Link 7") + promptgroup("51 - Output 0-7") + interest(1) + } + field(LNK8, DBF_FWDLINK) { + interest(1) + promptgroup("52 - Output 8-F") + prompt("Forward Link 8") + } + field(LNK9, DBF_FWDLINK) { + promptgroup("52 - Output 8-F") + interest(1) + prompt("Forward Link 9") + } + field(LNKA, DBF_FWDLINK) { + interest(1) + promptgroup("52 - Output 8-F") + prompt("Forward Link 10") + } + field(LNKB, DBF_FWDLINK) { + prompt("Forward Link 11") + promptgroup("52 - Output 8-F") + interest(1) + } + field(LNKC, DBF_FWDLINK) { + prompt("Forward Link 12") + promptgroup("52 - Output 8-F") + interest(1) + } + field(LNKD, DBF_FWDLINK) { + promptgroup("52 - Output 8-F") + interest(1) + prompt("Forward Link 13") + } + field(LNKE, DBF_FWDLINK) { + interest(1) + promptgroup("52 - Output 8-F") + prompt("Forward Link 14") + } + field(LNKF, DBF_FWDLINK) { + prompt("Forward Link 15") + promptgroup("52 - Output 8-F") + interest(1) + } +} +recordtype(longin) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + %#include "callback.h" + field(NAME, DBF_STRING) { + special(SPC_NOMOD) + size(61) + prompt("Record Name") + } + field(DESC, DBF_STRING) { + prompt("Descriptor") + size(41) + promptgroup("10 - Common") + } + field(ASG, DBF_STRING) { + size(29) + prompt("Access Security Group") + special(SPC_AS) + promptgroup("10 - Common") + } + field(SCAN, DBF_MENU) { + special(SPC_SCAN) + interest(1) + menu(menuScan) + promptgroup("20 - Scan") + prompt("Scan Mechanism") + } + field(PINI, DBF_MENU) { + interest(1) + menu(menuPini) + promptgroup("20 - Scan") + prompt("Process at iocInit") + } + field(PHAS, DBF_SHORT) { + prompt("Scan Phase") + special(SPC_SCAN) + interest(1) + promptgroup("20 - Scan") + } + field(EVNT, DBF_STRING) { + prompt("Event Name") + size(40) + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + } + field(TSE, DBF_SHORT) { + interest(1) + promptgroup("20 - Scan") + prompt("Time Stamp Event") + } + field(TSEL, DBF_INLINK) { + prompt("Time Stamp Link") + promptgroup("20 - Scan") + interest(1) + } + field(DTYP, DBF_DEVICE) { + prompt("Device Type") + promptgroup("10 - Common") + interest(1) + } + field(DISV, DBF_SHORT) { + initial("1") + prompt("Disable Value") + promptgroup("20 - Scan") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + prompt("Scanning Disable") + promptgroup("20 - Scan") + interest(1) + } + field(MLOK, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Monitor lock") + extra("epicsMutexId mlok") + } + field(MLIS, DBF_NOACCESS) { + extra("ELLLIST mlis") + prompt("Monitor List") + special(SPC_NOMOD) + interest(4) + } + field(BKLNK, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("ELLLIST bklnk") + prompt("Backwards link tracking") + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + interest(3) + pp(TRUE) + prompt("Force Processing") + } + field(STAT, DBF_MENU) { + prompt("Alarm Status") + initial("UDF") + menu(menuAlarmStat) + special(SPC_NOMOD) + } + field(SEVR, DBF_MENU) { + prompt("Alarm Severity") + special(SPC_NOMOD) + menu(menuAlarmSevr) + } + field(NSTA, DBF_MENU) { + prompt("New Alarm Status") + menu(menuAlarmStat) + interest(2) + special(SPC_NOMOD) + } + field(NSEV, DBF_MENU) { + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) + prompt("New Alarm Severity") + } + field(ACKS, DBF_MENU) { + interest(2) + menu(menuAlarmSevr) + special(SPC_NOMOD) + prompt("Alarm Ack Severity") + } + field(ACKT, DBF_MENU) { + interest(2) + menu(menuYesNo) + special(SPC_NOMOD) + promptgroup("70 - Alarm") + initial("YES") + prompt("Alarm Ack Transient") + } + field(DISS, DBF_MENU) { + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + prompt("Disable Alarm Sevrty") + } + field(LCNT, DBF_UCHAR) { + interest(2) + special(SPC_NOMOD) + prompt("Lock Count") + } + field(PACT, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("Record active") + } + field(PUTF, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("dbPutField process") + } + field(RPRO, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("Reprocess ") + } + field(ASP, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct asgMember *asp") + prompt("Access Security Pvt") + } + field(PPN, DBF_NOACCESS) { + extra("struct processNotify *ppn") + prompt("pprocessNotify") + special(SPC_NOMOD) + interest(4) + } + field(PPNR, DBF_NOACCESS) { + prompt("pprocessNotifyRecord") + extra("struct processNotifyRecord *ppnr") + special(SPC_NOMOD) + interest(4) + } + field(SPVT, DBF_NOACCESS) { + extra("struct scan_element *spvt") + prompt("Scan Private") + special(SPC_NOMOD) + interest(4) + } + field(RSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct typed_rset *rset") + prompt("Address of RSET") + } + field(DSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct dset *dset") + prompt("DSET address") + } + field(DPVT, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("void *dpvt") + prompt("Device Private") + } + field(RDES, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct dbRecordType *rdes") + prompt("Address of dbRecordType") + } + field(LSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Lock Set") + extra("struct lockRecord *lset") + } + field(PRIO, DBF_MENU) { + interest(1) + menu(menuPriority) + special(SPC_SCAN) + promptgroup("20 - Scan") + prompt("Scheduling Priority") + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + interest(1) + special(SPC_NOMOD) + prompt("Break Point") + extra("char bkpt") + } + field(UDF, DBF_UCHAR) { + initial("1") + prompt("Undefined") + interest(1) + promptgroup("10 - Common") + pp(TRUE) + } + field(UDFS, DBF_MENU) { + prompt("Undefined Alarm Sevrty") + initial("INVALID") + promptgroup("70 - Alarm") + interest(1) + menu(menuAlarmSevr) + } + field(TIME, DBF_NOACCESS) { + extra("epicsTimeStamp time") + prompt("Time") + special(SPC_NOMOD) + interest(2) + } + field(FLNK, DBF_FWDLINK) { + interest(1) + promptgroup("20 - Scan") + prompt("Forward Process Link") + } + field(VAL, DBF_LONG) { + pp(TRUE) + promptgroup("40 - Input") + prompt("Current value") + asl(ASL0) + } + field(INP, DBF_INLINK) { + prompt("Input Specification") + interest(1) + promptgroup("40 - Input") + } + field(EGU, DBF_STRING) { + interest(1) + prop(YES) + promptgroup("80 - Display") + size(16) + prompt("Engineering Units") + } + field(HOPR, DBF_LONG) { + interest(1) + prop(YES) + promptgroup("80 - Display") + prompt("High Operating Range") + } + field(LOPR, DBF_LONG) { + interest(1) + prop(YES) + promptgroup("80 - Display") + prompt("Low Operating Range") + } + field(HIHI, DBF_LONG) { + promptgroup("70 - Alarm") + pp(TRUE) + prop(YES) + interest(1) + prompt("Hihi Alarm Limit") + } + field(LOLO, DBF_LONG) { + pp(TRUE) + promptgroup("70 - Alarm") + prop(YES) + interest(1) + prompt("Lolo Alarm Limit") + } + field(HIGH, DBF_LONG) { + prompt("High Alarm Limit") + promptgroup("70 - Alarm") + pp(TRUE) + interest(1) + prop(YES) + } + field(LOW, DBF_LONG) { + pp(TRUE) + promptgroup("70 - Alarm") + prop(YES) + interest(1) + prompt("Low Alarm Limit") + } + field(HHSV, DBF_MENU) { + promptgroup("70 - Alarm") + pp(TRUE) + menu(menuAlarmSevr) + interest(1) + prompt("Hihi Severity") + } + field(LLSV, DBF_MENU) { + prompt("Lolo Severity") + promptgroup("70 - Alarm") + pp(TRUE) + interest(1) + menu(menuAlarmSevr) + } + field(HSV, DBF_MENU) { + prompt("High Severity") + interest(1) + menu(menuAlarmSevr) + pp(TRUE) + promptgroup("70 - Alarm") + } + field(LSV, DBF_MENU) { + pp(TRUE) + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + prompt("Low Severity") + } + field(HYST, DBF_LONG) { + interest(1) + promptgroup("70 - Alarm") + prompt("Alarm Deadband") + } + field(AFTC, DBF_DOUBLE) { + prompt("Alarm Filter Time Constant") + interest(1) + promptgroup("70 - Alarm") + } + field(AFVL, DBF_DOUBLE) { + prompt("Alarm Filter Value") + interest(3) + special(SPC_NOMOD) + } + field(ADEL, DBF_LONG) { + interest(1) + promptgroup("80 - Display") + prompt("Archive Deadband") + } + field(MDEL, DBF_LONG) { + prompt("Monitor Deadband") + promptgroup("80 - Display") + interest(1) + } + field(LALM, DBF_LONG) { + special(SPC_NOMOD) + interest(3) + prompt("Last Value Alarmed") + } + field(ALST, DBF_LONG) { + prompt("Last Value Archived") + interest(3) + special(SPC_NOMOD) + } + field(MLST, DBF_LONG) { + prompt("Last Val Monitored") + interest(3) + special(SPC_NOMOD) + } + field(SIOL, DBF_INLINK) { + prompt("Simulation Input Link") + promptgroup("90 - Simulate") + interest(1) + } + field(SVAL, DBF_LONG) { + prompt("Simulation Value") + } + field(SIML, DBF_INLINK) { + promptgroup("90 - Simulate") + interest(1) + prompt("Simulation Mode Link") + } + field(SIMM, DBF_MENU) { + special(SPC_MOD) + interest(1) + menu(menuYesNo) + prompt("Simulation Mode") + } + field(SIMS, DBF_MENU) { + promptgroup("90 - Simulate") + menu(menuAlarmSevr) + interest(2) + prompt("Simulation Mode Severity") + } + field(OLDSIMM, DBF_MENU) { + prompt("Prev. Simulation Mode") + menu(menuSimm) + interest(4) + special(SPC_NOMOD) + } + field(SSCN, DBF_MENU) { + promptgroup("90 - Simulate") + interest(1) + menu(menuScan) + prompt("Sim. Mode Scan") + initial("65535") + } + field(SDLY, DBF_DOUBLE) { + initial("-1.0") + prompt("Sim. Mode Async Delay") + interest(2) + promptgroup("90 - Simulate") + } + field(SIMPVT, DBF_NOACCESS) { + extra("CALLBACK *simpvt") + prompt("Sim. Mode Private") + interest(4) + special(SPC_NOMOD) + } +} +device(longin, CONSTANT, devLiSoft, "Soft Channel") +device(longin, CONSTANT, devLiSoftCallback, "Async Soft Channel") +device(longin, INST_IO, devLiGeneralTime, "General Time") +device(longin, INST_IO, asynLiInt32, "asynInt32") +device(longin, INST_IO, asynLiUInt32Digital, "asynUInt32Digital") +device(longin, INST_IO, devlonginStream, "stream") +device(longin, INST_IO, devLiStrParm, "asyn li stringParm") +recordtype(mbbi) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + %#include "callback.h" + field(NAME, DBF_STRING) { + special(SPC_NOMOD) + prompt("Record Name") + size(61) + } + field(DESC, DBF_STRING) { + promptgroup("10 - Common") + size(41) + prompt("Descriptor") + } + field(ASG, DBF_STRING) { + special(SPC_AS) + promptgroup("10 - Common") + size(29) + prompt("Access Security Group") + } + field(SCAN, DBF_MENU) { + prompt("Scan Mechanism") + special(SPC_SCAN) + interest(1) + menu(menuScan) + promptgroup("20 - Scan") + } + field(PINI, DBF_MENU) { + prompt("Process at iocInit") + menu(menuPini) + interest(1) + promptgroup("20 - Scan") + } + field(PHAS, DBF_SHORT) { + prompt("Scan Phase") + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + } + field(EVNT, DBF_STRING) { + promptgroup("20 - Scan") + interest(1) + special(SPC_SCAN) + prompt("Event Name") + size(40) + } + field(TSE, DBF_SHORT) { + promptgroup("20 - Scan") + interest(1) + prompt("Time Stamp Event") + } + field(TSEL, DBF_INLINK) { + promptgroup("20 - Scan") + interest(1) + prompt("Time Stamp Link") + } + field(DTYP, DBF_DEVICE) { + interest(1) + promptgroup("10 - Common") + prompt("Device Type") + } + field(DISV, DBF_SHORT) { + initial("1") + prompt("Disable Value") + promptgroup("20 - Scan") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + promptgroup("20 - Scan") + interest(1) + prompt("Scanning Disable") + } + field(MLOK, DBF_NOACCESS) { + extra("epicsMutexId mlok") + prompt("Monitor lock") + interest(4) + special(SPC_NOMOD) + } + field(MLIS, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Monitor List") + extra("ELLLIST mlis") + } + field(BKLNK, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Backwards link tracking") + extra("ELLLIST bklnk") + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + interest(3) + pp(TRUE) + prompt("Force Processing") + } + field(STAT, DBF_MENU) { + menu(menuAlarmStat) + special(SPC_NOMOD) + prompt("Alarm Status") + initial("UDF") + } + field(SEVR, DBF_MENU) { + menu(menuAlarmSevr) + special(SPC_NOMOD) + prompt("Alarm Severity") + } + field(NSTA, DBF_MENU) { + prompt("New Alarm Status") + special(SPC_NOMOD) + menu(menuAlarmStat) + interest(2) + } + field(NSEV, DBF_MENU) { + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) + prompt("New Alarm Severity") + } + field(ACKS, DBF_MENU) { + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) + prompt("Alarm Ack Severity") + } + field(ACKT, DBF_MENU) { + initial("YES") + prompt("Alarm Ack Transient") + special(SPC_NOMOD) + interest(2) + menu(menuYesNo) + promptgroup("70 - Alarm") + } + field(DISS, DBF_MENU) { + interest(1) + menu(menuAlarmSevr) + promptgroup("70 - Alarm") + prompt("Disable Alarm Sevrty") + } + field(LCNT, DBF_UCHAR) { + prompt("Lock Count") + special(SPC_NOMOD) + interest(2) + } + field(PACT, DBF_UCHAR) { + prompt("Record active") + special(SPC_NOMOD) + interest(1) + } + field(PUTF, DBF_UCHAR) { + prompt("dbPutField process") + interest(1) + special(SPC_NOMOD) + } + field(RPRO, DBF_UCHAR) { + prompt("Reprocess ") + special(SPC_NOMOD) + interest(1) + } + field(ASP, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct asgMember *asp") + prompt("Access Security Pvt") + } + field(PPN, DBF_NOACCESS) { + prompt("pprocessNotify") + extra("struct processNotify *ppn") + special(SPC_NOMOD) + interest(4) + } + field(PPNR, DBF_NOACCESS) { + extra("struct processNotifyRecord *ppnr") + prompt("pprocessNotifyRecord") + special(SPC_NOMOD) + interest(4) + } + field(SPVT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Scan Private") + extra("struct scan_element *spvt") + } + field(RSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Address of RSET") + extra("struct typed_rset *rset") + } + field(DSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("DSET address") + extra("struct dset *dset") + } + field(DPVT, DBF_NOACCESS) { + prompt("Device Private") + extra("void *dpvt") + interest(4) + special(SPC_NOMOD) + } + field(RDES, DBF_NOACCESS) { + extra("struct dbRecordType *rdes") + prompt("Address of dbRecordType") + special(SPC_NOMOD) + interest(4) + } + field(LSET, DBF_NOACCESS) { + extra("struct lockRecord *lset") + prompt("Lock Set") + interest(4) + special(SPC_NOMOD) + } + field(PRIO, DBF_MENU) { + special(SPC_SCAN) + interest(1) + menu(menuPriority) + promptgroup("20 - Scan") + prompt("Scheduling Priority") + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + interest(1) + special(SPC_NOMOD) + prompt("Break Point") + extra("char bkpt") + } + field(UDF, DBF_UCHAR) { + interest(1) + promptgroup("10 - Common") + pp(TRUE) + initial("1") + prompt("Undefined") + } + field(UDFS, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + initial("INVALID") + prompt("Undefined Alarm Sevrty") + } + field(TIME, DBF_NOACCESS) { + extra("epicsTimeStamp time") + prompt("Time") + special(SPC_NOMOD) + interest(2) + } + field(FLNK, DBF_FWDLINK) { + prompt("Forward Process Link") + promptgroup("20 - Scan") + interest(1) + } + field(VAL, DBF_ENUM) { + prompt("Current Value") + asl(ASL0) + pp(TRUE) + promptgroup("40 - Input") + } + field(NOBT, DBF_USHORT) { + prompt("Number of Bits") + special(SPC_NOMOD) + interest(1) + promptgroup("40 - Input") + } + field(INP, DBF_INLINK) { + interest(1) + promptgroup("40 - Input") + prompt("Input Specification") + } + field(ZRVL, DBF_ULONG) { + base(HEX) + prompt("Zero Value") + promptgroup("41 - Input 0-7") + pp(TRUE) + interest(1) + special(SPC_MOD) + } + field(ONVL, DBF_ULONG) { + prompt("One Value") + base(HEX) + special(SPC_MOD) + interest(1) + pp(TRUE) + promptgroup("41 - Input 0-7") + } + field(TWVL, DBF_ULONG) { + base(HEX) + prompt("Two Value") + interest(1) + special(SPC_MOD) + pp(TRUE) + promptgroup("41 - Input 0-7") + } + field(THVL, DBF_ULONG) { + base(HEX) + prompt("Three Value") + pp(TRUE) + promptgroup("41 - Input 0-7") + interest(1) + special(SPC_MOD) + } + field(FRVL, DBF_ULONG) { + pp(TRUE) + promptgroup("41 - Input 0-7") + interest(1) + special(SPC_MOD) + base(HEX) + prompt("Four Value") + } + field(FVVL, DBF_ULONG) { + base(HEX) + prompt("Five Value") + interest(1) + special(SPC_MOD) + pp(TRUE) + promptgroup("41 - Input 0-7") + } + field(SXVL, DBF_ULONG) { + prompt("Six Value") + base(HEX) + promptgroup("41 - Input 0-7") + pp(TRUE) + special(SPC_MOD) + interest(1) + } + field(SVVL, DBF_ULONG) { + special(SPC_MOD) + interest(1) + promptgroup("41 - Input 0-7") + pp(TRUE) + prompt("Seven Value") + base(HEX) + } + field(EIVL, DBF_ULONG) { + pp(TRUE) + promptgroup("42 - Input 8-15") + interest(1) + special(SPC_MOD) + base(HEX) + prompt("Eight Value") + } + field(NIVL, DBF_ULONG) { + special(SPC_MOD) + interest(1) + promptgroup("42 - Input 8-15") + pp(TRUE) + prompt("Nine Value") + base(HEX) + } + field(TEVL, DBF_ULONG) { + prompt("Ten Value") + base(HEX) + promptgroup("42 - Input 8-15") + pp(TRUE) + special(SPC_MOD) + interest(1) + } + field(ELVL, DBF_ULONG) { + interest(1) + special(SPC_MOD) + promptgroup("42 - Input 8-15") + pp(TRUE) + base(HEX) + prompt("Eleven Value") + } + field(TVVL, DBF_ULONG) { + prompt("Twelve Value") + base(HEX) + promptgroup("42 - Input 8-15") + pp(TRUE) + special(SPC_MOD) + interest(1) + } + field(TTVL, DBF_ULONG) { + interest(1) + special(SPC_MOD) + pp(TRUE) + promptgroup("42 - Input 8-15") + base(HEX) + prompt("Thirteen Value") + } + field(FTVL, DBF_ULONG) { + base(HEX) + prompt("Fourteen Value") + promptgroup("42 - Input 8-15") + pp(TRUE) + interest(1) + special(SPC_MOD) + } + field(FFVL, DBF_ULONG) { + base(HEX) + prompt("Fifteen Value") + interest(1) + special(SPC_MOD) + promptgroup("42 - Input 8-15") + pp(TRUE) + } + field(ZRST, DBF_STRING) { + special(SPC_MOD) + interest(1) + pp(TRUE) + promptgroup("81 - Display 0-7") + size(26) + prompt("Zero String") + } + field(ONST, DBF_STRING) { + prompt("One String") + size(26) + promptgroup("81 - Display 0-7") + pp(TRUE) + special(SPC_MOD) + interest(1) + } + field(TWST, DBF_STRING) { + special(SPC_MOD) + interest(1) + promptgroup("81 - Display 0-7") + pp(TRUE) + size(26) + prompt("Two String") + } + field(THST, DBF_STRING) { + size(26) + prompt("Three String") + special(SPC_MOD) + interest(1) + pp(TRUE) + promptgroup("81 - Display 0-7") + } + field(FRST, DBF_STRING) { + prompt("Four String") + size(26) + promptgroup("81 - Display 0-7") + pp(TRUE) + interest(1) + special(SPC_MOD) + } + field(FVST, DBF_STRING) { + prompt("Five String") + size(26) + pp(TRUE) + promptgroup("81 - Display 0-7") + interest(1) + special(SPC_MOD) + } + field(SXST, DBF_STRING) { + special(SPC_MOD) + interest(1) + pp(TRUE) + promptgroup("81 - Display 0-7") + size(26) + prompt("Six String") + } + field(SVST, DBF_STRING) { + interest(1) + special(SPC_MOD) + promptgroup("81 - Display 0-7") + pp(TRUE) + size(26) + prompt("Seven String") + } + field(EIST, DBF_STRING) { + pp(TRUE) + promptgroup("82 - Display 8-15") + interest(1) + special(SPC_MOD) + prompt("Eight String") + size(26) + } + field(NIST, DBF_STRING) { + pp(TRUE) + promptgroup("82 - Display 8-15") + interest(1) + special(SPC_MOD) + prompt("Nine String") + size(26) + } + field(TEST, DBF_STRING) { + special(SPC_MOD) + interest(1) + pp(TRUE) + promptgroup("82 - Display 8-15") + size(26) + prompt("Ten String") + } + field(ELST, DBF_STRING) { + size(26) + prompt("Eleven String") + interest(1) + special(SPC_MOD) + promptgroup("82 - Display 8-15") + pp(TRUE) + } + field(TVST, DBF_STRING) { + promptgroup("82 - Display 8-15") + pp(TRUE) + special(SPC_MOD) + interest(1) + prompt("Twelve String") + size(26) + } + field(TTST, DBF_STRING) { + size(26) + prompt("Thirteen String") + special(SPC_MOD) + interest(1) + pp(TRUE) + promptgroup("82 - Display 8-15") + } + field(FTST, DBF_STRING) { + promptgroup("82 - Display 8-15") + pp(TRUE) + interest(1) + special(SPC_MOD) + prompt("Fourteen String") + size(26) + } + field(FFST, DBF_STRING) { + prompt("Fifteen String") + size(26) + pp(TRUE) + promptgroup("82 - Display 8-15") + special(SPC_MOD) + interest(1) + } + field(ZRSV, DBF_MENU) { + promptgroup("71 - Alarm 0-7") + pp(TRUE) + menu(menuAlarmSevr) + interest(1) + prompt("State Zero Severity") + } + field(ONSV, DBF_MENU) { + promptgroup("71 - Alarm 0-7") + pp(TRUE) + menu(menuAlarmSevr) + interest(1) + prompt("State One Severity") + } + field(TWSV, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + pp(TRUE) + promptgroup("71 - Alarm 0-7") + prompt("State Two Severity") + } + field(THSV, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + pp(TRUE) + promptgroup("71 - Alarm 0-7") + prompt("State Three Severity") + } + field(FRSV, DBF_MENU) { + promptgroup("71 - Alarm 0-7") + pp(TRUE) + interest(1) + menu(menuAlarmSevr) + prompt("State Four Severity") + } + field(FVSV, DBF_MENU) { + interest(1) + menu(menuAlarmSevr) + pp(TRUE) + promptgroup("71 - Alarm 0-7") + prompt("State Five Severity") + } + field(SXSV, DBF_MENU) { + prompt("State Six Severity") + pp(TRUE) + promptgroup("71 - Alarm 0-7") + interest(1) + menu(menuAlarmSevr) + } + field(SVSV, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + promptgroup("71 - Alarm 0-7") + pp(TRUE) + prompt("State Seven Severity") + } + field(EISV, DBF_MENU) { + pp(TRUE) + promptgroup("72 - Alarm 8-15") + menu(menuAlarmSevr) + interest(1) + prompt("State Eight Severity") + } + field(NISV, DBF_MENU) { + prompt("State Nine Severity") + menu(menuAlarmSevr) + interest(1) + promptgroup("72 - Alarm 8-15") + pp(TRUE) + } + field(TESV, DBF_MENU) { + interest(1) + menu(menuAlarmSevr) + pp(TRUE) + promptgroup("72 - Alarm 8-15") + prompt("State Ten Severity") + } + field(ELSV, DBF_MENU) { + pp(TRUE) + promptgroup("72 - Alarm 8-15") + interest(1) + menu(menuAlarmSevr) + prompt("State Eleven Severity") + } + field(TVSV, DBF_MENU) { + interest(1) + menu(menuAlarmSevr) + promptgroup("72 - Alarm 8-15") + pp(TRUE) + prompt("State Twelve Severity") + } + field(TTSV, DBF_MENU) { + prompt("State Thirteen Sevr") + promptgroup("72 - Alarm 8-15") + pp(TRUE) + menu(menuAlarmSevr) + interest(1) + } + field(FTSV, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + pp(TRUE) + promptgroup("72 - Alarm 8-15") + prompt("State Fourteen Sevr") + } + field(FFSV, DBF_MENU) { + prompt("State Fifteen Severity") + interest(1) + menu(menuAlarmSevr) + promptgroup("72 - Alarm 8-15") + pp(TRUE) + } + field(AFTC, DBF_DOUBLE) { + promptgroup("70 - Alarm") + interest(1) + prompt("Alarm Filter Time Constant") + } + field(AFVL, DBF_DOUBLE) { + prompt("Alarm Filter Value") + special(SPC_NOMOD) + interest(3) + } + field(UNSV, DBF_MENU) { + prompt("Unknown State Severity") + interest(1) + menu(menuAlarmSevr) + promptgroup("70 - Alarm") + pp(TRUE) + } + field(COSV, DBF_MENU) { + prompt("Change of State Svr") + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + pp(TRUE) + } + field(RVAL, DBF_ULONG) { + prompt("Raw Value") + pp(TRUE) + } + field(ORAW, DBF_ULONG) { + prompt("Prev Raw Value") + interest(3) + special(SPC_NOMOD) + } + field(MASK, DBF_ULONG) { + special(SPC_NOMOD) + interest(1) + prompt("Hardware Mask") + } + field(MLST, DBF_USHORT) { + prompt("Last Value Monitored") + interest(3) + special(SPC_NOMOD) + } + field(LALM, DBF_USHORT) { + prompt("Last Value Alarmed") + special(SPC_NOMOD) + interest(3) + } + field(SDEF, DBF_SHORT) { + interest(3) + special(SPC_NOMOD) + prompt("States Defined") + } + field(SHFT, DBF_USHORT) { + interest(1) + promptgroup("40 - Input") + prompt("Shift") + } + field(SIOL, DBF_INLINK) { + prompt("Simulation Input Link") + promptgroup("90 - Simulate") + interest(1) + } + field(SVAL, DBF_ULONG) { + prompt("Simulation Value") + } + field(SIML, DBF_INLINK) { + prompt("Simulation Mode Link") + interest(1) + promptgroup("90 - Simulate") + } + field(SIMM, DBF_MENU) { + prompt("Simulation Mode") + interest(1) + menu(menuSimm) + special(SPC_MOD) + } + field(SIMS, DBF_MENU) { + menu(menuAlarmSevr) + interest(2) + promptgroup("90 - Simulate") + prompt("Simulation Mode Severity") + } + field(OLDSIMM, DBF_MENU) { + menu(menuSimm) + interest(4) + special(SPC_NOMOD) + prompt("Prev. Simulation Mode") + } + field(SSCN, DBF_MENU) { + initial("65535") + prompt("Sim. Mode Scan") + interest(1) + menu(menuScan) + promptgroup("90 - Simulate") + } + field(SDLY, DBF_DOUBLE) { + prompt("Sim. Mode Async Delay") + initial("-1.0") + promptgroup("90 - Simulate") + interest(2) + } + field(SIMPVT, DBF_NOACCESS) { + extra("CALLBACK *simpvt") + prompt("Sim. Mode Private") + interest(4) + special(SPC_NOMOD) + } +} +device(mbbi, CONSTANT, devMbbiSoft, "Soft Channel") +device(mbbi, CONSTANT, devMbbiSoftRaw, "Raw Soft Channel") +device(mbbi, CONSTANT, devMbbiSoftCallback, "Async Soft Channel") +device(mbbi, INST_IO, asynMbbiInt32, "asynInt32") +device(mbbi, INST_IO, asynMbbiUInt32Digital, "asynUInt32Digital") +device(mbbi, INST_IO, devmbbiStream, "stream") +device(mbbi, INST_IO, devCasterMBBIState, "RecCaster") +device(mbbi, INST_IO, devMbbiTPG261, "asyn TPG261") +recordtype(sseq) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + field(NAME, DBF_STRING) { + special(SPC_NOMOD) + size(61) + prompt("Record Name") + } + field(DESC, DBF_STRING) { + promptgroup("10 - Common") + prompt("Descriptor") + size(41) + } + field(ASG, DBF_STRING) { + prompt("Access Security Group") + size(29) + promptgroup("10 - Common") + special(SPC_AS) + } + field(SCAN, DBF_MENU) { + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + menu(menuScan) + prompt("Scan Mechanism") + } + field(PINI, DBF_MENU) { + prompt("Process at iocInit") + menu(menuPini) + interest(1) + promptgroup("20 - Scan") + } + field(PHAS, DBF_SHORT) { + prompt("Scan Phase") + promptgroup("20 - Scan") + interest(1) + special(SPC_SCAN) + } + field(EVNT, DBF_STRING) { + size(40) + prompt("Event Name") + special(SPC_SCAN) + interest(1) + promptgroup("20 - Scan") + } + field(TSE, DBF_SHORT) { + interest(1) + promptgroup("20 - Scan") + prompt("Time Stamp Event") + } + field(TSEL, DBF_INLINK) { + prompt("Time Stamp Link") + interest(1) + promptgroup("20 - Scan") + } + field(DTYP, DBF_DEVICE) { + prompt("Device Type") + interest(1) + promptgroup("10 - Common") + } + field(DISV, DBF_SHORT) { + prompt("Disable Value") + initial("1") + promptgroup("20 - Scan") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + interest(1) + promptgroup("20 - Scan") + prompt("Scanning Disable") + } + field(MLOK, DBF_NOACCESS) { + prompt("Monitor lock") + extra("epicsMutexId mlok") + special(SPC_NOMOD) + interest(4) + } + field(MLIS, DBF_NOACCESS) { + prompt("Monitor List") + extra("ELLLIST mlis") + special(SPC_NOMOD) + interest(4) + } + field(BKLNK, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("ELLLIST bklnk") + prompt("Backwards link tracking") + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + interest(3) + pp(TRUE) + prompt("Force Processing") + } + field(STAT, DBF_MENU) { + menu(menuAlarmStat) + special(SPC_NOMOD) + prompt("Alarm Status") + initial("UDF") + } + field(SEVR, DBF_MENU) { + prompt("Alarm Severity") + menu(menuAlarmSevr) + special(SPC_NOMOD) + } + field(NSTA, DBF_MENU) { + prompt("New Alarm Status") + interest(2) + menu(menuAlarmStat) + special(SPC_NOMOD) + } + field(NSEV, DBF_MENU) { + prompt("New Alarm Severity") + menu(menuAlarmSevr) + interest(2) + special(SPC_NOMOD) + } + field(ACKS, DBF_MENU) { + special(SPC_NOMOD) + menu(menuAlarmSevr) + interest(2) + prompt("Alarm Ack Severity") + } + field(ACKT, DBF_MENU) { + prompt("Alarm Ack Transient") + initial("YES") + promptgroup("70 - Alarm") + interest(2) + menu(menuYesNo) + special(SPC_NOMOD) + } + field(DISS, DBF_MENU) { + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + prompt("Disable Alarm Sevrty") + } + field(LCNT, DBF_UCHAR) { + prompt("Lock Count") + interest(2) + special(SPC_NOMOD) + } + field(PACT, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("Record active") + } + field(PUTF, DBF_UCHAR) { + prompt("dbPutField process") + interest(1) + special(SPC_NOMOD) + } + field(RPRO, DBF_UCHAR) { + prompt("Reprocess ") + special(SPC_NOMOD) + interest(1) + } + field(ASP, DBF_NOACCESS) { + prompt("Access Security Pvt") + extra("struct asgMember *asp") + interest(4) + special(SPC_NOMOD) + } + field(PPN, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct processNotify *ppn") + prompt("pprocessNotify") + } + field(PPNR, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct processNotifyRecord *ppnr") + prompt("pprocessNotifyRecord") + } + field(SPVT, DBF_NOACCESS) { + prompt("Scan Private") + extra("struct scan_element *spvt") + special(SPC_NOMOD) + interest(4) + } + field(RSET, DBF_NOACCESS) { + prompt("Address of RSET") + extra("struct typed_rset *rset") + interest(4) + special(SPC_NOMOD) + } + field(DSET, DBF_NOACCESS) { + prompt("DSET address") + extra("struct dset *dset") + interest(4) + special(SPC_NOMOD) + } + field(DPVT, DBF_NOACCESS) { + prompt("Device Private") + extra("void *dpvt") + special(SPC_NOMOD) + interest(4) + } + field(RDES, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct dbRecordType *rdes") + prompt("Address of dbRecordType") + } + field(LSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Lock Set") + extra("struct lockRecord *lset") + } + field(PRIO, DBF_MENU) { + prompt("Scheduling Priority") + promptgroup("20 - Scan") + interest(1) + menu(menuPriority) + special(SPC_SCAN) + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + interest(1) + special(SPC_NOMOD) + extra("char bkpt") + prompt("Break Point") + } + field(UDF, DBF_UCHAR) { + promptgroup("10 - Common") + pp(TRUE) + interest(1) + prompt("Undefined") + initial("1") + } + field(UDFS, DBF_MENU) { + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + prompt("Undefined Alarm Sevrty") + initial("INVALID") + } + field(TIME, DBF_NOACCESS) { + prompt("Time") + extra("epicsTimeStamp time") + special(SPC_NOMOD) + interest(2) + } + field(FLNK, DBF_FWDLINK) { + prompt("Forward Process Link") + promptgroup("20 - Scan") + interest(1) + } + field(VAL, DBF_LONG) { + pp(TRUE) + prompt("Used to trigger") + asl(ASL0) + } + field(SELM, DBF_MENU) { + prompt("Select Mechanism") + menu(sseqSELM) + interest(1) + promptgroup("40 - Input") + } + field(SELN, DBF_USHORT) { + initial("1") + prompt("Link Selection") + interest(1) + } + field(SELL, DBF_INLINK) { + prompt("Link Selection Loc") + promptgroup("40 - Input") + interest(1) } field(PREC, DBF_SHORT) { - promptgroup("80 - Display") - interest(1) prompt("Display Precision") + promptgroup("80 - Display") + interest(1) } field(DLY1, DBF_DOUBLE) { + promptgroup("51 - Output (1)") + interest(1) + special(SPC_MOD) prompt("Delay 1") - special(SPC_MOD) - promptgroup("51 - Output (1)") - interest(1) } field(DOL1, DBF_INLINK) { prompt("Input link1") @@ -1177,17 +17081,17 @@ interest(1) } field(LNK1, DBF_OUTLINK) { - special(SPC_MOD) - interest(1) promptgroup("51 - Output (1)") + special(SPC_MOD) + interest(1) prompt("Output Link 1") } field(STR1, DBF_STRING) { - interest(4) - special(SPC_MOD) + prompt("String value 1") + size(40) promptgroup("51 - Output (1)") - prompt("String value 1") - size(40) + interest(4) + special(SPC_MOD) } field(DT1, DBF_SHORT) { special(SPC_NOMOD) @@ -1200,69 +17104,69 @@ interest(4) } field(WAIT1, DBF_MENU) { + prompt("Wait for completion?") + menu(sseqWAIT) + interest(1) special(SPC_MOD) promptgroup("51 - Output (1)") - interest(1) - prompt("Wait for completion?") - menu(sseqWAIT) } field(WERR1, DBF_SHORT) { interest(1) special(SPC_NOMOD) } field(WTG1, DBF_SHORT) { - interest(1) - special(SPC_NOMOD) + special(SPC_NOMOD) + interest(1) } field(IX1, DBF_SHORT) { + special(SPC_NOMOD) + interest(2) initial("0") - interest(2) - special(SPC_NOMOD) } field(DOL1V, DBF_MENU) { - menu(sseqLNKV) + initial("1") prompt("DOL LINK Status") - special(SPC_NOMOD) - interest(1) - initial("1") + interest(1) + menu(sseqLNKV) + special(SPC_NOMOD) } field(LNK1V, DBF_MENU) { + special(SPC_NOMOD) + interest(1) menu(sseqLNKV) - special(SPC_NOMOD) - interest(1) prompt("LNK LINK Status") initial("1") } field(DLY2, DBF_DOUBLE) { prompt("Delay 2") - special(SPC_MOD) promptgroup("51 - Output (1)") interest(1) + special(SPC_MOD) } field(DOL2, DBF_INLINK) { prompt("Input link 2") - promptgroup("51 - Output (1)") - special(SPC_MOD) - interest(1) - } - field(DO2, DBF_DOUBLE) { special(SPC_MOD) interest(1) promptgroup("51 - Output (1)") + } + field(DO2, DBF_DOUBLE) { prompt("Constant input 2") + special(SPC_MOD) + interest(1) + promptgroup("51 - Output (1)") } field(LNK2, DBF_OUTLINK) { promptgroup("51 - Output (1)") - special(SPC_MOD) - interest(1) + interest(1) + special(SPC_MOD) prompt("Output Link 2") } field(STR2, DBF_STRING) { - size(40) + promptgroup("51 - Output (1)") + interest(4) + special(SPC_MOD) prompt("String value 2") - interest(4) - special(SPC_MOD) - promptgroup("51 - Output (1)") + size(40) } field(DT2, DBF_SHORT) { special(SPC_NOMOD) @@ -1270,13 +17174,13 @@ prompt("DOL link type") } field(LT2, DBF_SHORT) { - special(SPC_NOMOD) - interest(4) + interest(4) + special(SPC_NOMOD) prompt("LNK link type") } field(WAIT2, DBF_MENU) { + prompt("Wait for completion?") menu(sseqWAIT) - prompt("Wait for completion?") interest(1) special(SPC_MOD) promptgroup("51 - Output (1)") @@ -1286,58 +17190,58 @@ interest(1) } field(WTG2, DBF_SHORT) { - special(SPC_NOMOD) - interest(1) + interest(1) + special(SPC_NOMOD) } field(IX2, DBF_SHORT) { - special(SPC_NOMOD) - interest(2) - initial("1") + initial("1") + special(SPC_NOMOD) + interest(2) } field(DOL2V, DBF_MENU) { - initial("1") - interest(1) - special(SPC_NOMOD) + special(SPC_NOMOD) + menu(sseqLNKV) + interest(1) + initial("1") prompt("DOL LINK Status") - menu(sseqLNKV) } field(LNK2V, DBF_MENU) { initial("1") + prompt("LNK LINK Status") + special(SPC_NOMOD) menu(sseqLNKV) - special(SPC_NOMOD) - interest(1) - prompt("LNK LINK Status") + interest(1) } field(DLY3, DBF_DOUBLE) { - special(SPC_MOD) promptgroup("51 - Output (1)") + special(SPC_MOD) interest(1) prompt("Delay 3") } field(DOL3, DBF_INLINK) { prompt("Input link 3") + interest(1) + special(SPC_MOD) promptgroup("51 - Output (1)") - special(SPC_MOD) - interest(1) } field(DO3, DBF_DOUBLE) { - special(SPC_MOD) - interest(1) + interest(1) + special(SPC_MOD) promptgroup("51 - Output (1)") prompt("Constant input 3") } field(LNK3, DBF_OUTLINK) { promptgroup("51 - Output (1)") - special(SPC_MOD) - interest(1) + interest(1) + special(SPC_MOD) prompt("Output Link 3") } field(STR3, DBF_STRING) { + prompt("String value 3") size(40) promptgroup("51 - Output (1)") special(SPC_MOD) interest(4) - prompt("String value 3") } field(DT3, DBF_SHORT) { special(SPC_NOMOD) @@ -1346,42 +17250,42 @@ } field(LT3, DBF_SHORT) { prompt("LNK link type") - special(SPC_NOMOD) - interest(4) + interest(4) + special(SPC_NOMOD) } field(WAIT3, DBF_MENU) { + prompt("Wait for completion?") menu(sseqWAIT) + interest(1) special(SPC_MOD) promptgroup("51 - Output (1)") - interest(1) - prompt("Wait for completion?") } field(WERR3, DBF_SHORT) { - interest(1) - special(SPC_NOMOD) + special(SPC_NOMOD) + interest(1) } field(WTG3, DBF_SHORT) { special(SPC_NOMOD) interest(1) } field(IX3, DBF_SHORT) { + interest(2) + special(SPC_NOMOD) initial("2") - special(SPC_NOMOD) - interest(2) } field(DOL3V, DBF_MENU) { + special(SPC_NOMOD) menu(sseqLNKV) + interest(1) prompt("DOL LINK Status") - special(SPC_NOMOD) - interest(1) initial("1") } field(LNK3V, DBF_MENU) { initial("1") + prompt("LNK LINK Status") menu(sseqLNKV) interest(1) special(SPC_NOMOD) - prompt("LNK LINK Status") } field(DLY4, DBF_DOUBLE) { interest(1) @@ -1390,26 +17294,26 @@ prompt("Delay 4") } field(DOL4, DBF_INLINK) { - interest(1) - special(SPC_MOD) promptgroup("52 - Output (2)") + interest(1) + special(SPC_MOD) prompt("Input link 4") } field(DO4, DBF_DOUBLE) { + promptgroup("51 - Output (1)") + interest(1) + special(SPC_MOD) prompt("Constant input 4") - special(SPC_MOD) - interest(1) - promptgroup("51 - Output (1)") } field(LNK4, DBF_OUTLINK) { prompt("Output Link 4") + interest(1) + special(SPC_MOD) promptgroup("52 - Output (2)") - special(SPC_MOD) - interest(1) } field(STR4, DBF_STRING) { - size(40) prompt("String value 4") + size(40) promptgroup("51 - Output (1)") special(SPC_MOD) interest(4) @@ -1420,16 +17324,16 @@ prompt("DOL link type") } field(LT4, DBF_SHORT) { + interest(4) + special(SPC_NOMOD) prompt("LNK link type") - special(SPC_NOMOD) - interest(4) } field(WAIT4, DBF_MENU) { + promptgroup("51 - Output (1)") + special(SPC_MOD) + menu(sseqWAIT) + interest(1) prompt("Wait for completion?") - special(SPC_MOD) - promptgroup("51 - Output (1)") - interest(1) - menu(sseqWAIT) } field(WERR4, DBF_SHORT) { special(SPC_NOMOD) @@ -1440,98 +17344,98 @@ special(SPC_NOMOD) } field(IX4, DBF_SHORT) { + special(SPC_NOMOD) + interest(2) initial("3") - special(SPC_NOMOD) - interest(2) } field(DOL4V, DBF_MENU) { - initial("1") + prompt("DOL LINK Status") + initial("1") + interest(1) menu(sseqLNKV) - interest(1) - special(SPC_NOMOD) - prompt("DOL LINK Status") + special(SPC_NOMOD) } field(LNK4V, DBF_MENU) { - initial("1") - interest(1) - special(SPC_NOMOD) prompt("LNK LINK Status") + initial("1") menu(sseqLNKV) + interest(1) + special(SPC_NOMOD) } field(DLY5, DBF_DOUBLE) { + prompt("Delay 5") promptgroup("52 - Output (2)") - special(SPC_MOD) - interest(1) - prompt("Delay 5") + interest(1) + special(SPC_MOD) } field(DOL5, DBF_INLINK) { - special(SPC_MOD) + prompt("Input link 5") + special(SPC_MOD) + interest(1) promptgroup("52 - Output (2)") - interest(1) - prompt("Input link 5") } field(DO5, DBF_DOUBLE) { + special(SPC_MOD) + interest(1) promptgroup("51 - Output (1)") - special(SPC_MOD) - interest(1) prompt("Constant input 5") } field(LNK5, DBF_OUTLINK) { - prompt("Output Link 5") special(SPC_MOD) interest(1) promptgroup("52 - Output (2)") + prompt("Output Link 5") } field(STR5, DBF_STRING) { + size(40) + prompt("String value 5") interest(4) special(SPC_MOD) promptgroup("51 - Output (1)") - prompt("String value 5") - size(40) } field(DT5, DBF_SHORT) { - special(SPC_NOMOD) - interest(4) prompt("DOL link type") + interest(4) + special(SPC_NOMOD) } field(LT5, DBF_SHORT) { - interest(4) - special(SPC_NOMOD) prompt("LNK link type") + interest(4) + special(SPC_NOMOD) } field(WAIT5, DBF_MENU) { prompt("Wait for completion?") + menu(sseqWAIT) interest(1) special(SPC_MOD) promptgroup("51 - Output (1)") - menu(sseqWAIT) } field(WERR5, DBF_SHORT) { - special(SPC_NOMOD) - interest(1) + interest(1) + special(SPC_NOMOD) } field(WTG5, DBF_SHORT) { interest(1) special(SPC_NOMOD) } field(IX5, DBF_SHORT) { - interest(2) - special(SPC_NOMOD) initial("4") + interest(2) + special(SPC_NOMOD) } field(DOL5V, DBF_MENU) { initial("1") + prompt("DOL LINK Status") + interest(1) menu(sseqLNKV) - prompt("DOL LINK Status") - interest(1) special(SPC_NOMOD) } field(LNK5V, DBF_MENU) { + interest(1) menu(sseqLNKV) + special(SPC_NOMOD) + initial("1") prompt("LNK LINK Status") - special(SPC_NOMOD) - interest(1) - initial("1") } field(DLY6, DBF_DOUBLE) { prompt("Delay 6") @@ -1540,46 +17444,46 @@ promptgroup("52 - Output (2)") } field(DOL6, DBF_INLINK) { - special(SPC_MOD) - interest(1) + interest(1) + special(SPC_MOD) promptgroup("52 - Output (2)") prompt("Input link 6") } field(DO6, DBF_DOUBLE) { - interest(1) - special(SPC_MOD) promptgroup("51 - Output (1)") + interest(1) + special(SPC_MOD) prompt("Constant input 6") } field(LNK6, DBF_OUTLINK) { - interest(1) - special(SPC_MOD) + prompt("Output Link 6") promptgroup("52 - Output (2)") - prompt("Output Link 6") + interest(1) + special(SPC_MOD) } field(STR6, DBF_STRING) { - size(40) - special(SPC_MOD) - interest(4) + interest(4) + special(SPC_MOD) promptgroup("51 - Output (1)") + size(40) prompt("String value 6") } field(DT6, DBF_SHORT) { + special(SPC_NOMOD) + interest(4) prompt("DOL link type") - special(SPC_NOMOD) - interest(4) } field(LT6, DBF_SHORT) { - special(SPC_NOMOD) - interest(4) + interest(4) + special(SPC_NOMOD) prompt("LNK link type") } field(WAIT6, DBF_MENU) { + prompt("Wait for completion?") + menu(sseqWAIT) + interest(1) special(SPC_MOD) promptgroup("51 - Output (1)") - interest(1) - prompt("Wait for completion?") - menu(sseqWAIT) } field(WERR6, DBF_SHORT) { interest(1) @@ -1590,22 +17494,22 @@ interest(1) } field(IX6, DBF_SHORT) { - special(SPC_NOMOD) - interest(2) + interest(2) + special(SPC_NOMOD) initial("5") } field(DOL6V, DBF_MENU) { - initial("1") + special(SPC_NOMOD) + interest(1) + menu(sseqLNKV) prompt("DOL LINK Status") - interest(1) + initial("1") + } + field(LNK6V, DBF_MENU) { special(SPC_NOMOD) menu(sseqLNKV) - } - field(LNK6V, DBF_MENU) { - initial("1") - menu(sseqLNKV) - special(SPC_NOMOD) - interest(1) + interest(1) + initial("1") prompt("LNK LINK Status") } field(DLY7, DBF_DOUBLE) { @@ -1616,27 +17520,27 @@ } field(DOL7, DBF_INLINK) { prompt("Input link 7") - special(SPC_MOD) promptgroup("53 - Output (3)") interest(1) + special(SPC_MOD) } field(DO7, DBF_DOUBLE) { + interest(1) + special(SPC_MOD) + promptgroup("51 - Output (1)") prompt("Constant input 7") - special(SPC_MOD) - interest(1) - promptgroup("51 - Output (1)") } field(LNK7, DBF_OUTLINK) { + special(SPC_MOD) + interest(1) promptgroup("53 - Output (3)") - special(SPC_MOD) - interest(1) prompt("Output Link 7") } field(STR7, DBF_STRING) { + promptgroup("51 - Output (1)") + special(SPC_MOD) + interest(4) prompt("String value 7") - special(SPC_MOD) - promptgroup("51 - Output (1)") - interest(4) size(40) } field(DT7, DBF_SHORT) { @@ -1665,54 +17569,54 @@ interest(1) } field(IX7, DBF_SHORT) { + special(SPC_NOMOD) + interest(2) initial("6") - special(SPC_NOMOD) - interest(2) } field(DOL7V, DBF_MENU) { + interest(1) menu(sseqLNKV) + special(SPC_NOMOD) prompt("DOL LINK Status") - special(SPC_NOMOD) - interest(1) initial("1") } field(LNK7V, DBF_MENU) { + menu(sseqLNKV) + interest(1) + special(SPC_NOMOD) + initial("1") prompt("LNK LINK Status") - special(SPC_NOMOD) - interest(1) - menu(sseqLNKV) - initial("1") } field(DLY8, DBF_DOUBLE) { + special(SPC_MOD) + interest(1) + promptgroup("53 - Output (3)") prompt("Delay 8") - interest(1) - special(SPC_MOD) - promptgroup("53 - Output (3)") } field(DOL8, DBF_INLINK) { - special(SPC_MOD) + prompt("Input link 8") promptgroup("53 - Output (3)") - interest(1) - prompt("Input link 8") + special(SPC_MOD) + interest(1) } field(DO8, DBF_DOUBLE) { prompt("Constant input 8") - interest(1) - special(SPC_MOD) + special(SPC_MOD) + interest(1) promptgroup("51 - Output (1)") } field(LNK8, DBF_OUTLINK) { + promptgroup("53 - Output (3)") + special(SPC_MOD) + interest(1) prompt("Output Link 8") - special(SPC_MOD) - promptgroup("53 - Output (3)") - interest(1) } field(STR8, DBF_STRING) { - special(SPC_MOD) + prompt("String value 8") + size(40) promptgroup("51 - Output (1)") interest(4) - prompt("String value 8") - size(40) + special(SPC_MOD) } field(DT8, DBF_SHORT) { prompt("DOL link type") @@ -1720,99 +17624,99 @@ special(SPC_NOMOD) } field(LT8, DBF_SHORT) { - special(SPC_NOMOD) - interest(4) + interest(4) + special(SPC_NOMOD) prompt("LNK link type") } field(WAIT8, DBF_MENU) { + prompt("Wait for completion?") menu(sseqWAIT) + interest(1) + special(SPC_MOD) promptgroup("51 - Output (1)") - special(SPC_MOD) - interest(1) - prompt("Wait for completion?") } field(WERR8, DBF_SHORT) { interest(1) special(SPC_NOMOD) } field(WTG8, DBF_SHORT) { - special(SPC_NOMOD) - interest(1) + interest(1) + special(SPC_NOMOD) } field(IX8, DBF_SHORT) { - interest(2) - special(SPC_NOMOD) initial("7") + interest(2) + special(SPC_NOMOD) } field(DOL8V, DBF_MENU) { special(SPC_NOMOD) + menu(sseqLNKV) interest(1) prompt("DOL LINK Status") - menu(sseqLNKV) initial("1") } field(LNK8V, DBF_MENU) { initial("1") - special(SPC_NOMOD) - interest(1) prompt("LNK LINK Status") + special(SPC_NOMOD) menu(sseqLNKV) + interest(1) } field(DLY9, DBF_DOUBLE) { - prompt("Delay 9") special(SPC_MOD) interest(1) promptgroup("53 - Output (3)") + prompt("Delay 9") } field(DOL9, DBF_INLINK) { + interest(1) special(SPC_MOD) promptgroup("53 - Output (3)") - interest(1) prompt("Input link 9") } field(DO9, DBF_DOUBLE) { + promptgroup("51 - Output (1)") + special(SPC_MOD) + interest(1) prompt("Constant input 9") - interest(1) - special(SPC_MOD) - promptgroup("51 - Output (1)") } field(LNK9, DBF_OUTLINK) { + prompt("Output Link 9") + special(SPC_MOD) + interest(1) promptgroup("53 - Output (3)") - special(SPC_MOD) - interest(1) - prompt("Output Link 9") } field(STR9, DBF_STRING) { promptgroup("51 - Output (1)") - special(SPC_MOD) - interest(4) + interest(4) + special(SPC_MOD) prompt("String value 9") size(40) } field(DT9, DBF_SHORT) { + interest(4) + special(SPC_NOMOD) prompt("DOL link type") - special(SPC_NOMOD) - interest(4) } field(LT9, DBF_SHORT) { - interest(4) - special(SPC_NOMOD) prompt("LNK link type") + interest(4) + special(SPC_NOMOD) } field(WAIT9, DBF_MENU) { + prompt("Wait for completion?") + special(SPC_MOD) + interest(1) menu(sseqWAIT) - prompt("Wait for completion?") - interest(1) - special(SPC_MOD) promptgroup("51 - Output (1)") } field(WERR9, DBF_SHORT) { - special(SPC_NOMOD) - interest(1) + interest(1) + special(SPC_NOMOD) } field(WTG9, DBF_SHORT) { - interest(1) - special(SPC_NOMOD) + special(SPC_NOMOD) + interest(1) } field(IX9, DBF_SHORT) { initial("8") @@ -1820,49 +17724,49 @@ interest(2) } field(DOL9V, DBF_MENU) { - special(SPC_NOMOD) - interest(1) + initial("1") prompt("DOL LINK Status") + interest(1) menu(sseqLNKV) - initial("1") + special(SPC_NOMOD) } field(LNK9V, DBF_MENU) { + prompt("LNK LINK Status") + initial("1") + special(SPC_NOMOD) menu(sseqLNKV) interest(1) - special(SPC_NOMOD) - prompt("LNK LINK Status") - initial("1") } field(DLYA, DBF_DOUBLE) { + promptgroup("53 - Output (3)") + interest(1) + special(SPC_MOD) prompt("Delay 10") - special(SPC_MOD) - interest(1) - promptgroup("53 - Output (3)") } field(DOLA, DBF_INLINK) { prompt("Input link 10") + interest(1) + special(SPC_MOD) promptgroup("53 - Output (3)") - special(SPC_MOD) - interest(1) } field(DOA, DBF_DOUBLE) { prompt("Constant input 10") - special(SPC_MOD) - interest(1) promptgroup("51 - Output (1)") + interest(1) + special(SPC_MOD) } field(LNKA, DBF_OUTLINK) { prompt("Output Link 10") special(SPC_MOD) + interest(1) promptgroup("53 - Output (3)") - interest(1) } field(STRA, DBF_STRING) { - interest(4) - special(SPC_MOD) + prompt("String value A") + size(40) promptgroup("51 - Output (1)") - prompt("String value A") - size(40) + interest(4) + special(SPC_MOD) } field(DTA, DBF_SHORT) { interest(4) @@ -1875,11 +17779,11 @@ prompt("LNK link type") } field(WAITA, DBF_MENU) { + prompt("Wait for completion?") + promptgroup("51 - Output (1)") menu(sseqWAIT) - prompt("Wait for completion?") - interest(1) - special(SPC_MOD) - promptgroup("51 - Output (1)") + interest(1) + special(SPC_MOD) } field(WERRA, DBF_SHORT) { special(SPC_NOMOD) @@ -1889,48 +17793,48 @@ interest(1) } field(IXA, DBF_SHORT) { - interest(2) initial("9") + interest(2) } field(DOLAV, DBF_MENU) { - menu(sseqLNKV) + initial("1") prompt("DOL LINK Status") - interest(1) - special(SPC_NOMOD) - initial("1") + special(SPC_NOMOD) + menu(sseqLNKV) + interest(1) } field(LNKAV, DBF_MENU) { + interest(1) + menu(sseqLNKV) + special(SPC_NOMOD) + initial("1") prompt("LNK LINK Status") - interest(1) - special(SPC_NOMOD) - menu(sseqLNKV) - initial("1") } field(ABORT, DBF_SHORT) { - interest(1) - special(SPC_MOD) + special(SPC_MOD) + interest(1) prompt("Abort sequence") } field(ABORTING, DBF_SHORT) { - special(SPC_MOD) - interest(1) prompt("Aborting") + special(SPC_MOD) + interest(1) } field(BUSY, DBF_SHORT) { prompt("Sequence active") - special(SPC_NOMOD) - interest(1) - } -} -recordtype(sel) { + interest(1) + special(SPC_NOMOD) + } +} +recordtype(asyn) { %#include "epicsTypes.h" %#include "link.h" %#include "epicsMutex.h" %#include "ellLib.h" %#include "epicsTime.h" field(NAME, DBF_STRING) { + special(SPC_NOMOD) prompt("Record Name") - special(SPC_NOMOD) size(61) } field(DESC, DBF_STRING) { @@ -1939,590 +17843,23 @@ size(41) } field(ASG, DBF_STRING) { - size(29) - prompt("Access Security Group") promptgroup("10 - Common") special(SPC_AS) + prompt("Access Security Group") + size(29) } field(SCAN, DBF_MENU) { interest(1) + menu(menuScan) special(SPC_SCAN) promptgroup("20 - Scan") prompt("Scan Mechanism") - menu(menuScan) - } - field(PINI, DBF_MENU) { - menu(menuPini) - prompt("Process at iocInit") - interest(1) - promptgroup("20 - Scan") - } - field(PHAS, DBF_SHORT) { - prompt("Scan Phase") - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - } - field(EVNT, DBF_STRING) { - size(40) - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - prompt("Event Name") - } - field(TSE, DBF_SHORT) { - prompt("Time Stamp Event") - interest(1) - promptgroup("20 - Scan") - } - field(TSEL, DBF_INLINK) { - promptgroup("20 - Scan") - interest(1) - prompt("Time Stamp Link") - } - field(DTYP, DBF_DEVICE) { - interest(1) - promptgroup("10 - Common") - prompt("Device Type") - } - field(DISV, DBF_SHORT) { - initial("1") - promptgroup("20 - Scan") - prompt("Disable Value") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Scanning Disable") - } - field(MLOK, DBF_NOACCESS) { - extra("epicsMutexId mlok") - interest(4) - special(SPC_NOMOD) - prompt("Monitor lock") - } - field(MLIS, DBF_NOACCESS) { - prompt("Monitor List") - special(SPC_NOMOD) - interest(4) - extra("ELLLIST mlis") - } - field(BKLNK, DBF_NOACCESS) { - prompt("Backwards link tracking") - interest(4) - special(SPC_NOMOD) - extra("ELLLIST bklnk") - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - interest(3) - prompt("Force Processing") - pp(TRUE) - } - field(STAT, DBF_MENU) { - initial("UDF") - menu(menuAlarmStat) - prompt("Alarm Status") - special(SPC_NOMOD) - } - field(SEVR, DBF_MENU) { - special(SPC_NOMOD) - prompt("Alarm Severity") - menu(menuAlarmSevr) - } - field(NSTA, DBF_MENU) { - prompt("New Alarm Status") - special(SPC_NOMOD) - interest(2) - menu(menuAlarmStat) - } - field(NSEV, DBF_MENU) { - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Severity") - menu(menuAlarmSevr) - } - field(ACKS, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Alarm Ack Severity") - interest(2) - special(SPC_NOMOD) - } - field(ACKT, DBF_MENU) { - menu(menuYesNo) - promptgroup("70 - Alarm") - interest(2) - special(SPC_NOMOD) - prompt("Alarm Ack Transient") - initial("YES") - } - field(DISS, DBF_MENU) { - menu(menuAlarmSevr) - promptgroup("70 - Alarm") - interest(1) - prompt("Disable Alarm Sevrty") - } - field(LCNT, DBF_UCHAR) { - special(SPC_NOMOD) - interest(2) - prompt("Lock Count") - } - field(PACT, DBF_UCHAR) { - prompt("Record active") - special(SPC_NOMOD) - interest(1) - } - field(PUTF, DBF_UCHAR) { - special(SPC_NOMOD) - interest(1) - prompt("dbPutField process") - } - field(RPRO, DBF_UCHAR) { - prompt("Reprocess ") - interest(1) - special(SPC_NOMOD) - } - field(ASP, DBF_NOACCESS) { - prompt("Access Security Pvt") - special(SPC_NOMOD) - interest(4) - extra("struct asgMember *asp") - } - field(PPN, DBF_NOACCESS) { - prompt("pprocessNotify") - interest(4) - special(SPC_NOMOD) - extra("struct processNotify *ppn") - } - field(PPNR, DBF_NOACCESS) { - extra("struct processNotifyRecord *ppnr") - special(SPC_NOMOD) - interest(4) - prompt("pprocessNotifyRecord") - } - field(SPVT, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Scan Private") - extra("struct scan_element *spvt") - } - field(RSET, DBF_NOACCESS) { - extra("struct typed_rset *rset") - prompt("Address of RSET") - interest(4) - special(SPC_NOMOD) - } - field(DSET, DBF_NOACCESS) { - extra("struct dset *dset") - special(SPC_NOMOD) - interest(4) - prompt("DSET address") - } - field(DPVT, DBF_NOACCESS) { - extra("void *dpvt") - prompt("Device Private") - special(SPC_NOMOD) - interest(4) - } - field(RDES, DBF_NOACCESS) { - extra("struct dbRecordType *rdes") - special(SPC_NOMOD) - interest(4) - prompt("Address of dbRecordType") - } - field(LSET, DBF_NOACCESS) { - extra("struct lockRecord *lset") - interest(4) - special(SPC_NOMOD) - prompt("Lock Set") - } - field(PRIO, DBF_MENU) { - menu(menuPriority) - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - prompt("Scheduling Priority") - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - extra("char bkpt") - special(SPC_NOMOD) - interest(1) - prompt("Break Point") - } - field(UDF, DBF_UCHAR) { - prompt("Undefined") - interest(1) - promptgroup("10 - Common") - pp(TRUE) - initial("1") - } - field(UDFS, DBF_MENU) { - prompt("Undefined Alarm Sevrty") - promptgroup("70 - Alarm") - interest(1) - menu(menuAlarmSevr) - initial("INVALID") - } - field(TIME, DBF_NOACCESS) { - prompt("Time") - interest(2) - special(SPC_NOMOD) - extra("epicsTimeStamp time") - } - field(FLNK, DBF_FWDLINK) { - prompt("Forward Process Link") - interest(1) - promptgroup("20 - Scan") - } - field(VAL, DBF_DOUBLE) { - asl(ASL0) - prompt("Result") - promptgroup("40 - Input") - special(SPC_NOMOD) - } - field(SELM, DBF_MENU) { - promptgroup("30 - Action") - prompt("Select Mechanism") - menu(selSELM) - } - field(SELN, DBF_USHORT) { - prompt("Index value") - } - field(PREC, DBF_SHORT) { - promptgroup("80 - Display") - interest(1) - prompt("Display Precision") - } - field(NVL, DBF_INLINK) { - promptgroup("30 - Action") - interest(1) - prompt("Index Value Location") - } - field(INPA, DBF_INLINK) { - interest(1) - promptgroup("41 - Input A-F") - prompt("Input A") - } - field(INPB, DBF_INLINK) { - prompt("Input B") - interest(1) - promptgroup("41 - Input A-F") - } - field(INPC, DBF_INLINK) { - prompt("Input C") - promptgroup("41 - Input A-F") - interest(1) - } - field(INPD, DBF_INLINK) { - prompt("Input D") - interest(1) - promptgroup("41 - Input A-F") - } - field(INPE, DBF_INLINK) { - promptgroup("41 - Input A-F") - interest(1) - prompt("Input E") - } - field(INPF, DBF_INLINK) { - promptgroup("41 - Input A-F") - interest(1) - prompt("Input F") - } - field(INPG, DBF_INLINK) { - promptgroup("42 - Input G-L") - interest(1) - prompt("Input G") - } - field(INPH, DBF_INLINK) { - promptgroup("42 - Input G-L") - interest(1) - prompt("Input H") - } - field(INPI, DBF_INLINK) { - prompt("Input I") - promptgroup("42 - Input G-L") - interest(1) - } - field(INPJ, DBF_INLINK) { - prompt("Input J") - interest(1) - promptgroup("42 - Input G-L") - } - field(INPK, DBF_INLINK) { - prompt("Input K") - interest(1) - promptgroup("42 - Input G-L") - } - field(INPL, DBF_INLINK) { - interest(1) - promptgroup("42 - Input G-L") - prompt("Input L") - } - field(EGU, DBF_STRING) { - size(16) - promptgroup("80 - Display") - prop(YES) - interest(1) - prompt("Engineering Units") - } - field(HOPR, DBF_DOUBLE) { - prompt("High Operating Rng") - prop(YES) - promptgroup("80 - Display") - interest(1) - } - field(LOPR, DBF_DOUBLE) { - prop(YES) - interest(1) - promptgroup("80 - Display") - prompt("Low Operating Range") - } - field(HIHI, DBF_DOUBLE) { - pp(TRUE) - prompt("Hihi Alarm Limit") - prop(YES) - interest(1) - promptgroup("70 - Alarm") - } - field(LOLO, DBF_DOUBLE) { - pp(TRUE) - promptgroup("70 - Alarm") - prop(YES) - interest(1) - prompt("Lolo Alarm Limit") - } - field(HIGH, DBF_DOUBLE) { - pp(TRUE) - prompt("High Alarm Limit") - promptgroup("70 - Alarm") - prop(YES) - interest(1) - } - field(LOW, DBF_DOUBLE) { - pp(TRUE) - prompt("Low Alarm Limit") - prop(YES) - promptgroup("70 - Alarm") - interest(1) - } - field(HHSV, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Hihi Severity") - promptgroup("70 - Alarm") - prop(YES) - interest(1) - pp(TRUE) - } - field(LLSV, DBF_MENU) { - prompt("Lolo Severity") - prop(YES) - interest(1) - promptgroup("70 - Alarm") - menu(menuAlarmSevr) - pp(TRUE) - } - field(HSV, DBF_MENU) { - pp(TRUE) - menu(menuAlarmSevr) - prop(YES) - interest(1) - promptgroup("70 - Alarm") - prompt("High Severity") - } - field(LSV, DBF_MENU) { - pp(TRUE) - prompt("Low Severity") - prop(YES) - promptgroup("70 - Alarm") - interest(1) - menu(menuAlarmSevr) - } - field(HYST, DBF_DOUBLE) { - promptgroup("70 - Alarm") - interest(1) - prompt("Alarm Deadband") - } - field(ADEL, DBF_DOUBLE) { - prompt("Archive Deadband") - interest(1) - promptgroup("80 - Display") - } - field(MDEL, DBF_DOUBLE) { - prompt("Monitor Deadband") - promptgroup("80 - Display") - interest(1) - } - field(A, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input A") - } - field(B, DBF_DOUBLE) { - prompt("Value of Input B") - pp(TRUE) - } - field(C, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input C") - } - field(D, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input D") - } - field(E, DBF_DOUBLE) { - prompt("Value of Input E") - pp(TRUE) - } - field(F, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input F") - } - field(G, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input G") - } - field(H, DBF_DOUBLE) { - prompt("Value of Input H") - pp(TRUE) - } - field(I, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input I") - } - field(J, DBF_DOUBLE) { - prompt("Value of Input J") - pp(TRUE) - } - field(K, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input K") - } - field(L, DBF_DOUBLE) { - prompt("Value of Input L") - pp(TRUE) - } - field(LA, DBF_DOUBLE) { - prompt("Prev Value of A") - interest(3) - special(SPC_NOMOD) - } - field(LB, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of B") - } - field(LC, DBF_DOUBLE) { - prompt("Prev Value of C") - special(SPC_NOMOD) - interest(3) - } - field(LD, DBF_DOUBLE) { - prompt("Prev Value of D") - interest(3) - special(SPC_NOMOD) - } - field(LE, DBF_DOUBLE) { - prompt("Prev Value of E") - interest(3) - special(SPC_NOMOD) - } - field(LF, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of F") - } - field(LG, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of G") - } - field(LH, DBF_DOUBLE) { - prompt("Prev Value of H") - interest(3) - special(SPC_NOMOD) - } - field(LI, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of I") - } - field(LJ, DBF_DOUBLE) { - prompt("Prev Value of J") - special(SPC_NOMOD) - interest(3) - } - field(LK, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of K") - } - field(LL, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Value of L") - } - field(LALM, DBF_DOUBLE) { - prompt("Last Value Alarmed") - special(SPC_NOMOD) - interest(3) - } - field(ALST, DBF_DOUBLE) { - prompt("Last Value Archived") - interest(3) - special(SPC_NOMOD) - } - field(MLST, DBF_DOUBLE) { - prompt("Last Val Monitored") - interest(3) - special(SPC_NOMOD) - } - field(NLST, DBF_USHORT) { - special(SPC_NOMOD) - interest(3) - prompt("Last Index Monitored") - } -} -recordtype(scalcout) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - field(NAME, DBF_STRING) { - size(61) - special(SPC_NOMOD) - prompt("Record Name") - } - field(DESC, DBF_STRING) { - size(41) - promptgroup("10 - Common") - prompt("Descriptor") - } - field(ASG, DBF_STRING) { - size(29) - prompt("Access Security Group") - special(SPC_AS) - promptgroup("10 - Common") - } - field(SCAN, DBF_MENU) { - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - prompt("Scan Mechanism") - menu(menuScan) } field(PINI, DBF_MENU) { prompt("Process at iocInit") - promptgroup("20 - Scan") interest(1) menu(menuPini) + promptgroup("20 - Scan") } field(PHAS, DBF_SHORT) { special(SPC_SCAN) @@ -2531,2188 +17868,11 @@ prompt("Scan Phase") } field(EVNT, DBF_STRING) { + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") size(40) prompt("Event Name") - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - } - field(TSE, DBF_SHORT) { - interest(1) - promptgroup("20 - Scan") - prompt("Time Stamp Event") - } - field(TSEL, DBF_INLINK) { - promptgroup("20 - Scan") - interest(1) - prompt("Time Stamp Link") - } - field(DTYP, DBF_DEVICE) { - promptgroup("10 - Common") - interest(1) - prompt("Device Type") - } - field(DISV, DBF_SHORT) { - initial("1") - promptgroup("20 - Scan") - prompt("Disable Value") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Scanning Disable") - } - field(MLOK, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Monitor lock") - extra("epicsMutexId mlok") - } - field(MLIS, DBF_NOACCESS) { - prompt("Monitor List") - interest(4) - special(SPC_NOMOD) - extra("ELLLIST mlis") - } - field(BKLNK, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Backwards link tracking") - extra("ELLLIST bklnk") - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - prompt("Force Processing") - interest(3) - pp(TRUE) - } - field(STAT, DBF_MENU) { - special(SPC_NOMOD) - prompt("Alarm Status") - menu(menuAlarmStat) - initial("UDF") - } - field(SEVR, DBF_MENU) { - special(SPC_NOMOD) - prompt("Alarm Severity") - menu(menuAlarmSevr) - } - field(NSTA, DBF_MENU) { - menu(menuAlarmStat) - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Status") - } - field(NSEV, DBF_MENU) { - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Severity") - menu(menuAlarmSevr) - } - field(ACKS, DBF_MENU) { - interest(2) - special(SPC_NOMOD) - prompt("Alarm Ack Severity") - menu(menuAlarmSevr) - } - field(ACKT, DBF_MENU) { - menu(menuYesNo) - interest(2) - promptgroup("70 - Alarm") - special(SPC_NOMOD) - prompt("Alarm Ack Transient") - initial("YES") - } - field(DISS, DBF_MENU) { - menu(menuAlarmSevr) - promptgroup("70 - Alarm") - interest(1) - prompt("Disable Alarm Sevrty") - } - field(LCNT, DBF_UCHAR) { - interest(2) - special(SPC_NOMOD) - prompt("Lock Count") - } - field(PACT, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Record active") - } - field(PUTF, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("dbPutField process") - } - field(RPRO, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Reprocess ") - } - field(ASP, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Access Security Pvt") - extra("struct asgMember *asp") - } - field(PPN, DBF_NOACCESS) { - prompt("pprocessNotify") - interest(4) - special(SPC_NOMOD) - extra("struct processNotify *ppn") - } - field(PPNR, DBF_NOACCESS) { - extra("struct processNotifyRecord *ppnr") - prompt("pprocessNotifyRecord") - special(SPC_NOMOD) - interest(4) - } - field(SPVT, DBF_NOACCESS) { - extra("struct scan_element *spvt") - prompt("Scan Private") - special(SPC_NOMOD) - interest(4) - } - field(RSET, DBF_NOACCESS) { - extra("struct typed_rset *rset") - special(SPC_NOMOD) - interest(4) - prompt("Address of RSET") - } - field(DSET, DBF_NOACCESS) { - extra("struct dset *dset") - interest(4) - special(SPC_NOMOD) - prompt("DSET address") - } - field(DPVT, DBF_NOACCESS) { - prompt("Device Private") - special(SPC_NOMOD) - interest(4) - extra("void *dpvt") - } - field(RDES, DBF_NOACCESS) { - extra("struct dbRecordType *rdes") - interest(4) - special(SPC_NOMOD) - prompt("Address of dbRecordType") - } - field(LSET, DBF_NOACCESS) { - prompt("Lock Set") - interest(4) - special(SPC_NOMOD) - extra("struct lockRecord *lset") - } - field(PRIO, DBF_MENU) { - menu(menuPriority) - prompt("Scheduling Priority") - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - extra("char bkpt") - prompt("Break Point") - interest(1) - special(SPC_NOMOD) - } - field(UDF, DBF_UCHAR) { - promptgroup("10 - Common") - interest(1) - prompt("Undefined") - pp(TRUE) - initial("1") - } - field(UDFS, DBF_MENU) { - initial("INVALID") - prompt("Undefined Alarm Sevrty") - interest(1) - promptgroup("70 - Alarm") - menu(menuAlarmSevr) - } - field(TIME, DBF_NOACCESS) { - interest(2) - special(SPC_NOMOD) - prompt("Time") - extra("epicsTimeStamp time") - } - field(FLNK, DBF_FWDLINK) { - prompt("Forward Process Link") - interest(1) - promptgroup("20 - Scan") - } - field(VERS, DBF_DOUBLE) { - prompt("Code Version") - special(SPC_NOMOD) - initial("1") - } - field(RPVT, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Record Private") - extra("void *rpvt") - size(4) - } - field(VAL, DBF_DOUBLE) { - asl(ASL0) - prompt("Result") - } - field(SVAL, DBF_STRING) { - prompt("String result") - asl(ASL0) - size(40) - } - field(PVAL, DBF_DOUBLE) { - prompt("Previous Value") - } - field(PSVL, DBF_STRING) { - prompt("Previous string result") - special(SPC_NOMOD) - size(40) - } - field(CALC, DBF_STRING) { - prompt("Calculation") - promptgroup("30 - Action") - special(SPC_MOD) - pp(TRUE) - size(80) - } - field(CLCV, DBF_LONG) { - interest(1) - prompt("CALC Valid") - } - field(INPA, DBF_INLINK) { - special(SPC_MOD) - interest(1) - promptgroup("30 - Action") - prompt("Input A") - } - field(INPB, DBF_INLINK) { - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - prompt("Input B") - } - field(INPC, DBF_INLINK) { - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - prompt("Input C") - } - field(INPD, DBF_INLINK) { - interest(1) - promptgroup("30 - Action") - special(SPC_MOD) - prompt("Input D") - } - field(INPE, DBF_INLINK) { - special(SPC_MOD) - interest(1) - promptgroup("30 - Action") - prompt("Input E") - } - field(INPF, DBF_INLINK) { - special(SPC_MOD) - interest(1) - promptgroup("30 - Action") - prompt("Input F") - } - field(INPG, DBF_INLINK) { - prompt("Input G") - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - } - field(INPH, DBF_INLINK) { - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - prompt("Input H") - } - field(INPI, DBF_INLINK) { - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - prompt("Input I") - } - field(INPJ, DBF_INLINK) { - prompt("Input J") - promptgroup("30 - Action") - interest(1) - special(SPC_MOD) - } - field(INPK, DBF_INLINK) { - special(SPC_MOD) - interest(1) - promptgroup("30 - Action") - prompt("Input K") - } - field(INPL, DBF_INLINK) { - interest(1) - promptgroup("30 - Action") - special(SPC_MOD) - prompt("Input L") - } - field(INAA, DBF_INLINK) { - prompt("String input AA") - promptgroup("30 - Action") - interest(1) - special(SPC_MOD) - } - field(INBB, DBF_INLINK) { - prompt("String input BB") - promptgroup("30 - Action") - interest(1) - special(SPC_MOD) - } - field(INCC, DBF_INLINK) { - promptgroup("30 - Action") - interest(1) - special(SPC_MOD) - prompt("String input CC") - } - field(INDD, DBF_INLINK) { - prompt("String input DD") - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - } - field(INEE, DBF_INLINK) { - prompt("String input EE") - special(SPC_MOD) - interest(1) - promptgroup("30 - Action") - } - field(INFF, DBF_INLINK) { - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - prompt("String input FF") - } - field(INGG, DBF_INLINK) { - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - prompt("String input GG") - } - field(INHH, DBF_INLINK) { - prompt("String input HH") - interest(1) - promptgroup("30 - Action") - special(SPC_MOD) - } - field(INII, DBF_INLINK) { - promptgroup("30 - Action") - interest(1) - special(SPC_MOD) - prompt("String input II") - } - field(INJJ, DBF_INLINK) { - prompt("String input JJ") - promptgroup("30 - Action") - interest(1) - special(SPC_MOD) - } - field(INKK, DBF_INLINK) { - promptgroup("30 - Action") - interest(1) - special(SPC_MOD) - prompt("String input KK") - } - field(INLL, DBF_INLINK) { - interest(1) - promptgroup("30 - Action") - special(SPC_MOD) - prompt("String input LL") - } - field(OUT, DBF_OUTLINK) { - prompt("Output Link") - promptgroup("50 - Output") - interest(1) - special(SPC_MOD) - } - field(INAV, DBF_MENU) { - initial("1") - menu(scalcoutINAV) - prompt("INPA PV Status") - special(SPC_NOMOD) - interest(1) - } - field(INBV, DBF_MENU) { - menu(scalcoutINAV) - special(SPC_NOMOD) - interest(1) - prompt("INPB PV Status") - initial("1") - } - field(INCV, DBF_MENU) { - initial("1") - menu(scalcoutINAV) - special(SPC_NOMOD) - interest(1) - prompt("INPC PV Status") - } - field(INDV, DBF_MENU) { - initial("1") - menu(scalcoutINAV) - special(SPC_NOMOD) - interest(1) - prompt("INPD PV Status") - } - field(INEV, DBF_MENU) { - interest(1) - special(SPC_NOMOD) - prompt("INPE PV Status") - menu(scalcoutINAV) - initial("1") - } - field(INFV, DBF_MENU) { - prompt("INPF PV Status") - interest(1) - special(SPC_NOMOD) - menu(scalcoutINAV) - initial("1") - } - field(INGV, DBF_MENU) { - initial("1") - special(SPC_NOMOD) - interest(1) - prompt("INPG PV Status") - menu(scalcoutINAV) - } - field(INHV, DBF_MENU) { - initial("1") - menu(scalcoutINAV) - prompt("INPH PV Status") - interest(1) - special(SPC_NOMOD) - } - field(INIV, DBF_MENU) { - initial("1") - prompt("INPI PV Status") - special(SPC_NOMOD) - interest(1) - menu(scalcoutINAV) - } - field(INJV, DBF_MENU) { - initial("1") - menu(scalcoutINAV) - special(SPC_NOMOD) - interest(1) - prompt("INPJ PV Status") - } - field(INKV, DBF_MENU) { - initial("1") - prompt("INPK PV Status") - interest(1) - special(SPC_NOMOD) - menu(scalcoutINAV) - } - field(INLV, DBF_MENU) { - initial("1") - menu(scalcoutINAV) - prompt("INPL PV Status") - interest(1) - special(SPC_NOMOD) - } - field(IAAV, DBF_MENU) { - initial("1") - menu(scalcoutINAV) - prompt("INAA PV Status") - interest(1) - special(SPC_NOMOD) - } - field(IBBV, DBF_MENU) { - special(SPC_NOMOD) - interest(1) - prompt("INBB PV Status") - menu(scalcoutINAV) - initial("1") - } - field(ICCV, DBF_MENU) { - initial("1") - prompt("INCC PV Status") - interest(1) - special(SPC_NOMOD) - menu(scalcoutINAV) - } - field(IDDV, DBF_MENU) { - interest(1) - special(SPC_NOMOD) - prompt("INDD PV Status") - menu(scalcoutINAV) - initial("1") - } - field(IEEV, DBF_MENU) { - interest(1) - special(SPC_NOMOD) - prompt("INEE PV Status") - menu(scalcoutINAV) - initial("1") - } - field(IFFV, DBF_MENU) { - initial("1") - menu(scalcoutINAV) - prompt("INFF PV Status") - special(SPC_NOMOD) - interest(1) - } - field(IGGV, DBF_MENU) { - initial("1") - prompt("INGG PV Status") - special(SPC_NOMOD) - interest(1) - menu(scalcoutINAV) - } - field(IHHV, DBF_MENU) { - initial("1") - interest(1) - special(SPC_NOMOD) - prompt("INHH PV Status") - menu(scalcoutINAV) - } - field(IIIV, DBF_MENU) { - interest(1) - special(SPC_NOMOD) - prompt("INII PV Status") - menu(scalcoutINAV) - initial("1") - } - field(IJJV, DBF_MENU) { - menu(scalcoutINAV) - special(SPC_NOMOD) - interest(1) - prompt("INJJ PV Status") - initial("1") - } - field(IKKV, DBF_MENU) { - menu(scalcoutINAV) - prompt("INKK PV Status") - special(SPC_NOMOD) - interest(1) - initial("1") - } - field(ILLV, DBF_MENU) { - interest(1) - special(SPC_NOMOD) - prompt("INLL PV Status") - menu(scalcoutINAV) - initial("1") - } - field(OUTV, DBF_MENU) { - menu(scalcoutINAV) - prompt("OUT PV Status") - special(SPC_NOMOD) - interest(1) - } - field(OOPT, DBF_MENU) { - prompt("Output Execute Opt") - interest(1) - promptgroup("30 - Action") - menu(scalcoutOOPT) - } - field(ODLY, DBF_DOUBLE) { - prompt("Output Execute Delay") - promptgroup("70 - Alarm") - interest(1) - asl(ASL0) - } - field(WAIT, DBF_MENU) { - menu(scalcoutWAIT) - interest(1) - prompt("Wait for completion?") - } - field(DLYA, DBF_USHORT) { - special(SPC_NOMOD) - prompt("Output Delay Active") - asl(ASL0) - } - field(DOPT, DBF_MENU) { - menu(scalcoutDOPT) - promptgroup("30 - Action") - interest(1) - prompt("Output Data Opt") - } - field(OCAL, DBF_STRING) { - prompt("Output Calculation") - promptgroup("30 - Action") - special(SPC_MOD) - size(80) - pp(TRUE) - } - field(OCLV, DBF_LONG) { - prompt("OCAL Valid") - interest(1) - } - field(OEVT, DBF_USHORT) { - asl(ASL0) - promptgroup("30 - Action") - prompt("Event To Issue") - } - field(IVOA, DBF_MENU) { - prompt("INVALID output action") - promptgroup("50 - Output") - interest(2) - menu(menuIvoa) - } - field(IVOV, DBF_DOUBLE) { - interest(2) - promptgroup("50 - Output") - prompt("INVALID output value") - } - field(EGU, DBF_STRING) { - prompt("Units Name") - promptgroup("80 - Display") - interest(1) - size(16) - } - field(PREC, DBF_SHORT) { - promptgroup("80 - Display") - interest(1) - prompt("Display Precision") - } - field(HOPR, DBF_DOUBLE) { - prompt("High Operating Rng") - promptgroup("80 - Display") - interest(1) - } - field(LOPR, DBF_DOUBLE) { - prompt("Low Operating Range") - interest(1) - promptgroup("80 - Display") - } - field(HIHI, DBF_DOUBLE) { - promptgroup("70 - Alarm") - interest(1) - prompt("Hihi Alarm Limit") - pp(TRUE) - } - field(LOLO, DBF_DOUBLE) { - prompt("Lolo Alarm Limit") - promptgroup("70 - Alarm") - interest(1) - pp(TRUE) - } - field(HIGH, DBF_DOUBLE) { - prompt("High Alarm Limit") - interest(1) - promptgroup("70 - Alarm") - pp(TRUE) - } - field(LOW, DBF_DOUBLE) { - pp(TRUE) - promptgroup("70 - Alarm") - interest(1) - prompt("Low Alarm Limit") - } - field(HHSV, DBF_MENU) { - pp(TRUE) - prompt("Hihi Severity") - promptgroup("70 - Alarm") - interest(1) - menu(menuAlarmSevr) - } - field(LLSV, DBF_MENU) { - prompt("Lolo Severity") - interest(1) - promptgroup("70 - Alarm") - menu(menuAlarmSevr) - pp(TRUE) - } - field(HSV, DBF_MENU) { - prompt("High Severity") - promptgroup("70 - Alarm") - interest(1) - menu(menuAlarmSevr) - pp(TRUE) - } - field(LSV, DBF_MENU) { - menu(menuAlarmSevr) - promptgroup("70 - Alarm") - interest(1) - prompt("Low Severity") - pp(TRUE) - } - field(HYST, DBF_DOUBLE) { - interest(1) - promptgroup("70 - Alarm") - prompt("Alarm Deadband") - } - field(ADEL, DBF_DOUBLE) { - prompt("Archive Deadband") - interest(1) - promptgroup("80 - Display") - } - field(MDEL, DBF_DOUBLE) { - promptgroup("80 - Display") - interest(1) - prompt("Monitor Deadband") - } - field(A, DBF_DOUBLE) { - promptgroup("10 - Common") - prompt("Value of Input A") - pp(TRUE) - } - field(B, DBF_DOUBLE) { - promptgroup("10 - Common") - prompt("Value of Input B") - pp(TRUE) - } - field(C, DBF_DOUBLE) { - promptgroup("10 - Common") - prompt("Value of Input C") - pp(TRUE) - } - field(D, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input D") - promptgroup("10 - Common") - } - field(E, DBF_DOUBLE) { - prompt("Value of Input E") - promptgroup("10 - Common") - pp(TRUE) - } - field(F, DBF_DOUBLE) { - promptgroup("10 - Common") - prompt("Value of Input F") - pp(TRUE) - } - field(G, DBF_DOUBLE) { - promptgroup("10 - Common") - prompt("Value of Input G") - pp(TRUE) - } - field(H, DBF_DOUBLE) { - promptgroup("10 - Common") - prompt("Value of Input H") - pp(TRUE) - } - field(I, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input I") - promptgroup("10 - Common") - } - field(J, DBF_DOUBLE) { - promptgroup("10 - Common") - prompt("Value of Input J") - pp(TRUE) - } - field(K, DBF_DOUBLE) { - promptgroup("10 - Common") - prompt("Value of Input K") - pp(TRUE) - } - field(L, DBF_DOUBLE) { - prompt("Value of Input L") - promptgroup("10 - Common") - pp(TRUE) - } - field(STRS, DBF_NOACCESS) { - extra("char **strs") - size(4) - interest(4) - prompt("Array of string pointers") - } - field(AA, DBF_STRING) { - prompt("Value of string input AA") - interest(4) - promptgroup("10 - Common") - pp(TRUE) - size(40) - } - field(BB, DBF_STRING) { - promptgroup("10 - Common") - interest(4) - prompt("Value of string input BB") - size(40) - pp(TRUE) - } - field(CC, DBF_STRING) { - pp(TRUE) - size(40) - prompt("Value of string input CC") - interest(4) - promptgroup("10 - Common") - } - field(DD, DBF_STRING) { - pp(TRUE) - size(40) - prompt("Value of string input DD") - promptgroup("10 - Common") - interest(4) - } - field(EE, DBF_STRING) { - prompt("Value of string input EE") - promptgroup("10 - Common") - interest(4) - pp(TRUE) - size(40) - } - field(FF, DBF_STRING) { - prompt("Value of string input FF") - promptgroup("10 - Common") - interest(4) - pp(TRUE) - size(40) - } - field(GG, DBF_STRING) { - size(40) - pp(TRUE) - interest(4) - promptgroup("10 - Common") - prompt("Value of string input GG") - } - field(HH, DBF_STRING) { - interest(4) - promptgroup("10 - Common") - prompt("Value of string input HH") - size(40) - pp(TRUE) - } - field(II, DBF_STRING) { - promptgroup("10 - Common") - interest(4) - prompt("Value of string input II") - size(40) - pp(TRUE) - } - field(JJ, DBF_STRING) { - pp(TRUE) - size(40) - promptgroup("10 - Common") - interest(4) - prompt("Value of string input JJ") - } - field(KK, DBF_STRING) { - prompt("Value of string input KK") - interest(4) - promptgroup("10 - Common") - size(40) - pp(TRUE) - } - field(LL, DBF_STRING) { - promptgroup("10 - Common") - interest(4) - prompt("Value of string input LL") - size(40) - pp(TRUE) - } - field(PAA, DBF_NOACCESS) { - size(4) - extra("char *paa") - prompt("Prev Value of AA") - interest(4) - special(SPC_DBADDR) - } - field(PBB, DBF_NOACCESS) { - special(SPC_DBADDR) - interest(4) - prompt("Prev Value of BB") - extra("char *pbb") - size(4) - } - field(PCC, DBF_NOACCESS) { - interest(4) - special(SPC_DBADDR) - prompt("Prev Value of CC") - extra("char *pcc") - size(4) - } - field(PDD, DBF_NOACCESS) { - extra("char *pdd") - size(4) - special(SPC_DBADDR) - interest(4) - prompt("Prev Value of DD") - } - field(PEE, DBF_NOACCESS) { - interest(4) - special(SPC_DBADDR) - prompt("Prev Value of EE") - extra("char *pee") - size(4) - } - field(PFF, DBF_NOACCESS) { - size(4) - extra("char *pff") - prompt("Prev Value of FF") - interest(4) - special(SPC_DBADDR) - } - field(PGG, DBF_NOACCESS) { - extra("char *pgg") - size(4) - special(SPC_DBADDR) - interest(4) - prompt("Prev Value of GG") - } - field(PHH, DBF_NOACCESS) { - interest(4) - special(SPC_DBADDR) - prompt("Prev Value of HH") - extra("char *phh") - size(4) - } - field(PII, DBF_NOACCESS) { - special(SPC_DBADDR) - interest(4) - prompt("Prev Value of II") - extra("char *pii") - size(4) - } - field(PJJ, DBF_NOACCESS) { - prompt("Prev Value of JJ") - interest(4) - special(SPC_DBADDR) - size(4) - extra("char *pjj") - } - field(PKK, DBF_NOACCESS) { - extra("char *pkk") - size(4) - special(SPC_DBADDR) - interest(4) - prompt("Prev Value of KK") - } - field(PLL, DBF_NOACCESS) { - size(4) - extra("char *pll") - prompt("Prev Value of LL") - interest(4) - special(SPC_DBADDR) - } - field(OVAL, DBF_DOUBLE) { - prompt("Output Value") - asl(ASL0) - } - field(OSV, DBF_STRING) { - prompt("Output string value") - asl(ASL0) - size(40) - } - field(POSV, DBF_STRING) { - special(SPC_NOMOD) - prompt("Previous output string value") - size(40) - } - field(PA, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Value of A") - } - field(PB, DBF_DOUBLE) { - prompt("Prev Value of B") - interest(3) - special(SPC_NOMOD) - } - field(PC, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of C") - } - field(PD, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of D") - } - field(PE, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Value of E") - } - field(PF, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Value of F") - } - field(PG, DBF_DOUBLE) { - prompt("Prev Value of G") - special(SPC_NOMOD) - interest(3) - } - field(PH, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Value of H") - } - field(PI, DBF_DOUBLE) { - prompt("Prev Value of I") - interest(3) - special(SPC_NOMOD) - } - field(PJ, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Value of J") - } - field(PK, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of K") - } - field(PL, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of L") - } - field(POVL, DBF_DOUBLE) { - prompt("Prev Value of OVAL") - asl(ASL0) - } - field(LALM, DBF_DOUBLE) { - prompt("Last Value Alarmed") - special(SPC_NOMOD) - interest(3) - } - field(ALST, DBF_DOUBLE) { - prompt("Last Value Archived") - interest(3) - special(SPC_NOMOD) - } - field(MLST, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Last Val Monitored") - } - field(RPCL, DBF_NOACCESS) { - prompt("Postfix Calc") - special(SPC_NOMOD) - interest(4) - extra("unsigned char rpcl[282]") - } - field(ORPC, DBF_NOACCESS) { - extra("unsigned char orpc[282]") - special(SPC_NOMOD) - interest(4) - prompt("Postfix OCalc") - } -} -device(scalcout, CONSTANT, devsCalcoutSoft, "Soft Channel") -device(scalcout, INST_IO, devscalcoutStream, "stream") -recordtype(acalcout) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - field(NAME, DBF_STRING) { - prompt("Record Name") - special(SPC_NOMOD) - size(61) - } - field(DESC, DBF_STRING) { - size(41) - prompt("Descriptor") - promptgroup("10 - Common") - } - field(ASG, DBF_STRING) { - prompt("Access Security Group") - special(SPC_AS) - promptgroup("10 - Common") - size(29) - } - field(SCAN, DBF_MENU) { - menu(menuScan) - prompt("Scan Mechanism") - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - } - field(PINI, DBF_MENU) { - prompt("Process at iocInit") - interest(1) - promptgroup("20 - Scan") - menu(menuPini) - } - field(PHAS, DBF_SHORT) { - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - prompt("Scan Phase") - } - field(EVNT, DBF_STRING) { - prompt("Event Name") - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) - size(40) - } - field(TSE, DBF_SHORT) { - interest(1) - promptgroup("20 - Scan") - prompt("Time Stamp Event") - } - field(TSEL, DBF_INLINK) { - prompt("Time Stamp Link") - interest(1) - promptgroup("20 - Scan") - } - field(DTYP, DBF_DEVICE) { - prompt("Device Type") - promptgroup("10 - Common") - interest(1) - } - field(DISV, DBF_SHORT) { - promptgroup("20 - Scan") - prompt("Disable Value") - initial("1") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Scanning Disable") - } - field(MLOK, DBF_NOACCESS) { - extra("epicsMutexId mlok") - prompt("Monitor lock") - interest(4) - special(SPC_NOMOD) - } - field(MLIS, DBF_NOACCESS) { - extra("ELLLIST mlis") - interest(4) - special(SPC_NOMOD) - prompt("Monitor List") - } - field(BKLNK, DBF_NOACCESS) { - extra("ELLLIST bklnk") - prompt("Backwards link tracking") - interest(4) - special(SPC_NOMOD) - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - prompt("Force Processing") - interest(3) - pp(TRUE) - } - field(STAT, DBF_MENU) { - prompt("Alarm Status") - special(SPC_NOMOD) - menu(menuAlarmStat) - initial("UDF") - } - field(SEVR, DBF_MENU) { - menu(menuAlarmSevr) - special(SPC_NOMOD) - prompt("Alarm Severity") - } - field(NSTA, DBF_MENU) { - prompt("New Alarm Status") - special(SPC_NOMOD) - interest(2) - menu(menuAlarmStat) - } - field(NSEV, DBF_MENU) { - menu(menuAlarmSevr) - prompt("New Alarm Severity") - interest(2) - special(SPC_NOMOD) - } - field(ACKS, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Alarm Ack Severity") - special(SPC_NOMOD) - interest(2) - } - field(ACKT, DBF_MENU) { - promptgroup("70 - Alarm") - interest(2) - special(SPC_NOMOD) - prompt("Alarm Ack Transient") - menu(menuYesNo) - initial("YES") - } - field(DISS, DBF_MENU) { - menu(menuAlarmSevr) - interest(1) - promptgroup("70 - Alarm") - prompt("Disable Alarm Sevrty") - } - field(LCNT, DBF_UCHAR) { - prompt("Lock Count") - interest(2) - special(SPC_NOMOD) - } - field(PACT, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Record active") - } - field(PUTF, DBF_UCHAR) { - prompt("dbPutField process") - special(SPC_NOMOD) - interest(1) - } - field(RPRO, DBF_UCHAR) { - prompt("Reprocess ") - interest(1) - special(SPC_NOMOD) - } - field(ASP, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Access Security Pvt") - extra("struct asgMember *asp") - } - field(PPN, DBF_NOACCESS) { - extra("struct processNotify *ppn") - interest(4) - special(SPC_NOMOD) - prompt("pprocessNotify") - } - field(PPNR, DBF_NOACCESS) { - extra("struct processNotifyRecord *ppnr") - special(SPC_NOMOD) - interest(4) - prompt("pprocessNotifyRecord") - } - field(SPVT, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Scan Private") - extra("struct scan_element *spvt") - } - field(RSET, DBF_NOACCESS) { - extra("struct typed_rset *rset") - prompt("Address of RSET") - special(SPC_NOMOD) - interest(4) - } - field(DSET, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("DSET address") - extra("struct dset *dset") - } - field(DPVT, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Device Private") - extra("void *dpvt") - } - field(RDES, DBF_NOACCESS) { - extra("struct dbRecordType *rdes") - interest(4) - special(SPC_NOMOD) - prompt("Address of dbRecordType") - } - field(LSET, DBF_NOACCESS) { - extra("struct lockRecord *lset") - special(SPC_NOMOD) - interest(4) - prompt("Lock Set") - } - field(PRIO, DBF_MENU) { - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - prompt("Scheduling Priority") - menu(menuPriority) - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - interest(1) - special(SPC_NOMOD) - prompt("Break Point") - extra("char bkpt") - } - field(UDF, DBF_UCHAR) { - interest(1) - promptgroup("10 - Common") - prompt("Undefined") - pp(TRUE) - initial("1") - } - field(UDFS, DBF_MENU) { - prompt("Undefined Alarm Sevrty") - promptgroup("70 - Alarm") - interest(1) - menu(menuAlarmSevr) - initial("INVALID") - } - field(TIME, DBF_NOACCESS) { - extra("epicsTimeStamp time") - interest(2) - special(SPC_NOMOD) - prompt("Time") - } - field(FLNK, DBF_FWDLINK) { - promptgroup("20 - Scan") - interest(1) - prompt("Forward Process Link") - } - field(VERS, DBF_DOUBLE) { - initial("1") - special(SPC_NOMOD) - prompt("Code Version") - } - field(RPVT, DBF_NOACCESS) { - size(4) - extra("void *rpvt") - prompt("Record Private") - special(SPC_NOMOD) - interest(4) - } - field(VAL, DBF_DOUBLE) { - asl(ASL0) - prompt("Result") - } - field(AVAL, DBF_NOACCESS) { - pp(TRUE) - extra("double *aval") - asl(ASL0) - prompt("Array Value") - special(SPC_DBADDR) - } - field(NELM, DBF_ULONG) { - prompt("Number of Elements") - interest(1) - special(SPC_NOMOD) - promptgroup("30 - Action") - initial("1") - } - field(NUSE, DBF_ULONG) { - pp(TRUE) - initial("0") - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - prompt("# elem's in use") - } - field(PVAL, DBF_DOUBLE) { - prompt("Previous Value") - } - field(PAVL, DBF_NOACCESS) { - prompt("Prev. Array Value") - asl(ASL0) - extra("double *pavl") - pp(TRUE) - } - field(CALC, DBF_STRING) { - pp(TRUE) - size(80) - promptgroup("30 - Action") - special(SPC_MOD) - prompt("Calculation") - } - field(CLCV, DBF_LONG) { - prompt("CALC Valid") - interest(1) - } - field(INPA, DBF_INLINK) { - prompt("Input A") - promptgroup("30 - Action") - interest(1) - special(SPC_MOD) - } - field(INPB, DBF_INLINK) { - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - prompt("Input B") - } - field(INPC, DBF_INLINK) { - interest(1) - promptgroup("30 - Action") - special(SPC_MOD) - prompt("Input C") - } - field(INPD, DBF_INLINK) { - prompt("Input D") - promptgroup("30 - Action") - interest(1) - special(SPC_MOD) - } - field(INPE, DBF_INLINK) { - special(SPC_MOD) - interest(1) - promptgroup("30 - Action") - prompt("Input E") - } - field(INPF, DBF_INLINK) { - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - prompt("Input F") - } - field(INPG, DBF_INLINK) { - prompt("Input G") - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - } - field(INPH, DBF_INLINK) { - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - prompt("Input H") - } - field(INPI, DBF_INLINK) { - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - prompt("Input I") - } - field(INPJ, DBF_INLINK) { - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - prompt("Input J") - } - field(INPK, DBF_INLINK) { - promptgroup("30 - Action") - interest(1) - special(SPC_MOD) - prompt("Input K") - } - field(INPL, DBF_INLINK) { - prompt("Input L") - promptgroup("30 - Action") - interest(1) - special(SPC_MOD) - } - field(INAA, DBF_INLINK) { - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - prompt("Array input AA") - } - field(INBB, DBF_INLINK) { - special(SPC_MOD) - interest(1) - promptgroup("30 - Action") - prompt("Array input BB") - } - field(INCC, DBF_INLINK) { - prompt("Array input CC") - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - } - field(INDD, DBF_INLINK) { - prompt("Array input DD") - promptgroup("30 - Action") - interest(1) - special(SPC_MOD) - } - field(INEE, DBF_INLINK) { - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - prompt("Array input EE") - } - field(INFF, DBF_INLINK) { - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - prompt("Array input FF") - } - field(INGG, DBF_INLINK) { - special(SPC_MOD) - interest(1) - promptgroup("30 - Action") - prompt("Array input GG") - } - field(INHH, DBF_INLINK) { - special(SPC_MOD) - interest(1) - promptgroup("30 - Action") - prompt("Array input HH") - } - field(INII, DBF_INLINK) { - prompt("Array input II") - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - } - field(INJJ, DBF_INLINK) { - special(SPC_MOD) - interest(1) - promptgroup("30 - Action") - prompt("Array input JJ") - } - field(INKK, DBF_INLINK) { - prompt("Array input KK") - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - } - field(INLL, DBF_INLINK) { - prompt("Array input LL") - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - } - field(OUT, DBF_OUTLINK) { - prompt("Output Link") - interest(1) - special(SPC_MOD) - promptgroup("50 - Output") - } - field(INAV, DBF_MENU) { - initial("1") - interest(1) - special(SPC_NOMOD) - prompt("INPA PV Status") - menu(acalcoutINAV) - } - field(INBV, DBF_MENU) { - menu(acalcoutINAV) - interest(1) - special(SPC_NOMOD) - prompt("INPB PV Status") - initial("1") - } - field(INCV, DBF_MENU) { - initial("1") - prompt("INPC PV Status") - special(SPC_NOMOD) - interest(1) - menu(acalcoutINAV) - } - field(INDV, DBF_MENU) { - menu(acalcoutINAV) - interest(1) - special(SPC_NOMOD) - prompt("INPD PV Status") - initial("1") - } - field(INEV, DBF_MENU) { - initial("1") - menu(acalcoutINAV) - prompt("INPE PV Status") - special(SPC_NOMOD) - interest(1) - } - field(INFV, DBF_MENU) { - initial("1") - menu(acalcoutINAV) - prompt("INPF PV Status") - interest(1) - special(SPC_NOMOD) - } - field(INGV, DBF_MENU) { - menu(acalcoutINAV) - prompt("INPG PV Status") - special(SPC_NOMOD) - interest(1) - initial("1") - } - field(INHV, DBF_MENU) { - interest(1) - special(SPC_NOMOD) - prompt("INPH PV Status") - menu(acalcoutINAV) - initial("1") - } - field(INIV, DBF_MENU) { - initial("1") - menu(acalcoutINAV) - interest(1) - special(SPC_NOMOD) - prompt("INPI PV Status") - } - field(INJV, DBF_MENU) { - initial("1") - special(SPC_NOMOD) - interest(1) - prompt("INPJ PV Status") - menu(acalcoutINAV) - } - field(INKV, DBF_MENU) { - initial("1") - special(SPC_NOMOD) - interest(1) - prompt("INPK PV Status") - menu(acalcoutINAV) - } - field(INLV, DBF_MENU) { - interest(1) - special(SPC_NOMOD) - prompt("INPL PV Status") - menu(acalcoutINAV) - initial("1") - } - field(IAAV, DBF_MENU) { - menu(acalcoutINAV) - interest(1) - special(SPC_NOMOD) - prompt("INAA PV Status") - initial("1") - } - field(IBBV, DBF_MENU) { - interest(1) - special(SPC_NOMOD) - prompt("INBB PV Status") - menu(acalcoutINAV) - initial("1") - } - field(ICCV, DBF_MENU) { - initial("1") - special(SPC_NOMOD) - interest(1) - prompt("INCC PV Status") - menu(acalcoutINAV) - } - field(IDDV, DBF_MENU) { - initial("1") - prompt("INDD PV Status") - special(SPC_NOMOD) - interest(1) - menu(acalcoutINAV) - } - field(IEEV, DBF_MENU) { - menu(acalcoutINAV) - prompt("INEE PV Status") - interest(1) - special(SPC_NOMOD) - initial("1") - } - field(IFFV, DBF_MENU) { - initial("1") - prompt("INFF PV Status") - special(SPC_NOMOD) - interest(1) - menu(acalcoutINAV) - } - field(IGGV, DBF_MENU) { - menu(acalcoutINAV) - prompt("INGG PV Status") - interest(1) - special(SPC_NOMOD) - initial("1") - } - field(IHHV, DBF_MENU) { - initial("1") - prompt("INHH PV Status") - interest(1) - special(SPC_NOMOD) - menu(acalcoutINAV) - } - field(IIIV, DBF_MENU) { - initial("1") - menu(acalcoutINAV) - prompt("INII PV Status") - interest(1) - special(SPC_NOMOD) - } - field(IJJV, DBF_MENU) { - initial("1") - prompt("INJJ PV Status") - interest(1) - special(SPC_NOMOD) - menu(acalcoutINAV) - } - field(IKKV, DBF_MENU) { - menu(acalcoutINAV) - prompt("INKK PV Status") - special(SPC_NOMOD) - interest(1) - initial("1") - } - field(ILLV, DBF_MENU) { - initial("1") - menu(acalcoutINAV) - interest(1) - special(SPC_NOMOD) - prompt("INLL PV Status") - } - field(OUTV, DBF_MENU) { - menu(acalcoutINAV) - prompt("OUT PV Status") - interest(1) - special(SPC_NOMOD) - } - field(OOPT, DBF_MENU) { - prompt("Output Execute Opt") - interest(1) - promptgroup("30 - Action") - menu(acalcoutOOPT) - } - field(ODLY, DBF_DOUBLE) { - interest(1) - promptgroup("70 - Alarm") - prompt("Output Execute Delay") - asl(ASL0) - } - field(WAIT, DBF_MENU) { - interest(1) - prompt("Wait for completion?") - menu(acalcoutWAIT) - } - field(DLYA, DBF_USHORT) { - asl(ASL0) - special(SPC_NOMOD) - prompt("Output Delay Active") - } - field(DOPT, DBF_MENU) { - menu(acalcoutDOPT) - prompt("Output Data Opt") - promptgroup("30 - Action") - interest(1) - } - field(OCAL, DBF_STRING) { - pp(TRUE) - size(80) - prompt("Output Calculation") - promptgroup("30 - Action") - special(SPC_MOD) - } - field(OCLV, DBF_LONG) { - prompt("OCAL Valid") - interest(1) - } - field(OEVT, DBF_USHORT) { - promptgroup("30 - Action") - prompt("Event To Issue") - asl(ASL0) - } - field(IVOA, DBF_MENU) { - prompt("INVALID output action") - interest(2) - promptgroup("50 - Output") - menu(menuIvoa) - } - field(IVOV, DBF_DOUBLE) { - promptgroup("50 - Output") - interest(2) - prompt("INVALID output value") - } - field(EGU, DBF_STRING) { - size(16) - interest(1) - promptgroup("80 - Display") - prompt("Units Name") - } - field(PREC, DBF_SHORT) { - prompt("Display Precision") - interest(1) - promptgroup("80 - Display") - } - field(HOPR, DBF_DOUBLE) { - prompt("High Operating Rng") - promptgroup("80 - Display") - interest(1) - } - field(LOPR, DBF_DOUBLE) { - interest(1) - promptgroup("80 - Display") - prompt("Low Operating Range") - } - field(HIHI, DBF_DOUBLE) { - pp(TRUE) - promptgroup("70 - Alarm") - interest(1) - prompt("Hihi Alarm Limit") - } - field(LOLO, DBF_DOUBLE) { - prompt("Lolo Alarm Limit") - promptgroup("70 - Alarm") - interest(1) - pp(TRUE) - } - field(HIGH, DBF_DOUBLE) { - promptgroup("70 - Alarm") - interest(1) - prompt("High Alarm Limit") - pp(TRUE) - } - field(LOW, DBF_DOUBLE) { - pp(TRUE) - promptgroup("70 - Alarm") - interest(1) - prompt("Low Alarm Limit") - } - field(HHSV, DBF_MENU) { - menu(menuAlarmSevr) - interest(1) - promptgroup("70 - Alarm") - prompt("Hihi Severity") - pp(TRUE) - } - field(LLSV, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Lolo Severity") - interest(1) - promptgroup("70 - Alarm") - pp(TRUE) - } - field(HSV, DBF_MENU) { - menu(menuAlarmSevr) - interest(1) - promptgroup("70 - Alarm") - prompt("High Severity") - pp(TRUE) - } - field(LSV, DBF_MENU) { - menu(menuAlarmSevr) - promptgroup("70 - Alarm") - interest(1) - prompt("Low Severity") - pp(TRUE) - } - field(HYST, DBF_DOUBLE) { - prompt("Alarm Deadband") - promptgroup("70 - Alarm") - interest(1) - } - field(ADEL, DBF_DOUBLE) { - prompt("Archive Deadband") - interest(1) - promptgroup("80 - Display") - } - field(MDEL, DBF_DOUBLE) { - promptgroup("80 - Display") - interest(1) - prompt("Monitor Deadband") - } - field(A, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input A") - } - field(B, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input B") - } - field(C, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input C") - } - field(D, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input D") - } - field(E, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input E") - } - field(F, DBF_DOUBLE) { - prompt("Value of Input F") - pp(TRUE) - } - field(G, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input G") - } - field(H, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input H") - } - field(I, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input I") - } - field(J, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input J") - } - field(K, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input K") - } - field(L, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input L") - } - field(AA, DBF_NOACCESS) { - pp(TRUE) - extra("double *aa") - prompt("Value of array input") - special(SPC_DBADDR) - asl(ASL0) - } - field(BB, DBF_NOACCESS) { - special(SPC_DBADDR) - prompt("Value of array input") - asl(ASL0) - extra("double *bb") - pp(TRUE) - } - field(CC, DBF_NOACCESS) { - extra("double *cc") - pp(TRUE) - asl(ASL0) - special(SPC_DBADDR) - prompt("Value of array input") - } - field(DD, DBF_NOACCESS) { - special(SPC_DBADDR) - prompt("Value of array input") - asl(ASL0) - extra("double *dd") - pp(TRUE) - } - field(EE, DBF_NOACCESS) { - special(SPC_DBADDR) - prompt("Value of array input") - asl(ASL0) - extra("double *ee") - pp(TRUE) - } - field(FF, DBF_NOACCESS) { - asl(ASL0) - prompt("Value of array input") - special(SPC_DBADDR) - pp(TRUE) - extra("double *ff") - } - field(GG, DBF_NOACCESS) { - prompt("Value of array input") - special(SPC_DBADDR) - asl(ASL0) - pp(TRUE) - extra("double *gg") - } - field(HH, DBF_NOACCESS) { - asl(ASL0) - prompt("Value of array input") - special(SPC_DBADDR) - pp(TRUE) - extra("double *hh") - } - field(II, DBF_NOACCESS) { - asl(ASL0) - special(SPC_DBADDR) - prompt("Value of array input") - extra("double *ii") - pp(TRUE) - } - field(JJ, DBF_NOACCESS) { - extra("double *jj") - pp(TRUE) - special(SPC_DBADDR) - prompt("Value of array input") - asl(ASL0) - } - field(KK, DBF_NOACCESS) { - extra("double *kk") - pp(TRUE) - asl(ASL0) - special(SPC_DBADDR) - prompt("Value of array input") - } - field(LL, DBF_NOACCESS) { - asl(ASL0) - special(SPC_DBADDR) - prompt("Value of array input") - extra("double *ll") - pp(TRUE) - } - field(PAA, DBF_NOACCESS) { - extra("double *paa") - prompt("Prev Val of array input") - asl(ASL0) - } - field(NEWM, DBF_ULONG) { - prompt("new array value mask") - special(SPC_NOMOD) - asl(ASL0) - } - field(OVAL, DBF_DOUBLE) { - prompt("Output Value") - asl(ASL0) - } - field(OAV, DBF_NOACCESS) { - pp(TRUE) - extra("double *oav") - asl(ASL0) - prompt("Output array value") - special(SPC_DBADDR) - } - field(POAV, DBF_NOACCESS) { - prompt("Output array value") - asl(ASL0) - pp(TRUE) - extra("double *poav") - } - field(PA, DBF_DOUBLE) { - prompt("Prev Value of A") - special(SPC_NOMOD) - interest(3) - } - field(PB, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of B") - } - field(PC, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of C") - } - field(PD, DBF_DOUBLE) { - prompt("Prev Value of D") - special(SPC_NOMOD) - interest(3) - } - field(PE, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Value of E") - } - field(PF, DBF_DOUBLE) { - prompt("Prev Value of F") - special(SPC_NOMOD) - interest(3) - } - field(PG, DBF_DOUBLE) { - prompt("Prev Value of G") - special(SPC_NOMOD) - interest(3) - } - field(PH, DBF_DOUBLE) { - prompt("Prev Value of H") - special(SPC_NOMOD) - interest(3) - } - field(PI, DBF_DOUBLE) { - prompt("Prev Value of I") - interest(3) - special(SPC_NOMOD) - } - field(PJ, DBF_DOUBLE) { - prompt("Prev Value of J") - special(SPC_NOMOD) - interest(3) - } - field(PK, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Value of K") - } - field(PL, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of L") - } - field(POVL, DBF_DOUBLE) { - asl(ASL0) - prompt("Prev Value of OVAL") - } - field(LALM, DBF_DOUBLE) { - prompt("Last Value Alarmed") - interest(3) - special(SPC_NOMOD) - } - field(ALST, DBF_DOUBLE) { - prompt("Last Value Archived") - interest(3) - special(SPC_NOMOD) - } - field(MLST, DBF_DOUBLE) { - prompt("Last Val Monitored") - special(SPC_NOMOD) - interest(3) - } - field(RPCL, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Reverse Polish Calc") - extra("unsigned char rpcl[282]") - } - field(ORPC, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Reverse Polish OCalc") - extra("unsigned char orpc[282]") - } - field(CACT, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Calc active") - } - field(CSTAT, DBF_LONG) { - prompt("Calc status") - special(SPC_NOMOD) - interest(1) - } - field(AMASK, DBF_ULONG) { - interest(1) - special(SPC_NOMOD) - prompt("Array mod") - } - field(SIZE, DBF_MENU) { - menu(acalcoutSIZE) - interest(1) - prompt("Array size reported to clients") - } - field(AMEM, DBF_LONG) { - prompt("Allocated array memory") - special(SPC_NOMOD) - interest(1) - } - field(PMEM, DBF_LONG) { - special(SPC_NOMOD) - interest(1) - prompt("Prev array memory") - } -} -device(acalcout, CONSTANT, devaCalcoutSoft, "Soft Channel") -recordtype(stringout) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - %#include "callback.h" - field(NAME, DBF_STRING) { - size(61) - special(SPC_NOMOD) - prompt("Record Name") - } - field(DESC, DBF_STRING) { - size(41) - promptgroup("10 - Common") - prompt("Descriptor") - } - field(ASG, DBF_STRING) { - size(29) - special(SPC_AS) - promptgroup("10 - Common") - prompt("Access Security Group") - } - field(SCAN, DBF_MENU) { - menu(menuScan) - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) - prompt("Scan Mechanism") - } - field(PINI, DBF_MENU) { - promptgroup("20 - Scan") - interest(1) - prompt("Process at iocInit") - menu(menuPini) - } - field(PHAS, DBF_SHORT) { - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - prompt("Scan Phase") - } - field(EVNT, DBF_STRING) { - size(40) - prompt("Event Name") - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") } field(TSE, DBF_SHORT) { interest(1) @@ -4739,24 +17899,24 @@ } field(SDIS, DBF_INLINK) { prompt("Scanning Disable") - interest(1) - promptgroup("20 - Scan") + promptgroup("20 - Scan") + interest(1) } field(MLOK, DBF_NOACCESS) { extra("epicsMutexId mlok") - interest(4) - special(SPC_NOMOD) prompt("Monitor lock") + interest(4) + special(SPC_NOMOD) } field(MLIS, DBF_NOACCESS) { prompt("Monitor List") - interest(4) - special(SPC_NOMOD) extra("ELLLIST mlis") + interest(4) + special(SPC_NOMOD) } field(BKLNK, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) + special(SPC_NOMOD) + interest(4) prompt("Backwards link tracking") extra("ELLLIST bklnk") } @@ -4764,52 +17924,52 @@ prompt("Disable putField") } field(PROC, DBF_UCHAR) { - pp(TRUE) prompt("Force Processing") interest(3) + pp(TRUE) } field(STAT, DBF_MENU) { - menu(menuAlarmStat) - special(SPC_NOMOD) prompt("Alarm Status") initial("UDF") + menu(menuAlarmStat) + special(SPC_NOMOD) } field(SEVR, DBF_MENU) { prompt("Alarm Severity") - special(SPC_NOMOD) - menu(menuAlarmSevr) + menu(menuAlarmSevr) + special(SPC_NOMOD) } field(NSTA, DBF_MENU) { special(SPC_NOMOD) + menu(menuAlarmStat) interest(2) prompt("New Alarm Status") - menu(menuAlarmStat) } field(NSEV, DBF_MENU) { prompt("New Alarm Severity") - interest(2) - special(SPC_NOMOD) - menu(menuAlarmSevr) + menu(menuAlarmSevr) + interest(2) + special(SPC_NOMOD) } field(ACKS, DBF_MENU) { interest(2) + menu(menuAlarmSevr) special(SPC_NOMOD) prompt("Alarm Ack Severity") - menu(menuAlarmSevr) } field(ACKT, DBF_MENU) { initial("YES") prompt("Alarm Ack Transient") - promptgroup("70 - Alarm") - interest(2) - special(SPC_NOMOD) - menu(menuYesNo) + interest(2) + menu(menuYesNo) + special(SPC_NOMOD) + promptgroup("70 - Alarm") } field(DISS, DBF_MENU) { - promptgroup("70 - Alarm") - interest(1) + interest(1) + menu(menuAlarmSevr) + promptgroup("70 - Alarm") prompt("Disable Alarm Sevrty") - menu(menuAlarmSevr) } field(LCNT, DBF_UCHAR) { interest(2) @@ -4817,103 +17977,103 @@ prompt("Lock Count") } field(PACT, DBF_UCHAR) { - special(SPC_NOMOD) - interest(1) + interest(1) + special(SPC_NOMOD) prompt("Record active") } field(PUTF, DBF_UCHAR) { - special(SPC_NOMOD) - interest(1) prompt("dbPutField process") + interest(1) + special(SPC_NOMOD) } field(RPRO, DBF_UCHAR) { - special(SPC_NOMOD) - interest(1) + interest(1) + special(SPC_NOMOD) prompt("Reprocess ") } field(ASP, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) + extra("struct asgMember *asp") prompt("Access Security Pvt") - extra("struct asgMember *asp") + special(SPC_NOMOD) + interest(4) } field(PPN, DBF_NOACCESS) { extra("struct processNotify *ppn") prompt("pprocessNotify") - interest(4) - special(SPC_NOMOD) + special(SPC_NOMOD) + interest(4) } field(PPNR, DBF_NOACCESS) { + extra("struct processNotifyRecord *ppnr") prompt("pprocessNotifyRecord") interest(4) special(SPC_NOMOD) - extra("struct processNotifyRecord *ppnr") } field(SPVT, DBF_NOACCESS) { special(SPC_NOMOD) interest(4) + extra("struct scan_element *spvt") prompt("Scan Private") - extra("struct scan_element *spvt") } field(RSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) prompt("Address of RSET") - special(SPC_NOMOD) - interest(4) extra("struct typed_rset *rset") } field(DSET, DBF_NOACCESS) { + prompt("DSET address") extra("struct dset *dset") - prompt("DSET address") interest(4) special(SPC_NOMOD) } field(DPVT, DBF_NOACCESS) { extra("void *dpvt") - special(SPC_NOMOD) - interest(4) prompt("Device Private") + special(SPC_NOMOD) + interest(4) } field(RDES, DBF_NOACCESS) { + prompt("Address of dbRecordType") extra("struct dbRecordType *rdes") interest(4) special(SPC_NOMOD) - prompt("Address of dbRecordType") } field(LSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) extra("struct lockRecord *lset") - special(SPC_NOMOD) - interest(4) prompt("Lock Set") } field(PRIO, DBF_MENU) { + prompt("Scheduling Priority") + promptgroup("20 - Scan") menu(menuPriority) - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - prompt("Scheduling Priority") + interest(1) + special(SPC_SCAN) } field(TPRO, DBF_UCHAR) { prompt("Trace Processing") } field(BKPT, DBF_NOACCESS) { prompt("Break Point") - special(SPC_NOMOD) - interest(1) extra("char bkpt") + special(SPC_NOMOD) + interest(1) } field(UDF, DBF_UCHAR) { - interest(1) - promptgroup("10 - Common") + pp(TRUE) + promptgroup("10 - Common") + interest(1) prompt("Undefined") initial("1") - pp(TRUE) } field(UDFS, DBF_MENU) { menu(menuAlarmSevr) - promptgroup("70 - Alarm") - interest(1) + interest(1) + promptgroup("70 - Alarm") + initial("INVALID") prompt("Undefined Alarm Sevrty") - initial("INVALID") } field(TIME, DBF_NOACCESS) { interest(2) @@ -4926,116 +18086,498 @@ promptgroup("20 - Scan") interest(1) } - field(VAL, DBF_STRING) { - pp(TRUE) - size(40) - asl(ASL0) - promptgroup("50 - Output") - prompt("Current Value") - } - field(OVAL, DBF_STRING) { - size(40) - prompt("Previous Value") - special(SPC_NOMOD) - interest(3) - } - field(DOL, DBF_INLINK) { - promptgroup("40 - Input") - interest(1) - prompt("Desired Output Loc") - } - field(OMSL, DBF_MENU) { - prompt("Output Mode Select") - interest(1) - promptgroup("50 - Output") - menu(menuOmsl) - } - field(OUT, DBF_OUTLINK) { - prompt("Output Specification") - promptgroup("50 - Output") - interest(1) - } - field(MPST, DBF_MENU) { - interest(1) - promptgroup("80 - Display") - prompt("Post Value Monitors") - menu(stringoutPOST) - } - field(APST, DBF_MENU) { - menu(stringoutPOST) - prompt("Post Archive Monitors") - promptgroup("80 - Display") - interest(1) - } - field(SIOL, DBF_OUTLINK) { - prompt("Simulation Output Link") - promptgroup("90 - Simulate") - interest(1) - } - field(SIML, DBF_INLINK) { - prompt("Simulation Mode Link") - promptgroup("90 - Simulate") - interest(1) - } - field(SIMM, DBF_MENU) { - interest(1) - special(SPC_MOD) - prompt("Simulation Mode") - menu(menuYesNo) - } - field(SIMS, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Simulation Mode Severity") - interest(2) - promptgroup("90 - Simulate") - } - field(OLDSIMM, DBF_MENU) { - prompt("Prev. Simulation Mode") - special(SPC_NOMOD) - interest(4) - menu(menuSimm) - } - field(SSCN, DBF_MENU) { - initial("65535") - promptgroup("90 - Simulate") - interest(1) - prompt("Sim. Mode Scan") - menu(menuScan) - } - field(SDLY, DBF_DOUBLE) { - interest(2) - promptgroup("90 - Simulate") - prompt("Sim. Mode Async Delay") - initial("-1.0") - } - field(SIMPVT, DBF_NOACCESS) { - prompt("Sim. Mode Private") - special(SPC_NOMOD) - interest(4) - extra("CALLBACK *simpvt") - } - field(IVOA, DBF_MENU) { - interest(2) - promptgroup("50 - Output") - prompt("INVALID output action") - menu(menuIvoa) - } - field(IVOV, DBF_STRING) { - promptgroup("50 - Output") - interest(2) - prompt("INVALID output value") - size(40) - } -} -device(stringout, CONSTANT, devSoSoft, "Soft Channel") -device(stringout, CONSTANT, devSoSoftCallback, "Async Soft Channel") -device(stringout, INST_IO, devSoStdio, "stdio") -device(stringout, INST_IO, asynSoOctetWrite, "asynOctetWrite") -device(stringout, INST_IO, devstringoutStream, "stream") -device(stringout, INST_IO, devSoStrParm, "asyn so stringParm") -device(stringout, INST_IO, devSoEurotherm, "asyn so Eurotherm") -device(stringout, INST_IO, devSoMPC, "asyn MPC") -recordtype(stringin) { + field(VAL, DBF_LONG) { + interest(4) + prompt("Value field (unused)") + asl(ASL0) + } + field(PORT, DBF_STRING) { + initial("") + size(40) + prompt("asyn port") + interest(1) + special(SPC_MOD) + promptgroup("40 - Input") + } + field(ADDR, DBF_LONG) { + prompt("asyn address") + initial("0") + promptgroup("40 - Input") + interest(1) + special(SPC_MOD) + } + field(PCNCT, DBF_MENU) { + prompt("Port Connect/Disconnect") + menu(asynCONNECT) + interest(2) + special(SPC_MOD) + } + field(DRVINFO, DBF_STRING) { + initial("") + size(40) + prompt("Driver info string") + interest(2) + special(SPC_MOD) + promptgroup("40 - Input") + } + field(REASON, DBF_LONG) { + interest(2) + special(SPC_MOD) + prompt("asynUser->reason") + } + field(TMOD, DBF_MENU) { + menu(asynTMOD) + interest(1) + promptgroup("40 - Input") + prompt("Transaction mode") + } + field(TMOT, DBF_DOUBLE) { + interest(1) + promptgroup("40 - Input") + initial("1.0") + prompt("Timeout (sec)") + } + field(IFACE, DBF_MENU) { + menu(asynINTERFACE) + interest(2) + special(SPC_MOD) + promptgroup("40 - Input") + prompt("Interface") + } + field(OCTETIV, DBF_LONG) { + prompt("asynOctet is valid") + interest(2) + } + field(OPTIONIV, DBF_LONG) { + interest(2) + prompt("asynOption is valid") + } + field(GPIBIV, DBF_LONG) { + interest(2) + prompt("asynGPIB is valid") + } + field(I32IV, DBF_LONG) { + interest(2) + prompt("asynInt32 is valid") + } + field(UI32IV, DBF_LONG) { + interest(2) + prompt("asynUInt32Digital is valid") + } + field(F64IV, DBF_LONG) { + prompt("asynFloat64 is valid") + interest(2) + } + field(AOUT, DBF_STRING) { + promptgroup("50 - Output") + pp(TRUE) + interest(1) + prompt("Output (command) string") + size(40) + } + field(OEOS, DBF_STRING) { + special(SPC_MOD) + interest(1) + promptgroup("50 - Output") + size(40) + prompt("Output delimiter") + } + field(BOUT, DBF_CHAR) { + pp(TRUE) + special(SPC_DBADDR) + interest(1) + prompt("Output binary data") + } + field(OPTR, DBF_NOACCESS) { + prompt("Output buffer pointer") + extra("void *optr") + interest(4) + special(SPC_NOMOD) + } + field(OMAX, DBF_LONG) { + prompt("Max. size of output array") + initial("80") + promptgroup("50 - Output") + special(SPC_NOMOD) + interest(1) + } + field(NOWT, DBF_LONG) { + interest(1) + promptgroup("50 - Output") + initial("80") + prompt("Number of bytes to write") + } + field(NAWT, DBF_LONG) { + interest(1) + prompt("Number of bytes actually written") + } + field(OFMT, DBF_MENU) { + prompt("Output format") + promptgroup("50 - Output") + menu(asynFMT) + interest(1) + } + field(AINP, DBF_STRING) { + special(SPC_NOMOD) + interest(1) + prompt("Input (response) string") + size(40) + } + field(TINP, DBF_STRING) { + size(40) + asl(ASL0) + prompt("Translated input string") + special(SPC_NOMOD) + interest(1) + } + field(IEOS, DBF_STRING) { + special(SPC_MOD) + interest(1) + promptgroup("40 - Input") + size(40) + prompt("Input Delimiter") + } + field(BINP, DBF_CHAR) { + special(SPC_DBADDR) + prompt("Input binary data") + asl(ASL0) + } + field(IPTR, DBF_NOACCESS) { + extra("void *iptr") + size(4) + prompt("Input buffer pointer") + special(SPC_NOMOD) + interest(4) + } + field(IMAX, DBF_LONG) { + promptgroup("40 - Input") + interest(1) + special(SPC_NOMOD) + prompt("Max. size of input array") + initial("80") + } + field(NRRD, DBF_LONG) { + interest(1) + promptgroup("40 - Input") + prompt("Number of bytes to read") + } + field(NORD, DBF_LONG) { + prompt("Number of bytes read") + special(SPC_NOMOD) + interest(1) + } + field(IFMT, DBF_MENU) { + interest(1) + menu(asynFMT) + promptgroup("40 - Input") + prompt("Input format") + } + field(EOMR, DBF_MENU) { + prompt("EOM reason") + special(SPC_NOMOD) + menu(asynEOMREASON) + interest(1) + } + field(I32INP, DBF_LONG) { + prompt("asynInt32 input") + special(SPC_NOMOD) + interest(2) + } + field(I32OUT, DBF_LONG) { + interest(2) + promptgroup("50 - Output") + pp(TRUE) + prompt("asynInt32 output") + } + field(UI32INP, DBF_ULONG) { + interest(2) + special(SPC_NOMOD) + prompt("asynUInt32Digital input") + } + field(UI32OUT, DBF_ULONG) { + prompt("asynUInt32Digital output") + pp(TRUE) + promptgroup("50 - Output") + interest(2) + } + field(UI32MASK, DBF_ULONG) { + interest(2) + special(SPC_MOD) + promptgroup("50 - Output") + initial("0xffffffff") + prompt("asynUInt32Digital mask") + } + field(F64INP, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(2) + prompt("asynFloat64 input") + } + field(F64OUT, DBF_DOUBLE) { + prompt("asynFloat64 output") + interest(2) + promptgroup("50 - Output") + pp(TRUE) + } + field(BAUD, DBF_MENU) { + prompt("Baud rate") + promptgroup("40 - Input") + special(SPC_MOD) + interest(2) + menu(serialBAUD) + } + field(LBAUD, DBF_LONG) { + special(SPC_MOD) + interest(2) + promptgroup("40 - Input") + prompt("Baud rate") + } + field(PRTY, DBF_MENU) { + prompt("Parity") + special(SPC_MOD) + menu(serialPRTY) + interest(2) + promptgroup("40 - Input") + } + field(DBIT, DBF_MENU) { + special(SPC_MOD) + menu(serialDBIT) + interest(2) + promptgroup("40 - Input") + prompt("Data bits") + } + field(SBIT, DBF_MENU) { + special(SPC_MOD) + interest(2) + menu(serialSBIT) + promptgroup("40 - Input") + prompt("Stop bits") + } + field(MCTL, DBF_MENU) { + prompt("Modem control") + special(SPC_MOD) + interest(2) + menu(serialMCTL) + promptgroup("40 - Input") + } + field(FCTL, DBF_MENU) { + prompt("Flow control") + promptgroup("40 - Input") + special(SPC_MOD) + interest(2) + menu(serialFCTL) + } + field(IXON, DBF_MENU) { + special(SPC_MOD) + interest(2) + menu(serialIX) + promptgroup("40 - Input") + prompt("Output XON/XOFF") + } + field(IXOFF, DBF_MENU) { + promptgroup("40 - Input") + interest(2) + menu(serialIX) + special(SPC_MOD) + prompt("Input XON/XOFF") + } + field(IXANY, DBF_MENU) { + special(SPC_MOD) + menu(serialIX) + interest(2) + promptgroup("40 - Input") + prompt("XON=any character") + } + field(HOSTINFO, DBF_STRING) { + promptgroup("40 - Input") + interest(1) + special(SPC_MOD) + prompt("host info") + initial("") + size(40) + } + field(DRTO, DBF_MENU) { + promptgroup("40 - Input") + interest(2) + menu(ipDRTO) + special(SPC_MOD) + prompt("Disconnect on timeout") + } + field(UCMD, DBF_MENU) { + prompt("Universal command") + pp(TRUE) + promptgroup("50 - Output") + menu(gpibUCMD) + interest(2) + } + field(ACMD, DBF_MENU) { + prompt("Addressed command") + interest(2) + menu(gpibACMD) + pp(TRUE) + promptgroup("50 - Output") + } + field(SPR, DBF_UCHAR) { + special(SPC_NOMOD) + interest(2) + prompt("Serial poll response") + } + field(TMSK, DBF_LONG) { + interest(1) + special(SPC_MOD) + promptgroup("80 - Display") + prompt("Trace mask") + } + field(TB0, DBF_MENU) { + prompt("Trace error") + special(SPC_MOD) + menu(asynTRACE) + interest(1) + promptgroup("80 - Display") + } + field(TB1, DBF_MENU) { + prompt("Trace IO device") + promptgroup("80 - Display") + special(SPC_MOD) + menu(asynTRACE) + interest(1) + } + field(TB2, DBF_MENU) { + promptgroup("80 - Display") + special(SPC_MOD) + interest(1) + menu(asynTRACE) + prompt("Trace IO filter") + } + field(TB3, DBF_MENU) { + special(SPC_MOD) + menu(asynTRACE) + interest(1) + promptgroup("80 - Display") + prompt("Trace IO driver") + } + field(TB4, DBF_MENU) { + special(SPC_MOD) + interest(1) + menu(asynTRACE) + promptgroup("80 - Display") + prompt("Trace flow") + } + field(TB5, DBF_MENU) { + promptgroup("80 - Display") + special(SPC_MOD) + interest(1) + menu(asynTRACE) + prompt("Trace warning") + } + field(TIOM, DBF_LONG) { + promptgroup("80 - Display") + interest(1) + special(SPC_MOD) + prompt("Trace I/O mask") + } + field(TIB0, DBF_MENU) { + prompt("Trace IO ASCII") + promptgroup("80 - Display") + interest(1) + menu(asynTRACE) + special(SPC_MOD) + } + field(TIB1, DBF_MENU) { + menu(asynTRACE) + interest(1) + special(SPC_MOD) + promptgroup("80 - Display") + prompt("Trace IO escape") + } + field(TIB2, DBF_MENU) { + prompt("Trace IO hex") + special(SPC_MOD) + interest(1) + menu(asynTRACE) + promptgroup("80 - Display") + } + field(TINM, DBF_LONG) { + prompt("Trace Info mask") + promptgroup("80 - Display") + special(SPC_MOD) + interest(1) + } + field(TINB0, DBF_MENU) { + prompt("Trace Info Time") + promptgroup("80 - Display") + special(SPC_MOD) + interest(1) + menu(asynTRACE) + } + field(TINB1, DBF_MENU) { + promptgroup("80 - Display") + interest(1) + menu(asynTRACE) + special(SPC_MOD) + prompt("Trace Info Port") + } + field(TINB2, DBF_MENU) { + promptgroup("80 - Display") + special(SPC_MOD) + interest(1) + menu(asynTRACE) + prompt("Trace Info Source") + } + field(TINB3, DBF_MENU) { + promptgroup("80 - Display") + menu(asynTRACE) + interest(1) + special(SPC_MOD) + prompt("Trace Info Thread") + } + field(TSIZ, DBF_LONG) { + prompt("Trace IO truncate size") + promptgroup("80 - Display") + special(SPC_MOD) + interest(1) + } + field(TFIL, DBF_STRING) { + size(40) + prompt("Trace IO file") + special(SPC_MOD) + interest(1) + promptgroup("80 - Display") + } + field(AUCT, DBF_MENU) { + prompt("Autoconnect") + special(SPC_MOD) + interest(1) + menu(asynAUTOCONNECT) + promptgroup("40 - Input") + } + field(CNCT, DBF_MENU) { + interest(1) + menu(asynCONNECT) + special(SPC_MOD) + promptgroup("40 - Input") + prompt("Connect/Disconnect") + } + field(ENBL, DBF_MENU) { + promptgroup("40 - Input") + menu(asynENABLE) + interest(1) + special(SPC_MOD) + prompt("Enable/Disable") + } + field(ERRS, DBF_NOACCESS) { + special(SPC_DBADDR) + interest(4) + extra("char *errs") + prompt("Error string") + } + field(AQR, DBF_UCHAR) { + prompt("Abort queueRequest") + special(SPC_MOD) + interest(4) + } +} +device(asyn, INST_IO, asynRecordDevice, "asynRecordDevice") +recordtype(int64in) { %#include "epicsTypes.h" %#include "link.h" %#include "epicsMutex.h" @@ -5048,51 +18590,1695 @@ special(SPC_NOMOD) } field(DESC, DBF_STRING) { - size(41) + promptgroup("10 - Common") prompt("Descriptor") + size(41) + } + field(ASG, DBF_STRING) { + size(29) + prompt("Access Security Group") + special(SPC_AS) + promptgroup("10 - Common") + } + field(SCAN, DBF_MENU) { + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + menu(menuScan) + prompt("Scan Mechanism") + } + field(PINI, DBF_MENU) { + menu(menuPini) + interest(1) + promptgroup("20 - Scan") + prompt("Process at iocInit") + } + field(PHAS, DBF_SHORT) { + special(SPC_SCAN) + interest(1) + promptgroup("20 - Scan") + prompt("Scan Phase") + } + field(EVNT, DBF_STRING) { + size(40) + prompt("Event Name") + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + } + field(TSE, DBF_SHORT) { + interest(1) + promptgroup("20 - Scan") + prompt("Time Stamp Event") + } + field(TSEL, DBF_INLINK) { + prompt("Time Stamp Link") + promptgroup("20 - Scan") + interest(1) + } + field(DTYP, DBF_DEVICE) { + prompt("Device Type") + promptgroup("10 - Common") + interest(1) + } + field(DISV, DBF_SHORT) { + initial("1") + prompt("Disable Value") + promptgroup("20 - Scan") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + prompt("Scanning Disable") + promptgroup("20 - Scan") + interest(1) + } + field(MLOK, DBF_NOACCESS) { + extra("epicsMutexId mlok") + prompt("Monitor lock") + interest(4) + special(SPC_NOMOD) + } + field(MLIS, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("ELLLIST mlis") + prompt("Monitor List") + } + field(BKLNK, DBF_NOACCESS) { + extra("ELLLIST bklnk") + prompt("Backwards link tracking") + special(SPC_NOMOD) + interest(4) + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + interest(3) + pp(TRUE) + prompt("Force Processing") + } + field(STAT, DBF_MENU) { + prompt("Alarm Status") + initial("UDF") + menu(menuAlarmStat) + special(SPC_NOMOD) + } + field(SEVR, DBF_MENU) { + menu(menuAlarmSevr) + special(SPC_NOMOD) + prompt("Alarm Severity") + } + field(NSTA, DBF_MENU) { + interest(2) + menu(menuAlarmStat) + special(SPC_NOMOD) + prompt("New Alarm Status") + } + field(NSEV, DBF_MENU) { + prompt("New Alarm Severity") + interest(2) + menu(menuAlarmSevr) + special(SPC_NOMOD) + } + field(ACKS, DBF_MENU) { + prompt("Alarm Ack Severity") + interest(2) + menu(menuAlarmSevr) + special(SPC_NOMOD) + } + field(ACKT, DBF_MENU) { + menu(menuYesNo) + interest(2) + special(SPC_NOMOD) + promptgroup("70 - Alarm") + initial("YES") + prompt("Alarm Ack Transient") + } + field(DISS, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + prompt("Disable Alarm Sevrty") + } + field(LCNT, DBF_UCHAR) { + prompt("Lock Count") + interest(2) + special(SPC_NOMOD) + } + field(PACT, DBF_UCHAR) { + prompt("Record active") + interest(1) + special(SPC_NOMOD) + } + field(PUTF, DBF_UCHAR) { + prompt("dbPutField process") + interest(1) + special(SPC_NOMOD) + } + field(RPRO, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("Reprocess ") + } + field(ASP, DBF_NOACCESS) { + extra("struct asgMember *asp") + prompt("Access Security Pvt") + special(SPC_NOMOD) + interest(4) + } + field(PPN, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("pprocessNotify") + extra("struct processNotify *ppn") + } + field(PPNR, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct processNotifyRecord *ppnr") + prompt("pprocessNotifyRecord") + } + field(SPVT, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Scan Private") + extra("struct scan_element *spvt") + } + field(RSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Address of RSET") + extra("struct typed_rset *rset") + } + field(DSET, DBF_NOACCESS) { + prompt("DSET address") + extra("struct dset *dset") + special(SPC_NOMOD) + interest(4) + } + field(DPVT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Device Private") + extra("void *dpvt") + } + field(RDES, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct dbRecordType *rdes") + prompt("Address of dbRecordType") + } + field(LSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct lockRecord *lset") + prompt("Lock Set") + } + field(PRIO, DBF_MENU) { + special(SPC_SCAN) + interest(1) + menu(menuPriority) + promptgroup("20 - Scan") + prompt("Scheduling Priority") + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(1) + extra("char bkpt") + prompt("Break Point") + } + field(UDF, DBF_UCHAR) { + interest(1) + pp(TRUE) + promptgroup("10 - Common") + initial("1") + prompt("Undefined") + } + field(UDFS, DBF_MENU) { + promptgroup("70 - Alarm") + interest(1) + menu(menuAlarmSevr) + prompt("Undefined Alarm Sevrty") + initial("INVALID") + } + field(TIME, DBF_NOACCESS) { + prompt("Time") + extra("epicsTimeStamp time") + interest(2) + special(SPC_NOMOD) + } + field(FLNK, DBF_FWDLINK) { + promptgroup("20 - Scan") + interest(1) + prompt("Forward Process Link") + } + field(VAL, DBF_INT64) { + prompt("Current value") + asl(ASL0) + pp(TRUE) + promptgroup("40 - Input") + } + field(INP, DBF_INLINK) { + prompt("Input Specification") + interest(1) + promptgroup("40 - Input") + } + field(EGU, DBF_STRING) { + promptgroup("80 - Display") + prop(YES) + interest(1) + prompt("Units name") + size(16) + } + field(HOPR, DBF_INT64) { + prompt("High Operating Range") + interest(1) + prop(YES) + promptgroup("80 - Display") + } + field(LOPR, DBF_INT64) { + prompt("Low Operating Range") + prop(YES) + interest(1) + promptgroup("80 - Display") + } + field(HIHI, DBF_INT64) { + prompt("Hihi Alarm Limit") + interest(1) + prop(YES) + pp(TRUE) + promptgroup("70 - Alarm") + } + field(LOLO, DBF_INT64) { + prop(YES) + interest(1) + promptgroup("70 - Alarm") + pp(TRUE) + prompt("Lolo Alarm Limit") + } + field(HIGH, DBF_INT64) { + prompt("High Alarm Limit") + promptgroup("70 - Alarm") + pp(TRUE) + prop(YES) + interest(1) + } + field(LOW, DBF_INT64) { + prop(YES) + interest(1) + promptgroup("70 - Alarm") + pp(TRUE) + prompt("Low Alarm Limit") + } + field(HHSV, DBF_MENU) { + prompt("Hihi Severity") + promptgroup("70 - Alarm") + pp(TRUE) + menu(menuAlarmSevr) + interest(1) + } + field(LLSV, DBF_MENU) { + prompt("Lolo Severity") + pp(TRUE) + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + } + field(HSV, DBF_MENU) { + prompt("High Severity") + pp(TRUE) + promptgroup("70 - Alarm") + interest(1) + menu(menuAlarmSevr) + } + field(LSV, DBF_MENU) { + promptgroup("70 - Alarm") + pp(TRUE) + menu(menuAlarmSevr) + interest(1) + prompt("Low Severity") + } + field(HYST, DBF_INT64) { + prompt("Alarm Deadband") + promptgroup("70 - Alarm") + interest(1) + } + field(AFTC, DBF_DOUBLE) { + interest(1) + promptgroup("70 - Alarm") + prompt("Alarm Filter Time Constant") + } + field(AFVL, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Alarm Filter Value") + } + field(ADEL, DBF_INT64) { + promptgroup("80 - Display") + interest(1) + prompt("Archive Deadband") + } + field(MDEL, DBF_INT64) { + interest(1) + promptgroup("80 - Display") + prompt("Monitor Deadband") + } + field(LALM, DBF_INT64) { + interest(3) + special(SPC_NOMOD) + prompt("Last Value Alarmed") + } + field(ALST, DBF_INT64) { + prompt("Last Value Archived") + special(SPC_NOMOD) + interest(3) + } + field(MLST, DBF_INT64) { + prompt("Last Val Monitored") + interest(3) + special(SPC_NOMOD) + } + field(SIOL, DBF_INLINK) { + promptgroup("90 - Simulate") + interest(1) + prompt("Simulation Input Link") + } + field(SVAL, DBF_INT64) { + prompt("Simulation Value") + } + field(SIML, DBF_INLINK) { + prompt("Simulation Mode Link") + interest(1) + promptgroup("90 - Simulate") + } + field(SIMM, DBF_MENU) { + special(SPC_MOD) + interest(1) + menu(menuYesNo) + prompt("Simulation Mode") + } + field(SIMS, DBF_MENU) { + prompt("Simulation Mode Severity") + interest(2) + menu(menuAlarmSevr) + promptgroup("90 - Simulate") + } + field(OLDSIMM, DBF_MENU) { + prompt("Prev. Simulation Mode") + menu(menuSimm) + interest(4) + special(SPC_NOMOD) + } + field(SSCN, DBF_MENU) { + interest(1) + menu(menuScan) + promptgroup("90 - Simulate") + initial("65535") + prompt("Sim. Mode Scan") + } + field(SDLY, DBF_DOUBLE) { + interest(2) + promptgroup("90 - Simulate") + initial("-1.0") + prompt("Sim. Mode Async Delay") + } + field(SIMPVT, DBF_NOACCESS) { + extra("CALLBACK *simpvt") + prompt("Sim. Mode Private") + interest(4) + special(SPC_NOMOD) + } +} +device(int64in, CONSTANT, devI64inSoft, "Soft Channel") +device(int64in, CONSTANT, devI64inSoftCallback, "Async Soft Channel") +recordtype(bo) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + %#include "callback.h" + field(NAME, DBF_STRING) { + special(SPC_NOMOD) + prompt("Record Name") + size(61) + } + field(DESC, DBF_STRING) { + prompt("Descriptor") + size(41) promptgroup("10 - Common") } field(ASG, DBF_STRING) { + prompt("Access Security Group") + size(29) promptgroup("10 - Common") special(SPC_AS) - prompt("Access Security Group") - size(29) } field(SCAN, DBF_MENU) { - special(SPC_SCAN) - interest(1) + promptgroup("20 - Scan") + special(SPC_SCAN) + menu(menuScan) + interest(1) + prompt("Scan Mechanism") + } + field(PINI, DBF_MENU) { + promptgroup("20 - Scan") + menu(menuPini) + interest(1) + prompt("Process at iocInit") + } + field(PHAS, DBF_SHORT) { + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + prompt("Scan Phase") + } + field(EVNT, DBF_STRING) { + size(40) + prompt("Event Name") + special(SPC_SCAN) + interest(1) + promptgroup("20 - Scan") + } + field(TSE, DBF_SHORT) { + promptgroup("20 - Scan") + interest(1) + prompt("Time Stamp Event") + } + field(TSEL, DBF_INLINK) { + promptgroup("20 - Scan") + interest(1) + prompt("Time Stamp Link") + } + field(DTYP, DBF_DEVICE) { + prompt("Device Type") + interest(1) + promptgroup("10 - Common") + } + field(DISV, DBF_SHORT) { + initial("1") + prompt("Disable Value") + promptgroup("20 - Scan") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + interest(1) + promptgroup("20 - Scan") + prompt("Scanning Disable") + } + field(MLOK, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("epicsMutexId mlok") + prompt("Monitor lock") + } + field(MLIS, DBF_NOACCESS) { + prompt("Monitor List") + extra("ELLLIST mlis") + special(SPC_NOMOD) + interest(4) + } + field(BKLNK, DBF_NOACCESS) { + extra("ELLLIST bklnk") + prompt("Backwards link tracking") + interest(4) + special(SPC_NOMOD) + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + prompt("Force Processing") + pp(TRUE) + interest(3) + } + field(STAT, DBF_MENU) { + prompt("Alarm Status") + initial("UDF") + menu(menuAlarmStat) + special(SPC_NOMOD) + } + field(SEVR, DBF_MENU) { + prompt("Alarm Severity") + menu(menuAlarmSevr) + special(SPC_NOMOD) + } + field(NSTA, DBF_MENU) { + menu(menuAlarmStat) + interest(2) + special(SPC_NOMOD) + prompt("New Alarm Status") + } + field(NSEV, DBF_MENU) { + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) + prompt("New Alarm Severity") + } + field(ACKS, DBF_MENU) { + interest(2) + menu(menuAlarmSevr) + special(SPC_NOMOD) + prompt("Alarm Ack Severity") + } + field(ACKT, DBF_MENU) { + prompt("Alarm Ack Transient") + initial("YES") + promptgroup("70 - Alarm") + menu(menuYesNo) + interest(2) + special(SPC_NOMOD) + } + field(DISS, DBF_MENU) { + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + prompt("Disable Alarm Sevrty") + } + field(LCNT, DBF_UCHAR) { + interest(2) + special(SPC_NOMOD) + prompt("Lock Count") + } + field(PACT, DBF_UCHAR) { + prompt("Record active") + special(SPC_NOMOD) + interest(1) + } + field(PUTF, DBF_UCHAR) { + special(SPC_NOMOD) + interest(1) + prompt("dbPutField process") + } + field(RPRO, DBF_UCHAR) { + prompt("Reprocess ") + interest(1) + special(SPC_NOMOD) + } + field(ASP, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("struct asgMember *asp") + prompt("Access Security Pvt") + } + field(PPN, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("pprocessNotify") + extra("struct processNotify *ppn") + } + field(PPNR, DBF_NOACCESS) { + extra("struct processNotifyRecord *ppnr") + prompt("pprocessNotifyRecord") + interest(4) + special(SPC_NOMOD) + } + field(SPVT, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Scan Private") + extra("struct scan_element *spvt") + } + field(RSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Address of RSET") + extra("struct typed_rset *rset") + } + field(DSET, DBF_NOACCESS) { + extra("struct dset *dset") + prompt("DSET address") + special(SPC_NOMOD) + interest(4) + } + field(DPVT, DBF_NOACCESS) { + prompt("Device Private") + extra("void *dpvt") + special(SPC_NOMOD) + interest(4) + } + field(RDES, DBF_NOACCESS) { + prompt("Address of dbRecordType") + extra("struct dbRecordType *rdes") + special(SPC_NOMOD) + interest(4) + } + field(LSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Lock Set") + extra("struct lockRecord *lset") + } + field(PRIO, DBF_MENU) { + prompt("Scheduling Priority") + menu(menuPriority) + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(1) + prompt("Break Point") + extra("char bkpt") + } + field(UDF, DBF_UCHAR) { + interest(1) + pp(TRUE) + promptgroup("10 - Common") + initial("1") + prompt("Undefined") + } + field(UDFS, DBF_MENU) { + initial("INVALID") + prompt("Undefined Alarm Sevrty") + interest(1) + menu(menuAlarmSevr) + promptgroup("70 - Alarm") + } + field(TIME, DBF_NOACCESS) { + extra("epicsTimeStamp time") + prompt("Time") + interest(2) + special(SPC_NOMOD) + } + field(FLNK, DBF_FWDLINK) { + interest(1) + promptgroup("20 - Scan") + prompt("Forward Process Link") + } + field(VAL, DBF_ENUM) { + pp(TRUE) + promptgroup("50 - Output") + prompt("Current Value") + asl(ASL0) + } + field(OMSL, DBF_MENU) { + promptgroup("50 - Output") + interest(1) + menu(menuOmsl) + prompt("Output Mode Select") + } + field(DOL, DBF_INLINK) { + prompt("Desired Output Loc") + interest(1) + promptgroup("40 - Input") + } + field(OUT, DBF_OUTLINK) { + prompt("Output Specification") + promptgroup("50 - Output") + interest(1) + } + field(HIGH, DBF_DOUBLE) { + interest(1) + promptgroup("30 - Action") + prompt("Seconds to Hold High") + } + field(ZNAM, DBF_STRING) { + prompt("Zero Name") + size(26) + promptgroup("80 - Display") + pp(TRUE) + prop(YES) + interest(1) + } + field(ONAM, DBF_STRING) { + size(26) + prompt("One Name") + interest(1) + prop(YES) + promptgroup("80 - Display") + pp(TRUE) + } + field(RVAL, DBF_ULONG) { + prompt("Raw Value") + pp(TRUE) + } + field(ORAW, DBF_ULONG) { + prompt("prev Raw Value") + special(SPC_NOMOD) + interest(3) + } + field(MASK, DBF_ULONG) { + prompt("Hardware Mask") + interest(1) + special(SPC_NOMOD) + } + field(RPVT, DBF_NOACCESS) { + extra("void * rpvt") + prompt("Record Private") + interest(4) + special(SPC_NOMOD) + } + field(WDPT, DBF_NOACCESS) { + prompt("Watch Dog Timer ID") + extra("void * wdpt") + interest(4) + special(SPC_NOMOD) + } + field(ZSV, DBF_MENU) { + prompt("Zero Error Severity") + interest(1) + menu(menuAlarmSevr) + pp(TRUE) + promptgroup("70 - Alarm") + } + field(OSV, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + pp(TRUE) + prompt("One Error Severity") + } + field(COSV, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + pp(TRUE) + promptgroup("70 - Alarm") + prompt("Change of State Sevr") + } + field(RBV, DBF_ULONG) { + special(SPC_NOMOD) + prompt("Readback Value") + } + field(ORBV, DBF_ULONG) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Readback Value") + } + field(MLST, DBF_USHORT) { + interest(3) + special(SPC_NOMOD) + prompt("Last Value Monitored") + } + field(LALM, DBF_USHORT) { + interest(3) + special(SPC_NOMOD) + prompt("Last Value Alarmed") + } + field(SIOL, DBF_OUTLINK) { + promptgroup("90 - Simulate") + interest(1) + prompt("Simulation Output Link") + } + field(SIML, DBF_INLINK) { + promptgroup("90 - Simulate") + interest(1) + prompt("Simulation Mode Link") + } + field(SIMM, DBF_MENU) { + interest(1) + menu(menuYesNo) + special(SPC_MOD) + prompt("Simulation Mode") + } + field(SIMS, DBF_MENU) { + prompt("Simulation Mode Severity") + promptgroup("90 - Simulate") + interest(2) + menu(menuAlarmSevr) + } + field(OLDSIMM, DBF_MENU) { + special(SPC_NOMOD) + interest(4) + menu(menuSimm) + prompt("Prev. Simulation Mode") + } + field(SSCN, DBF_MENU) { + prompt("Sim. Mode Scan") + initial("65535") + promptgroup("90 - Simulate") + interest(1) + menu(menuScan) + } + field(SDLY, DBF_DOUBLE) { + initial("-1.0") + prompt("Sim. Mode Async Delay") + interest(2) + promptgroup("90 - Simulate") + } + field(SIMPVT, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Sim. Mode Private") + extra("CALLBACK *simpvt") + } + field(IVOA, DBF_MENU) { + prompt("INVALID outpt action") + promptgroup("50 - Output") + menu(menuIvoa) + interest(2) + } + field(IVOV, DBF_USHORT) { + prompt("INVALID output value") + promptgroup("50 - Output") + interest(2) + } +} +device(bo, CONSTANT, devBoSoft, "Soft Channel") +device(bo, CONSTANT, devBoSoftRaw, "Raw Soft Channel") +device(bo, CONSTANT, devBoSoftCallback, "Async Soft Channel") +device(bo, INST_IO, devBoGeneralTime, "General Time") +device(bo, INST_IO, devBoDbState, "Db State") +device(bo, INST_IO, asynBoInt32, "asynInt32") +device(bo, INST_IO, asynBoUInt32Digital, "asynUInt32Digital") +device(bo, INST_IO, devboStream, "stream") +device(bo, INST_IO, devBoStrParm, "asyn bo stringParm") +device(bo, INST_IO, devBoMPC, "asyn MPC") +device(bo, GPIB_IO, devBoGP307Gpib, "Vg307 GPIB Instrument") +device(bo, BBGPIB_IO, devBoAX301, "PZT Bug") +device(bo, INST_IO, devBoTPG261, "asyn TPG261") +recordtype(stringout) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + %#include "callback.h" + field(NAME, DBF_STRING) { + size(61) + prompt("Record Name") + special(SPC_NOMOD) + } + field(DESC, DBF_STRING) { + prompt("Descriptor") + size(41) + promptgroup("10 - Common") + } + field(ASG, DBF_STRING) { + prompt("Access Security Group") + size(29) + promptgroup("10 - Common") + special(SPC_AS) + } + field(SCAN, DBF_MENU) { + special(SPC_SCAN) + interest(1) + menu(menuScan) promptgroup("20 - Scan") prompt("Scan Mechanism") - menu(menuScan) } field(PINI, DBF_MENU) { - promptgroup("20 - Scan") - interest(1) prompt("Process at iocInit") + promptgroup("20 - Scan") + interest(1) menu(menuPini) } field(PHAS, DBF_SHORT) { - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) prompt("Scan Phase") } field(EVNT, DBF_STRING) { + special(SPC_SCAN) + interest(1) + promptgroup("20 - Scan") + size(40) prompt("Event Name") - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) - size(40) + } + field(TSE, DBF_SHORT) { + interest(1) + promptgroup("20 - Scan") + prompt("Time Stamp Event") + } + field(TSEL, DBF_INLINK) { + promptgroup("20 - Scan") + interest(1) + prompt("Time Stamp Link") + } + field(DTYP, DBF_DEVICE) { + prompt("Device Type") + promptgroup("10 - Common") + interest(1) + } + field(DISV, DBF_SHORT) { + promptgroup("20 - Scan") + prompt("Disable Value") + initial("1") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + promptgroup("20 - Scan") + interest(1) + prompt("Scanning Disable") + } + field(MLOK, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("epicsMutexId mlok") + prompt("Monitor lock") + } + field(MLIS, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Monitor List") + extra("ELLLIST mlis") + } + field(BKLNK, DBF_NOACCESS) { + prompt("Backwards link tracking") + extra("ELLLIST bklnk") + special(SPC_NOMOD) + interest(4) + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + pp(TRUE) + interest(3) + prompt("Force Processing") + } + field(STAT, DBF_MENU) { + menu(menuAlarmStat) + special(SPC_NOMOD) + prompt("Alarm Status") + initial("UDF") + } + field(SEVR, DBF_MENU) { + special(SPC_NOMOD) + menu(menuAlarmSevr) + prompt("Alarm Severity") + } + field(NSTA, DBF_MENU) { + special(SPC_NOMOD) + menu(menuAlarmStat) + interest(2) + prompt("New Alarm Status") + } + field(NSEV, DBF_MENU) { + prompt("New Alarm Severity") + special(SPC_NOMOD) + menu(menuAlarmSevr) + interest(2) + } + field(ACKS, DBF_MENU) { + special(SPC_NOMOD) + menu(menuAlarmSevr) + interest(2) + prompt("Alarm Ack Severity") + } + field(ACKT, DBF_MENU) { + prompt("Alarm Ack Transient") + initial("YES") + promptgroup("70 - Alarm") + menu(menuYesNo) + interest(2) + special(SPC_NOMOD) + } + field(DISS, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + prompt("Disable Alarm Sevrty") + } + field(LCNT, DBF_UCHAR) { + special(SPC_NOMOD) + interest(2) + prompt("Lock Count") + } + field(PACT, DBF_UCHAR) { + prompt("Record active") + interest(1) + special(SPC_NOMOD) + } + field(PUTF, DBF_UCHAR) { + prompt("dbPutField process") + special(SPC_NOMOD) + interest(1) + } + field(RPRO, DBF_UCHAR) { + special(SPC_NOMOD) + interest(1) + prompt("Reprocess ") + } + field(ASP, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Access Security Pvt") + extra("struct asgMember *asp") + } + field(PPN, DBF_NOACCESS) { + prompt("pprocessNotify") + extra("struct processNotify *ppn") + special(SPC_NOMOD) + interest(4) + } + field(PPNR, DBF_NOACCESS) { + prompt("pprocessNotifyRecord") + extra("struct processNotifyRecord *ppnr") + interest(4) + special(SPC_NOMOD) + } + field(SPVT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Scan Private") + extra("struct scan_element *spvt") + } + field(RSET, DBF_NOACCESS) { + prompt("Address of RSET") + extra("struct typed_rset *rset") + special(SPC_NOMOD) + interest(4) + } + field(DSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("DSET address") + extra("struct dset *dset") + } + field(DPVT, DBF_NOACCESS) { + prompt("Device Private") + extra("void *dpvt") + interest(4) + special(SPC_NOMOD) + } + field(RDES, DBF_NOACCESS) { + prompt("Address of dbRecordType") + extra("struct dbRecordType *rdes") + interest(4) + special(SPC_NOMOD) + } + field(LSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Lock Set") + extra("struct lockRecord *lset") + } + field(PRIO, DBF_MENU) { + special(SPC_SCAN) + interest(1) + menu(menuPriority) + promptgroup("20 - Scan") + prompt("Scheduling Priority") + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + prompt("Break Point") + extra("char bkpt") + interest(1) + special(SPC_NOMOD) + } + field(UDF, DBF_UCHAR) { + prompt("Undefined") + initial("1") + promptgroup("10 - Common") + pp(TRUE) + interest(1) + } + field(UDFS, DBF_MENU) { + promptgroup("70 - Alarm") + interest(1) + menu(menuAlarmSevr) + prompt("Undefined Alarm Sevrty") + initial("INVALID") + } + field(TIME, DBF_NOACCESS) { + interest(2) + special(SPC_NOMOD) + extra("epicsTimeStamp time") + prompt("Time") + } + field(FLNK, DBF_FWDLINK) { + prompt("Forward Process Link") + promptgroup("20 - Scan") + interest(1) + } + field(VAL, DBF_STRING) { + promptgroup("50 - Output") + pp(TRUE) + asl(ASL0) + size(40) + prompt("Current Value") + } + field(OVAL, DBF_STRING) { + prompt("Previous Value") + size(40) + interest(3) + special(SPC_NOMOD) + } + field(DOL, DBF_INLINK) { + prompt("Desired Output Loc") + interest(1) + promptgroup("40 - Input") + } + field(OMSL, DBF_MENU) { + promptgroup("50 - Output") + menu(menuOmsl) + interest(1) + prompt("Output Mode Select") + } + field(OUT, DBF_OUTLINK) { + interest(1) + promptgroup("50 - Output") + prompt("Output Specification") + } + field(MPST, DBF_MENU) { + promptgroup("80 - Display") + menu(stringoutPOST) + interest(1) + prompt("Post Value Monitors") + } + field(APST, DBF_MENU) { + menu(stringoutPOST) + interest(1) + promptgroup("80 - Display") + prompt("Post Archive Monitors") + } + field(SIOL, DBF_OUTLINK) { + interest(1) + promptgroup("90 - Simulate") + prompt("Simulation Output Link") + } + field(SIML, DBF_INLINK) { + interest(1) + promptgroup("90 - Simulate") + prompt("Simulation Mode Link") + } + field(SIMM, DBF_MENU) { + prompt("Simulation Mode") + menu(menuYesNo) + interest(1) + special(SPC_MOD) + } + field(SIMS, DBF_MENU) { + prompt("Simulation Mode Severity") + menu(menuAlarmSevr) + interest(2) + promptgroup("90 - Simulate") + } + field(OLDSIMM, DBF_MENU) { + prompt("Prev. Simulation Mode") + menu(menuSimm) + interest(4) + special(SPC_NOMOD) + } + field(SSCN, DBF_MENU) { + interest(1) + menu(menuScan) + promptgroup("90 - Simulate") + initial("65535") + prompt("Sim. Mode Scan") + } + field(SDLY, DBF_DOUBLE) { + prompt("Sim. Mode Async Delay") + initial("-1.0") + promptgroup("90 - Simulate") + interest(2) + } + field(SIMPVT, DBF_NOACCESS) { + prompt("Sim. Mode Private") + extra("CALLBACK *simpvt") + special(SPC_NOMOD) + interest(4) + } + field(IVOA, DBF_MENU) { + promptgroup("50 - Output") + menu(menuIvoa) + interest(2) + prompt("INVALID output action") + } + field(IVOV, DBF_STRING) { + size(40) + prompt("INVALID output value") + interest(2) + promptgroup("50 - Output") + } +} +device(stringout, CONSTANT, devSoSoft, "Soft Channel") +device(stringout, CONSTANT, devSoSoftCallback, "Async Soft Channel") +device(stringout, INST_IO, devSoStdio, "stdio") +device(stringout, INST_IO, asynSoOctetWrite, "asynOctetWrite") +device(stringout, INST_IO, devstringoutStream, "stream") +device(stringout, INST_IO, devSoStrParm, "asyn so stringParm") +device(stringout, INST_IO, devSoEurotherm, "asyn so Eurotherm") +device(stringout, INST_IO, devSoMPC, "asyn MPC") +recordtype(lso) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + %#include "devSup.h" + % + %/* Declare Device Support Entry Table */ + %typedef struct lsodset { + % long number; + % DEVSUPFUN report; + % DEVSUPFUN init; + % DEVSUPFUN init_record; + % DEVSUPFUN get_ioint_info; + % DEVSUPFUN write_string; + %} lsodset; + % + %#include "callback.h" + field(NAME, DBF_STRING) { + special(SPC_NOMOD) + size(61) + prompt("Record Name") + } + field(DESC, DBF_STRING) { + prompt("Descriptor") + size(41) + promptgroup("10 - Common") + } + field(ASG, DBF_STRING) { + special(SPC_AS) + promptgroup("10 - Common") + size(29) + prompt("Access Security Group") + } + field(SCAN, DBF_MENU) { + menu(menuScan) + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + prompt("Scan Mechanism") + } + field(PINI, DBF_MENU) { + prompt("Process at iocInit") + menu(menuPini) + interest(1) + promptgroup("20 - Scan") + } + field(PHAS, DBF_SHORT) { + prompt("Scan Phase") + promptgroup("20 - Scan") + interest(1) + special(SPC_SCAN) + } + field(EVNT, DBF_STRING) { + size(40) + prompt("Event Name") + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") } field(TSE, DBF_SHORT) { prompt("Time Stamp Event") - interest(1) - promptgroup("20 - Scan") + promptgroup("20 - Scan") + interest(1) } field(TSEL, DBF_INLINK) { prompt("Time Stamp Link") - interest(1) - promptgroup("20 - Scan") + promptgroup("20 - Scan") + interest(1) + } + field(DTYP, DBF_DEVICE) { + prompt("Device Type") + interest(1) + promptgroup("10 - Common") + } + field(DISV, DBF_SHORT) { + prompt("Disable Value") + initial("1") + promptgroup("20 - Scan") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + promptgroup("20 - Scan") + interest(1) + prompt("Scanning Disable") + } + field(MLOK, DBF_NOACCESS) { + prompt("Monitor lock") + extra("epicsMutexId mlok") + interest(4) + special(SPC_NOMOD) + } + field(MLIS, DBF_NOACCESS) { + prompt("Monitor List") + extra("ELLLIST mlis") + interest(4) + special(SPC_NOMOD) + } + field(BKLNK, DBF_NOACCESS) { + extra("ELLLIST bklnk") + prompt("Backwards link tracking") + interest(4) + special(SPC_NOMOD) + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + interest(3) + pp(TRUE) + prompt("Force Processing") + } + field(STAT, DBF_MENU) { + prompt("Alarm Status") + initial("UDF") + menu(menuAlarmStat) + special(SPC_NOMOD) + } + field(SEVR, DBF_MENU) { + prompt("Alarm Severity") + special(SPC_NOMOD) + menu(menuAlarmSevr) + } + field(NSTA, DBF_MENU) { + prompt("New Alarm Status") + special(SPC_NOMOD) + interest(2) + menu(menuAlarmStat) + } + field(NSEV, DBF_MENU) { + prompt("New Alarm Severity") + interest(2) + menu(menuAlarmSevr) + special(SPC_NOMOD) + } + field(ACKS, DBF_MENU) { + prompt("Alarm Ack Severity") + special(SPC_NOMOD) + menu(menuAlarmSevr) + interest(2) + } + field(ACKT, DBF_MENU) { + prompt("Alarm Ack Transient") + initial("YES") + promptgroup("70 - Alarm") + menu(menuYesNo) + interest(2) + special(SPC_NOMOD) + } + field(DISS, DBF_MENU) { + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + prompt("Disable Alarm Sevrty") + } + field(LCNT, DBF_UCHAR) { + special(SPC_NOMOD) + interest(2) + prompt("Lock Count") + } + field(PACT, DBF_UCHAR) { + prompt("Record active") + interest(1) + special(SPC_NOMOD) + } + field(PUTF, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("dbPutField process") + } + field(RPRO, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("Reprocess ") + } + field(ASP, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct asgMember *asp") + prompt("Access Security Pvt") + } + field(PPN, DBF_NOACCESS) { + extra("struct processNotify *ppn") + prompt("pprocessNotify") + interest(4) + special(SPC_NOMOD) + } + field(PPNR, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct processNotifyRecord *ppnr") + prompt("pprocessNotifyRecord") + } + field(SPVT, DBF_NOACCESS) { + extra("struct scan_element *spvt") + prompt("Scan Private") + interest(4) + special(SPC_NOMOD) + } + field(RSET, DBF_NOACCESS) { + extra("struct typed_rset *rset") + prompt("Address of RSET") + special(SPC_NOMOD) + interest(4) + } + field(DSET, DBF_NOACCESS) { + prompt("DSET address") + extra("struct dset *dset") + special(SPC_NOMOD) + interest(4) + } + field(DPVT, DBF_NOACCESS) { + prompt("Device Private") + extra("void *dpvt") + interest(4) + special(SPC_NOMOD) + } + field(RDES, DBF_NOACCESS) { + extra("struct dbRecordType *rdes") + prompt("Address of dbRecordType") + special(SPC_NOMOD) + interest(4) + } + field(LSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct lockRecord *lset") + prompt("Lock Set") + } + field(PRIO, DBF_MENU) { + promptgroup("20 - Scan") + interest(1) + menu(menuPriority) + special(SPC_SCAN) + prompt("Scheduling Priority") + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + extra("char bkpt") + prompt("Break Point") + special(SPC_NOMOD) + interest(1) + } + field(UDF, DBF_UCHAR) { + prompt("Undefined") + initial("1") + pp(TRUE) + promptgroup("10 - Common") + interest(1) + } + field(UDFS, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + initial("INVALID") + prompt("Undefined Alarm Sevrty") + } + field(TIME, DBF_NOACCESS) { + interest(2) + special(SPC_NOMOD) + extra("epicsTimeStamp time") + prompt("Time") + } + field(FLNK, DBF_FWDLINK) { + prompt("Forward Process Link") + promptgroup("20 - Scan") + interest(1) + } + field(VAL, DBF_NOACCESS) { + pp(TRUE) + special(SPC_DBADDR) + prompt("Current Value") + asl(ASL0) + extra("char *val") + } + field(OVAL, DBF_NOACCESS) { + prompt("Previous Value") + extra("char *oval") + special(SPC_DBADDR) + interest(3) + } + field(SIZV, DBF_USHORT) { + initial("41") + prompt("Size of buffers") + interest(1) + special(SPC_NOMOD) + promptgroup("50 - Output") + } + field(LEN, DBF_ULONG) { + prompt("Length of VAL") + special(SPC_NOMOD) + } + field(OLEN, DBF_ULONG) { + special(SPC_NOMOD) + interest(3) + prompt("Length of OVAL") + } + field(DOL, DBF_INLINK) { + prompt("Desired Output Link") + interest(1) + promptgroup("40 - Input") + } + field(IVOA, DBF_MENU) { + promptgroup("50 - Output") + interest(2) + menu(menuIvoa) + prompt("INVALID Output Action") + } + field(IVOV, DBF_STRING) { + interest(2) + promptgroup("50 - Output") + size(40) + prompt("INVALID Output Value") + } + field(OMSL, DBF_MENU) { + promptgroup("50 - Output") + menu(menuOmsl) + interest(1) + prompt("Output Mode Select") + } + field(OUT, DBF_OUTLINK) { + prompt("Output Specification") + promptgroup("50 - Output") + interest(1) + } + field(MPST, DBF_MENU) { + promptgroup("80 - Display") + menu(menuPost) + interest(1) + prompt("Post Value Monitors") + } + field(APST, DBF_MENU) { + interest(1) + menu(menuPost) + promptgroup("80 - Display") + prompt("Post Archive Monitors") + } + field(SIML, DBF_INLINK) { + interest(1) + promptgroup("90 - Simulate") + prompt("Simulation Mode link") + } + field(SIMM, DBF_MENU) { + interest(1) + menu(menuYesNo) + special(SPC_MOD) + prompt("Simulation Mode") + } + field(SIMS, DBF_MENU) { + prompt("Simulation Mode Severity") + menu(menuAlarmSevr) + interest(2) + promptgroup("90 - Simulate") + } + field(SIOL, DBF_OUTLINK) { + prompt("Simulation Output Link") + promptgroup("90 - Simulate") + interest(1) + } + field(OLDSIMM, DBF_MENU) { + special(SPC_NOMOD) + menu(menuSimm) + interest(4) + prompt("Prev. Simulation Mode") + } + field(SSCN, DBF_MENU) { + promptgroup("90 - Simulate") + interest(1) + menu(menuScan) + prompt("Sim. Mode Scan") + initial("65535") + } + field(SDLY, DBF_DOUBLE) { + promptgroup("90 - Simulate") + interest(2) + prompt("Sim. Mode Async Delay") + initial("-1.0") + } + field(SIMPVT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Sim. Mode Private") + extra("CALLBACK *simpvt") + } +} +device(lso, CONSTANT, devLsoSoft, "Soft Channel") +device(lso, CONSTANT, devLsoSoftCallback, "Async Soft Channel") +device(lso, INST_IO, devLsoStdio, "stdio") +recordtype(sel) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + field(NAME, DBF_STRING) { + special(SPC_NOMOD) + size(61) + prompt("Record Name") + } + field(DESC, DBF_STRING) { + promptgroup("10 - Common") + size(41) + prompt("Descriptor") + } + field(ASG, DBF_STRING) { + size(29) + prompt("Access Security Group") + special(SPC_AS) + promptgroup("10 - Common") + } + field(SCAN, DBF_MENU) { + interest(1) + menu(menuScan) + special(SPC_SCAN) + promptgroup("20 - Scan") + prompt("Scan Mechanism") + } + field(PINI, DBF_MENU) { + menu(menuPini) + interest(1) + promptgroup("20 - Scan") + prompt("Process at iocInit") + } + field(PHAS, DBF_SHORT) { + prompt("Scan Phase") + special(SPC_SCAN) + interest(1) + promptgroup("20 - Scan") + } + field(EVNT, DBF_STRING) { + promptgroup("20 - Scan") + interest(1) + special(SPC_SCAN) + prompt("Event Name") + size(40) + } + field(TSE, DBF_SHORT) { + interest(1) + promptgroup("20 - Scan") + prompt("Time Stamp Event") + } + field(TSEL, DBF_INLINK) { + promptgroup("20 - Scan") + interest(1) + prompt("Time Stamp Link") } field(DTYP, DBF_DEVICE) { prompt("Device Type") @@ -5114,72 +20300,72 @@ } field(MLOK, DBF_NOACCESS) { extra("epicsMutexId mlok") - interest(4) - special(SPC_NOMOD) prompt("Monitor lock") + special(SPC_NOMOD) + interest(4) } field(MLIS, DBF_NOACCESS) { prompt("Monitor List") - special(SPC_NOMOD) - interest(4) extra("ELLLIST mlis") + interest(4) + special(SPC_NOMOD) } field(BKLNK, DBF_NOACCESS) { prompt("Backwards link tracking") - interest(4) - special(SPC_NOMOD) extra("ELLLIST bklnk") + interest(4) + special(SPC_NOMOD) } field(DISP, DBF_UCHAR) { prompt("Disable putField") } field(PROC, DBF_UCHAR) { - interest(3) prompt("Force Processing") + interest(3) pp(TRUE) } field(STAT, DBF_MENU) { initial("UDF") - special(SPC_NOMOD) prompt("Alarm Status") + special(SPC_NOMOD) menu(menuAlarmStat) } field(SEVR, DBF_MENU) { + special(SPC_NOMOD) + menu(menuAlarmSevr) prompt("Alarm Severity") - special(SPC_NOMOD) - menu(menuAlarmSevr) } field(NSTA, DBF_MENU) { menu(menuAlarmStat) - special(SPC_NOMOD) - interest(2) + interest(2) + special(SPC_NOMOD) prompt("New Alarm Status") } field(NSEV, DBF_MENU) { - menu(menuAlarmSevr) - special(SPC_NOMOD) - interest(2) prompt("New Alarm Severity") + menu(menuAlarmSevr) + interest(2) + special(SPC_NOMOD) } field(ACKS, DBF_MENU) { - interest(2) - special(SPC_NOMOD) + special(SPC_NOMOD) + menu(menuAlarmSevr) + interest(2) prompt("Alarm Ack Severity") - menu(menuAlarmSevr) } field(ACKT, DBF_MENU) { prompt("Alarm Ack Transient") - special(SPC_NOMOD) - interest(2) - promptgroup("70 - Alarm") - menu(menuYesNo) initial("YES") + promptgroup("70 - Alarm") + menu(menuYesNo) + interest(2) + special(SPC_NOMOD) } field(DISS, DBF_MENU) { - interest(1) - promptgroup("70 - Alarm") prompt("Disable Alarm Sevrty") menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") } field(LCNT, DBF_UCHAR) { special(SPC_NOMOD) @@ -5187,9 +20373,9 @@ prompt("Lock Count") } field(PACT, DBF_UCHAR) { - special(SPC_NOMOD) - interest(1) prompt("Record active") + special(SPC_NOMOD) + interest(1) } field(PUTF, DBF_UCHAR) { interest(1) @@ -5202,40 +20388,40 @@ special(SPC_NOMOD) } field(ASP, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) extra("struct asgMember *asp") - interest(4) - special(SPC_NOMOD) prompt("Access Security Pvt") } field(PPN, DBF_NOACCESS) { extra("struct processNotify *ppn") - interest(4) - special(SPC_NOMOD) prompt("pprocessNotify") + interest(4) + special(SPC_NOMOD) } field(PPNR, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) + interest(4) + special(SPC_NOMOD) prompt("pprocessNotifyRecord") extra("struct processNotifyRecord *ppnr") } field(SPVT, DBF_NOACCESS) { + prompt("Scan Private") extra("struct scan_element *spvt") special(SPC_NOMOD) interest(4) - prompt("Scan Private") } field(RSET, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) + extra("struct typed_rset *rset") prompt("Address of RSET") - extra("struct typed_rset *rset") + special(SPC_NOMOD) + interest(4) } field(DSET, DBF_NOACCESS) { - extra("struct dset *dset") special(SPC_NOMOD) interest(4) prompt("DSET address") + extra("struct dset *dset") } field(DPVT, DBF_NOACCESS) { interest(4) @@ -5244,21 +20430,21 @@ extra("void *dpvt") } field(RDES, DBF_NOACCESS) { - extra("struct dbRecordType *rdes") special(SPC_NOMOD) interest(4) prompt("Address of dbRecordType") + extra("struct dbRecordType *rdes") } field(LSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) extra("struct lockRecord *lset") prompt("Lock Set") - interest(4) - special(SPC_NOMOD) } field(PRIO, DBF_MENU) { + special(SPC_SCAN) + interest(1) menu(menuPriority) - special(SPC_SCAN) - interest(1) promptgroup("20 - Scan") prompt("Scheduling Priority") } @@ -5266,190 +20452,992 @@ prompt("Trace Processing") } field(BKPT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(1) prompt("Break Point") - interest(1) - special(SPC_NOMOD) extra("char bkpt") } field(UDF, DBF_UCHAR) { - interest(1) - promptgroup("10 - Common") + initial("1") prompt("Undefined") - initial("1") + interest(1) + promptgroup("10 - Common") pp(TRUE) } field(UDFS, DBF_MENU) { + promptgroup("70 - Alarm") + interest(1) menu(menuAlarmSevr) prompt("Undefined Alarm Sevrty") - promptgroup("70 - Alarm") - interest(1) initial("INVALID") } field(TIME, DBF_NOACCESS) { - interest(2) - special(SPC_NOMOD) + extra("epicsTimeStamp time") prompt("Time") - extra("epicsTimeStamp time") + special(SPC_NOMOD) + interest(2) } field(FLNK, DBF_FWDLINK) { - interest(1) - promptgroup("20 - Scan") prompt("Forward Process Link") - } - field(VAL, DBF_STRING) { - asl(ASL0) - promptgroup("40 - Input") - prompt("Current Value") - pp(TRUE) - size(40) - } - field(OVAL, DBF_STRING) { - interest(3) - special(SPC_NOMOD) - prompt("Previous Value") - size(40) - } - field(INP, DBF_INLINK) { - promptgroup("40 - Input") - interest(1) - prompt("Input Specification") - } - field(MPST, DBF_MENU) { - menu(stringinPOST) - promptgroup("80 - Display") - interest(1) - prompt("Post Value Monitors") - } - field(APST, DBF_MENU) { - menu(stringinPOST) - interest(1) - promptgroup("80 - Display") - prompt("Post Archive Monitors") - } - field(SIOL, DBF_INLINK) { - promptgroup("90 - Simulate") - interest(1) - prompt("Simulation Input Link") - } - field(SVAL, DBF_STRING) { - prompt("Simulation Value") - pp(TRUE) - size(40) - } - field(SIML, DBF_INLINK) { - interest(1) - promptgroup("90 - Simulate") - prompt("Simulation Mode Link") - } - field(SIMM, DBF_MENU) { - interest(1) - special(SPC_MOD) - prompt("Simulation Mode") - menu(menuYesNo) - } - field(SIMS, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Simulation Mode Severity") - promptgroup("90 - Simulate") - interest(2) - } - field(OLDSIMM, DBF_MENU) { - menu(menuSimm) - prompt("Prev. Simulation Mode") - special(SPC_NOMOD) - interest(4) - } - field(SSCN, DBF_MENU) { - initial("65535") - interest(1) - promptgroup("90 - Simulate") - prompt("Sim. Mode Scan") - menu(menuScan) - } - field(SDLY, DBF_DOUBLE) { - prompt("Sim. Mode Async Delay") - promptgroup("90 - Simulate") - interest(2) - initial("-1.0") - } - field(SIMPVT, DBF_NOACCESS) { - prompt("Sim. Mode Private") - interest(4) - special(SPC_NOMOD) - extra("CALLBACK *simpvt") - } -} -device(stringin, CONSTANT, devSiSoft, "Soft Channel") -device(stringin, CONSTANT, devSiSoftCallback, "Async Soft Channel") -device(stringin, INST_IO, devTimestampSI, "Soft Timestamp") -device(stringin, INST_IO, devSiGeneralTime, "General Time") -device(stringin, INST_IO, devSiEnviron, "getenv") -device(stringin, INST_IO, asynSiOctetCmdResponse, "asynOctetCmdResponse") -device(stringin, INST_IO, asynSiOctetWriteRead, "asynOctetWriteRead") -device(stringin, INST_IO, asynSiOctetRead, "asynOctetRead") -device(stringin, INST_IO, devstringinStream, "stream") -device(stringin, INST_IO, devSiStrParm, "asyn si stringParm") -device(stringin, INST_IO, devSiMPC, "asyn MPC") -device(stringin, GPIB_IO, devSiGP307Gpib, "Vg307 GPIB Instrument") -device(stringin, INST_IO, devSiTPG261, "asyn TPG261") -recordtype(calc) { + interest(1) + promptgroup("20 - Scan") + } + field(VAL, DBF_DOUBLE) { + asl(ASL0) + prompt("Result") + special(SPC_NOMOD) + promptgroup("40 - Input") + } + field(SELM, DBF_MENU) { + prompt("Select Mechanism") + menu(selSELM) + promptgroup("30 - Action") + } + field(SELN, DBF_USHORT) { + prompt("Index value") + } + field(PREC, DBF_SHORT) { + prompt("Display Precision") + interest(1) + promptgroup("80 - Display") + } + field(NVL, DBF_INLINK) { + prompt("Index Value Location") + interest(1) + promptgroup("30 - Action") + } + field(INPA, DBF_INLINK) { + prompt("Input A") + interest(1) + promptgroup("41 - Input A-F") + } + field(INPB, DBF_INLINK) { + interest(1) + promptgroup("41 - Input A-F") + prompt("Input B") + } + field(INPC, DBF_INLINK) { + interest(1) + promptgroup("41 - Input A-F") + prompt("Input C") + } + field(INPD, DBF_INLINK) { + prompt("Input D") + promptgroup("41 - Input A-F") + interest(1) + } + field(INPE, DBF_INLINK) { + promptgroup("41 - Input A-F") + interest(1) + prompt("Input E") + } + field(INPF, DBF_INLINK) { + prompt("Input F") + interest(1) + promptgroup("41 - Input A-F") + } + field(INPG, DBF_INLINK) { + prompt("Input G") + interest(1) + promptgroup("42 - Input G-L") + } + field(INPH, DBF_INLINK) { + interest(1) + promptgroup("42 - Input G-L") + prompt("Input H") + } + field(INPI, DBF_INLINK) { + prompt("Input I") + promptgroup("42 - Input G-L") + interest(1) + } + field(INPJ, DBF_INLINK) { + promptgroup("42 - Input G-L") + interest(1) + prompt("Input J") + } + field(INPK, DBF_INLINK) { + prompt("Input K") + interest(1) + promptgroup("42 - Input G-L") + } + field(INPL, DBF_INLINK) { + promptgroup("42 - Input G-L") + interest(1) + prompt("Input L") + } + field(EGU, DBF_STRING) { + prompt("Engineering Units") + size(16) + promptgroup("80 - Display") + prop(YES) + interest(1) + } + field(HOPR, DBF_DOUBLE) { + prop(YES) + interest(1) + promptgroup("80 - Display") + prompt("High Operating Rng") + } + field(LOPR, DBF_DOUBLE) { + prop(YES) + interest(1) + promptgroup("80 - Display") + prompt("Low Operating Range") + } + field(HIHI, DBF_DOUBLE) { + prompt("Hihi Alarm Limit") + promptgroup("70 - Alarm") + pp(TRUE) + prop(YES) + interest(1) + } + field(LOLO, DBF_DOUBLE) { + pp(TRUE) + promptgroup("70 - Alarm") + interest(1) + prop(YES) + prompt("Lolo Alarm Limit") + } + field(HIGH, DBF_DOUBLE) { + prop(YES) + interest(1) + promptgroup("70 - Alarm") + pp(TRUE) + prompt("High Alarm Limit") + } + field(LOW, DBF_DOUBLE) { + prompt("Low Alarm Limit") + interest(1) + prop(YES) + pp(TRUE) + promptgroup("70 - Alarm") + } + field(HHSV, DBF_MENU) { + prompt("Hihi Severity") + interest(1) + menu(menuAlarmSevr) + prop(YES) + pp(TRUE) + promptgroup("70 - Alarm") + } + field(LLSV, DBF_MENU) { + prompt("Lolo Severity") + interest(1) + menu(menuAlarmSevr) + prop(YES) + promptgroup("70 - Alarm") + pp(TRUE) + } + field(HSV, DBF_MENU) { + prop(YES) + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + pp(TRUE) + prompt("High Severity") + } + field(LSV, DBF_MENU) { + interest(1) + menu(menuAlarmSevr) + prop(YES) + promptgroup("70 - Alarm") + pp(TRUE) + prompt("Low Severity") + } + field(HYST, DBF_DOUBLE) { + promptgroup("70 - Alarm") + interest(1) + prompt("Alarm Deadband") + } + field(ADEL, DBF_DOUBLE) { + prompt("Archive Deadband") + promptgroup("80 - Display") + interest(1) + } + field(MDEL, DBF_DOUBLE) { + promptgroup("80 - Display") + interest(1) + prompt("Monitor Deadband") + } + field(A, DBF_DOUBLE) { + prompt("Value of Input A") + pp(TRUE) + } + field(B, DBF_DOUBLE) { + prompt("Value of Input B") + pp(TRUE) + } + field(C, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input C") + } + field(D, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input D") + } + field(E, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input E") + } + field(F, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input F") + } + field(G, DBF_DOUBLE) { + prompt("Value of Input G") + pp(TRUE) + } + field(H, DBF_DOUBLE) { + prompt("Value of Input H") + pp(TRUE) + } + field(I, DBF_DOUBLE) { + prompt("Value of Input I") + pp(TRUE) + } + field(J, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input J") + } + field(K, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input K") + } + field(L, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input L") + } + field(LA, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Value of A") + } + field(LB, DBF_DOUBLE) { + prompt("Prev Value of B") + special(SPC_NOMOD) + interest(3) + } + field(LC, DBF_DOUBLE) { + prompt("Prev Value of C") + interest(3) + special(SPC_NOMOD) + } + field(LD, DBF_DOUBLE) { + prompt("Prev Value of D") + interest(3) + special(SPC_NOMOD) + } + field(LE, DBF_DOUBLE) { + prompt("Prev Value of E") + interest(3) + special(SPC_NOMOD) + } + field(LF, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of F") + } + field(LG, DBF_DOUBLE) { + prompt("Prev Value of G") + interest(3) + special(SPC_NOMOD) + } + field(LH, DBF_DOUBLE) { + prompt("Prev Value of H") + special(SPC_NOMOD) + interest(3) + } + field(LI, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Value of I") + } + field(LJ, DBF_DOUBLE) { + prompt("Prev Value of J") + special(SPC_NOMOD) + interest(3) + } + field(LK, DBF_DOUBLE) { + prompt("Prev Value of K") + interest(3) + special(SPC_NOMOD) + } + field(LL, DBF_DOUBLE) { + prompt("Prev Value of L") + interest(3) + special(SPC_NOMOD) + } + field(LALM, DBF_DOUBLE) { + prompt("Last Value Alarmed") + special(SPC_NOMOD) + interest(3) + } + field(ALST, DBF_DOUBLE) { + prompt("Last Value Archived") + special(SPC_NOMOD) + interest(3) + } + field(MLST, DBF_DOUBLE) { + prompt("Last Val Monitored") + interest(3) + special(SPC_NOMOD) + } + field(NLST, DBF_USHORT) { + special(SPC_NOMOD) + interest(3) + prompt("Last Index Monitored") + } +} +recordtype(ao) { %#include "epicsTypes.h" %#include "link.h" %#include "epicsMutex.h" %#include "ellLib.h" %#include "epicsTime.h" - %#include "postfix.h" + %#include "callback.h" field(NAME, DBF_STRING) { - prompt("Record Name") special(SPC_NOMOD) size(61) + prompt("Record Name") } field(DESC, DBF_STRING) { + promptgroup("10 - Common") + size(41) prompt("Descriptor") - promptgroup("10 - Common") - size(41) } field(ASG, DBF_STRING) { - size(29) - prompt("Access Security Group") promptgroup("10 - Common") special(SPC_AS) + prompt("Access Security Group") + size(29) } field(SCAN, DBF_MENU) { - menu(menuScan) prompt("Scan Mechanism") special(SPC_SCAN) + menu(menuScan) interest(1) promptgroup("20 - Scan") } field(PINI, DBF_MENU) { + interest(1) menu(menuPini) + promptgroup("20 - Scan") prompt("Process at iocInit") - interest(1) - promptgroup("20 - Scan") } field(PHAS, DBF_SHORT) { promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) + special(SPC_SCAN) + interest(1) prompt("Scan Phase") } field(EVNT, DBF_STRING) { size(40) - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) prompt("Event Name") + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") } field(TSE, DBF_SHORT) { - promptgroup("20 - Scan") - interest(1) + prompt("Time Stamp Event") + interest(1) + promptgroup("20 - Scan") + } + field(TSEL, DBF_INLINK) { + prompt("Time Stamp Link") + promptgroup("20 - Scan") + interest(1) + } + field(DTYP, DBF_DEVICE) { + prompt("Device Type") + promptgroup("10 - Common") + interest(1) + } + field(DISV, DBF_SHORT) { + initial("1") + prompt("Disable Value") + promptgroup("20 - Scan") + } + field(DISA, DBF_SHORT) { + prompt("Disable") + } + field(SDIS, DBF_INLINK) { + promptgroup("20 - Scan") + interest(1) + prompt("Scanning Disable") + } + field(MLOK, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("epicsMutexId mlok") + prompt("Monitor lock") + } + field(MLIS, DBF_NOACCESS) { + prompt("Monitor List") + extra("ELLLIST mlis") + interest(4) + special(SPC_NOMOD) + } + field(BKLNK, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Backwards link tracking") + extra("ELLLIST bklnk") + } + field(DISP, DBF_UCHAR) { + prompt("Disable putField") + } + field(PROC, DBF_UCHAR) { + interest(3) + pp(TRUE) + prompt("Force Processing") + } + field(STAT, DBF_MENU) { + initial("UDF") + prompt("Alarm Status") + menu(menuAlarmStat) + special(SPC_NOMOD) + } + field(SEVR, DBF_MENU) { + special(SPC_NOMOD) + menu(menuAlarmSevr) + prompt("Alarm Severity") + } + field(NSTA, DBF_MENU) { + special(SPC_NOMOD) + interest(2) + menu(menuAlarmStat) + prompt("New Alarm Status") + } + field(NSEV, DBF_MENU) { + prompt("New Alarm Severity") + special(SPC_NOMOD) + menu(menuAlarmSevr) + interest(2) + } + field(ACKS, DBF_MENU) { + prompt("Alarm Ack Severity") + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) + } + field(ACKT, DBF_MENU) { + prompt("Alarm Ack Transient") + initial("YES") + promptgroup("70 - Alarm") + special(SPC_NOMOD) + menu(menuYesNo) + interest(2) + } + field(DISS, DBF_MENU) { + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + prompt("Disable Alarm Sevrty") + } + field(LCNT, DBF_UCHAR) { + prompt("Lock Count") + special(SPC_NOMOD) + interest(2) + } + field(PACT, DBF_UCHAR) { + prompt("Record active") + special(SPC_NOMOD) + interest(1) + } + field(PUTF, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) + prompt("dbPutField process") + } + field(RPRO, DBF_UCHAR) { + prompt("Reprocess ") + special(SPC_NOMOD) + interest(1) + } + field(ASP, DBF_NOACCESS) { + prompt("Access Security Pvt") + extra("struct asgMember *asp") + special(SPC_NOMOD) + interest(4) + } + field(PPN, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct processNotify *ppn") + prompt("pprocessNotify") + } + field(PPNR, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct processNotifyRecord *ppnr") + prompt("pprocessNotifyRecord") + } + field(SPVT, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Scan Private") + extra("struct scan_element *spvt") + } + field(RSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("Address of RSET") + extra("struct typed_rset *rset") + } + field(DSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct dset *dset") + prompt("DSET address") + } + field(DPVT, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("void *dpvt") + prompt("Device Private") + } + field(RDES, DBF_NOACCESS) { + prompt("Address of dbRecordType") + extra("struct dbRecordType *rdes") + interest(4) + special(SPC_NOMOD) + } + field(LSET, DBF_NOACCESS) { + prompt("Lock Set") + extra("struct lockRecord *lset") + interest(4) + special(SPC_NOMOD) + } + field(PRIO, DBF_MENU) { + prompt("Scheduling Priority") + promptgroup("20 - Scan") + special(SPC_SCAN) + menu(menuPriority) + interest(1) + } + field(TPRO, DBF_UCHAR) { + prompt("Trace Processing") + } + field(BKPT, DBF_NOACCESS) { + extra("char bkpt") + prompt("Break Point") + interest(1) + special(SPC_NOMOD) + } + field(UDF, DBF_UCHAR) { + interest(1) + promptgroup("10 - Common") + pp(TRUE) + initial("1") + prompt("Undefined") + } + field(UDFS, DBF_MENU) { + initial("INVALID") + prompt("Undefined Alarm Sevrty") + interest(1) + menu(menuAlarmSevr) + promptgroup("70 - Alarm") + } + field(TIME, DBF_NOACCESS) { + extra("epicsTimeStamp time") + prompt("Time") + interest(2) + special(SPC_NOMOD) + } + field(FLNK, DBF_FWDLINK) { + prompt("Forward Process Link") + interest(1) + promptgroup("20 - Scan") + } + field(VAL, DBF_DOUBLE) { + asl(ASL0) + prompt("Desired Output") + pp(TRUE) + promptgroup("50 - Output") + } + field(OVAL, DBF_DOUBLE) { + prompt("Output Value") + } + field(OUT, DBF_OUTLINK) { + prompt("Output Specification") + interest(1) + promptgroup("50 - Output") + } + field(OROC, DBF_DOUBLE) { + prompt("Output Rate of Change") + interest(1) + promptgroup("50 - Output") + } + field(DOL, DBF_INLINK) { + prompt("Desired Output Loc") + promptgroup("40 - Input") + interest(1) + } + field(OMSL, DBF_MENU) { + prompt("Output Mode Select") + menu(menuOmsl) + interest(1) + promptgroup("50 - Output") + } + field(OIF, DBF_MENU) { + menu(aoOIF) + interest(1) + promptgroup("50 - Output") + prompt("Out Full/Incremental") + } + field(PREC, DBF_SHORT) { + prompt("Display Precision") + interest(1) + prop(YES) + promptgroup("80 - Display") + } + field(LINR, DBF_MENU) { + prompt("Linearization") + promptgroup("60 - Convert") + pp(TRUE) + special(SPC_LINCONV) + interest(1) + menu(menuConvert) + } + field(EGUF, DBF_DOUBLE) { + prompt("Eng Units Full") + interest(1) + special(SPC_LINCONV) + promptgroup("60 - Convert") + pp(TRUE) + } + field(EGUL, DBF_DOUBLE) { + prompt("Eng Units Low") + interest(1) + special(SPC_LINCONV) + promptgroup("60 - Convert") + pp(TRUE) + } + field(EGU, DBF_STRING) { + prompt("Engineering Units") + size(16) + promptgroup("80 - Display") + interest(1) + prop(YES) + } + field(ROFF, DBF_ULONG) { + prompt("Raw Offset") + pp(TRUE) + interest(2) + } + field(EOFF, DBF_DOUBLE) { + promptgroup("60 - Convert") + pp(TRUE) + interest(2) + prompt("EGU to Raw Offset") + } + field(ESLO, DBF_DOUBLE) { + pp(TRUE) + promptgroup("60 - Convert") + interest(2) + prompt("EGU to Raw Slope") + initial("1") + } + field(DRVH, DBF_DOUBLE) { + promptgroup("30 - Action") + pp(TRUE) + interest(1) + prop(YES) + prompt("Drive High Limit") + } + field(DRVL, DBF_DOUBLE) { + prompt("Drive Low Limit") + pp(TRUE) + promptgroup("30 - Action") + interest(1) + prop(YES) + } + field(HOPR, DBF_DOUBLE) { + prop(YES) + interest(1) + promptgroup("80 - Display") + prompt("High Operating Range") + } + field(LOPR, DBF_DOUBLE) { + prompt("Low Operating Range") + promptgroup("80 - Display") + prop(YES) + interest(1) + } + field(AOFF, DBF_DOUBLE) { + prompt("Adjustment Offset") + interest(1) + promptgroup("60 - Convert") + pp(TRUE) + } + field(ASLO, DBF_DOUBLE) { + prompt("Adjustment Slope") + interest(1) + pp(TRUE) + promptgroup("60 - Convert") + } + field(HIHI, DBF_DOUBLE) { + interest(1) + prop(YES) + pp(TRUE) + promptgroup("70 - Alarm") + prompt("Hihi Alarm Limit") + } + field(LOLO, DBF_DOUBLE) { + prompt("Lolo Alarm Limit") + interest(1) + prop(YES) + promptgroup("70 - Alarm") + pp(TRUE) + } + field(HIGH, DBF_DOUBLE) { + prompt("High Alarm Limit") + interest(1) + prop(YES) + promptgroup("70 - Alarm") + pp(TRUE) + } + field(LOW, DBF_DOUBLE) { + prop(YES) + interest(1) + pp(TRUE) + promptgroup("70 - Alarm") + prompt("Low Alarm Limit") + } + field(HHSV, DBF_MENU) { + pp(TRUE) + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + prop(YES) + prompt("Hihi Severity") + } + field(LLSV, DBF_MENU) { + prompt("Lolo Severity") + prop(YES) + menu(menuAlarmSevr) + interest(1) + pp(TRUE) + promptgroup("70 - Alarm") + } + field(HSV, DBF_MENU) { + pp(TRUE) + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + prop(YES) + interest(1) + prompt("High Severity") + } + field(LSV, DBF_MENU) { + prompt("Low Severity") + prop(YES) + menu(menuAlarmSevr) + interest(1) + pp(TRUE) + promptgroup("70 - Alarm") + } + field(HYST, DBF_DOUBLE) { + promptgroup("70 - Alarm") + interest(1) + prompt("Alarm Deadband") + } + field(ADEL, DBF_DOUBLE) { + interest(1) + promptgroup("80 - Display") + prompt("Archive Deadband") + } + field(MDEL, DBF_DOUBLE) { + promptgroup("80 - Display") + interest(1) + prompt("Monitor Deadband") + } + field(RVAL, DBF_LONG) { + pp(TRUE) + prompt("Current Raw Value") + } + field(ORAW, DBF_LONG) { + prompt("Previous Raw Value") + special(SPC_NOMOD) + interest(3) + } + field(RBV, DBF_LONG) { + special(SPC_NOMOD) + prompt("Readback Value") + } + field(ORBV, DBF_LONG) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Readback Value") + } + field(PVAL, DBF_DOUBLE) { + prompt("Previous value") + interest(3) + special(SPC_NOMOD) + } + field(LALM, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Last Value Alarmed") + } + field(ALST, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Last Value Archived") + } + field(MLST, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Last Val Monitored") + } + field(PBRK, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("void * pbrk") + prompt("Ptrto brkTable") + } + field(INIT, DBF_SHORT) { + interest(3) + special(SPC_NOMOD) + prompt("Initialized?") + } + field(LBRK, DBF_SHORT) { + special(SPC_NOMOD) + interest(3) + prompt("LastBreak Point") + } + field(SIOL, DBF_OUTLINK) { + interest(1) + promptgroup("90 - Simulate") + prompt("Simulation Output Link") + } + field(SIML, DBF_INLINK) { + prompt("Simulation Mode Link") + interest(1) + promptgroup("90 - Simulate") + } + field(SIMM, DBF_MENU) { + prompt("Simulation Mode") + interest(1) + menu(menuYesNo) + special(SPC_MOD) + } + field(SIMS, DBF_MENU) { + prompt("Simulation Mode Severity") + interest(2) + menu(menuAlarmSevr) + promptgroup("90 - Simulate") + } + field(OLDSIMM, DBF_MENU) { + prompt("Prev. Simulation Mode") + interest(4) + menu(menuSimm) + special(SPC_NOMOD) + } + field(SSCN, DBF_MENU) { + initial("65535") + prompt("Sim. Mode Scan") + menu(menuScan) + interest(1) + promptgroup("90 - Simulate") + } + field(SDLY, DBF_DOUBLE) { + initial("-1.0") + prompt("Sim. Mode Async Delay") + interest(2) + promptgroup("90 - Simulate") + } + field(SIMPVT, DBF_NOACCESS) { + extra("CALLBACK *simpvt") + prompt("Sim. Mode Private") + special(SPC_NOMOD) + interest(4) + } + field(IVOA, DBF_MENU) { + prompt("INVALID output action") + menu(menuIvoa) + interest(2) + promptgroup("50 - Output") + } + field(IVOV, DBF_DOUBLE) { + promptgroup("50 - Output") + interest(2) + prompt("INVALID output value") + } + field(OMOD, DBF_UCHAR) { + special(SPC_NOMOD) + prompt("Was OVAL modified?") + } +} +device(ao, CONSTANT, devAoSoft, "Soft Channel") +device(ao, CONSTANT, devAoSoftRaw, "Raw Soft Channel") +device(ao, CONSTANT, devAoSoftCallback, "Async Soft Channel") +device(ao, INST_IO, asynAoInt32, "asynInt32") +device(ao, INST_IO, asynAoFloat64, "asynFloat64") +device(ao, INST_IO, devaoStream, "stream") +device(ao, INST_IO, devAoStrParm, "asyn ao stringParm") +device(ao, INST_IO, devAoEurotherm, "asyn ao Eurotherm") +device(ao, INST_IO, devAoMPC, "asyn MPC") +device(ao, BBGPIB_IO, devAoAX301, "PZT Bug") +device(ao, INST_IO, devAoTPG261, "asyn TPG261") +recordtype(stringin) { + %#include "epicsTypes.h" + %#include "link.h" + %#include "epicsMutex.h" + %#include "ellLib.h" + %#include "epicsTime.h" + %#include "callback.h" + field(NAME, DBF_STRING) { + prompt("Record Name") + size(61) + special(SPC_NOMOD) + } + field(DESC, DBF_STRING) { + prompt("Descriptor") + size(41) + promptgroup("10 - Common") + } + field(ASG, DBF_STRING) { + promptgroup("10 - Common") + special(SPC_AS) + prompt("Access Security Group") + size(29) + } + field(SCAN, DBF_MENU) { + prompt("Scan Mechanism") + promptgroup("20 - Scan") + special(SPC_SCAN) + menu(menuScan) + interest(1) + } + field(PINI, DBF_MENU) { + interest(1) + menu(menuPini) + promptgroup("20 - Scan") + prompt("Process at iocInit") + } + field(PHAS, DBF_SHORT) { + prompt("Scan Phase") + promptgroup("20 - Scan") + interest(1) + special(SPC_SCAN) + } + field(EVNT, DBF_STRING) { + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + prompt("Event Name") + size(40) + } + field(TSE, DBF_SHORT) { + interest(1) + promptgroup("20 - Scan") prompt("Time Stamp Event") } field(TSEL, DBF_INLINK) { + promptgroup("20 - Scan") + interest(1) prompt("Time Stamp Link") - promptgroup("20 - Scan") - interest(1) } field(DTYP, DBF_DEVICE) { promptgroup("10 - Common") @@ -5476,603 +21464,28 @@ interest(4) } field(MLIS, DBF_NOACCESS) { + prompt("Monitor List") extra("ELLLIST mlis") - special(SPC_NOMOD) - interest(4) - prompt("Monitor List") + interest(4) + special(SPC_NOMOD) } field(BKLNK, DBF_NOACCESS) { prompt("Backwards link tracking") - special(SPC_NOMOD) - interest(4) extra("ELLLIST bklnk") + special(SPC_NOMOD) + interest(4) } field(DISP, DBF_UCHAR) { prompt("Disable putField") } field(PROC, DBF_UCHAR) { - prompt("Force Processing") - interest(3) - pp(TRUE) - } - field(STAT, DBF_MENU) { - special(SPC_NOMOD) - prompt("Alarm Status") - menu(menuAlarmStat) - initial("UDF") - } - field(SEVR, DBF_MENU) { - menu(menuAlarmSevr) - special(SPC_NOMOD) - prompt("Alarm Severity") - } - field(NSTA, DBF_MENU) { - menu(menuAlarmStat) - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Status") - } - field(NSEV, DBF_MENU) { - menu(menuAlarmSevr) - prompt("New Alarm Severity") - interest(2) - special(SPC_NOMOD) - } - field(ACKS, DBF_MENU) { - interest(2) - special(SPC_NOMOD) - prompt("Alarm Ack Severity") - menu(menuAlarmSevr) - } - field(ACKT, DBF_MENU) { - prompt("Alarm Ack Transient") - interest(2) - special(SPC_NOMOD) - promptgroup("70 - Alarm") - menu(menuYesNo) - initial("YES") - } - field(DISS, DBF_MENU) { - prompt("Disable Alarm Sevrty") - interest(1) - promptgroup("70 - Alarm") - menu(menuAlarmSevr) - } - field(LCNT, DBF_UCHAR) { - interest(2) - special(SPC_NOMOD) - prompt("Lock Count") - } - field(PACT, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Record active") - } - field(PUTF, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("dbPutField process") - } - field(RPRO, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Reprocess ") - } - field(ASP, DBF_NOACCESS) { - prompt("Access Security Pvt") - special(SPC_NOMOD) - interest(4) - extra("struct asgMember *asp") - } - field(PPN, DBF_NOACCESS) { - prompt("pprocessNotify") - special(SPC_NOMOD) - interest(4) - extra("struct processNotify *ppn") - } - field(PPNR, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("pprocessNotifyRecord") - extra("struct processNotifyRecord *ppnr") - } - field(SPVT, DBF_NOACCESS) { - extra("struct scan_element *spvt") - prompt("Scan Private") - special(SPC_NOMOD) - interest(4) - } - field(RSET, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Address of RSET") - extra("struct typed_rset *rset") - } - field(DSET, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("DSET address") - extra("struct dset *dset") - } - field(DPVT, DBF_NOACCESS) { - extra("void *dpvt") - prompt("Device Private") - special(SPC_NOMOD) - interest(4) - } - field(RDES, DBF_NOACCESS) { - prompt("Address of dbRecordType") - interest(4) - special(SPC_NOMOD) - extra("struct dbRecordType *rdes") - } - field(LSET, DBF_NOACCESS) { - extra("struct lockRecord *lset") - interest(4) - special(SPC_NOMOD) - prompt("Lock Set") - } - field(PRIO, DBF_MENU) { - menu(menuPriority) - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - prompt("Scheduling Priority") - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - prompt("Break Point") - special(SPC_NOMOD) - interest(1) - extra("char bkpt") - } - field(UDF, DBF_UCHAR) { - prompt("Undefined") - interest(1) - promptgroup("10 - Common") - pp(TRUE) - initial("1") - } - field(UDFS, DBF_MENU) { - initial("INVALID") - prompt("Undefined Alarm Sevrty") - interest(1) - promptgroup("70 - Alarm") - menu(menuAlarmSevr) - } - field(TIME, DBF_NOACCESS) { - extra("epicsTimeStamp time") - interest(2) - special(SPC_NOMOD) - prompt("Time") - } - field(FLNK, DBF_FWDLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Forward Process Link") - } - field(VAL, DBF_DOUBLE) { - asl(ASL0) - prompt("Result") - promptgroup("50 - Output") - } - field(CALC, DBF_STRING) { - pp(TRUE) - initial("0") - size(80) - prompt("Calculation") - promptgroup("30 - Action") - special(SPC_CALC) - } - field(INPA, DBF_INLINK) { - promptgroup("41 - Input A-F") - interest(1) - prompt("Input A") - } - field(INPB, DBF_INLINK) { - promptgroup("41 - Input A-F") - interest(1) - prompt("Input B") - } - field(INPC, DBF_INLINK) { - promptgroup("41 - Input A-F") - interest(1) - prompt("Input C") - } - field(INPD, DBF_INLINK) { - interest(1) - promptgroup("41 - Input A-F") - prompt("Input D") - } - field(INPE, DBF_INLINK) { - interest(1) - promptgroup("41 - Input A-F") - prompt("Input E") - } - field(INPF, DBF_INLINK) { - prompt("Input F") - interest(1) - promptgroup("41 - Input A-F") - } - field(INPG, DBF_INLINK) { - promptgroup("42 - Input G-L") - interest(1) - prompt("Input G") - } - field(INPH, DBF_INLINK) { - prompt("Input H") - interest(1) - promptgroup("42 - Input G-L") - } - field(INPI, DBF_INLINK) { - prompt("Input I") - interest(1) - promptgroup("42 - Input G-L") - } - field(INPJ, DBF_INLINK) { - prompt("Input J") - promptgroup("42 - Input G-L") - interest(1) - } - field(INPK, DBF_INLINK) { - interest(1) - promptgroup("42 - Input G-L") - prompt("Input K") - } - field(INPL, DBF_INLINK) { - interest(1) - promptgroup("42 - Input G-L") - prompt("Input L") - } - field(EGU, DBF_STRING) { - size(16) - prop(YES) - interest(1) - promptgroup("80 - Display") - prompt("Engineering Units") - } - field(PREC, DBF_SHORT) { - prop(YES) - promptgroup("80 - Display") - interest(1) - prompt("Display Precision") - } - field(HOPR, DBF_DOUBLE) { - prompt("High Operating Rng") - promptgroup("80 - Display") - prop(YES) - interest(1) - } - field(LOPR, DBF_DOUBLE) { - prop(YES) - promptgroup("80 - Display") - interest(1) - prompt("Low Operating Range") - } - field(HIHI, DBF_DOUBLE) { - pp(TRUE) - prompt("Hihi Alarm Limit") - prop(YES) - interest(1) - promptgroup("70 - Alarm") - } - field(LOLO, DBF_DOUBLE) { - prompt("Lolo Alarm Limit") - interest(1) - prop(YES) - promptgroup("70 - Alarm") - pp(TRUE) - } - field(HIGH, DBF_DOUBLE) { - prompt("High Alarm Limit") - prop(YES) - interest(1) - promptgroup("70 - Alarm") - pp(TRUE) - } - field(LOW, DBF_DOUBLE) { - pp(TRUE) - prompt("Low Alarm Limit") - prop(YES) - interest(1) - promptgroup("70 - Alarm") - } - field(HHSV, DBF_MENU) { - prompt("Hihi Severity") - promptgroup("70 - Alarm") - prop(YES) - interest(1) - menu(menuAlarmSevr) - pp(TRUE) - } - field(LLSV, DBF_MENU) { - pp(TRUE) - prompt("Lolo Severity") - interest(1) - prop(YES) - promptgroup("70 - Alarm") - menu(menuAlarmSevr) - } - field(HSV, DBF_MENU) { - pp(TRUE) - interest(1) - prop(YES) - promptgroup("70 - Alarm") - prompt("High Severity") - menu(menuAlarmSevr) - } - field(LSV, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Low Severity") - prop(YES) - promptgroup("70 - Alarm") - interest(1) - pp(TRUE) - } - field(AFTC, DBF_DOUBLE) { - promptgroup("70 - Alarm") - interest(1) - prompt("Alarm Filter Time Constant") - } - field(AFVL, DBF_DOUBLE) { - prompt("Alarm Filter Value") - interest(3) - special(SPC_NOMOD) - } - field(HYST, DBF_DOUBLE) { - promptgroup("70 - Alarm") - interest(1) - prompt("Alarm Deadband") - } - field(ADEL, DBF_DOUBLE) { - prompt("Archive Deadband") - interest(1) - promptgroup("80 - Display") - } - field(MDEL, DBF_DOUBLE) { - prompt("Monitor Deadband") - promptgroup("80 - Display") - interest(1) - } - field(A, DBF_DOUBLE) { - prompt("Value of Input A") - pp(TRUE) - } - field(B, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input B") - } - field(C, DBF_DOUBLE) { - prompt("Value of Input C") - pp(TRUE) - } - field(D, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input D") - } - field(E, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input E") - } - field(F, DBF_DOUBLE) { - prompt("Value of Input F") - pp(TRUE) - } - field(G, DBF_DOUBLE) { - prompt("Value of Input G") - pp(TRUE) - } - field(H, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input H") - } - field(I, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input I") - } - field(J, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input J") - } - field(K, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input K") - } - field(L, DBF_DOUBLE) { - prompt("Value of Input L") - pp(TRUE) - } - field(LA, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Value of A") - } - field(LB, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of B") - } - field(LC, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of C") - } - field(LD, DBF_DOUBLE) { - prompt("Prev Value of D") - interest(3) - special(SPC_NOMOD) - } - field(LE, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Value of E") - } - field(LF, DBF_DOUBLE) { - prompt("Prev Value of F") - interest(3) - special(SPC_NOMOD) - } - field(LG, DBF_DOUBLE) { - prompt("Prev Value of G") - interest(3) - special(SPC_NOMOD) - } - field(LH, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Value of H") - } - field(LI, DBF_DOUBLE) { - prompt("Prev Value of I") - special(SPC_NOMOD) - interest(3) - } - field(LJ, DBF_DOUBLE) { - prompt("Prev Value of J") - special(SPC_NOMOD) - interest(3) - } - field(LK, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of K") - } - field(LL, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of L") - } - field(LALM, DBF_DOUBLE) { - prompt("Last Value Alarmed") - interest(3) - special(SPC_NOMOD) - } - field(ALST, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Last Value Archived") - } - field(MLST, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Last Val Monitored") - } - field(RPCL, DBF_NOACCESS) { - extra("char rpcl[INFIX_TO_POSTFIX_SIZE(80)]") - special(SPC_NOMOD) - interest(4) - prompt("Reverse Polish Calc") - } -} -recordtype(calcout) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - %#include "dbScan.h" - %#include "postfix.h" - field(NAME, DBF_STRING) { - size(61) - special(SPC_NOMOD) - prompt("Record Name") - } - field(DESC, DBF_STRING) { - size(41) - prompt("Descriptor") - promptgroup("10 - Common") - } - field(ASG, DBF_STRING) { - size(29) - special(SPC_AS) - promptgroup("10 - Common") - prompt("Access Security Group") - } - field(SCAN, DBF_MENU) { - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - prompt("Scan Mechanism") - menu(menuScan) - } - field(PINI, DBF_MENU) { - menu(menuPini) - prompt("Process at iocInit") - promptgroup("20 - Scan") - interest(1) - } - field(PHAS, DBF_SHORT) { - prompt("Scan Phase") - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - } - field(EVNT, DBF_STRING) { - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - prompt("Event Name") - size(40) - } - field(TSE, DBF_SHORT) { - promptgroup("20 - Scan") - interest(1) - prompt("Time Stamp Event") - } - field(TSEL, DBF_INLINK) { - prompt("Time Stamp Link") - interest(1) - promptgroup("20 - Scan") - } - field(DTYP, DBF_DEVICE) { - interest(1) - promptgroup("10 - Common") - prompt("Device Type") - } - field(DISV, DBF_SHORT) { - initial("1") - promptgroup("20 - Scan") - prompt("Disable Value") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - prompt("Scanning Disable") - interest(1) - promptgroup("20 - Scan") - } - field(MLOK, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Monitor lock") - extra("epicsMutexId mlok") - } - field(MLIS, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Monitor List") - extra("ELLLIST mlis") - } - field(BKLNK, DBF_NOACCESS) { - prompt("Backwards link tracking") - special(SPC_NOMOD) - interest(4) - extra("ELLLIST bklnk") - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - pp(TRUE) - interest(3) + interest(3) + pp(TRUE) prompt("Force Processing") } field(STAT, DBF_MENU) { + prompt("Alarm Status") initial("UDF") - prompt("Alarm Status") special(SPC_NOMOD) menu(menuAlarmStat) } @@ -6082,1699 +21495,6 @@ menu(menuAlarmSevr) } field(NSTA, DBF_MENU) { - menu(menuAlarmStat) - interest(2) - special(SPC_NOMOD) - prompt("New Alarm Status") - } - field(NSEV, DBF_MENU) { - menu(menuAlarmSevr) - prompt("New Alarm Severity") - special(SPC_NOMOD) - interest(2) - } - field(ACKS, DBF_MENU) { - interest(2) - special(SPC_NOMOD) - prompt("Alarm Ack Severity") - menu(menuAlarmSevr) - } - field(ACKT, DBF_MENU) { - interest(2) - special(SPC_NOMOD) - promptgroup("70 - Alarm") - prompt("Alarm Ack Transient") - menu(menuYesNo) - initial("YES") - } - field(DISS, DBF_MENU) { - interest(1) - promptgroup("70 - Alarm") - prompt("Disable Alarm Sevrty") - menu(menuAlarmSevr) - } - field(LCNT, DBF_UCHAR) { - interest(2) - special(SPC_NOMOD) - prompt("Lock Count") - } - field(PACT, DBF_UCHAR) { - prompt("Record active") - interest(1) - special(SPC_NOMOD) - } - field(PUTF, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("dbPutField process") - } - field(RPRO, DBF_UCHAR) { - prompt("Reprocess ") - interest(1) - special(SPC_NOMOD) - } - field(ASP, DBF_NOACCESS) { - extra("struct asgMember *asp") - prompt("Access Security Pvt") - special(SPC_NOMOD) - interest(4) - } - field(PPN, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("pprocessNotify") - extra("struct processNotify *ppn") - } - field(PPNR, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("pprocessNotifyRecord") - extra("struct processNotifyRecord *ppnr") - } - field(SPVT, DBF_NOACCESS) { - extra("struct scan_element *spvt") - interest(4) - special(SPC_NOMOD) - prompt("Scan Private") - } - field(RSET, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Address of RSET") - extra("struct typed_rset *rset") - } - field(DSET, DBF_NOACCESS) { - extra("struct dset *dset") - prompt("DSET address") - interest(4) - special(SPC_NOMOD) - } - field(DPVT, DBF_NOACCESS) { - extra("void *dpvt") - prompt("Device Private") - interest(4) - special(SPC_NOMOD) - } - field(RDES, DBF_NOACCESS) { - extra("struct dbRecordType *rdes") - prompt("Address of dbRecordType") - special(SPC_NOMOD) - interest(4) - } - field(LSET, DBF_NOACCESS) { - prompt("Lock Set") - interest(4) - special(SPC_NOMOD) - extra("struct lockRecord *lset") - } - field(PRIO, DBF_MENU) { - menu(menuPriority) - prompt("Scheduling Priority") - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - extra("char bkpt") - interest(1) - special(SPC_NOMOD) - prompt("Break Point") - } - field(UDF, DBF_UCHAR) { - pp(TRUE) - initial("1") - prompt("Undefined") - interest(1) - promptgroup("10 - Common") - } - field(UDFS, DBF_MENU) { - initial("INVALID") - menu(menuAlarmSevr) - promptgroup("70 - Alarm") - interest(1) - prompt("Undefined Alarm Sevrty") - } - field(TIME, DBF_NOACCESS) { - extra("epicsTimeStamp time") - special(SPC_NOMOD) - interest(2) - prompt("Time") - } - field(FLNK, DBF_FWDLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Forward Process Link") - } - field(RPVT, DBF_NOACCESS) { - prompt("Record Private") - interest(4) - special(SPC_NOMOD) - extra("struct rpvtStruct *rpvt") - } - field(VAL, DBF_DOUBLE) { - asl(ASL0) - promptgroup("50 - Output") - prompt("Result") - } - field(PVAL, DBF_DOUBLE) { - prompt("Previous Value") - } - field(CALC, DBF_STRING) { - prompt("Calculation") - promptgroup("30 - Action") - special(SPC_CALC) - size(80) - initial("0") - pp(TRUE) - } - field(CLCV, DBF_LONG) { - prompt("CALC Valid") - interest(1) - } - field(INPA, DBF_INLINK) { - special(SPC_MOD) - interest(1) - promptgroup("41 - Input A-F") - prompt("Input A") - } - field(INPB, DBF_INLINK) { - prompt("Input B") - interest(1) - special(SPC_MOD) - promptgroup("41 - Input A-F") - } - field(INPC, DBF_INLINK) { - prompt("Input C") - interest(1) - special(SPC_MOD) - promptgroup("41 - Input A-F") - } - field(INPD, DBF_INLINK) { - special(SPC_MOD) - interest(1) - promptgroup("41 - Input A-F") - prompt("Input D") - } - field(INPE, DBF_INLINK) { - promptgroup("41 - Input A-F") - interest(1) - special(SPC_MOD) - prompt("Input E") - } - field(INPF, DBF_INLINK) { - interest(1) - promptgroup("41 - Input A-F") - special(SPC_MOD) - prompt("Input F") - } - field(INPG, DBF_INLINK) { - promptgroup("42 - Input G-L") - interest(1) - special(SPC_MOD) - prompt("Input G") - } - field(INPH, DBF_INLINK) { - special(SPC_MOD) - interest(1) - promptgroup("42 - Input G-L") - prompt("Input H") - } - field(INPI, DBF_INLINK) { - prompt("Input I") - promptgroup("42 - Input G-L") - interest(1) - special(SPC_MOD) - } - field(INPJ, DBF_INLINK) { - prompt("Input J") - special(SPC_MOD) - interest(1) - promptgroup("42 - Input G-L") - } - field(INPK, DBF_INLINK) { - prompt("Input K") - promptgroup("42 - Input G-L") - interest(1) - special(SPC_MOD) - } - field(INPL, DBF_INLINK) { - prompt("Input L") - interest(1) - promptgroup("42 - Input G-L") - special(SPC_MOD) - } - field(OUT, DBF_OUTLINK) { - interest(1) - special(SPC_MOD) - promptgroup("50 - Output") - prompt("Output Specification") - } - field(INAV, DBF_MENU) { - interest(1) - special(SPC_NOMOD) - prompt("INPA PV Status") - menu(calcoutINAV) - initial("1") - } - field(INBV, DBF_MENU) { - initial("1") - special(SPC_NOMOD) - interest(1) - prompt("INPB PV Status") - menu(calcoutINAV) - } - field(INCV, DBF_MENU) { - menu(calcoutINAV) - interest(1) - special(SPC_NOMOD) - prompt("INPC PV Status") - initial("1") - } - field(INDV, DBF_MENU) { - special(SPC_NOMOD) - interest(1) - prompt("INPD PV Status") - menu(calcoutINAV) - initial("1") - } - field(INEV, DBF_MENU) { - initial("1") - special(SPC_NOMOD) - interest(1) - prompt("INPE PV Status") - menu(calcoutINAV) - } - field(INFV, DBF_MENU) { - menu(calcoutINAV) - special(SPC_NOMOD) - interest(1) - prompt("INPF PV Status") - initial("1") - } - field(INGV, DBF_MENU) { - menu(calcoutINAV) - prompt("INPG PV Status") - special(SPC_NOMOD) - interest(1) - initial("1") - } - field(INHV, DBF_MENU) { - prompt("INPH PV Status") - special(SPC_NOMOD) - interest(1) - menu(calcoutINAV) - initial("1") - } - field(INIV, DBF_MENU) { - initial("1") - menu(calcoutINAV) - interest(1) - special(SPC_NOMOD) - prompt("INPI PV Status") - } - field(INJV, DBF_MENU) { - prompt("INPJ PV Status") - special(SPC_NOMOD) - interest(1) - menu(calcoutINAV) - initial("1") - } - field(INKV, DBF_MENU) { - menu(calcoutINAV) - interest(1) - special(SPC_NOMOD) - prompt("INPK PV Status") - initial("1") - } - field(INLV, DBF_MENU) { - initial("1") - prompt("INPL PV Status") - special(SPC_NOMOD) - interest(1) - menu(calcoutINAV) - } - field(OUTV, DBF_MENU) { - menu(calcoutINAV) - interest(1) - special(SPC_NOMOD) - prompt("OUT PV Status") - } - field(OOPT, DBF_MENU) { - menu(calcoutOOPT) - prompt("Output Execute Opt") - promptgroup("50 - Output") - interest(1) - } - field(ODLY, DBF_DOUBLE) { - asl(ASL0) - prompt("Output Execute Delay") - interest(1) - promptgroup("50 - Output") - } - field(DLYA, DBF_USHORT) { - asl(ASL0) - prompt("Output Delay Active") - special(SPC_NOMOD) - } - field(DOPT, DBF_MENU) { - prompt("Output Data Opt") - promptgroup("30 - Action") - interest(1) - menu(calcoutDOPT) - } - field(OCAL, DBF_STRING) { - prompt("Output Calculation") - promptgroup("30 - Action") - special(SPC_CALC) - initial("0") - size(80) - pp(TRUE) - } - field(OCLV, DBF_LONG) { - interest(1) - prompt("OCAL Valid") - } - field(OEVT, DBF_STRING) { - size(40) - prompt("Event To Issue") - special(SPC_MOD) - promptgroup("30 - Action") - asl(ASL0) - } - field(EPVT, DBF_NOACCESS) { - prompt("Event private") - interest(4) - special(SPC_NOMOD) - extra("EVENTPVT epvt") - } - field(IVOA, DBF_MENU) { - menu(menuIvoa) - promptgroup("50 - Output") - interest(2) - prompt("INVALID output action") - } - field(IVOV, DBF_DOUBLE) { - prompt("INVALID output value") - interest(2) - promptgroup("50 - Output") - } - field(EGU, DBF_STRING) { - size(16) - interest(1) - prop(YES) - promptgroup("80 - Display") - prompt("Engineering Units") - } - field(PREC, DBF_SHORT) { - prompt("Display Precision") - prop(YES) - interest(1) - promptgroup("80 - Display") - } - field(HOPR, DBF_DOUBLE) { - prompt("High Operating Rng") - prop(YES) - promptgroup("80 - Display") - interest(1) - } - field(LOPR, DBF_DOUBLE) { - prompt("Low Operating Range") - interest(1) - prop(YES) - promptgroup("80 - Display") - } - field(HIHI, DBF_DOUBLE) { - prompt("Hihi Alarm Limit") - prop(YES) - promptgroup("70 - Alarm") - interest(1) - pp(TRUE) - } - field(LOLO, DBF_DOUBLE) { - pp(TRUE) - prompt("Lolo Alarm Limit") - prop(YES) - promptgroup("70 - Alarm") - interest(1) - } - field(HIGH, DBF_DOUBLE) { - pp(TRUE) - prop(YES) - promptgroup("70 - Alarm") - interest(1) - prompt("High Alarm Limit") - } - field(LOW, DBF_DOUBLE) { - pp(TRUE) - prop(YES) - interest(1) - promptgroup("70 - Alarm") - prompt("Low Alarm Limit") - } - field(HHSV, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Hihi Severity") - interest(1) - prop(YES) - promptgroup("70 - Alarm") - pp(TRUE) - } - field(LLSV, DBF_MENU) { - pp(TRUE) - menu(menuAlarmSevr) - prompt("Lolo Severity") - prop(YES) - promptgroup("70 - Alarm") - interest(1) - } - field(HSV, DBF_MENU) { - menu(menuAlarmSevr) - promptgroup("70 - Alarm") - prop(YES) - interest(1) - prompt("High Severity") - pp(TRUE) - } - field(LSV, DBF_MENU) { - pp(TRUE) - prop(YES) - interest(1) - promptgroup("70 - Alarm") - prompt("Low Severity") - menu(menuAlarmSevr) - } - field(HYST, DBF_DOUBLE) { - interest(1) - promptgroup("70 - Alarm") - prompt("Alarm Deadband") - } - field(ADEL, DBF_DOUBLE) { - prompt("Archive Deadband") - interest(1) - promptgroup("80 - Display") - } - field(MDEL, DBF_DOUBLE) { - promptgroup("80 - Display") - interest(1) - prompt("Monitor Deadband") - } - field(A, DBF_DOUBLE) { - prompt("Value of Input A") - pp(TRUE) - } - field(B, DBF_DOUBLE) { - prompt("Value of Input B") - pp(TRUE) - } - field(C, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input C") - } - field(D, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input D") - } - field(E, DBF_DOUBLE) { - prompt("Value of Input E") - pp(TRUE) - } - field(F, DBF_DOUBLE) { - prompt("Value of Input F") - pp(TRUE) - } - field(G, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input G") - } - field(H, DBF_DOUBLE) { - prompt("Value of Input H") - pp(TRUE) - } - field(I, DBF_DOUBLE) { - prompt("Value of Input I") - pp(TRUE) - } - field(J, DBF_DOUBLE) { - prompt("Value of Input J") - pp(TRUE) - } - field(K, DBF_DOUBLE) { - prompt("Value of Input K") - pp(TRUE) - } - field(L, DBF_DOUBLE) { - prompt("Value of Input L") - pp(TRUE) - } - field(OVAL, DBF_DOUBLE) { - prompt("Output Value") - asl(ASL0) - } - field(LA, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of A") - } - field(LB, DBF_DOUBLE) { - prompt("Prev Value of B") - interest(3) - special(SPC_NOMOD) - } - field(LC, DBF_DOUBLE) { - prompt("Prev Value of C") - interest(3) - special(SPC_NOMOD) - } - field(LD, DBF_DOUBLE) { - prompt("Prev Value of D") - special(SPC_NOMOD) - interest(3) - } - field(LE, DBF_DOUBLE) { - prompt("Prev Value of E") - interest(3) - special(SPC_NOMOD) - } - field(LF, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Value of F") - } - field(LG, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Value of G") - } - field(LH, DBF_DOUBLE) { - prompt("Prev Value of H") - special(SPC_NOMOD) - interest(3) - } - field(LI, DBF_DOUBLE) { - prompt("Prev Value of I") - interest(3) - special(SPC_NOMOD) - } - field(LJ, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Value of J") - } - field(LK, DBF_DOUBLE) { - prompt("Prev Value of K") - interest(3) - special(SPC_NOMOD) - } - field(LL, DBF_DOUBLE) { - prompt("Prev Value of L") - special(SPC_NOMOD) - interest(3) - } - field(POVL, DBF_DOUBLE) { - prompt("Prev Value of OVAL") - asl(ASL0) - } - field(LALM, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Last Value Alarmed") - } - field(ALST, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Last Value Archived") - } - field(MLST, DBF_DOUBLE) { - prompt("Last Val Monitored") - interest(3) - special(SPC_NOMOD) - } - field(RPCL, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Reverse Polish Calc") - extra("char rpcl[INFIX_TO_POSTFIX_SIZE(80)]") - } - field(ORPC, DBF_NOACCESS) { - extra("char orpc[INFIX_TO_POSTFIX_SIZE(80)]") - prompt("Reverse Polish OCalc") - interest(4) - special(SPC_NOMOD) - } -} -device(calcout, CONSTANT, devCalcoutSoft, "Soft Channel") -device(calcout, CONSTANT, devCalcoutSoftCallback, "Async Soft Channel") -device(calcout, INST_IO, devcalcoutStream, "stream") -recordtype(histogram) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - %#include "callback.h" - field(NAME, DBF_STRING) { - size(61) - special(SPC_NOMOD) - prompt("Record Name") - } - field(DESC, DBF_STRING) { - prompt("Descriptor") - promptgroup("10 - Common") - size(41) - } - field(ASG, DBF_STRING) { - prompt("Access Security Group") - special(SPC_AS) - promptgroup("10 - Common") - size(29) - } - field(SCAN, DBF_MENU) { - menu(menuScan) - prompt("Scan Mechanism") - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - } - field(PINI, DBF_MENU) { - menu(menuPini) - prompt("Process at iocInit") - interest(1) - promptgroup("20 - Scan") - } - field(PHAS, DBF_SHORT) { - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - prompt("Scan Phase") - } - field(EVNT, DBF_STRING) { - size(40) - prompt("Event Name") - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - } - field(TSE, DBF_SHORT) { - promptgroup("20 - Scan") - interest(1) - prompt("Time Stamp Event") - } - field(TSEL, DBF_INLINK) { - promptgroup("20 - Scan") - interest(1) - prompt("Time Stamp Link") - } - field(DTYP, DBF_DEVICE) { - promptgroup("10 - Common") - interest(1) - prompt("Device Type") - } - field(DISV, DBF_SHORT) { - initial("1") - promptgroup("20 - Scan") - prompt("Disable Value") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - promptgroup("20 - Scan") - interest(1) - prompt("Scanning Disable") - } - field(MLOK, DBF_NOACCESS) { - extra("epicsMutexId mlok") - prompt("Monitor lock") - special(SPC_NOMOD) - interest(4) - } - field(MLIS, DBF_NOACCESS) { - extra("ELLLIST mlis") - prompt("Monitor List") - interest(4) - special(SPC_NOMOD) - } - field(BKLNK, DBF_NOACCESS) { - extra("ELLLIST bklnk") - special(SPC_NOMOD) - interest(4) - prompt("Backwards link tracking") - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - pp(TRUE) - interest(3) - prompt("Force Processing") - } - field(STAT, DBF_MENU) { - menu(menuAlarmStat) - prompt("Alarm Status") - special(SPC_NOMOD) - initial("UDF") - } - field(SEVR, DBF_MENU) { - special(SPC_NOMOD) - prompt("Alarm Severity") - menu(menuAlarmSevr) - } - field(NSTA, DBF_MENU) { - prompt("New Alarm Status") - interest(2) - special(SPC_NOMOD) - menu(menuAlarmStat) - } - field(NSEV, DBF_MENU) { - prompt("New Alarm Severity") - interest(2) - special(SPC_NOMOD) - menu(menuAlarmSevr) - } - field(ACKS, DBF_MENU) { - menu(menuAlarmSevr) - interest(2) - special(SPC_NOMOD) - prompt("Alarm Ack Severity") - } - field(ACKT, DBF_MENU) { - initial("YES") - prompt("Alarm Ack Transient") - interest(2) - special(SPC_NOMOD) - promptgroup("70 - Alarm") - menu(menuYesNo) - } - field(DISS, DBF_MENU) { - prompt("Disable Alarm Sevrty") - interest(1) - promptgroup("70 - Alarm") - menu(menuAlarmSevr) - } - field(LCNT, DBF_UCHAR) { - special(SPC_NOMOD) - interest(2) - prompt("Lock Count") - } - field(PACT, DBF_UCHAR) { - prompt("Record active") - interest(1) - special(SPC_NOMOD) - } - field(PUTF, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("dbPutField process") - } - field(RPRO, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Reprocess ") - } - field(ASP, DBF_NOACCESS) { - extra("struct asgMember *asp") - interest(4) - special(SPC_NOMOD) - prompt("Access Security Pvt") - } - field(PPN, DBF_NOACCESS) { - extra("struct processNotify *ppn") - prompt("pprocessNotify") - special(SPC_NOMOD) - interest(4) - } - field(PPNR, DBF_NOACCESS) { - extra("struct processNotifyRecord *ppnr") - prompt("pprocessNotifyRecord") - interest(4) - special(SPC_NOMOD) - } - field(SPVT, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Scan Private") - extra("struct scan_element *spvt") - } - field(RSET, DBF_NOACCESS) { - prompt("Address of RSET") - interest(4) - special(SPC_NOMOD) - extra("struct typed_rset *rset") - } - field(DSET, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("DSET address") - extra("struct dset *dset") - } - field(DPVT, DBF_NOACCESS) { - prompt("Device Private") - interest(4) - special(SPC_NOMOD) - extra("void *dpvt") - } - field(RDES, DBF_NOACCESS) { - extra("struct dbRecordType *rdes") - prompt("Address of dbRecordType") - special(SPC_NOMOD) - interest(4) - } - field(LSET, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Lock Set") - extra("struct lockRecord *lset") - } - field(PRIO, DBF_MENU) { - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - prompt("Scheduling Priority") - menu(menuPriority) - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(1) - prompt("Break Point") - extra("char bkpt") - } - field(UDF, DBF_UCHAR) { - pp(TRUE) - initial("1") - prompt("Undefined") - promptgroup("10 - Common") - interest(1) - } - field(UDFS, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Undefined Alarm Sevrty") - interest(1) - promptgroup("70 - Alarm") - initial("INVALID") - } - field(TIME, DBF_NOACCESS) { - prompt("Time") - interest(2) - special(SPC_NOMOD) - extra("epicsTimeStamp time") - } - field(FLNK, DBF_FWDLINK) { - prompt("Forward Process Link") - promptgroup("20 - Scan") - interest(1) - } - field(VAL, DBF_NOACCESS) { - extra("void * val") - asl(ASL0) - special(SPC_DBADDR) - prompt("Value") - } - field(NELM, DBF_USHORT) { - prompt("Num of Array Elements") - special(SPC_NOMOD) - interest(1) - promptgroup("30 - Action") - initial("1") - } - field(CSTA, DBF_SHORT) { - initial("1") - special(SPC_NOMOD) - interest(1) - prompt("Collection Status") - } - field(CMD, DBF_MENU) { - prompt("Collection Control") - interest(1) - special(SPC_CALC) - menu(histogramCMD) - asl(ASL0) - } - field(ULIM, DBF_DOUBLE) { - interest(1) - prop(YES) - special(SPC_RESET) - promptgroup("30 - Action") - prompt("Upper Signal Limit") - } - field(LLIM, DBF_DOUBLE) { - prompt("Lower Signal Limit ") - prop(YES) - interest(1) - special(SPC_RESET) - promptgroup("30 - Action") - } - field(WDTH, DBF_DOUBLE) { - prompt("Element Width") - interest(3) - special(SPC_NOMOD) - } - field(SGNL, DBF_DOUBLE) { - special(SPC_MOD) - prompt("Signal Value") - } - field(PREC, DBF_SHORT) { - interest(1) - prop(YES) - promptgroup("80 - Display") - prompt("Display Precision") - } - field(SVL, DBF_INLINK) { - prompt("Signal Value Location") - promptgroup("40 - Input") - interest(1) - } - field(BPTR, DBF_NOACCESS) { - extra("epicsUInt32 *bptr") - interest(4) - special(SPC_NOMOD) - prompt("Buffer Pointer") - } - field(WDOG, DBF_NOACCESS) { - extra("void * wdog") - interest(4) - special(SPC_NOMOD) - prompt("Watchdog callback") - } - field(MDEL, DBF_SHORT) { - prompt("Monitor Count Deadband") - promptgroup("80 - Display") - interest(1) - } - field(MCNT, DBF_SHORT) { - interest(3) - special(SPC_NOMOD) - prompt("Counts Since Monitor") - } - field(SDEL, DBF_DOUBLE) { - prompt("Monitor Seconds Dband") - special(SPC_RESET) - interest(1) - promptgroup("80 - Display") - } - field(SIOL, DBF_INLINK) { - prompt("Simulation Input Link") - interest(1) - promptgroup("90 - Simulate") - } - field(SVAL, DBF_DOUBLE) { - prompt("Simulation Value") - } - field(SIML, DBF_INLINK) { - prompt("Simulation Mode Link") - interest(1) - promptgroup("90 - Simulate") - } - field(SIMM, DBF_MENU) { - prompt("Simulation Mode") - interest(1) - special(SPC_MOD) - menu(menuYesNo) - } - field(SIMS, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Simulation Mode Severity") - interest(2) - promptgroup("90 - Simulate") - } - field(OLDSIMM, DBF_MENU) { - interest(4) - special(SPC_NOMOD) - prompt("Prev. Simulation Mode") - menu(menuSimm) - } - field(SSCN, DBF_MENU) { - prompt("Sim. Mode Scan") - promptgroup("90 - Simulate") - interest(1) - menu(menuScan) - initial("65535") - } - field(SDLY, DBF_DOUBLE) { - initial("-1.0") - promptgroup("90 - Simulate") - interest(2) - prompt("Sim. Mode Async Delay") - } - field(SIMPVT, DBF_NOACCESS) { - extra("CALLBACK *simpvt") - special(SPC_NOMOD) - interest(4) - prompt("Sim. Mode Private") - } - field(HOPR, DBF_ULONG) { - prompt("High Operating Range") - interest(1) - prop(YES) - promptgroup("80 - Display") - } - field(LOPR, DBF_ULONG) { - promptgroup("80 - Display") - prop(YES) - interest(1) - prompt("Low Operating Range") - } -} -device(histogram, CONSTANT, devHistogramSoft, "Soft Channel") -recordtype(mbbiDirect) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - %#include "callback.h" - field(NAME, DBF_STRING) { - prompt("Record Name") - special(SPC_NOMOD) - size(61) - } - field(DESC, DBF_STRING) { - prompt("Descriptor") - promptgroup("10 - Common") - size(41) - } - field(ASG, DBF_STRING) { - size(29) - prompt("Access Security Group") - special(SPC_AS) - promptgroup("10 - Common") - } - field(SCAN, DBF_MENU) { - menu(menuScan) - prompt("Scan Mechanism") - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - } - field(PINI, DBF_MENU) { - menu(menuPini) - promptgroup("20 - Scan") - interest(1) - prompt("Process at iocInit") - } - field(PHAS, DBF_SHORT) { - prompt("Scan Phase") - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - } - field(EVNT, DBF_STRING) { - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - prompt("Event Name") - size(40) - } - field(TSE, DBF_SHORT) { - interest(1) - promptgroup("20 - Scan") - prompt("Time Stamp Event") - } - field(TSEL, DBF_INLINK) { - promptgroup("20 - Scan") - interest(1) - prompt("Time Stamp Link") - } - field(DTYP, DBF_DEVICE) { - prompt("Device Type") - interest(1) - promptgroup("10 - Common") - } - field(DISV, DBF_SHORT) { - prompt("Disable Value") - promptgroup("20 - Scan") - initial("1") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - prompt("Scanning Disable") - promptgroup("20 - Scan") - interest(1) - } - field(MLOK, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Monitor lock") - extra("epicsMutexId mlok") - } - field(MLIS, DBF_NOACCESS) { - extra("ELLLIST mlis") - interest(4) - special(SPC_NOMOD) - prompt("Monitor List") - } - field(BKLNK, DBF_NOACCESS) { - prompt("Backwards link tracking") - special(SPC_NOMOD) - interest(4) - extra("ELLLIST bklnk") - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - interest(3) - prompt("Force Processing") - pp(TRUE) - } - field(STAT, DBF_MENU) { - initial("UDF") - prompt("Alarm Status") - special(SPC_NOMOD) - menu(menuAlarmStat) - } - field(SEVR, DBF_MENU) { - menu(menuAlarmSevr) - special(SPC_NOMOD) - prompt("Alarm Severity") - } - field(NSTA, DBF_MENU) { - menu(menuAlarmStat) - prompt("New Alarm Status") - special(SPC_NOMOD) - interest(2) - } - field(NSEV, DBF_MENU) { - interest(2) - special(SPC_NOMOD) - prompt("New Alarm Severity") - menu(menuAlarmSevr) - } - field(ACKS, DBF_MENU) { - menu(menuAlarmSevr) - special(SPC_NOMOD) - interest(2) - prompt("Alarm Ack Severity") - } - field(ACKT, DBF_MENU) { - initial("YES") - prompt("Alarm Ack Transient") - interest(2) - promptgroup("70 - Alarm") - special(SPC_NOMOD) - menu(menuYesNo) - } - field(DISS, DBF_MENU) { - menu(menuAlarmSevr) - promptgroup("70 - Alarm") - interest(1) - prompt("Disable Alarm Sevrty") - } - field(LCNT, DBF_UCHAR) { - prompt("Lock Count") - interest(2) - special(SPC_NOMOD) - } - field(PACT, DBF_UCHAR) { - prompt("Record active") - special(SPC_NOMOD) - interest(1) - } - field(PUTF, DBF_UCHAR) { - special(SPC_NOMOD) - interest(1) - prompt("dbPutField process") - } - field(RPRO, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Reprocess ") - } - field(ASP, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Access Security Pvt") - extra("struct asgMember *asp") - } - field(PPN, DBF_NOACCESS) { - extra("struct processNotify *ppn") - interest(4) - special(SPC_NOMOD) - prompt("pprocessNotify") - } - field(PPNR, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("pprocessNotifyRecord") - extra("struct processNotifyRecord *ppnr") - } - field(SPVT, DBF_NOACCESS) { - prompt("Scan Private") - special(SPC_NOMOD) - interest(4) - extra("struct scan_element *spvt") - } - field(RSET, DBF_NOACCESS) { - prompt("Address of RSET") - special(SPC_NOMOD) - interest(4) - extra("struct typed_rset *rset") - } - field(DSET, DBF_NOACCESS) { - extra("struct dset *dset") - special(SPC_NOMOD) - interest(4) - prompt("DSET address") - } - field(DPVT, DBF_NOACCESS) { - prompt("Device Private") - interest(4) - special(SPC_NOMOD) - extra("void *dpvt") - } - field(RDES, DBF_NOACCESS) { - extra("struct dbRecordType *rdes") - prompt("Address of dbRecordType") - special(SPC_NOMOD) - interest(4) - } - field(LSET, DBF_NOACCESS) { - extra("struct lockRecord *lset") - prompt("Lock Set") - special(SPC_NOMOD) - interest(4) - } - field(PRIO, DBF_MENU) { - prompt("Scheduling Priority") - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - menu(menuPriority) - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(1) - prompt("Break Point") - extra("char bkpt") - } - field(UDF, DBF_UCHAR) { - prompt("Undefined") - promptgroup("10 - Common") - interest(1) - pp(TRUE) - initial("1") - } - field(UDFS, DBF_MENU) { - initial("INVALID") - prompt("Undefined Alarm Sevrty") - interest(1) - promptgroup("70 - Alarm") - menu(menuAlarmSevr) - } - field(TIME, DBF_NOACCESS) { - extra("epicsTimeStamp time") - interest(2) - special(SPC_NOMOD) - prompt("Time") - } - field(FLNK, DBF_FWDLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Forward Process Link") - } - field(VAL, DBF_LONG) { - pp(TRUE) - prompt("Current Value") - promptgroup("40 - Input") - asl(ASL0) - } - field(NOBT, DBF_SHORT) { - interest(1) - promptgroup("40 - Input") - special(SPC_NOMOD) - prompt("Number of Bits") - } - field(INP, DBF_INLINK) { - prompt("Input Specification") - promptgroup("40 - Input") - interest(1) - } - field(RVAL, DBF_ULONG) { - pp(TRUE) - prompt("Raw Value") - } - field(ORAW, DBF_ULONG) { - prompt("Prev Raw Value") - interest(3) - special(SPC_NOMOD) - } - field(MASK, DBF_ULONG) { - special(SPC_NOMOD) - interest(1) - prompt("Hardware Mask") - } - field(MLST, DBF_LONG) { - special(SPC_NOMOD) - interest(3) - prompt("Last Value Monitored") - } - field(SHFT, DBF_USHORT) { - prompt("Shift") - interest(1) - promptgroup("40 - Input") - } - field(SIOL, DBF_INLINK) { - prompt("Simulation Input Link") - interest(1) - promptgroup("90 - Simulate") - } - field(SVAL, DBF_LONG) { - prompt("Simulation Value") - } - field(SIML, DBF_INLINK) { - prompt("Simulation Mode Link") - promptgroup("90 - Simulate") - interest(1) - } - field(SIMM, DBF_MENU) { - prompt("Simulation Mode") - special(SPC_MOD) - interest(1) - menu(menuSimm) - } - field(SIMS, DBF_MENU) { - interest(2) - promptgroup("90 - Simulate") - prompt("Simulation Mode Severity") - menu(menuAlarmSevr) - } - field(OLDSIMM, DBF_MENU) { - interest(4) - special(SPC_NOMOD) - prompt("Prev. Simulation Mode") - menu(menuSimm) - } - field(SSCN, DBF_MENU) { - initial("65535") - menu(menuScan) - interest(1) - promptgroup("90 - Simulate") - prompt("Sim. Mode Scan") - } - field(SDLY, DBF_DOUBLE) { - prompt("Sim. Mode Async Delay") - interest(2) - promptgroup("90 - Simulate") - initial("-1.0") - } - field(SIMPVT, DBF_NOACCESS) { - extra("CALLBACK *simpvt") - interest(4) - special(SPC_NOMOD) - prompt("Sim. Mode Private") - } - field(B0, DBF_UCHAR) { - pp(TRUE) - interest(1) - prompt("Bit 0") - } - field(B1, DBF_UCHAR) { - prompt("Bit 1") - interest(1) - pp(TRUE) - } - field(B2, DBF_UCHAR) { - pp(TRUE) - interest(1) - prompt("Bit 2") - } - field(B3, DBF_UCHAR) { - pp(TRUE) - prompt("Bit 3") - interest(1) - } - field(B4, DBF_UCHAR) { - prompt("Bit 4") - interest(1) - pp(TRUE) - } - field(B5, DBF_UCHAR) { - pp(TRUE) - prompt("Bit 5") - interest(1) - } - field(B6, DBF_UCHAR) { - interest(1) - prompt("Bit 6") - pp(TRUE) - } - field(B7, DBF_UCHAR) { - pp(TRUE) - interest(1) - prompt("Bit 7") - } - field(B8, DBF_UCHAR) { - interest(1) - prompt("Bit 8") - pp(TRUE) - } - field(B9, DBF_UCHAR) { - prompt("Bit 9") - interest(1) - pp(TRUE) - } - field(BA, DBF_UCHAR) { - pp(TRUE) - interest(1) - prompt("Bit 10") - } - field(BB, DBF_UCHAR) { - pp(TRUE) - interest(1) - prompt("Bit 11") - } - field(BC, DBF_UCHAR) { - prompt("Bit 12") - interest(1) - pp(TRUE) - } - field(BD, DBF_UCHAR) { - pp(TRUE) - prompt("Bit 13") - interest(1) - } - field(BE, DBF_UCHAR) { - interest(1) - prompt("Bit 14") - pp(TRUE) - } - field(BF, DBF_UCHAR) { - prompt("Bit 15") - interest(1) - pp(TRUE) - } - field(B10, DBF_UCHAR) { - pp(TRUE) - interest(1) - prompt("Bit 16") - } - field(B11, DBF_UCHAR) { - prompt("Bit 17") - interest(1) - pp(TRUE) - } - field(B12, DBF_UCHAR) { - prompt("Bit 18") - interest(1) - pp(TRUE) - } - field(B13, DBF_UCHAR) { - prompt("Bit 19") - interest(1) - pp(TRUE) - } - field(B14, DBF_UCHAR) { - interest(1) - prompt("Bit 20") - pp(TRUE) - } - field(B15, DBF_UCHAR) { - prompt("Bit 21") - interest(1) - pp(TRUE) - } - field(B16, DBF_UCHAR) { - interest(1) - prompt("Bit 22") - pp(TRUE) - } - field(B17, DBF_UCHAR) { - pp(TRUE) - interest(1) - prompt("Bit 23") - } - field(B18, DBF_UCHAR) { - pp(TRUE) - interest(1) - prompt("Bit 24") - } - field(B19, DBF_UCHAR) { - pp(TRUE) - interest(1) - prompt("Bit 25") - } - field(B1A, DBF_UCHAR) { - prompt("Bit 26") - interest(1) - pp(TRUE) - } - field(B1B, DBF_UCHAR) { - pp(TRUE) - interest(1) - prompt("Bit 27") - } - field(B1C, DBF_UCHAR) { - pp(TRUE) - prompt("Bit 28") - interest(1) - } - field(B1D, DBF_UCHAR) { - pp(TRUE) - prompt("Bit 29") - interest(1) - } - field(B1E, DBF_UCHAR) { - pp(TRUE) - prompt("Bit 30") - interest(1) - } - field(B1F, DBF_UCHAR) { - pp(TRUE) - interest(1) - prompt("Bit 31") - } -} -device(mbbiDirect, CONSTANT, devMbbiDirectSoft, "Soft Channel") -device(mbbiDirect, CONSTANT, devMbbiDirectSoftRaw, "Raw Soft Channel") -device(mbbiDirect, CONSTANT, devMbbiDirectSoftCallback, "Async Soft Channel") -device(mbbiDirect, INST_IO, asynMbbiDirectUInt32Digital, "asynUInt32Digital") -device(mbbiDirect, INST_IO, devmbbiDirectStream, "stream") -recordtype(event) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - %#include "dbScan.h" - %#include "callback.h" - field(NAME, DBF_STRING) { - prompt("Record Name") - special(SPC_NOMOD) - size(61) - } - field(DESC, DBF_STRING) { - promptgroup("10 - Common") - prompt("Descriptor") - size(41) - } - field(ASG, DBF_STRING) { - promptgroup("10 - Common") - special(SPC_AS) - prompt("Access Security Group") - size(29) - } - field(SCAN, DBF_MENU) { - prompt("Scan Mechanism") - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - menu(menuScan) - } - field(PINI, DBF_MENU) { - menu(menuPini) - promptgroup("20 - Scan") - interest(1) - prompt("Process at iocInit") - } - field(PHAS, DBF_SHORT) { - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - prompt("Scan Phase") - } - field(EVNT, DBF_STRING) { - size(40) - prompt("Event Name") - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - } - field(TSE, DBF_SHORT) { - interest(1) - promptgroup("20 - Scan") - prompt("Time Stamp Event") - } - field(TSEL, DBF_INLINK) { - prompt("Time Stamp Link") - interest(1) - promptgroup("20 - Scan") - } - field(DTYP, DBF_DEVICE) { - promptgroup("10 - Common") - interest(1) - prompt("Device Type") - } - field(DISV, DBF_SHORT) { - promptgroup("20 - Scan") - prompt("Disable Value") - initial("1") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - prompt("Scanning Disable") - interest(1) - promptgroup("20 - Scan") - } - field(MLOK, DBF_NOACCESS) { - prompt("Monitor lock") - interest(4) - special(SPC_NOMOD) - extra("epicsMutexId mlok") - } - field(MLIS, DBF_NOACCESS) { - extra("ELLLIST mlis") - special(SPC_NOMOD) - interest(4) - prompt("Monitor List") - } - field(BKLNK, DBF_NOACCESS) { - extra("ELLLIST bklnk") - interest(4) - special(SPC_NOMOD) - prompt("Backwards link tracking") - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - interest(3) - prompt("Force Processing") - pp(TRUE) - } - field(STAT, DBF_MENU) { - initial("UDF") - special(SPC_NOMOD) - prompt("Alarm Status") - menu(menuAlarmStat) - } - field(SEVR, DBF_MENU) { - special(SPC_NOMOD) - prompt("Alarm Severity") - menu(menuAlarmSevr) - } - field(NSTA, DBF_MENU) { prompt("New Alarm Status") special(SPC_NOMOD) interest(2) @@ -7787,2075 +21507,33 @@ prompt("New Alarm Severity") } field(ACKS, DBF_MENU) { - menu(menuAlarmSevr) prompt("Alarm Ack Severity") - special(SPC_NOMOD) - interest(2) + menu(menuAlarmSevr) + interest(2) + special(SPC_NOMOD) } field(ACKT, DBF_MENU) { + special(SPC_NOMOD) + interest(2) + menu(menuYesNo) + promptgroup("70 - Alarm") initial("YES") - menu(menuYesNo) - interest(2) - promptgroup("70 - Alarm") - special(SPC_NOMOD) prompt("Alarm Ack Transient") } field(DISS, DBF_MENU) { - promptgroup("70 - Alarm") - interest(1) prompt("Disable Alarm Sevrty") - menu(menuAlarmSevr) - } - field(LCNT, DBF_UCHAR) { - interest(2) - special(SPC_NOMOD) - prompt("Lock Count") - } - field(PACT, DBF_UCHAR) { - prompt("Record active") - special(SPC_NOMOD) - interest(1) - } - field(PUTF, DBF_UCHAR) { - prompt("dbPutField process") - special(SPC_NOMOD) - interest(1) - } - field(RPRO, DBF_UCHAR) { - prompt("Reprocess ") - interest(1) - special(SPC_NOMOD) - } - field(ASP, DBF_NOACCESS) { - prompt("Access Security Pvt") - interest(4) - special(SPC_NOMOD) - extra("struct asgMember *asp") - } - field(PPN, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("pprocessNotify") - extra("struct processNotify *ppn") - } - field(PPNR, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("pprocessNotifyRecord") - extra("struct processNotifyRecord *ppnr") - } - field(SPVT, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Scan Private") - extra("struct scan_element *spvt") - } - field(RSET, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Address of RSET") - extra("struct typed_rset *rset") - } - field(DSET, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("DSET address") - extra("struct dset *dset") - } - field(DPVT, DBF_NOACCESS) { - extra("void *dpvt") - prompt("Device Private") - special(SPC_NOMOD) - interest(4) - } - field(RDES, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Address of dbRecordType") - extra("struct dbRecordType *rdes") - } - field(LSET, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Lock Set") - extra("struct lockRecord *lset") - } - field(PRIO, DBF_MENU) { - menu(menuPriority) - prompt("Scheduling Priority") - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - extra("char bkpt") - special(SPC_NOMOD) - interest(1) - prompt("Break Point") - } - field(UDF, DBF_UCHAR) { - pp(TRUE) - initial("1") - prompt("Undefined") - promptgroup("10 - Common") - interest(1) - } - field(UDFS, DBF_MENU) { - promptgroup("70 - Alarm") - interest(1) - prompt("Undefined Alarm Sevrty") - menu(menuAlarmSevr) - initial("INVALID") - } - field(TIME, DBF_NOACCESS) { - prompt("Time") - special(SPC_NOMOD) - interest(2) - extra("epicsTimeStamp time") - } - field(FLNK, DBF_FWDLINK) { - prompt("Forward Process Link") - promptgroup("20 - Scan") - interest(1) - } - field(VAL, DBF_STRING) { - size(40) - asl(ASL0) - promptgroup("40 - Input") - special(SPC_MOD) - prompt("Event Name To Post") - } - field(EPVT, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Event private") - extra("EVENTPVT epvt") - } - field(INP, DBF_INLINK) { - promptgroup("40 - Input") - interest(1) - prompt("Input Specification") - } - field(SIOL, DBF_INLINK) { - promptgroup("90 - Simulate") - interest(1) - prompt("Simulation Input Link") - } - field(SVAL, DBF_STRING) { - size(40) - prompt("Simulation Value") - } - field(SIML, DBF_INLINK) { - promptgroup("90 - Simulate") - interest(1) - prompt("Simulation Mode Link") - } - field(SIMM, DBF_MENU) { - special(SPC_MOD) - interest(1) - prompt("Simulation Mode") - menu(menuYesNo) - } - field(SIMS, DBF_MENU) { - promptgroup("90 - Simulate") - interest(2) - prompt("Simulation Mode Severity") - menu(menuAlarmSevr) - } - field(OLDSIMM, DBF_MENU) { - prompt("Prev. Simulation Mode") - special(SPC_NOMOD) - interest(4) - menu(menuSimm) - } - field(SSCN, DBF_MENU) { - promptgroup("90 - Simulate") - interest(1) - prompt("Sim. Mode Scan") - menu(menuScan) - initial("65535") - } - field(SDLY, DBF_DOUBLE) { - interest(2) - promptgroup("90 - Simulate") - prompt("Sim. Mode Async Delay") - initial("-1.0") - } - field(SIMPVT, DBF_NOACCESS) { - extra("CALLBACK *simpvt") - prompt("Sim. Mode Private") - interest(4) - special(SPC_NOMOD) - } -} -device(event, CONSTANT, devEventSoft, "Soft Channel") -recordtype(subArray) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - field(NAME, DBF_STRING) { - prompt("Record Name") - special(SPC_NOMOD) - size(61) - } - field(DESC, DBF_STRING) { - size(41) - prompt("Descriptor") - promptgroup("10 - Common") - } - field(ASG, DBF_STRING) { - special(SPC_AS) - promptgroup("10 - Common") - prompt("Access Security Group") - size(29) - } - field(SCAN, DBF_MENU) { - menu(menuScan) - prompt("Scan Mechanism") - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - } - field(PINI, DBF_MENU) { - menu(menuPini) - prompt("Process at iocInit") - promptgroup("20 - Scan") - interest(1) - } - field(PHAS, DBF_SHORT) { - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - prompt("Scan Phase") - } - field(EVNT, DBF_STRING) { - size(40) - prompt("Event Name") - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - } - field(TSE, DBF_SHORT) { - prompt("Time Stamp Event") - interest(1) - promptgroup("20 - Scan") - } - field(TSEL, DBF_INLINK) { - prompt("Time Stamp Link") - interest(1) - promptgroup("20 - Scan") - } - field(DTYP, DBF_DEVICE) { - prompt("Device Type") - promptgroup("10 - Common") - interest(1) - } - field(DISV, DBF_SHORT) { - prompt("Disable Value") - promptgroup("20 - Scan") - initial("1") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Scanning Disable") - } - field(MLOK, DBF_NOACCESS) { - extra("epicsMutexId mlok") - special(SPC_NOMOD) - interest(4) - prompt("Monitor lock") - } - field(MLIS, DBF_NOACCESS) { - prompt("Monitor List") - special(SPC_NOMOD) - interest(4) - extra("ELLLIST mlis") - } - field(BKLNK, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Backwards link tracking") - extra("ELLLIST bklnk") - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - pp(TRUE) - interest(3) - prompt("Force Processing") - } - field(STAT, DBF_MENU) { - menu(menuAlarmStat) - prompt("Alarm Status") - special(SPC_NOMOD) - initial("UDF") - } - field(SEVR, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Alarm Severity") - special(SPC_NOMOD) - } - field(NSTA, DBF_MENU) { - menu(menuAlarmStat) - prompt("New Alarm Status") - interest(2) - special(SPC_NOMOD) - } - field(NSEV, DBF_MENU) { - menu(menuAlarmSevr) - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Severity") - } - field(ACKS, DBF_MENU) { - menu(menuAlarmSevr) - interest(2) - special(SPC_NOMOD) - prompt("Alarm Ack Severity") - } - field(ACKT, DBF_MENU) { - menu(menuYesNo) - interest(2) - promptgroup("70 - Alarm") - special(SPC_NOMOD) - prompt("Alarm Ack Transient") - initial("YES") - } - field(DISS, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Disable Alarm Sevrty") - promptgroup("70 - Alarm") - interest(1) - } - field(LCNT, DBF_UCHAR) { - special(SPC_NOMOD) - interest(2) - prompt("Lock Count") - } - field(PACT, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Record active") - } - field(PUTF, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("dbPutField process") - } - field(RPRO, DBF_UCHAR) { - prompt("Reprocess ") - special(SPC_NOMOD) - interest(1) - } - field(ASP, DBF_NOACCESS) { - extra("struct asgMember *asp") - interest(4) - special(SPC_NOMOD) - prompt("Access Security Pvt") - } - field(PPN, DBF_NOACCESS) { - extra("struct processNotify *ppn") - special(SPC_NOMOD) - interest(4) - prompt("pprocessNotify") - } - field(PPNR, DBF_NOACCESS) { - extra("struct processNotifyRecord *ppnr") - prompt("pprocessNotifyRecord") - special(SPC_NOMOD) - interest(4) - } - field(SPVT, DBF_NOACCESS) { - extra("struct scan_element *spvt") - interest(4) - special(SPC_NOMOD) - prompt("Scan Private") - } - field(RSET, DBF_NOACCESS) { - prompt("Address of RSET") - special(SPC_NOMOD) - interest(4) - extra("struct typed_rset *rset") - } - field(DSET, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("DSET address") - extra("struct dset *dset") - } - field(DPVT, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Device Private") - extra("void *dpvt") - } - field(RDES, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Address of dbRecordType") - extra("struct dbRecordType *rdes") - } - field(LSET, DBF_NOACCESS) { - prompt("Lock Set") - interest(4) - special(SPC_NOMOD) - extra("struct lockRecord *lset") - } - field(PRIO, DBF_MENU) { - menu(menuPriority) - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) - prompt("Scheduling Priority") - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - extra("char bkpt") - prompt("Break Point") - special(SPC_NOMOD) - interest(1) - } - field(UDF, DBF_UCHAR) { - pp(TRUE) - initial("1") - prompt("Undefined") - promptgroup("10 - Common") - interest(1) - } - field(UDFS, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Undefined Alarm Sevrty") - promptgroup("70 - Alarm") - interest(1) - initial("INVALID") - } - field(TIME, DBF_NOACCESS) { - extra("epicsTimeStamp time") - prompt("Time") - interest(2) - special(SPC_NOMOD) - } - field(FLNK, DBF_FWDLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Forward Process Link") - } - field(VAL, DBF_NOACCESS) { - prompt("Value") - special(SPC_DBADDR) - asl(ASL0) - pp(TRUE) - extra("void * val") - } - field(PREC, DBF_SHORT) { - prop(YES) - interest(1) - promptgroup("80 - Display") - prompt("Display Precision") - } - field(FTVL, DBF_MENU) { - promptgroup("30 - Action") - interest(1) - special(SPC_NOMOD) - prompt("Field Type of Value") - menu(menuFtype) - } - field(INP, DBF_INLINK) { - prompt("Input Specification") - promptgroup("40 - Input") - interest(1) - } - field(EGU, DBF_STRING) { - size(16) - prop(YES) - interest(1) - promptgroup("80 - Display") - prompt("Engineering Units") - } - field(HOPR, DBF_DOUBLE) { - prompt("High Operating Range") - interest(1) - prop(YES) - promptgroup("80 - Display") - } - field(LOPR, DBF_DOUBLE) { - prompt("Low Operating Range") - interest(1) - prop(YES) - promptgroup("80 - Display") - } - field(MALM, DBF_ULONG) { - promptgroup("30 - Action") - interest(1) - special(SPC_NOMOD) - prompt("Maximum Elements") - initial("1") - } - field(NELM, DBF_ULONG) { - promptgroup("30 - Action") - prompt("Number of Elements") - initial("1") - pp(TRUE) - } - field(INDX, DBF_ULONG) { - promptgroup("30 - Action") - prompt("Substring Index") - pp(TRUE) - } - field(BUSY, DBF_SHORT) { - special(SPC_NOMOD) - prompt("Busy Indicator") - } - field(NORD, DBF_LONG) { - special(SPC_NOMOD) - prompt("Number elements read") - } - field(BPTR, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Buffer Pointer") - extra("void * bptr") - } -} -device(subArray, CONSTANT, devSASoft, "Soft Channel") -recordtype(lsi) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - %#include "devSup.h" - % - %/* Declare Device Support Entry Table */ - %typedef struct lsidset { - % long number; - % DEVSUPFUN report; - % DEVSUPFUN init; - % DEVSUPFUN init_record; - % DEVSUPFUN get_ioint_info; - % DEVSUPFUN read_string; - %} lsidset; - % - %#include "callback.h" - field(NAME, DBF_STRING) { - prompt("Record Name") - special(SPC_NOMOD) - size(61) - } - field(DESC, DBF_STRING) { - size(41) - promptgroup("10 - Common") - prompt("Descriptor") - } - field(ASG, DBF_STRING) { - special(SPC_AS) - promptgroup("10 - Common") - prompt("Access Security Group") - size(29) - } - field(SCAN, DBF_MENU) { - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) - prompt("Scan Mechanism") - menu(menuScan) - } - field(PINI, DBF_MENU) { - menu(menuPini) - prompt("Process at iocInit") - promptgroup("20 - Scan") - interest(1) - } - field(PHAS, DBF_SHORT) { - prompt("Scan Phase") - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - } - field(EVNT, DBF_STRING) { - size(40) - prompt("Event Name") - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) - } - field(TSE, DBF_SHORT) { - interest(1) - promptgroup("20 - Scan") - prompt("Time Stamp Event") - } - field(TSEL, DBF_INLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Time Stamp Link") - } - field(DTYP, DBF_DEVICE) { - prompt("Device Type") - interest(1) - promptgroup("10 - Common") - } - field(DISV, DBF_SHORT) { - promptgroup("20 - Scan") - prompt("Disable Value") - initial("1") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - prompt("Scanning Disable") - interest(1) - promptgroup("20 - Scan") - } - field(MLOK, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Monitor lock") - extra("epicsMutexId mlok") - } - field(MLIS, DBF_NOACCESS) { - prompt("Monitor List") - interest(4) - special(SPC_NOMOD) - extra("ELLLIST mlis") - } - field(BKLNK, DBF_NOACCESS) { - prompt("Backwards link tracking") - interest(4) - special(SPC_NOMOD) - extra("ELLLIST bklnk") - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - pp(TRUE) - interest(3) - prompt("Force Processing") - } - field(STAT, DBF_MENU) { - special(SPC_NOMOD) - prompt("Alarm Status") - menu(menuAlarmStat) - initial("UDF") - } - field(SEVR, DBF_MENU) { - special(SPC_NOMOD) - prompt("Alarm Severity") - menu(menuAlarmSevr) - } - field(NSTA, DBF_MENU) { - menu(menuAlarmStat) - prompt("New Alarm Status") - interest(2) - special(SPC_NOMOD) - } - field(NSEV, DBF_MENU) { - menu(menuAlarmSevr) - prompt("New Alarm Severity") - interest(2) - special(SPC_NOMOD) - } - field(ACKS, DBF_MENU) { - menu(menuAlarmSevr) - special(SPC_NOMOD) - interest(2) - prompt("Alarm Ack Severity") - } - field(ACKT, DBF_MENU) { - initial("YES") - special(SPC_NOMOD) - interest(2) - promptgroup("70 - Alarm") - prompt("Alarm Ack Transient") - menu(menuYesNo) - } - field(DISS, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Disable Alarm Sevrty") - interest(1) - promptgroup("70 - Alarm") - } - field(LCNT, DBF_UCHAR) { - prompt("Lock Count") - special(SPC_NOMOD) - interest(2) - } - field(PACT, DBF_UCHAR) { - prompt("Record active") - special(SPC_NOMOD) - interest(1) - } - field(PUTF, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("dbPutField process") - } - field(RPRO, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Reprocess ") - } - field(ASP, DBF_NOACCESS) { - extra("struct asgMember *asp") - prompt("Access Security Pvt") - special(SPC_NOMOD) - interest(4) - } - field(PPN, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("pprocessNotify") - extra("struct processNotify *ppn") - } - field(PPNR, DBF_NOACCESS) { - prompt("pprocessNotifyRecord") - special(SPC_NOMOD) - interest(4) - extra("struct processNotifyRecord *ppnr") - } - field(SPVT, DBF_NOACCESS) { - extra("struct scan_element *spvt") - special(SPC_NOMOD) - interest(4) - prompt("Scan Private") - } - field(RSET, DBF_NOACCESS) { - extra("struct typed_rset *rset") - prompt("Address of RSET") - special(SPC_NOMOD) - interest(4) - } - field(DSET, DBF_NOACCESS) { - extra("struct dset *dset") - prompt("DSET address") - interest(4) - special(SPC_NOMOD) - } - field(DPVT, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Device Private") - extra("void *dpvt") - } - field(RDES, DBF_NOACCESS) { - extra("struct dbRecordType *rdes") - interest(4) - special(SPC_NOMOD) - prompt("Address of dbRecordType") - } - field(LSET, DBF_NOACCESS) { - extra("struct lockRecord *lset") - interest(4) - special(SPC_NOMOD) - prompt("Lock Set") - } - field(PRIO, DBF_MENU) { - prompt("Scheduling Priority") - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - menu(menuPriority) - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - interest(1) - special(SPC_NOMOD) - prompt("Break Point") - extra("char bkpt") - } - field(UDF, DBF_UCHAR) { - promptgroup("10 - Common") - interest(1) - prompt("Undefined") - pp(TRUE) - initial("1") - } - field(UDFS, DBF_MENU) { - initial("INVALID") - menu(menuAlarmSevr) - prompt("Undefined Alarm Sevrty") - promptgroup("70 - Alarm") - interest(1) - } - field(TIME, DBF_NOACCESS) { - extra("epicsTimeStamp time") - interest(2) - special(SPC_NOMOD) - prompt("Time") - } - field(FLNK, DBF_FWDLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Forward Process Link") - } - field(VAL, DBF_NOACCESS) { - asl(ASL0) - prompt("Current Value") - special(SPC_DBADDR) - pp(TRUE) - extra("char *val") - } - field(OVAL, DBF_NOACCESS) { - extra("char *oval") - special(SPC_DBADDR) - interest(3) - prompt("Old Value") - } - field(SIZV, DBF_USHORT) { - initial("41") - prompt("Size of buffers") - promptgroup("40 - Input") - interest(1) - special(SPC_NOMOD) - } - field(LEN, DBF_ULONG) { - prompt("Length of VAL") - special(SPC_NOMOD) - } - field(OLEN, DBF_ULONG) { - prompt("Length of OVAL") - special(SPC_NOMOD) - } - field(INP, DBF_INLINK) { - promptgroup("40 - Input") - interest(1) - prompt("Input Specification") - } - field(MPST, DBF_MENU) { - interest(1) - promptgroup("80 - Display") - prompt("Post Value Monitors") - menu(menuPost) - } - field(APST, DBF_MENU) { - menu(menuPost) - promptgroup("80 - Display") - interest(1) - prompt("Post Archive Monitors") - } - field(SIML, DBF_INLINK) { - interest(1) - promptgroup("90 - Simulate") - prompt("Simulation Mode Link") - } - field(SIMM, DBF_MENU) { - prompt("Simulation Mode") - interest(1) - special(SPC_MOD) - menu(menuYesNo) - } - field(SIMS, DBF_MENU) { - interest(2) - promptgroup("90 - Simulate") - prompt("Simulation Mode Severity") - menu(menuAlarmSevr) - } - field(SIOL, DBF_INLINK) { - prompt("Simulation Input Link") - promptgroup("90 - Simulate") - interest(1) - } - field(OLDSIMM, DBF_MENU) { - menu(menuSimm) - special(SPC_NOMOD) - interest(4) - prompt("Prev. Simulation Mode") - } - field(SSCN, DBF_MENU) { - menu(menuScan) - interest(1) - promptgroup("90 - Simulate") - prompt("Sim. Mode Scan") - initial("65535") - } - field(SDLY, DBF_DOUBLE) { - initial("-1.0") - prompt("Sim. Mode Async Delay") - interest(2) - promptgroup("90 - Simulate") - } - field(SIMPVT, DBF_NOACCESS) { - extra("CALLBACK *simpvt") - special(SPC_NOMOD) - interest(4) - prompt("Sim. Mode Private") - } -} -device(lsi, CONSTANT, devLsiSoft, "Soft Channel") -device(lsi, INST_IO, devLsiEnviron, "getenv") -recordtype(bo) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - %#include "callback.h" - field(NAME, DBF_STRING) { - prompt("Record Name") - special(SPC_NOMOD) - size(61) - } - field(DESC, DBF_STRING) { - prompt("Descriptor") - promptgroup("10 - Common") - size(41) - } - field(ASG, DBF_STRING) { - size(29) - prompt("Access Security Group") - promptgroup("10 - Common") - special(SPC_AS) - } - field(SCAN, DBF_MENU) { - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - prompt("Scan Mechanism") - menu(menuScan) - } - field(PINI, DBF_MENU) { - menu(menuPini) - prompt("Process at iocInit") - promptgroup("20 - Scan") - interest(1) - } - field(PHAS, DBF_SHORT) { - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - prompt("Scan Phase") - } - field(EVNT, DBF_STRING) { - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - prompt("Event Name") - size(40) - } - field(TSE, DBF_SHORT) { - promptgroup("20 - Scan") - interest(1) - prompt("Time Stamp Event") - } - field(TSEL, DBF_INLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Time Stamp Link") - } - field(DTYP, DBF_DEVICE) { - prompt("Device Type") - interest(1) - promptgroup("10 - Common") - } - field(DISV, DBF_SHORT) { - initial("1") - prompt("Disable Value") - promptgroup("20 - Scan") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Scanning Disable") - } - field(MLOK, DBF_NOACCESS) { - extra("epicsMutexId mlok") - special(SPC_NOMOD) - interest(4) - prompt("Monitor lock") - } - field(MLIS, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Monitor List") - extra("ELLLIST mlis") - } - field(BKLNK, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Backwards link tracking") - extra("ELLLIST bklnk") - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - pp(TRUE) - interest(3) - prompt("Force Processing") - } - field(STAT, DBF_MENU) { - special(SPC_NOMOD) - prompt("Alarm Status") - menu(menuAlarmStat) - initial("UDF") - } - field(SEVR, DBF_MENU) { - prompt("Alarm Severity") - special(SPC_NOMOD) - menu(menuAlarmSevr) - } - field(NSTA, DBF_MENU) { - menu(menuAlarmStat) - prompt("New Alarm Status") - special(SPC_NOMOD) - interest(2) - } - field(NSEV, DBF_MENU) { - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Severity") - menu(menuAlarmSevr) - } - field(ACKS, DBF_MENU) { - prompt("Alarm Ack Severity") - interest(2) - special(SPC_NOMOD) - menu(menuAlarmSevr) - } - field(ACKT, DBF_MENU) { - initial("YES") - prompt("Alarm Ack Transient") - special(SPC_NOMOD) - interest(2) - promptgroup("70 - Alarm") - menu(menuYesNo) - } - field(DISS, DBF_MENU) { - promptgroup("70 - Alarm") - interest(1) - prompt("Disable Alarm Sevrty") - menu(menuAlarmSevr) - } - field(LCNT, DBF_UCHAR) { - special(SPC_NOMOD) - interest(2) - prompt("Lock Count") - } - field(PACT, DBF_UCHAR) { - prompt("Record active") - interest(1) - special(SPC_NOMOD) - } - field(PUTF, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("dbPutField process") - } - field(RPRO, DBF_UCHAR) { - special(SPC_NOMOD) - interest(1) - prompt("Reprocess ") - } - field(ASP, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Access Security Pvt") - extra("struct asgMember *asp") - } - field(PPN, DBF_NOACCESS) { - extra("struct processNotify *ppn") - interest(4) - special(SPC_NOMOD) - prompt("pprocessNotify") - } - field(PPNR, DBF_NOACCESS) { - prompt("pprocessNotifyRecord") - special(SPC_NOMOD) - interest(4) - extra("struct processNotifyRecord *ppnr") - } - field(SPVT, DBF_NOACCESS) { - extra("struct scan_element *spvt") - interest(4) - special(SPC_NOMOD) - prompt("Scan Private") - } - field(RSET, DBF_NOACCESS) { - prompt("Address of RSET") - special(SPC_NOMOD) - interest(4) - extra("struct typed_rset *rset") - } - field(DSET, DBF_NOACCESS) { - prompt("DSET address") - interest(4) - special(SPC_NOMOD) - extra("struct dset *dset") - } - field(DPVT, DBF_NOACCESS) { - extra("void *dpvt") - prompt("Device Private") - interest(4) - special(SPC_NOMOD) - } - field(RDES, DBF_NOACCESS) { - extra("struct dbRecordType *rdes") - special(SPC_NOMOD) - interest(4) - prompt("Address of dbRecordType") - } - field(LSET, DBF_NOACCESS) { - extra("struct lockRecord *lset") - special(SPC_NOMOD) - interest(4) - prompt("Lock Set") - } - field(PRIO, DBF_MENU) { - prompt("Scheduling Priority") - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - menu(menuPriority) - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - extra("char bkpt") - prompt("Break Point") - special(SPC_NOMOD) - interest(1) - } - field(UDF, DBF_UCHAR) { - promptgroup("10 - Common") - interest(1) - prompt("Undefined") - pp(TRUE) - initial("1") - } - field(UDFS, DBF_MENU) { - initial("INVALID") - menu(menuAlarmSevr) - interest(1) - promptgroup("70 - Alarm") - prompt("Undefined Alarm Sevrty") - } - field(TIME, DBF_NOACCESS) { - extra("epicsTimeStamp time") - interest(2) - special(SPC_NOMOD) - prompt("Time") - } - field(FLNK, DBF_FWDLINK) { - prompt("Forward Process Link") - interest(1) - promptgroup("20 - Scan") - } - field(VAL, DBF_ENUM) { - asl(ASL0) - prompt("Current Value") - promptgroup("50 - Output") - pp(TRUE) - } - field(OMSL, DBF_MENU) { - interest(1) - promptgroup("50 - Output") - prompt("Output Mode Select") - menu(menuOmsl) - } - field(DOL, DBF_INLINK) { - interest(1) - promptgroup("40 - Input") - prompt("Desired Output Loc") - } - field(OUT, DBF_OUTLINK) { - prompt("Output Specification") - promptgroup("50 - Output") - interest(1) - } - field(HIGH, DBF_DOUBLE) { - promptgroup("30 - Action") - interest(1) - prompt("Seconds to Hold High") - } - field(ZNAM, DBF_STRING) { - size(26) - pp(TRUE) - prop(YES) - promptgroup("80 - Display") - interest(1) - prompt("Zero Name") - } - field(ONAM, DBF_STRING) { - pp(TRUE) - size(26) - prompt("One Name") - promptgroup("80 - Display") - prop(YES) - interest(1) - } - field(RVAL, DBF_ULONG) { - pp(TRUE) - prompt("Raw Value") - } - field(ORAW, DBF_ULONG) { - interest(3) - special(SPC_NOMOD) - prompt("prev Raw Value") - } - field(MASK, DBF_ULONG) { - special(SPC_NOMOD) - interest(1) - prompt("Hardware Mask") - } - field(RPVT, DBF_NOACCESS) { - extra("void * rpvt") - prompt("Record Private") - special(SPC_NOMOD) - interest(4) - } - field(WDPT, DBF_NOACCESS) { - extra("void * wdpt") - interest(4) - special(SPC_NOMOD) - prompt("Watch Dog Timer ID") - } - field(ZSV, DBF_MENU) { - pp(TRUE) - menu(menuAlarmSevr) - interest(1) - promptgroup("70 - Alarm") - prompt("Zero Error Severity") - } - field(OSV, DBF_MENU) { - pp(TRUE) - prompt("One Error Severity") - interest(1) - promptgroup("70 - Alarm") - menu(menuAlarmSevr) - } - field(COSV, DBF_MENU) { - prompt("Change of State Sevr") - interest(1) - promptgroup("70 - Alarm") - menu(menuAlarmSevr) - pp(TRUE) - } - field(RBV, DBF_ULONG) { - prompt("Readback Value") - special(SPC_NOMOD) - } - field(ORBV, DBF_ULONG) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Readback Value") - } - field(MLST, DBF_USHORT) { - special(SPC_NOMOD) - interest(3) - prompt("Last Value Monitored") - } - field(LALM, DBF_USHORT) { - interest(3) - special(SPC_NOMOD) - prompt("Last Value Alarmed") - } - field(SIOL, DBF_OUTLINK) { - prompt("Simulation Output Link") - promptgroup("90 - Simulate") - interest(1) - } - field(SIML, DBF_INLINK) { - promptgroup("90 - Simulate") - interest(1) - prompt("Simulation Mode Link") - } - field(SIMM, DBF_MENU) { - menu(menuYesNo) - special(SPC_MOD) - interest(1) - prompt("Simulation Mode") - } - field(SIMS, DBF_MENU) { - menu(menuAlarmSevr) - promptgroup("90 - Simulate") - interest(2) - prompt("Simulation Mode Severity") - } - field(OLDSIMM, DBF_MENU) { - special(SPC_NOMOD) - interest(4) - prompt("Prev. Simulation Mode") - menu(menuSimm) - } - field(SSCN, DBF_MENU) { - menu(menuScan) - interest(1) - promptgroup("90 - Simulate") - prompt("Sim. Mode Scan") - initial("65535") - } - field(SDLY, DBF_DOUBLE) { - initial("-1.0") - prompt("Sim. Mode Async Delay") - interest(2) - promptgroup("90 - Simulate") - } - field(SIMPVT, DBF_NOACCESS) { - extra("CALLBACK *simpvt") - special(SPC_NOMOD) - interest(4) - prompt("Sim. Mode Private") - } - field(IVOA, DBF_MENU) { - prompt("INVALID outpt action") - promptgroup("50 - Output") - interest(2) - menu(menuIvoa) - } - field(IVOV, DBF_USHORT) { - prompt("INVALID output value") - promptgroup("50 - Output") - interest(2) - } -} -device(bo, CONSTANT, devBoSoft, "Soft Channel") -device(bo, CONSTANT, devBoSoftRaw, "Raw Soft Channel") -device(bo, CONSTANT, devBoSoftCallback, "Async Soft Channel") -device(bo, INST_IO, devBoGeneralTime, "General Time") -device(bo, INST_IO, devBoDbState, "Db State") -device(bo, INST_IO, asynBoInt32, "asynInt32") -device(bo, INST_IO, asynBoUInt32Digital, "asynUInt32Digital") -device(bo, INST_IO, devboStream, "stream") -device(bo, INST_IO, devBoStrParm, "asyn bo stringParm") -device(bo, INST_IO, devBoMPC, "asyn MPC") -device(bo, GPIB_IO, devBoGP307Gpib, "Vg307 GPIB Instrument") -device(bo, BBGPIB_IO, devBoAX301, "PZT Bug") -device(bo, INST_IO, devBoTPG261, "asyn TPG261") -recordtype(permissive) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - field(NAME, DBF_STRING) { - prompt("Record Name") - special(SPC_NOMOD) - size(61) - } - field(DESC, DBF_STRING) { - size(41) - promptgroup("10 - Common") - prompt("Descriptor") - } - field(ASG, DBF_STRING) { - promptgroup("10 - Common") - special(SPC_AS) - prompt("Access Security Group") - size(29) - } - field(SCAN, DBF_MENU) { - menu(menuScan) - prompt("Scan Mechanism") - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - } - field(PINI, DBF_MENU) { - menu(menuPini) - prompt("Process at iocInit") - promptgroup("20 - Scan") - interest(1) - } - field(PHAS, DBF_SHORT) { - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - prompt("Scan Phase") - } - field(EVNT, DBF_STRING) { - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - prompt("Event Name") - size(40) - } - field(TSE, DBF_SHORT) { - prompt("Time Stamp Event") - interest(1) - promptgroup("20 - Scan") - } - field(TSEL, DBF_INLINK) { - prompt("Time Stamp Link") - promptgroup("20 - Scan") - interest(1) - } - field(DTYP, DBF_DEVICE) { - promptgroup("10 - Common") - interest(1) - prompt("Device Type") - } - field(DISV, DBF_SHORT) { - promptgroup("20 - Scan") - prompt("Disable Value") - initial("1") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - promptgroup("20 - Scan") - interest(1) - prompt("Scanning Disable") - } - field(MLOK, DBF_NOACCESS) { - prompt("Monitor lock") - interest(4) - special(SPC_NOMOD) - extra("epicsMutexId mlok") - } - field(MLIS, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Monitor List") - extra("ELLLIST mlis") - } - field(BKLNK, DBF_NOACCESS) { - extra("ELLLIST bklnk") - prompt("Backwards link tracking") - special(SPC_NOMOD) - interest(4) - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - prompt("Force Processing") - interest(3) - pp(TRUE) - } - field(STAT, DBF_MENU) { - menu(menuAlarmStat) - special(SPC_NOMOD) - prompt("Alarm Status") - initial("UDF") - } - field(SEVR, DBF_MENU) { - prompt("Alarm Severity") - special(SPC_NOMOD) - menu(menuAlarmSevr) - } - field(NSTA, DBF_MENU) { - prompt("New Alarm Status") - interest(2) - special(SPC_NOMOD) - menu(menuAlarmStat) - } - field(NSEV, DBF_MENU) { - menu(menuAlarmSevr) - prompt("New Alarm Severity") - special(SPC_NOMOD) - interest(2) - } - field(ACKS, DBF_MENU) { - menu(menuAlarmSevr) - special(SPC_NOMOD) - interest(2) - prompt("Alarm Ack Severity") - } - field(ACKT, DBF_MENU) { - initial("YES") - menu(menuYesNo) - interest(2) - special(SPC_NOMOD) - promptgroup("70 - Alarm") - prompt("Alarm Ack Transient") - } - field(DISS, DBF_MENU) { - menu(menuAlarmSevr) - interest(1) - promptgroup("70 - Alarm") - prompt("Disable Alarm Sevrty") - } - field(LCNT, DBF_UCHAR) { - interest(2) - special(SPC_NOMOD) - prompt("Lock Count") - } - field(PACT, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Record active") - } - field(PUTF, DBF_UCHAR) { - prompt("dbPutField process") - special(SPC_NOMOD) - interest(1) - } - field(RPRO, DBF_UCHAR) { - prompt("Reprocess ") - interest(1) - special(SPC_NOMOD) - } - field(ASP, DBF_NOACCESS) { - extra("struct asgMember *asp") - prompt("Access Security Pvt") - interest(4) - special(SPC_NOMOD) - } - field(PPN, DBF_NOACCESS) { - extra("struct processNotify *ppn") - special(SPC_NOMOD) - interest(4) - prompt("pprocessNotify") - } - field(PPNR, DBF_NOACCESS) { - prompt("pprocessNotifyRecord") - special(SPC_NOMOD) - interest(4) - extra("struct processNotifyRecord *ppnr") - } - field(SPVT, DBF_NOACCESS) { - extra("struct scan_element *spvt") - prompt("Scan Private") - special(SPC_NOMOD) - interest(4) - } - field(RSET, DBF_NOACCESS) { - extra("struct typed_rset *rset") - prompt("Address of RSET") - special(SPC_NOMOD) - interest(4) - } - field(DSET, DBF_NOACCESS) { - extra("struct dset *dset") - special(SPC_NOMOD) - interest(4) - prompt("DSET address") - } - field(DPVT, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Device Private") - extra("void *dpvt") - } - field(RDES, DBF_NOACCESS) { - extra("struct dbRecordType *rdes") - prompt("Address of dbRecordType") - special(SPC_NOMOD) - interest(4) - } - field(LSET, DBF_NOACCESS) { - extra("struct lockRecord *lset") - interest(4) - special(SPC_NOMOD) - prompt("Lock Set") - } - field(PRIO, DBF_MENU) { - menu(menuPriority) - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - prompt("Scheduling Priority") - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - interest(1) - special(SPC_NOMOD) - prompt("Break Point") - extra("char bkpt") - } - field(UDF, DBF_UCHAR) { - prompt("Undefined") - interest(1) - promptgroup("10 - Common") - pp(TRUE) - initial("1") - } - field(UDFS, DBF_MENU) { - promptgroup("70 - Alarm") - interest(1) - prompt("Undefined Alarm Sevrty") - menu(menuAlarmSevr) - initial("INVALID") - } - field(TIME, DBF_NOACCESS) { - prompt("Time") - interest(2) - special(SPC_NOMOD) - extra("epicsTimeStamp time") - } - field(FLNK, DBF_FWDLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Forward Process Link") - } - field(LABL, DBF_STRING) { - interest(1) - promptgroup("80 - Display") - prompt("Button Label") - pp(TRUE) - size(20) - } - field(VAL, DBF_USHORT) { - promptgroup("40 - Input") - prompt("Status") - asl(ASL0) - pp(TRUE) - } - field(OVAL, DBF_USHORT) { - special(SPC_NOMOD) - interest(3) - prompt("Old Status") - } - field(WFLG, DBF_USHORT) { - pp(TRUE) - prompt("Wait Flag") - } - field(OFLG, DBF_USHORT) { - prompt("Old Flag") - special(SPC_NOMOD) - interest(3) - } -} -recordtype(state) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - field(NAME, DBF_STRING) { - size(61) - special(SPC_NOMOD) - prompt("Record Name") - } - field(DESC, DBF_STRING) { - size(41) - promptgroup("10 - Common") - prompt("Descriptor") - } - field(ASG, DBF_STRING) { - size(29) - prompt("Access Security Group") - promptgroup("10 - Common") - special(SPC_AS) - } - field(SCAN, DBF_MENU) { - menu(menuScan) - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - prompt("Scan Mechanism") - } - field(PINI, DBF_MENU) { - interest(1) - promptgroup("20 - Scan") - prompt("Process at iocInit") - menu(menuPini) - } - field(PHAS, DBF_SHORT) { - prompt("Scan Phase") - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) - } - field(EVNT, DBF_STRING) { - size(40) - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - prompt("Event Name") - } - field(TSE, DBF_SHORT) { - promptgroup("20 - Scan") - interest(1) - prompt("Time Stamp Event") - } - field(TSEL, DBF_INLINK) { - prompt("Time Stamp Link") - interest(1) - promptgroup("20 - Scan") - } - field(DTYP, DBF_DEVICE) { - prompt("Device Type") - promptgroup("10 - Common") - interest(1) - } - field(DISV, DBF_SHORT) { - promptgroup("20 - Scan") - prompt("Disable Value") - initial("1") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - promptgroup("20 - Scan") - interest(1) - prompt("Scanning Disable") - } - field(MLOK, DBF_NOACCESS) { - extra("epicsMutexId mlok") - prompt("Monitor lock") - interest(4) - special(SPC_NOMOD) - } - field(MLIS, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Monitor List") - extra("ELLLIST mlis") - } - field(BKLNK, DBF_NOACCESS) { - extra("ELLLIST bklnk") - special(SPC_NOMOD) - interest(4) - prompt("Backwards link tracking") - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - prompt("Force Processing") - interest(3) - pp(TRUE) - } - field(STAT, DBF_MENU) { - menu(menuAlarmStat) - prompt("Alarm Status") - special(SPC_NOMOD) - initial("UDF") - } - field(SEVR, DBF_MENU) { - menu(menuAlarmSevr) - special(SPC_NOMOD) - prompt("Alarm Severity") - } - field(NSTA, DBF_MENU) { - interest(2) - special(SPC_NOMOD) - prompt("New Alarm Status") - menu(menuAlarmStat) - } - field(NSEV, DBF_MENU) { - menu(menuAlarmSevr) - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Severity") - } - field(ACKS, DBF_MENU) { - menu(menuAlarmSevr) - special(SPC_NOMOD) - interest(2) - prompt("Alarm Ack Severity") - } - field(ACKT, DBF_MENU) { - prompt("Alarm Ack Transient") - special(SPC_NOMOD) - interest(2) - promptgroup("70 - Alarm") - menu(menuYesNo) - initial("YES") - } - field(DISS, DBF_MENU) { - interest(1) - promptgroup("70 - Alarm") - prompt("Disable Alarm Sevrty") + promptgroup("70 - Alarm") + interest(1) menu(menuAlarmSevr) } field(LCNT, DBF_UCHAR) { prompt("Lock Count") - special(SPC_NOMOD) - interest(2) + interest(2) + special(SPC_NOMOD) } field(PACT, DBF_UCHAR) { - prompt("Record active") - interest(1) - special(SPC_NOMOD) - } - field(PUTF, DBF_UCHAR) { - prompt("dbPutField process") - interest(1) - special(SPC_NOMOD) - } - field(RPRO, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Reprocess ") - } - field(ASP, DBF_NOACCESS) { - extra("struct asgMember *asp") - special(SPC_NOMOD) - interest(4) - prompt("Access Security Pvt") - } - field(PPN, DBF_NOACCESS) { - extra("struct processNotify *ppn") - interest(4) - special(SPC_NOMOD) - prompt("pprocessNotify") - } - field(PPNR, DBF_NOACCESS) { - extra("struct processNotifyRecord *ppnr") - prompt("pprocessNotifyRecord") - special(SPC_NOMOD) - interest(4) - } - field(SPVT, DBF_NOACCESS) { - prompt("Scan Private") - interest(4) - special(SPC_NOMOD) - extra("struct scan_element *spvt") - } - field(RSET, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Address of RSET") - extra("struct typed_rset *rset") - } - field(DSET, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("DSET address") - extra("struct dset *dset") - } - field(DPVT, DBF_NOACCESS) { - prompt("Device Private") - interest(4) - special(SPC_NOMOD) - extra("void *dpvt") - } - field(RDES, DBF_NOACCESS) { - extra("struct dbRecordType *rdes") - prompt("Address of dbRecordType") - interest(4) - special(SPC_NOMOD) - } - field(LSET, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Lock Set") - extra("struct lockRecord *lset") - } - field(PRIO, DBF_MENU) { - menu(menuPriority) - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - prompt("Scheduling Priority") - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - prompt("Break Point") - interest(1) - special(SPC_NOMOD) - extra("char bkpt") - } - field(UDF, DBF_UCHAR) { - interest(1) - promptgroup("10 - Common") - prompt("Undefined") - initial("1") - pp(TRUE) - } - field(UDFS, DBF_MENU) { - menu(menuAlarmSevr) - promptgroup("70 - Alarm") - interest(1) - prompt("Undefined Alarm Sevrty") - initial("INVALID") - } - field(TIME, DBF_NOACCESS) { - extra("epicsTimeStamp time") - interest(2) - special(SPC_NOMOD) - prompt("Time") - } - field(FLNK, DBF_FWDLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Forward Process Link") - } - field(VAL, DBF_STRING) { - asl(ASL0) - prompt("Value") - promptgroup("40 - Input") - pp(TRUE) - size(20) - } - field(OVAL, DBF_STRING) { - size(20) - special(SPC_NOMOD) - interest(3) - prompt("Prev Value") - } -} -recordtype(longin) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - %#include "callback.h" - field(NAME, DBF_STRING) { - size(61) - prompt("Record Name") - special(SPC_NOMOD) - } - field(DESC, DBF_STRING) { - promptgroup("10 - Common") - prompt("Descriptor") - size(41) - } - field(ASG, DBF_STRING) { - special(SPC_AS) - promptgroup("10 - Common") - prompt("Access Security Group") - size(29) - } - field(SCAN, DBF_MENU) { - menu(menuScan) - prompt("Scan Mechanism") - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - } - field(PINI, DBF_MENU) { - menu(menuPini) - promptgroup("20 - Scan") - interest(1) - prompt("Process at iocInit") - } - field(PHAS, DBF_SHORT) { - prompt("Scan Phase") - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - } - field(EVNT, DBF_STRING) { - size(40) - prompt("Event Name") - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - } - field(TSE, DBF_SHORT) { - prompt("Time Stamp Event") - promptgroup("20 - Scan") - interest(1) - } - field(TSEL, DBF_INLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Time Stamp Link") - } - field(DTYP, DBF_DEVICE) { - promptgroup("10 - Common") - interest(1) - prompt("Device Type") - } - field(DISV, DBF_SHORT) { - initial("1") - promptgroup("20 - Scan") - prompt("Disable Value") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - prompt("Scanning Disable") - interest(1) - promptgroup("20 - Scan") - } - field(MLOK, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Monitor lock") - extra("epicsMutexId mlok") - } - field(MLIS, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Monitor List") - extra("ELLLIST mlis") - } - field(BKLNK, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Backwards link tracking") - extra("ELLLIST bklnk") - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - interest(3) - prompt("Force Processing") - pp(TRUE) - } - field(STAT, DBF_MENU) { - menu(menuAlarmStat) - prompt("Alarm Status") - special(SPC_NOMOD) - initial("UDF") - } - field(SEVR, DBF_MENU) { - special(SPC_NOMOD) - prompt("Alarm Severity") - menu(menuAlarmSevr) - } - field(NSTA, DBF_MENU) { - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Status") - menu(menuAlarmStat) - } - field(NSEV, DBF_MENU) { - interest(2) - special(SPC_NOMOD) - prompt("New Alarm Severity") - menu(menuAlarmSevr) - } - field(ACKS, DBF_MENU) { - interest(2) - special(SPC_NOMOD) - prompt("Alarm Ack Severity") - menu(menuAlarmSevr) - } - field(ACKT, DBF_MENU) { - prompt("Alarm Ack Transient") - promptgroup("70 - Alarm") - interest(2) - special(SPC_NOMOD) - menu(menuYesNo) - initial("YES") - } - field(DISS, DBF_MENU) { - interest(1) - promptgroup("70 - Alarm") - prompt("Disable Alarm Sevrty") - menu(menuAlarmSevr) - } - field(LCNT, DBF_UCHAR) { - prompt("Lock Count") - special(SPC_NOMOD) - interest(2) - } - field(PACT, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) + special(SPC_NOMOD) + interest(1) prompt("Record active") } field(PUTF, DBF_UCHAR) { @@ -9869,870 +21547,10 @@ interest(1) } field(ASP, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) extra("struct asgMember *asp") prompt("Access Security Pvt") - special(SPC_NOMOD) - interest(4) - } - field(PPN, DBF_NOACCESS) { - prompt("pprocessNotify") - special(SPC_NOMOD) - interest(4) - extra("struct processNotify *ppn") - } - field(PPNR, DBF_NOACCESS) { - extra("struct processNotifyRecord *ppnr") - prompt("pprocessNotifyRecord") - special(SPC_NOMOD) - interest(4) - } - field(SPVT, DBF_NOACCESS) { - prompt("Scan Private") - interest(4) - special(SPC_NOMOD) - extra("struct scan_element *spvt") - } - field(RSET, DBF_NOACCESS) { - extra("struct typed_rset *rset") - interest(4) - special(SPC_NOMOD) - prompt("Address of RSET") - } - field(DSET, DBF_NOACCESS) { - extra("struct dset *dset") - interest(4) - special(SPC_NOMOD) - prompt("DSET address") - } - field(DPVT, DBF_NOACCESS) { - prompt("Device Private") - interest(4) - special(SPC_NOMOD) - extra("void *dpvt") - } - field(RDES, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Address of dbRecordType") - extra("struct dbRecordType *rdes") - } - field(LSET, DBF_NOACCESS) { - extra("struct lockRecord *lset") - prompt("Lock Set") - interest(4) - special(SPC_NOMOD) - } - field(PRIO, DBF_MENU) { - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - prompt("Scheduling Priority") - menu(menuPriority) - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - extra("char bkpt") - prompt("Break Point") - special(SPC_NOMOD) - interest(1) - } - field(UDF, DBF_UCHAR) { - prompt("Undefined") - promptgroup("10 - Common") - interest(1) - pp(TRUE) - initial("1") - } - field(UDFS, DBF_MENU) { - initial("INVALID") - prompt("Undefined Alarm Sevrty") - promptgroup("70 - Alarm") - interest(1) - menu(menuAlarmSevr) - } - field(TIME, DBF_NOACCESS) { - extra("epicsTimeStamp time") - interest(2) - special(SPC_NOMOD) - prompt("Time") - } - field(FLNK, DBF_FWDLINK) { - prompt("Forward Process Link") - promptgroup("20 - Scan") - interest(1) - } - field(VAL, DBF_LONG) { - prompt("Current value") - promptgroup("40 - Input") - asl(ASL0) - pp(TRUE) - } - field(INP, DBF_INLINK) { - prompt("Input Specification") - interest(1) - promptgroup("40 - Input") - } - field(EGU, DBF_STRING) { - prompt("Engineering Units") - prop(YES) - interest(1) - promptgroup("80 - Display") - size(16) - } - field(HOPR, DBF_LONG) { - prop(YES) - promptgroup("80 - Display") - interest(1) - prompt("High Operating Range") - } - field(LOPR, DBF_LONG) { - prompt("Low Operating Range") - prop(YES) - interest(1) - promptgroup("80 - Display") - } - field(HIHI, DBF_LONG) { - pp(TRUE) - promptgroup("70 - Alarm") - prop(YES) - interest(1) - prompt("Hihi Alarm Limit") - } - field(LOLO, DBF_LONG) { - prop(YES) - interest(1) - promptgroup("70 - Alarm") - prompt("Lolo Alarm Limit") - pp(TRUE) - } - field(HIGH, DBF_LONG) { - pp(TRUE) - prop(YES) - promptgroup("70 - Alarm") - interest(1) - prompt("High Alarm Limit") - } - field(LOW, DBF_LONG) { - pp(TRUE) - prompt("Low Alarm Limit") - promptgroup("70 - Alarm") - prop(YES) - interest(1) - } - field(HHSV, DBF_MENU) { - pp(TRUE) - menu(menuAlarmSevr) - prompt("Hihi Severity") - promptgroup("70 - Alarm") - interest(1) - } - field(LLSV, DBF_MENU) { - menu(menuAlarmSevr) - promptgroup("70 - Alarm") - interest(1) - prompt("Lolo Severity") - pp(TRUE) - } - field(HSV, DBF_MENU) { - menu(menuAlarmSevr) - interest(1) - promptgroup("70 - Alarm") - prompt("High Severity") - pp(TRUE) - } - field(LSV, DBF_MENU) { - pp(TRUE) - menu(menuAlarmSevr) - promptgroup("70 - Alarm") - interest(1) - prompt("Low Severity") - } - field(HYST, DBF_LONG) { - interest(1) - promptgroup("70 - Alarm") - prompt("Alarm Deadband") - } - field(AFTC, DBF_DOUBLE) { - interest(1) - promptgroup("70 - Alarm") - prompt("Alarm Filter Time Constant") - } - field(AFVL, DBF_DOUBLE) { - prompt("Alarm Filter Value") - interest(3) - special(SPC_NOMOD) - } - field(ADEL, DBF_LONG) { - promptgroup("80 - Display") - interest(1) - prompt("Archive Deadband") - } - field(MDEL, DBF_LONG) { - prompt("Monitor Deadband") - interest(1) - promptgroup("80 - Display") - } - field(LALM, DBF_LONG) { - prompt("Last Value Alarmed") - interest(3) - special(SPC_NOMOD) - } - field(ALST, DBF_LONG) { - interest(3) - special(SPC_NOMOD) - prompt("Last Value Archived") - } - field(MLST, DBF_LONG) { - interest(3) - special(SPC_NOMOD) - prompt("Last Val Monitored") - } - field(SIOL, DBF_INLINK) { - interest(1) - promptgroup("90 - Simulate") - prompt("Simulation Input Link") - } - field(SVAL, DBF_LONG) { - prompt("Simulation Value") - } - field(SIML, DBF_INLINK) { - prompt("Simulation Mode Link") - promptgroup("90 - Simulate") - interest(1) - } - field(SIMM, DBF_MENU) { - menu(menuYesNo) - prompt("Simulation Mode") - interest(1) - special(SPC_MOD) - } - field(SIMS, DBF_MENU) { - interest(2) - promptgroup("90 - Simulate") - prompt("Simulation Mode Severity") - menu(menuAlarmSevr) - } - field(OLDSIMM, DBF_MENU) { - prompt("Prev. Simulation Mode") - special(SPC_NOMOD) - interest(4) - menu(menuSimm) - } - field(SSCN, DBF_MENU) { - initial("65535") - promptgroup("90 - Simulate") - interest(1) - prompt("Sim. Mode Scan") - menu(menuScan) - } - field(SDLY, DBF_DOUBLE) { - initial("-1.0") - promptgroup("90 - Simulate") - interest(2) - prompt("Sim. Mode Async Delay") - } - field(SIMPVT, DBF_NOACCESS) { - extra("CALLBACK *simpvt") - prompt("Sim. Mode Private") - interest(4) - special(SPC_NOMOD) - } -} -device(longin, CONSTANT, devLiSoft, "Soft Channel") -device(longin, CONSTANT, devLiSoftCallback, "Async Soft Channel") -device(longin, INST_IO, devLiGeneralTime, "General Time") -device(longin, INST_IO, asynLiInt32, "asynInt32") -device(longin, INST_IO, asynLiUInt32Digital, "asynUInt32Digital") -device(longin, INST_IO, devlonginStream, "stream") -device(longin, INST_IO, devLiStrParm, "asyn li stringParm") -recordtype(waveform) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - %#include "callback.h" - field(NAME, DBF_STRING) { - size(61) - special(SPC_NOMOD) - prompt("Record Name") - } - field(DESC, DBF_STRING) { - promptgroup("10 - Common") - prompt("Descriptor") - size(41) - } - field(ASG, DBF_STRING) { - prompt("Access Security Group") - special(SPC_AS) - promptgroup("10 - Common") - size(29) - } - field(SCAN, DBF_MENU) { - menu(menuScan) - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) - prompt("Scan Mechanism") - } - field(PINI, DBF_MENU) { - interest(1) - promptgroup("20 - Scan") - prompt("Process at iocInit") - menu(menuPini) - } - field(PHAS, DBF_SHORT) { - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - prompt("Scan Phase") - } - field(EVNT, DBF_STRING) { - prompt("Event Name") - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) - size(40) - } - field(TSE, DBF_SHORT) { - prompt("Time Stamp Event") - interest(1) - promptgroup("20 - Scan") - } - field(TSEL, DBF_INLINK) { - promptgroup("20 - Scan") - interest(1) - prompt("Time Stamp Link") - } - field(DTYP, DBF_DEVICE) { - promptgroup("10 - Common") - interest(1) - prompt("Device Type") - } - field(DISV, DBF_SHORT) { - initial("1") - prompt("Disable Value") - promptgroup("20 - Scan") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - promptgroup("20 - Scan") - interest(1) - prompt("Scanning Disable") - } - field(MLOK, DBF_NOACCESS) { - extra("epicsMutexId mlok") - interest(4) - special(SPC_NOMOD) - prompt("Monitor lock") - } - field(MLIS, DBF_NOACCESS) { - extra("ELLLIST mlis") - interest(4) - special(SPC_NOMOD) - prompt("Monitor List") - } - field(BKLNK, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Backwards link tracking") - extra("ELLLIST bklnk") - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - interest(3) - prompt("Force Processing") - pp(TRUE) - } - field(STAT, DBF_MENU) { - menu(menuAlarmStat) - prompt("Alarm Status") - special(SPC_NOMOD) - initial("UDF") - } - field(SEVR, DBF_MENU) { - menu(menuAlarmSevr) - special(SPC_NOMOD) - prompt("Alarm Severity") - } - field(NSTA, DBF_MENU) { - menu(menuAlarmStat) - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Status") - } - field(NSEV, DBF_MENU) { - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Severity") - menu(menuAlarmSevr) - } - field(ACKS, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Alarm Ack Severity") - special(SPC_NOMOD) - interest(2) - } - field(ACKT, DBF_MENU) { - menu(menuYesNo) - prompt("Alarm Ack Transient") - interest(2) - special(SPC_NOMOD) - promptgroup("70 - Alarm") - initial("YES") - } - field(DISS, DBF_MENU) { - prompt("Disable Alarm Sevrty") - promptgroup("70 - Alarm") - interest(1) - menu(menuAlarmSevr) - } - field(LCNT, DBF_UCHAR) { - interest(2) - special(SPC_NOMOD) - prompt("Lock Count") - } - field(PACT, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Record active") - } - field(PUTF, DBF_UCHAR) { - prompt("dbPutField process") - special(SPC_NOMOD) - interest(1) - } - field(RPRO, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Reprocess ") - } - field(ASP, DBF_NOACCESS) { - extra("struct asgMember *asp") - interest(4) - special(SPC_NOMOD) - prompt("Access Security Pvt") - } - field(PPN, DBF_NOACCESS) { - prompt("pprocessNotify") - special(SPC_NOMOD) - interest(4) - extra("struct processNotify *ppn") - } - field(PPNR, DBF_NOACCESS) { - prompt("pprocessNotifyRecord") - special(SPC_NOMOD) - interest(4) - extra("struct processNotifyRecord *ppnr") - } - field(SPVT, DBF_NOACCESS) { - extra("struct scan_element *spvt") - prompt("Scan Private") - interest(4) - special(SPC_NOMOD) - } - field(RSET, DBF_NOACCESS) { - extra("struct typed_rset *rset") - interest(4) - special(SPC_NOMOD) - prompt("Address of RSET") - } - field(DSET, DBF_NOACCESS) { - extra("struct dset *dset") - interest(4) - special(SPC_NOMOD) - prompt("DSET address") - } - field(DPVT, DBF_NOACCESS) { - extra("void *dpvt") - prompt("Device Private") - special(SPC_NOMOD) - interest(4) - } - field(RDES, DBF_NOACCESS) { - extra("struct dbRecordType *rdes") - prompt("Address of dbRecordType") - interest(4) - special(SPC_NOMOD) - } - field(LSET, DBF_NOACCESS) { - extra("struct lockRecord *lset") - interest(4) - special(SPC_NOMOD) - prompt("Lock Set") - } - field(PRIO, DBF_MENU) { - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - prompt("Scheduling Priority") - menu(menuPriority) - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - prompt("Break Point") - special(SPC_NOMOD) - interest(1) - extra("char bkpt") - } - field(UDF, DBF_UCHAR) { - prompt("Undefined") - promptgroup("10 - Common") - interest(1) - pp(TRUE) - initial("1") - } - field(UDFS, DBF_MENU) { - menu(menuAlarmSevr) - promptgroup("70 - Alarm") - interest(1) - prompt("Undefined Alarm Sevrty") - initial("INVALID") - } - field(TIME, DBF_NOACCESS) { - extra("epicsTimeStamp time") - prompt("Time") - special(SPC_NOMOD) - interest(2) - } - field(FLNK, DBF_FWDLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Forward Process Link") - } - field(VAL, DBF_NOACCESS) { - asl(ASL0) - special(SPC_DBADDR) - prompt("Value") - extra("void * val") - pp(TRUE) - } - field(RARM, DBF_SHORT) { - pp(TRUE) - interest(1) - promptgroup("30 - Action") - prompt("Rearm the waveform") - } - field(PREC, DBF_SHORT) { - prop(YES) - interest(1) - promptgroup("80 - Display") - prompt("Display Precision") - } - field(INP, DBF_INLINK) { - prompt("Input Specification") - interest(1) - promptgroup("40 - Input") - } - field(EGU, DBF_STRING) { - prompt("Engineering Units") - promptgroup("80 - Display") - prop(YES) - interest(1) - size(16) - } - field(HOPR, DBF_DOUBLE) { - prompt("High Operating Range") - prop(YES) - interest(1) - promptgroup("80 - Display") - } - field(LOPR, DBF_DOUBLE) { - prop(YES) - interest(1) - promptgroup("80 - Display") - prompt("Low Operating Range") - } - field(NELM, DBF_ULONG) { - initial("1") - prompt("Number of Elements") - interest(1) - special(SPC_NOMOD) - promptgroup("30 - Action") - } - field(FTVL, DBF_MENU) { - prompt("Field Type of Value") - promptgroup("30 - Action") - interest(1) - special(SPC_NOMOD) - menu(menuFtype) - } - field(BUSY, DBF_SHORT) { - special(SPC_NOMOD) - prompt("Busy Indicator") - } - field(NORD, DBF_ULONG) { - prompt("Number elements read") - special(SPC_NOMOD) - } - field(BPTR, DBF_NOACCESS) { - extra("void * bptr") - special(SPC_NOMOD) - interest(4) - prompt("Buffer Pointer") - } - field(SIOL, DBF_INLINK) { - prompt("Simulation Input Link") - interest(1) - promptgroup("90 - Simulate") - } - field(SIML, DBF_INLINK) { - prompt("Simulation Mode Link") - interest(1) - promptgroup("90 - Simulate") - } - field(SIMM, DBF_MENU) { - menu(menuYesNo) - interest(1) - special(SPC_MOD) - prompt("Simulation Mode") - } - field(SIMS, DBF_MENU) { - menu(menuAlarmSevr) - promptgroup("90 - Simulate") - interest(2) - prompt("Simulation Mode Severity") - } - field(OLDSIMM, DBF_MENU) { - prompt("Prev. Simulation Mode") - interest(4) - special(SPC_NOMOD) - menu(menuSimm) - } - field(SSCN, DBF_MENU) { - initial("65535") - menu(menuScan) - interest(1) - promptgroup("90 - Simulate") - prompt("Sim. Mode Scan") - } - field(SDLY, DBF_DOUBLE) { - initial("-1.0") - prompt("Sim. Mode Async Delay") - interest(2) - promptgroup("90 - Simulate") - } - field(SIMPVT, DBF_NOACCESS) { - prompt("Sim. Mode Private") - interest(4) - special(SPC_NOMOD) - extra("CALLBACK *simpvt") - } - field(MPST, DBF_MENU) { - prompt("Post Value Monitors") - promptgroup("80 - Display") - interest(1) - menu(waveformPOST) - } - field(APST, DBF_MENU) { - prompt("Post Archive Monitors") - promptgroup("80 - Display") - interest(1) - menu(waveformPOST) - } - field(HASH, DBF_ULONG) { - prompt("Hash of OnChange data.") - interest(3) - } -} -device(waveform, CONSTANT, devWfSoft, "Soft Channel") -device(waveform, INST_IO, asynWfOctetCmdResponse, "asynOctetCmdResponse") -device(waveform, INST_IO, asynWfOctetWriteRead, "asynOctetWriteRead") -device(waveform, INST_IO, asynWfOctetRead, "asynOctetRead") -device(waveform, INST_IO, asynWfOctetWrite, "asynOctetWrite") -device(waveform, INST_IO, asynWfOctetWriteBinary, "asynOctetWriteBinary") -device(waveform, INST_IO, asynInt8ArrayWfIn, "asynInt8ArrayIn") -device(waveform, INST_IO, asynInt8ArrayWfOut, "asynInt8ArrayOut") -device(waveform, INST_IO, asynInt16ArrayWfIn, "asynInt16ArrayIn") -device(waveform, INST_IO, asynInt16ArrayWfOut, "asynInt16ArrayOut") -device(waveform, INST_IO, asynInt32ArrayWfIn, "asynInt32ArrayIn") -device(waveform, INST_IO, asynInt32ArrayWfOut, "asynInt32ArrayOut") -device(waveform, INST_IO, asynInt32TimeSeries, "asynInt32TimeSeries") -device(waveform, INST_IO, asynFloat32ArrayWfIn, "asynFloat32ArrayIn") -device(waveform, INST_IO, asynFloat32ArrayWfOut, "asynFloat32ArrayOut") -device(waveform, INST_IO, asynFloat64ArrayWfIn, "asynFloat64ArrayIn") -device(waveform, INST_IO, asynFloat64ArrayWfOut, "asynFloat64ArrayOut") -device(waveform, INST_IO, asynFloat64TimeSeries, "asynFloat64TimeSeries") -device(waveform, INST_IO, devwaveformStream, "stream") -recordtype(int64out) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - %#include "callback.h" - field(NAME, DBF_STRING) { - size(61) - prompt("Record Name") - special(SPC_NOMOD) - } - field(DESC, DBF_STRING) { - promptgroup("10 - Common") - prompt("Descriptor") - size(41) - } - field(ASG, DBF_STRING) { - promptgroup("10 - Common") - special(SPC_AS) - prompt("Access Security Group") - size(29) - } - field(SCAN, DBF_MENU) { - prompt("Scan Mechanism") - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - menu(menuScan) - } - field(PINI, DBF_MENU) { - menu(menuPini) - interest(1) - promptgroup("20 - Scan") - prompt("Process at iocInit") - } - field(PHAS, DBF_SHORT) { - prompt("Scan Phase") - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - } - field(EVNT, DBF_STRING) { - size(40) - prompt("Event Name") - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - } - field(TSE, DBF_SHORT) { - interest(1) - promptgroup("20 - Scan") - prompt("Time Stamp Event") - } - field(TSEL, DBF_INLINK) { - prompt("Time Stamp Link") - promptgroup("20 - Scan") - interest(1) - } - field(DTYP, DBF_DEVICE) { - prompt("Device Type") - interest(1) - promptgroup("10 - Common") - } - field(DISV, DBF_SHORT) { - initial("1") - prompt("Disable Value") - promptgroup("20 - Scan") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Scanning Disable") - } - field(MLOK, DBF_NOACCESS) { - extra("epicsMutexId mlok") - special(SPC_NOMOD) - interest(4) - prompt("Monitor lock") - } - field(MLIS, DBF_NOACCESS) { - extra("ELLLIST mlis") - interest(4) - special(SPC_NOMOD) - prompt("Monitor List") - } - field(BKLNK, DBF_NOACCESS) { - extra("ELLLIST bklnk") - prompt("Backwards link tracking") - special(SPC_NOMOD) - interest(4) - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - interest(3) - prompt("Force Processing") - pp(TRUE) - } - field(STAT, DBF_MENU) { - menu(menuAlarmStat) - special(SPC_NOMOD) - prompt("Alarm Status") - initial("UDF") - } - field(SEVR, DBF_MENU) { - menu(menuAlarmSevr) - special(SPC_NOMOD) - prompt("Alarm Severity") - } - field(NSTA, DBF_MENU) { - menu(menuAlarmStat) - prompt("New Alarm Status") - interest(2) - special(SPC_NOMOD) - } - field(NSEV, DBF_MENU) { - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Severity") - menu(menuAlarmSevr) - } - field(ACKS, DBF_MENU) { - prompt("Alarm Ack Severity") - special(SPC_NOMOD) - interest(2) - menu(menuAlarmSevr) - } - field(ACKT, DBF_MENU) { - prompt("Alarm Ack Transient") - interest(2) - promptgroup("70 - Alarm") - special(SPC_NOMOD) - menu(menuYesNo) - initial("YES") - } - field(DISS, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Disable Alarm Sevrty") - interest(1) - promptgroup("70 - Alarm") - } - field(LCNT, DBF_UCHAR) { - prompt("Lock Count") - special(SPC_NOMOD) - interest(2) - } - field(PACT, DBF_UCHAR) { - special(SPC_NOMOD) - interest(1) - prompt("Record active") - } - field(PUTF, DBF_UCHAR) { - prompt("dbPutField process") - special(SPC_NOMOD) - interest(1) - } - field(RPRO, DBF_UCHAR) { - prompt("Reprocess ") - interest(1) - special(SPC_NOMOD) - } - field(ASP, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Access Security Pvt") - extra("struct asgMember *asp") } field(PPN, DBF_NOACCESS) { extra("struct processNotify *ppn") @@ -10741,237 +21559,131 @@ interest(4) } field(PPNR, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) prompt("pprocessNotifyRecord") extra("struct processNotifyRecord *ppnr") + special(SPC_NOMOD) + interest(4) } field(SPVT, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) + extra("struct scan_element *spvt") prompt("Scan Private") - extra("struct scan_element *spvt") + special(SPC_NOMOD) + interest(4) } field(RSET, DBF_NOACCESS) { + prompt("Address of RSET") extra("struct typed_rset *rset") special(SPC_NOMOD) interest(4) - prompt("Address of RSET") } field(DSET, DBF_NOACCESS) { extra("struct dset *dset") prompt("DSET address") - special(SPC_NOMOD) - interest(4) + interest(4) + special(SPC_NOMOD) } field(DPVT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + extra("void *dpvt") prompt("Device Private") - interest(4) - special(SPC_NOMOD) - extra("void *dpvt") } field(RDES, DBF_NOACCESS) { + prompt("Address of dbRecordType") extra("struct dbRecordType *rdes") - interest(4) - special(SPC_NOMOD) - prompt("Address of dbRecordType") + special(SPC_NOMOD) + interest(4) } field(LSET, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) prompt("Lock Set") extra("struct lockRecord *lset") + special(SPC_NOMOD) + interest(4) } field(PRIO, DBF_MENU) { + special(SPC_SCAN) + interest(1) + menu(menuPriority) + promptgroup("20 - Scan") prompt("Scheduling Priority") - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - menu(menuPriority) } field(TPRO, DBF_UCHAR) { prompt("Trace Processing") } field(BKPT, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(1) + interest(1) + special(SPC_NOMOD) prompt("Break Point") extra("char bkpt") } field(UDF, DBF_UCHAR) { - initial("1") - pp(TRUE) - promptgroup("10 - Common") - interest(1) prompt("Undefined") + initial("1") + pp(TRUE) + promptgroup("10 - Common") + interest(1) } field(UDFS, DBF_MENU) { + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") initial("INVALID") prompt("Undefined Alarm Sevrty") - interest(1) - promptgroup("70 - Alarm") - menu(menuAlarmSevr) } field(TIME, DBF_NOACCESS) { extra("epicsTimeStamp time") - special(SPC_NOMOD) - interest(2) prompt("Time") + interest(2) + special(SPC_NOMOD) } field(FLNK, DBF_FWDLINK) { interest(1) promptgroup("20 - Scan") prompt("Forward Process Link") } - field(VAL, DBF_INT64) { - promptgroup("50 - Output") - prompt("Desired Output") - asl(ASL0) - pp(TRUE) - } - field(OUT, DBF_OUTLINK) { - promptgroup("50 - Output") - interest(1) - prompt("Output Specification") - } - field(DOL, DBF_INLINK) { - promptgroup("40 - Input") - interest(1) - prompt("Desired Output Loc") - } - field(OMSL, DBF_MENU) { - menu(menuOmsl) - promptgroup("50 - Output") - interest(1) - prompt("Output Mode Select") - } - field(EGU, DBF_STRING) { - prompt("Units name") - prop(YES) - promptgroup("80 - Display") - interest(1) - size(16) - } - field(DRVH, DBF_INT64) { - pp(TRUE) - interest(1) - prop(YES) - promptgroup("30 - Action") - prompt("Drive High Limit") - } - field(DRVL, DBF_INT64) { - prompt("Drive Low Limit") - promptgroup("30 - Action") - prop(YES) - interest(1) - pp(TRUE) - } - field(HOPR, DBF_INT64) { - prompt("High Operating Range") - prop(YES) - interest(1) - promptgroup("80 - Display") - } - field(LOPR, DBF_INT64) { - interest(1) - prop(YES) - promptgroup("80 - Display") - prompt("Low Operating Range") - } - field(HIHI, DBF_INT64) { - pp(TRUE) - interest(1) - prop(YES) - promptgroup("70 - Alarm") - prompt("Hihi Alarm Limit") - } - field(LOLO, DBF_INT64) { - prompt("Lolo Alarm Limit") - prop(YES) - promptgroup("70 - Alarm") - interest(1) - pp(TRUE) - } - field(HIGH, DBF_INT64) { - prompt("High Alarm Limit") - promptgroup("70 - Alarm") - prop(YES) - interest(1) - pp(TRUE) - } - field(LOW, DBF_INT64) { - pp(TRUE) - prompt("Low Alarm Limit") - prop(YES) - interest(1) - promptgroup("70 - Alarm") - } - field(HHSV, DBF_MENU) { - pp(TRUE) - interest(1) - promptgroup("70 - Alarm") - prompt("Hihi Severity") - menu(menuAlarmSevr) - } - field(LLSV, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Lolo Severity") - promptgroup("70 - Alarm") - interest(1) - pp(TRUE) - } - field(HSV, DBF_MENU) { - menu(menuAlarmSevr) - interest(1) - promptgroup("70 - Alarm") - prompt("High Severity") - pp(TRUE) - } - field(LSV, DBF_MENU) { - pp(TRUE) - promptgroup("70 - Alarm") - interest(1) - prompt("Low Severity") - menu(menuAlarmSevr) - } - field(HYST, DBF_INT64) { - promptgroup("70 - Alarm") - interest(1) - prompt("Alarm Deadband") - } - field(ADEL, DBF_INT64) { - prompt("Archive Deadband") - interest(1) - promptgroup("80 - Display") - } - field(MDEL, DBF_INT64) { - promptgroup("80 - Display") - interest(1) - prompt("Monitor Deadband") - } - field(LALM, DBF_INT64) { - prompt("Last Value Alarmed") - special(SPC_NOMOD) - interest(3) - } - field(ALST, DBF_INT64) { - prompt("Last Value Archived") - special(SPC_NOMOD) - interest(3) - } - field(MLST, DBF_INT64) { - prompt("Last Val Monitored") - special(SPC_NOMOD) - interest(3) - } - field(SIOL, DBF_OUTLINK) { - prompt("Simulation Output Link") - promptgroup("90 - Simulate") - interest(1) + field(VAL, DBF_STRING) { + size(40) + asl(ASL0) + prompt("Current Value") + pp(TRUE) + promptgroup("40 - Input") + } + field(OVAL, DBF_STRING) { + interest(3) + special(SPC_NOMOD) + size(40) + prompt("Previous Value") + } + field(INP, DBF_INLINK) { + interest(1) + promptgroup("40 - Input") + prompt("Input Specification") + } + field(MPST, DBF_MENU) { + promptgroup("80 - Display") + menu(stringinPOST) + interest(1) + prompt("Post Value Monitors") + } + field(APST, DBF_MENU) { + prompt("Post Archive Monitors") + menu(stringinPOST) + interest(1) + promptgroup("80 - Display") + } + field(SIOL, DBF_INLINK) { + prompt("Simulation Input Link") + promptgroup("90 - Simulate") + interest(1) + } + field(SVAL, DBF_STRING) { + prompt("Simulation Value") + size(40) + pp(TRUE) } field(SIML, DBF_INLINK) { - interest(1) - promptgroup("90 - Simulate") + promptgroup("90 - Simulate") + interest(1) prompt("Simulation Mode Link") } field(SIMM, DBF_MENU) { @@ -10981,29 +21693,29 @@ menu(menuYesNo) } field(SIMS, DBF_MENU) { - menu(menuAlarmSevr) + interest(2) + menu(menuAlarmSevr) + promptgroup("90 - Simulate") prompt("Simulation Mode Severity") - interest(2) - promptgroup("90 - Simulate") } field(OLDSIMM, DBF_MENU) { + menu(menuSimm) interest(4) special(SPC_NOMOD) prompt("Prev. Simulation Mode") - menu(menuSimm) } field(SSCN, DBF_MENU) { - interest(1) - promptgroup("90 - Simulate") prompt("Sim. Mode Scan") - menu(menuScan) initial("65535") + promptgroup("90 - Simulate") + interest(1) + menu(menuScan) } field(SDLY, DBF_DOUBLE) { - promptgroup("90 - Simulate") - interest(2) + initial("-1.0") prompt("Sim. Mode Async Delay") - initial("-1.0") + interest(2) + promptgroup("90 - Simulate") } field(SIMPVT, DBF_NOACCESS) { extra("CALLBACK *simpvt") @@ -11011,3792 +21723,21 @@ special(SPC_NOMOD) interest(4) } - field(IVOA, DBF_MENU) { - prompt("INVALID output action") - promptgroup("50 - Output") - interest(2) - menu(menuIvoa) - } - field(IVOV, DBF_INT64) { - prompt("INVALID output value") - interest(2) - promptgroup("50 - Output") - } -} -device(int64out, CONSTANT, devI64outSoft, "Soft Channel") -device(int64out, CONSTANT, devI64outSoftCallback, "Async Soft Channel") -recordtype(aSub) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - %struct aSubRecord; - field(NAME, DBF_STRING) { - special(SPC_NOMOD) - prompt("Record Name") - size(61) - } - field(DESC, DBF_STRING) { - size(41) - prompt("Descriptor") - promptgroup("10 - Common") - } - field(ASG, DBF_STRING) { - promptgroup("10 - Common") - special(SPC_AS) - prompt("Access Security Group") - size(29) - } - field(SCAN, DBF_MENU) { - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - prompt("Scan Mechanism") - menu(menuScan) - } - field(PINI, DBF_MENU) { - promptgroup("20 - Scan") - interest(1) - prompt("Process at iocInit") - menu(menuPini) - } - field(PHAS, DBF_SHORT) { - prompt("Scan Phase") - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - } - field(EVNT, DBF_STRING) { - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - prompt("Event Name") - size(40) - } - field(TSE, DBF_SHORT) { - prompt("Time Stamp Event") - promptgroup("20 - Scan") - interest(1) - } - field(TSEL, DBF_INLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Time Stamp Link") - } - field(DTYP, DBF_DEVICE) { - prompt("Device Type") - interest(1) - promptgroup("10 - Common") - } - field(DISV, DBF_SHORT) { - initial("1") - promptgroup("20 - Scan") - prompt("Disable Value") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - prompt("Scanning Disable") - promptgroup("20 - Scan") - interest(1) - } - field(MLOK, DBF_NOACCESS) { - extra("epicsMutexId mlok") - prompt("Monitor lock") - interest(4) - special(SPC_NOMOD) - } - field(MLIS, DBF_NOACCESS) { - prompt("Monitor List") - interest(4) - special(SPC_NOMOD) - extra("ELLLIST mlis") - } - field(BKLNK, DBF_NOACCESS) { - prompt("Backwards link tracking") - special(SPC_NOMOD) - interest(4) - extra("ELLLIST bklnk") - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - prompt("Force Processing") - interest(3) - pp(TRUE) - } - field(STAT, DBF_MENU) { - initial("UDF") - menu(menuAlarmStat) - prompt("Alarm Status") - special(SPC_NOMOD) - } - field(SEVR, DBF_MENU) { - prompt("Alarm Severity") - special(SPC_NOMOD) - menu(menuAlarmSevr) - } - field(NSTA, DBF_MENU) { - menu(menuAlarmStat) - prompt("New Alarm Status") - special(SPC_NOMOD) - interest(2) - } - field(NSEV, DBF_MENU) { - interest(2) - special(SPC_NOMOD) - prompt("New Alarm Severity") - menu(menuAlarmSevr) - } - field(ACKS, DBF_MENU) { - interest(2) - special(SPC_NOMOD) - prompt("Alarm Ack Severity") - menu(menuAlarmSevr) - } - field(ACKT, DBF_MENU) { - initial("YES") - menu(menuYesNo) - interest(2) - promptgroup("70 - Alarm") - special(SPC_NOMOD) - prompt("Alarm Ack Transient") - } - field(DISS, DBF_MENU) { - menu(menuAlarmSevr) - promptgroup("70 - Alarm") - interest(1) - prompt("Disable Alarm Sevrty") - } - field(LCNT, DBF_UCHAR) { - interest(2) - special(SPC_NOMOD) - prompt("Lock Count") - } - field(PACT, DBF_UCHAR) { - prompt("Record active") - special(SPC_NOMOD) - interest(1) - } - field(PUTF, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("dbPutField process") - } - field(RPRO, DBF_UCHAR) { - prompt("Reprocess ") - special(SPC_NOMOD) - interest(1) - } - field(ASP, DBF_NOACCESS) { - extra("struct asgMember *asp") - prompt("Access Security Pvt") - interest(4) - special(SPC_NOMOD) - } - field(PPN, DBF_NOACCESS) { - extra("struct processNotify *ppn") - prompt("pprocessNotify") - interest(4) - special(SPC_NOMOD) - } - field(PPNR, DBF_NOACCESS) { - prompt("pprocessNotifyRecord") - interest(4) - special(SPC_NOMOD) - extra("struct processNotifyRecord *ppnr") - } - field(SPVT, DBF_NOACCESS) { - extra("struct scan_element *spvt") - prompt("Scan Private") - interest(4) - special(SPC_NOMOD) - } - field(RSET, DBF_NOACCESS) { - extra("struct typed_rset *rset") - prompt("Address of RSET") - special(SPC_NOMOD) - interest(4) - } - field(DSET, DBF_NOACCESS) { - extra("struct dset *dset") - interest(4) - special(SPC_NOMOD) - prompt("DSET address") - } - field(DPVT, DBF_NOACCESS) { - extra("void *dpvt") - interest(4) - special(SPC_NOMOD) - prompt("Device Private") - } - field(RDES, DBF_NOACCESS) { - extra("struct dbRecordType *rdes") - interest(4) - special(SPC_NOMOD) - prompt("Address of dbRecordType") - } - field(LSET, DBF_NOACCESS) { - extra("struct lockRecord *lset") - prompt("Lock Set") - special(SPC_NOMOD) - interest(4) - } - field(PRIO, DBF_MENU) { - menu(menuPriority) - prompt("Scheduling Priority") - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - prompt("Break Point") - interest(1) - special(SPC_NOMOD) - extra("char bkpt") - } - field(UDF, DBF_UCHAR) { - interest(1) - promptgroup("10 - Common") - prompt("Undefined") - pp(TRUE) - initial("1") - } - field(UDFS, DBF_MENU) { - initial("INVALID") - interest(1) - promptgroup("70 - Alarm") - prompt("Undefined Alarm Sevrty") - menu(menuAlarmSevr) - } - field(TIME, DBF_NOACCESS) { - extra("epicsTimeStamp time") - interest(2) - special(SPC_NOMOD) - prompt("Time") - } - field(FLNK, DBF_FWDLINK) { - prompt("Forward Process Link") - promptgroup("20 - Scan") - interest(1) - } - field(VAL, DBF_LONG) { - prompt("Subr. return value") - asl(ASL0) - } - field(OVAL, DBF_LONG) { - interest(3) - special(SPC_NOMOD) - prompt("Old return value") - } - field(INAM, DBF_STRING) { - size(41) - special(SPC_NOMOD) - interest(1) - promptgroup("30 - Action") - prompt("Initialize Subr. Name") - } - field(LFLG, DBF_MENU) { - interest(1) - promptgroup("30 - Action") - prompt("Subr. Input Enable") - menu(aSubLFLG) - } - field(SUBL, DBF_INLINK) { - prompt("Subroutine Name Link") - interest(1) - special(SPC_NOMOD) - promptgroup("30 - Action") - } - field(SNAM, DBF_STRING) { - interest(1) - promptgroup("30 - Action") - special(SPC_MOD) - prompt("Process Subr. Name") - size(41) - } - field(ONAM, DBF_STRING) { - promptgroup("30 - Action") - interest(3) - special(SPC_NOMOD) - prompt("Old Subr. Name") - size(41) - } - field(SADR, DBF_NOACCESS) { - extra("long (*sadr)(struct aSubRecord *)") - special(SPC_NOMOD) - interest(2) - prompt("Subroutine Address") - } - field(CADR, DBF_NOACCESS) { - prompt("Subroutine Cleanup Address") - special(SPC_NOMOD) - interest(2) - extra("void (*cadr)(struct aSubRecord *)") - } - field(BRSV, DBF_MENU) { - interest(1) - promptgroup("70 - Alarm") - prompt("Bad Return Severity") - menu(menuAlarmSevr) - pp(TRUE) - } - field(PREC, DBF_SHORT) { - interest(1) - prop(YES) - promptgroup("80 - Display") - prompt("Display Precision") - } - field(EFLG, DBF_MENU) { - prompt("Output Event Flag") - interest(1) - promptgroup("50 - Output") - menu(aSubEFLG) - initial("1") - } - field(INPA, DBF_INLINK) { - promptgroup("41 - Input A-G") - interest(1) - prompt("Input Link A") - } - field(INPB, DBF_INLINK) { - prompt("Input Link B") - promptgroup("41 - Input A-G") - interest(1) - } - field(INPC, DBF_INLINK) { - prompt("Input Link C") - interest(1) - promptgroup("41 - Input A-G") - } - field(INPD, DBF_INLINK) { - prompt("Input Link D") - interest(1) - promptgroup("41 - Input A-G") - } - field(INPE, DBF_INLINK) { - promptgroup("41 - Input A-G") - interest(1) - prompt("Input Link E") - } - field(INPF, DBF_INLINK) { - prompt("Input Link F") - promptgroup("41 - Input A-G") - interest(1) - } - field(INPG, DBF_INLINK) { - promptgroup("41 - Input A-G") - interest(1) - prompt("Input Link G") - } - field(INPH, DBF_INLINK) { - prompt("Input Link H") - promptgroup("42 - Input H-N") - interest(1) - } - field(INPI, DBF_INLINK) { - prompt("Input Link I") - interest(1) - promptgroup("42 - Input H-N") - } - field(INPJ, DBF_INLINK) { - promptgroup("42 - Input H-N") - interest(1) - prompt("Input Link J") - } - field(INPK, DBF_INLINK) { - interest(1) - promptgroup("42 - Input H-N") - prompt("Input Link K") - } - field(INPL, DBF_INLINK) { - prompt("Input Link L") - promptgroup("42 - Input H-N") - interest(1) - } - field(INPM, DBF_INLINK) { - interest(1) - promptgroup("42 - Input H-N") - prompt("Input Link M") - } - field(INPN, DBF_INLINK) { - prompt("Input Link N") - interest(1) - promptgroup("42 - Input H-N") - } - field(INPO, DBF_INLINK) { - promptgroup("43 - Input O-U") - interest(1) - prompt("Input Link O") - } - field(INPP, DBF_INLINK) { - prompt("Input Link P") - interest(1) - promptgroup("43 - Input O-U") - } - field(INPQ, DBF_INLINK) { - prompt("Input Link Q") - promptgroup("43 - Input O-U") - interest(1) - } - field(INPR, DBF_INLINK) { - promptgroup("43 - Input O-U") - interest(1) - prompt("Input Link R") - } - field(INPS, DBF_INLINK) { - interest(1) - promptgroup("43 - Input O-U") - prompt("Input Link S") - } - field(INPT, DBF_INLINK) { - promptgroup("43 - Input O-U") - interest(1) - prompt("Input Link T") - } - field(INPU, DBF_INLINK) { - prompt("Input Link U") - promptgroup("43 - Input O-U") - interest(1) - } - field(A, DBF_NOACCESS) { - asl(ASL0) - prompt("Input value A") - special(SPC_DBADDR) - interest(2) - extra("void *a") - } - field(B, DBF_NOACCESS) { - extra("void *b") - prompt("Input value B") - special(SPC_DBADDR) - interest(2) - asl(ASL0) - } - field(C, DBF_NOACCESS) { - extra("void *c") - special(SPC_DBADDR) - interest(2) - prompt("Input value C") - asl(ASL0) - } - field(D, DBF_NOACCESS) { - asl(ASL0) - interest(2) - special(SPC_DBADDR) - prompt("Input value D") - extra("void *d") - } - field(E, DBF_NOACCESS) { - extra("void *e") - asl(ASL0) - interest(2) - special(SPC_DBADDR) - prompt("Input value E") - } - field(F, DBF_NOACCESS) { - prompt("Input value F") - special(SPC_DBADDR) - interest(2) - asl(ASL0) - extra("void *f") - } - field(G, DBF_NOACCESS) { - asl(ASL0) - interest(2) - special(SPC_DBADDR) - prompt("Input value G") - extra("void *g") - } - field(H, DBF_NOACCESS) { - asl(ASL0) - interest(2) - special(SPC_DBADDR) - prompt("Input value H") - extra("void *h") - } - field(I, DBF_NOACCESS) { - special(SPC_DBADDR) - interest(2) - prompt("Input value I") - asl(ASL0) - extra("void *i") - } - field(J, DBF_NOACCESS) { - prompt("Input value J") - special(SPC_DBADDR) - interest(2) - asl(ASL0) - extra("void *j") - } - field(K, DBF_NOACCESS) { - prompt("Input value K") - special(SPC_DBADDR) - interest(2) - asl(ASL0) - extra("void *k") - } - field(L, DBF_NOACCESS) { - extra("void *l") - asl(ASL0) - interest(2) - special(SPC_DBADDR) - prompt("Input value L") - } - field(M, DBF_NOACCESS) { - prompt("Input value M") - interest(2) - special(SPC_DBADDR) - asl(ASL0) - extra("void *m") - } - field(N, DBF_NOACCESS) { - extra("void *n") - asl(ASL0) - prompt("Input value N") - special(SPC_DBADDR) - interest(2) - } - field(O, DBF_NOACCESS) { - extra("void *o") - asl(ASL0) - prompt("Input value O") - special(SPC_DBADDR) - interest(2) - } - field(P, DBF_NOACCESS) { - special(SPC_DBADDR) - interest(2) - prompt("Input value P") - asl(ASL0) - extra("void *p") - } - field(Q, DBF_NOACCESS) { - extra("void *q") - prompt("Input value Q") - special(SPC_DBADDR) - interest(2) - asl(ASL0) - } - field(R, DBF_NOACCESS) { - extra("void *r") - interest(2) - special(SPC_DBADDR) - prompt("Input value R") - asl(ASL0) - } - field(S, DBF_NOACCESS) { - extra("void *s") - prompt("Input value S") - interest(2) - special(SPC_DBADDR) - asl(ASL0) - } - field(T, DBF_NOACCESS) { - asl(ASL0) - interest(2) - special(SPC_DBADDR) - prompt("Input value T") - extra("void *t") - } - field(U, DBF_NOACCESS) { - extra("void *u") - asl(ASL0) - prompt("Input value U") - interest(2) - special(SPC_DBADDR) - } - field(FTA, DBF_MENU) { - menu(menuFtype) - interest(1) - special(SPC_NOMOD) - promptgroup("41 - Input A-G") - prompt("Type of A") - initial("DOUBLE") - } - field(FTB, DBF_MENU) { - prompt("Type of B") - interest(1) - promptgroup("41 - Input A-G") - special(SPC_NOMOD) - menu(menuFtype) - initial("DOUBLE") - } - field(FTC, DBF_MENU) { - initial("DOUBLE") - menu(menuFtype) - special(SPC_NOMOD) - interest(1) - promptgroup("41 - Input A-G") - prompt("Type of C") - } - field(FTD, DBF_MENU) { - initial("DOUBLE") - menu(menuFtype) - prompt("Type of D") - interest(1) - promptgroup("41 - Input A-G") - special(SPC_NOMOD) - } - field(FTE, DBF_MENU) { - interest(1) - special(SPC_NOMOD) - promptgroup("41 - Input A-G") - prompt("Type of E") - menu(menuFtype) - initial("DOUBLE") - } - field(FTF, DBF_MENU) { - initial("DOUBLE") - menu(menuFtype) - prompt("Type of F") - interest(1) - promptgroup("41 - Input A-G") - special(SPC_NOMOD) - } - field(FTG, DBF_MENU) { - initial("DOUBLE") - prompt("Type of G") - promptgroup("41 - Input A-G") - interest(1) - special(SPC_NOMOD) - menu(menuFtype) - } - field(FTH, DBF_MENU) { - menu(menuFtype) - prompt("Type of H") - promptgroup("42 - Input H-N") - interest(1) - special(SPC_NOMOD) - initial("DOUBLE") - } - field(FTI, DBF_MENU) { - initial("DOUBLE") - prompt("Type of I") - special(SPC_NOMOD) - interest(1) - promptgroup("42 - Input H-N") - menu(menuFtype) - } - field(FTJ, DBF_MENU) { - initial("DOUBLE") - prompt("Type of J") - special(SPC_NOMOD) - interest(1) - promptgroup("42 - Input H-N") - menu(menuFtype) - } - field(FTK, DBF_MENU) { - prompt("Type of K") - interest(1) - special(SPC_NOMOD) - promptgroup("42 - Input H-N") - menu(menuFtype) - initial("DOUBLE") - } - field(FTL, DBF_MENU) { - prompt("Type of L") - interest(1) - special(SPC_NOMOD) - promptgroup("42 - Input H-N") - menu(menuFtype) - initial("DOUBLE") - } - field(FTM, DBF_MENU) { - initial("DOUBLE") - prompt("Type of M") - promptgroup("42 - Input H-N") - interest(1) - special(SPC_NOMOD) - menu(menuFtype) - } - field(FTN, DBF_MENU) { - menu(menuFtype) - interest(1) - special(SPC_NOMOD) - promptgroup("42 - Input H-N") - prompt("Type of N") - initial("DOUBLE") - } - field(FTO, DBF_MENU) { - initial("DOUBLE") - menu(menuFtype) - prompt("Type of O") - interest(1) - promptgroup("43 - Input O-U") - special(SPC_NOMOD) - } - field(FTP, DBF_MENU) { - initial("DOUBLE") - menu(menuFtype) - prompt("Type of P") - interest(1) - special(SPC_NOMOD) - promptgroup("43 - Input O-U") - } - field(FTQ, DBF_MENU) { - initial("DOUBLE") - prompt("Type of Q") - special(SPC_NOMOD) - interest(1) - promptgroup("43 - Input O-U") - menu(menuFtype) - } - field(FTR, DBF_MENU) { - menu(menuFtype) - prompt("Type of R") - special(SPC_NOMOD) - interest(1) - promptgroup("43 - Input O-U") - initial("DOUBLE") - } - field(FTS, DBF_MENU) { - initial("DOUBLE") - menu(menuFtype) - promptgroup("43 - Input O-U") - interest(1) - special(SPC_NOMOD) - prompt("Type of S") - } - field(FTT, DBF_MENU) { - prompt("Type of T") - promptgroup("43 - Input O-U") - interest(1) - special(SPC_NOMOD) - menu(menuFtype) - initial("DOUBLE") - } - field(FTU, DBF_MENU) { - interest(1) - promptgroup("43 - Input O-U") - special(SPC_NOMOD) - prompt("Type of U") - menu(menuFtype) - initial("DOUBLE") - } - field(NOA, DBF_ULONG) { - interest(1) - special(SPC_NOMOD) - promptgroup("41 - Input A-G") - prompt("Max. elements in A") - initial("1") - } - field(NOB, DBF_ULONG) { - initial("1") - interest(1) - special(SPC_NOMOD) - promptgroup("41 - Input A-G") - prompt("Max. elements in B") - } - field(NOC, DBF_ULONG) { - prompt("Max. elements in C") - special(SPC_NOMOD) - interest(1) - promptgroup("41 - Input A-G") - initial("1") - } - field(NOD, DBF_ULONG) { - initial("1") - prompt("Max. elements in D") - special(SPC_NOMOD) - interest(1) - promptgroup("41 - Input A-G") - } - field(NOE, DBF_ULONG) { - initial("1") - interest(1) - promptgroup("41 - Input A-G") - special(SPC_NOMOD) - prompt("Max. elements in E") - } - field(NOF, DBF_ULONG) { - initial("1") - interest(1) - special(SPC_NOMOD) - promptgroup("41 - Input A-G") - prompt("Max. elements in F") - } - field(NOG, DBF_ULONG) { - prompt("Max. elements in G") - interest(1) - special(SPC_NOMOD) - promptgroup("41 - Input A-G") - initial("1") - } - field(NOH, DBF_ULONG) { - initial("1") - interest(1) - special(SPC_NOMOD) - promptgroup("42 - Input H-N") - prompt("Max. elements in H") - } - field(NOI, DBF_ULONG) { - interest(1) - promptgroup("42 - Input H-N") - special(SPC_NOMOD) - prompt("Max. elements in I") - initial("1") - } - field(NOJ, DBF_ULONG) { - prompt("Max. elements in J") - interest(1) - special(SPC_NOMOD) - promptgroup("42 - Input H-N") - initial("1") - } - field(NOK, DBF_ULONG) { - prompt("Max. elements in K") - promptgroup("42 - Input H-N") - interest(1) - special(SPC_NOMOD) - initial("1") - } - field(NOL, DBF_ULONG) { - special(SPC_NOMOD) - interest(1) - promptgroup("42 - Input H-N") - prompt("Max. elements in L") - initial("1") - } - field(NOM, DBF_ULONG) { - initial("1") - prompt("Max. elements in M") - special(SPC_NOMOD) - interest(1) - promptgroup("42 - Input H-N") - } - field(NON, DBF_ULONG) { - prompt("Max. elements in N") - interest(1) - special(SPC_NOMOD) - promptgroup("42 - Input H-N") - initial("1") - } - field(NOO, DBF_ULONG) { - initial("1") - prompt("Max. elements in O") - special(SPC_NOMOD) - interest(1) - promptgroup("43 - Input O-U") - } - field(NOP, DBF_ULONG) { - initial("1") - prompt("Max. elements in P") - interest(1) - special(SPC_NOMOD) - promptgroup("43 - Input O-U") - } - field(NOQ, DBF_ULONG) { - interest(1) - special(SPC_NOMOD) - promptgroup("43 - Input O-U") - prompt("Max. elements in Q") - initial("1") - } - field(NOR, DBF_ULONG) { - promptgroup("43 - Input O-U") - interest(1) - special(SPC_NOMOD) - prompt("Max. elements in R") - initial("1") - } - field(NOS, DBF_ULONG) { - initial("1") - interest(1) - special(SPC_NOMOD) - promptgroup("43 - Input O-U") - prompt("Max. elements in S") - } - field(NOT, DBF_ULONG) { - prompt("Max. elements in T") - promptgroup("43 - Input O-U") - interest(1) - special(SPC_NOMOD) - initial("1") - } - field(NOU, DBF_ULONG) { - initial("1") - interest(1) - promptgroup("43 - Input O-U") - special(SPC_NOMOD) - prompt("Max. elements in U") - } - field(NEA, DBF_ULONG) { - initial("1") - interest(3) - special(SPC_NOMOD) - prompt("Num. elements in A") - } - field(NEB, DBF_ULONG) { - prompt("Num. elements in B") - special(SPC_NOMOD) - interest(3) - initial("1") - } - field(NEC, DBF_ULONG) { - prompt("Num. elements in C") - special(SPC_NOMOD) - interest(3) - initial("1") - } - field(NED, DBF_ULONG) { - initial("1") - prompt("Num. elements in D") - special(SPC_NOMOD) - interest(3) - } - field(NEE, DBF_ULONG) { - special(SPC_NOMOD) - interest(3) - prompt("Num. elements in E") - initial("1") - } - field(NEF, DBF_ULONG) { - prompt("Num. elements in F") - interest(3) - special(SPC_NOMOD) - initial("1") - } - field(NEG, DBF_ULONG) { - prompt("Num. elements in G") - special(SPC_NOMOD) - interest(3) - initial("1") - } - field(NEH, DBF_ULONG) { - special(SPC_NOMOD) - interest(3) - prompt("Num. elements in H") - initial("1") - } - field(NEI, DBF_ULONG) { - prompt("Num. elements in I") - interest(3) - special(SPC_NOMOD) - initial("1") - } - field(NEJ, DBF_ULONG) { - interest(3) - special(SPC_NOMOD) - prompt("Num. elements in J") - initial("1") - } - field(NEK, DBF_ULONG) { - prompt("Num. elements in K") - special(SPC_NOMOD) - interest(3) - initial("1") - } - field(NEL, DBF_ULONG) { - prompt("Num. elements in L") - special(SPC_NOMOD) - interest(3) - initial("1") - } - field(NEM, DBF_ULONG) { - initial("1") - prompt("Num. elements in M") - interest(3) - special(SPC_NOMOD) - } - field(NEN, DBF_ULONG) { - prompt("Num. elements in N") - special(SPC_NOMOD) - interest(3) - initial("1") - } - field(NEO, DBF_ULONG) { - initial("1") - prompt("Num. elements in O") - interest(3) - special(SPC_NOMOD) - } - field(NEP, DBF_ULONG) { - prompt("Num. elements in P") - interest(3) - special(SPC_NOMOD) - initial("1") - } - field(NEQ, DBF_ULONG) { - initial("1") - prompt("Num. elements in Q") - special(SPC_NOMOD) - interest(3) - } - field(NER, DBF_ULONG) { - initial("1") - special(SPC_NOMOD) - interest(3) - prompt("Num. elements in R") - } - field(NES, DBF_ULONG) { - special(SPC_NOMOD) - interest(3) - prompt("Num. elements in S") - initial("1") - } - field(NET, DBF_ULONG) { - initial("1") - prompt("Num. elements in T") - interest(3) - special(SPC_NOMOD) - } - field(NEU, DBF_ULONG) { - interest(3) - special(SPC_NOMOD) - prompt("Num. elements in U") - initial("1") - } - field(OUTA, DBF_OUTLINK) { - prompt("Output Link A") - interest(1) - promptgroup("51 - Output A-G") - } - field(OUTB, DBF_OUTLINK) { - promptgroup("51 - Output A-G") - interest(1) - prompt("Output Link B") - } - field(OUTC, DBF_OUTLINK) { - prompt("Output Link C") - interest(1) - promptgroup("51 - Output A-G") - } - field(OUTD, DBF_OUTLINK) { - prompt("Output Link D") - interest(1) - promptgroup("51 - Output A-G") - } - field(OUTE, DBF_OUTLINK) { - prompt("Output Link E") - promptgroup("51 - Output A-G") - interest(1) - } - field(OUTF, DBF_OUTLINK) { - prompt("Output Link F") - interest(1) - promptgroup("51 - Output A-G") - } - field(OUTG, DBF_OUTLINK) { - prompt("Output Link G") - promptgroup("51 - Output A-G") - interest(1) - } - field(OUTH, DBF_OUTLINK) { - interest(1) - promptgroup("52 - Output H-N") - prompt("Output Link H") - } - field(OUTI, DBF_OUTLINK) { - prompt("Output Link I") - interest(1) - promptgroup("52 - Output H-N") - } - field(OUTJ, DBF_OUTLINK) { - prompt("Output Link J") - interest(1) - promptgroup("52 - Output H-N") - } - field(OUTK, DBF_OUTLINK) { - prompt("Output Link K") - promptgroup("52 - Output H-N") - interest(1) - } - field(OUTL, DBF_OUTLINK) { - prompt("Output Link L") - promptgroup("52 - Output H-N") - interest(1) - } - field(OUTM, DBF_OUTLINK) { - interest(1) - promptgroup("52 - Output H-N") - prompt("Output Link M") - } - field(OUTN, DBF_OUTLINK) { - prompt("Output Link N") - interest(1) - promptgroup("52 - Output H-N") - } - field(OUTO, DBF_OUTLINK) { - interest(1) - promptgroup("53 - Output O-U") - prompt("Output Link O") - } - field(OUTP, DBF_OUTLINK) { - prompt("Output Link P") - promptgroup("53 - Output O-U") - interest(1) - } - field(OUTQ, DBF_OUTLINK) { - prompt("Output Link Q") - interest(1) - promptgroup("53 - Output O-U") - } - field(OUTR, DBF_OUTLINK) { - interest(1) - promptgroup("53 - Output O-U") - prompt("Output Link R") - } - field(OUTS, DBF_OUTLINK) { - promptgroup("53 - Output O-U") - interest(1) - prompt("Output Link S") - } - field(OUTT, DBF_OUTLINK) { - prompt("Output Link T") - promptgroup("53 - Output O-U") - interest(1) - } - field(OUTU, DBF_OUTLINK) { - prompt("Output Link U") - interest(1) - promptgroup("53 - Output O-U") - } - field(VALA, DBF_NOACCESS) { - extra("void *vala") - prompt("Output value A") - interest(2) - special(SPC_DBADDR) - asl(ASL0) - } - field(VALB, DBF_NOACCESS) { - extra("void *valb") - asl(ASL0) - prompt("Output value B") - interest(2) - special(SPC_DBADDR) - } - field(VALC, DBF_NOACCESS) { - asl(ASL0) - interest(2) - special(SPC_DBADDR) - prompt("Output value C") - extra("void *valc") - } - field(VALD, DBF_NOACCESS) { - extra("void *vald") - asl(ASL0) - special(SPC_DBADDR) - interest(2) - prompt("Output value D") - } - field(VALE, DBF_NOACCESS) { - extra("void *vale") - asl(ASL0) - special(SPC_DBADDR) - interest(2) - prompt("Output value E") - } - field(VALF, DBF_NOACCESS) { - interest(2) - special(SPC_DBADDR) - prompt("Output value F") - asl(ASL0) - extra("void *valf") - } - field(VALG, DBF_NOACCESS) { - extra("void *valg") - prompt("Output value G") - special(SPC_DBADDR) - interest(2) - asl(ASL0) - } - field(VALH, DBF_NOACCESS) { - asl(ASL0) - interest(2) - special(SPC_DBADDR) - prompt("Output value H") - extra("void *valh") - } - field(VALI, DBF_NOACCESS) { - interest(2) - special(SPC_DBADDR) - prompt("Output value I") - asl(ASL0) - extra("void *vali") - } - field(VALJ, DBF_NOACCESS) { - extra("void *valj") - prompt("Output value J") - interest(2) - special(SPC_DBADDR) - asl(ASL0) - } - field(VALK, DBF_NOACCESS) { - prompt("Output value K") - interest(2) - special(SPC_DBADDR) - asl(ASL0) - extra("void *valk") - } - field(VALL, DBF_NOACCESS) { - special(SPC_DBADDR) - interest(2) - prompt("Output value L") - asl(ASL0) - extra("void *vall") - } - field(VALM, DBF_NOACCESS) { - prompt("Output value M") - interest(2) - special(SPC_DBADDR) - asl(ASL0) - extra("void *valm") - } - field(VALN, DBF_NOACCESS) { - prompt("Output value N") - interest(2) - special(SPC_DBADDR) - asl(ASL0) - extra("void *valn") - } - field(VALO, DBF_NOACCESS) { - extra("void *valo") - asl(ASL0) - interest(2) - special(SPC_DBADDR) - prompt("Output value O") - } - field(VALP, DBF_NOACCESS) { - extra("void *valp") - asl(ASL0) - prompt("Output value P") - special(SPC_DBADDR) - interest(2) - } - field(VALQ, DBF_NOACCESS) { - extra("void *valq") - prompt("Output value Q") - interest(2) - special(SPC_DBADDR) - asl(ASL0) - } - field(VALR, DBF_NOACCESS) { - extra("void *valr") - special(SPC_DBADDR) - interest(2) - prompt("Output value R") - asl(ASL0) - } - field(VALS, DBF_NOACCESS) { - special(SPC_DBADDR) - interest(2) - prompt("Output value S") - asl(ASL0) - extra("void *vals") - } - field(VALT, DBF_NOACCESS) { - prompt("Output value T") - interest(2) - special(SPC_DBADDR) - asl(ASL0) - extra("void *valt") - } - field(VALU, DBF_NOACCESS) { - interest(2) - special(SPC_DBADDR) - prompt("Output value U") - asl(ASL0) - extra("void *valu") - } - field(OVLA, DBF_NOACCESS) { - asl(ASL0) - prompt("Old Output A") - interest(4) - special(SPC_NOMOD) - extra("void *ovla") - } - field(OVLB, DBF_NOACCESS) { - extra("void *ovlb") - asl(ASL0) - prompt("Old Output B") - special(SPC_NOMOD) - interest(4) - } - field(OVLC, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Old Output C") - asl(ASL0) - extra("void *ovlc") - } - field(OVLD, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Old Output D") - asl(ASL0) - extra("void *ovld") - } - field(OVLE, DBF_NOACCESS) { - extra("void *ovle") - asl(ASL0) - special(SPC_NOMOD) - interest(4) - prompt("Old Output E") - } - field(OVLF, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Old Output F") - asl(ASL0) - extra("void *ovlf") - } - field(OVLG, DBF_NOACCESS) { - asl(ASL0) - interest(4) - special(SPC_NOMOD) - prompt("Old Output G") - extra("void *ovlg") - } - field(OVLH, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Old Output H") - asl(ASL0) - extra("void *ovlh") - } - field(OVLI, DBF_NOACCESS) { - asl(ASL0) - interest(4) - special(SPC_NOMOD) - prompt("Old Output I") - extra("void *ovli") - } - field(OVLJ, DBF_NOACCESS) { - prompt("Old Output J") - interest(4) - special(SPC_NOMOD) - asl(ASL0) - extra("void *ovlj") - } - field(OVLK, DBF_NOACCESS) { - extra("void *ovlk") - asl(ASL0) - prompt("Old Output K") - special(SPC_NOMOD) - interest(4) - } - field(OVLL, DBF_NOACCESS) { - prompt("Old Output L") - special(SPC_NOMOD) - interest(4) - asl(ASL0) - extra("void *ovll") - } - field(OVLM, DBF_NOACCESS) { - extra("void *ovlm") - prompt("Old Output M") - interest(4) - special(SPC_NOMOD) - asl(ASL0) - } - field(OVLN, DBF_NOACCESS) { - extra("void *ovln") - prompt("Old Output N") - interest(4) - special(SPC_NOMOD) - asl(ASL0) - } - field(OVLO, DBF_NOACCESS) { - extra("void *ovlo") - asl(ASL0) - interest(4) - special(SPC_NOMOD) - prompt("Old Output O") - } - field(OVLP, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Old Output P") - asl(ASL0) - extra("void *ovlp") - } - field(OVLQ, DBF_NOACCESS) { - asl(ASL0) - prompt("Old Output Q") - interest(4) - special(SPC_NOMOD) - extra("void *ovlq") - } - field(OVLR, DBF_NOACCESS) { - extra("void *ovlr") - asl(ASL0) - prompt("Old Output R") - special(SPC_NOMOD) - interest(4) - } - field(OVLS, DBF_NOACCESS) { - extra("void *ovls") - prompt("Old Output S") - special(SPC_NOMOD) - interest(4) - asl(ASL0) - } - field(OVLT, DBF_NOACCESS) { - asl(ASL0) - prompt("Old Output T") - special(SPC_NOMOD) - interest(4) - extra("void *ovlt") - } - field(OVLU, DBF_NOACCESS) { - asl(ASL0) - interest(4) - special(SPC_NOMOD) - prompt("Old Output U") - extra("void *ovlu") - } - field(FTVA, DBF_MENU) { - initial("DOUBLE") - menu(menuFtype) - interest(1) - special(SPC_NOMOD) - promptgroup("51 - Output A-G") - prompt("Type of VALA") - } - field(FTVB, DBF_MENU) { - menu(menuFtype) - prompt("Type of VALB") - interest(1) - special(SPC_NOMOD) - promptgroup("51 - Output A-G") - initial("DOUBLE") - } - field(FTVC, DBF_MENU) { - promptgroup("51 - Output A-G") - interest(1) - special(SPC_NOMOD) - prompt("Type of VALC") - menu(menuFtype) - initial("DOUBLE") - } - field(FTVD, DBF_MENU) { - prompt("Type of VALD") - promptgroup("51 - Output A-G") - interest(1) - special(SPC_NOMOD) - menu(menuFtype) - initial("DOUBLE") - } - field(FTVE, DBF_MENU) { - initial("DOUBLE") - prompt("Type of VALE") - interest(1) - special(SPC_NOMOD) - promptgroup("51 - Output A-G") - menu(menuFtype) - } - field(FTVF, DBF_MENU) { - initial("DOUBLE") - menu(menuFtype) - interest(1) - promptgroup("51 - Output A-G") - special(SPC_NOMOD) - prompt("Type of VALF") - } - field(FTVG, DBF_MENU) { - initial("DOUBLE") - menu(menuFtype) - prompt("Type of VALG") - special(SPC_NOMOD) - interest(1) - promptgroup("51 - Output A-G") - } - field(FTVH, DBF_MENU) { - promptgroup("52 - Output H-N") - interest(1) - special(SPC_NOMOD) - prompt("Type of VALH") - menu(menuFtype) - initial("DOUBLE") - } - field(FTVI, DBF_MENU) { - special(SPC_NOMOD) - interest(1) - promptgroup("52 - Output H-N") - prompt("Type of VALI") - menu(menuFtype) - initial("DOUBLE") - } - field(FTVJ, DBF_MENU) { - promptgroup("52 - Output H-N") - interest(1) - special(SPC_NOMOD) - prompt("Type of VALJ") - menu(menuFtype) - initial("DOUBLE") - } - field(FTVK, DBF_MENU) { - interest(1) - promptgroup("52 - Output H-N") - special(SPC_NOMOD) - prompt("Type of VALK") - menu(menuFtype) - initial("DOUBLE") - } - field(FTVL, DBF_MENU) { - initial("DOUBLE") - menu(menuFtype) - prompt("Type of VALL") - promptgroup("52 - Output H-N") - interest(1) - special(SPC_NOMOD) - } - field(FTVM, DBF_MENU) { - initial("DOUBLE") - menu(menuFtype) - prompt("Type of VALM") - special(SPC_NOMOD) - interest(1) - promptgroup("52 - Output H-N") - } - field(FTVN, DBF_MENU) { - initial("DOUBLE") - prompt("Type of VALN") - interest(1) - special(SPC_NOMOD) - promptgroup("52 - Output H-N") - menu(menuFtype) - } - field(FTVO, DBF_MENU) { - initial("DOUBLE") - menu(menuFtype) - prompt("Type of VALO") - promptgroup("53 - Output O-U") - interest(1) - special(SPC_NOMOD) - } - field(FTVP, DBF_MENU) { - menu(menuFtype) - prompt("Type of VALP") - interest(1) - promptgroup("53 - Output O-U") - special(SPC_NOMOD) - initial("DOUBLE") - } - field(FTVQ, DBF_MENU) { - initial("DOUBLE") - menu(menuFtype) - interest(1) - special(SPC_NOMOD) - promptgroup("53 - Output O-U") - prompt("Type of VALQ") - } - field(FTVR, DBF_MENU) { - initial("DOUBLE") - interest(1) - special(SPC_NOMOD) - promptgroup("53 - Output O-U") - prompt("Type of VALR") - menu(menuFtype) - } - field(FTVS, DBF_MENU) { - initial("DOUBLE") - menu(menuFtype) - interest(1) - promptgroup("53 - Output O-U") - special(SPC_NOMOD) - prompt("Type of VALS") - } - field(FTVT, DBF_MENU) { - initial("DOUBLE") - prompt("Type of VALT") - interest(1) - special(SPC_NOMOD) - promptgroup("53 - Output O-U") - menu(menuFtype) - } - field(FTVU, DBF_MENU) { - interest(1) - special(SPC_NOMOD) - promptgroup("53 - Output O-U") - prompt("Type of VALU") - menu(menuFtype) - initial("DOUBLE") - } - field(NOVA, DBF_ULONG) { - initial("1") - promptgroup("51 - Output A-G") - interest(1) - special(SPC_NOMOD) - prompt("Max. elements in VALA") - } - field(NOVB, DBF_ULONG) { - prompt("Max. elements in VALB") - interest(1) - special(SPC_NOMOD) - promptgroup("51 - Output A-G") - initial("1") - } - field(NOVC, DBF_ULONG) { - initial("1") - prompt("Max. elements in VALC") - promptgroup("51 - Output A-G") - interest(1) - special(SPC_NOMOD) - } - field(NOVD, DBF_ULONG) { - initial("1") - special(SPC_NOMOD) - interest(1) - promptgroup("51 - Output A-G") - prompt("Max. elements in VALD") - } - field(NOVE, DBF_ULONG) { - initial("1") - interest(1) - special(SPC_NOMOD) - promptgroup("51 - Output A-G") - prompt("Max. elements in VALE") - } - field(NOVF, DBF_ULONG) { - promptgroup("51 - Output A-G") - interest(1) - special(SPC_NOMOD) - prompt("Max. elements in VALF") - initial("1") - } - field(NOVG, DBF_ULONG) { - special(SPC_NOMOD) - interest(1) - promptgroup("51 - Output A-G") - prompt("Max. elements in VALG") - initial("1") - } - field(NOVH, DBF_ULONG) { - prompt("Max. elements in VAlH") - interest(1) - promptgroup("52 - Output H-N") - special(SPC_NOMOD) - initial("1") - } - field(NOVI, DBF_ULONG) { - initial("1") - interest(1) - special(SPC_NOMOD) - promptgroup("52 - Output H-N") - prompt("Max. elements in VALI") - } - field(NOVJ, DBF_ULONG) { - initial("1") - promptgroup("52 - Output H-N") - interest(1) - special(SPC_NOMOD) - prompt("Max. elements in VALJ") - } - field(NOVK, DBF_ULONG) { - initial("1") - special(SPC_NOMOD) - interest(1) - promptgroup("52 - Output H-N") - prompt("Max. elements in VALK") - } - field(NOVL, DBF_ULONG) { - initial("1") - prompt("Max. elements in VALL") - special(SPC_NOMOD) - interest(1) - promptgroup("52 - Output H-N") - } - field(NOVM, DBF_ULONG) { - initial("1") - prompt("Max. elements in VALM") - interest(1) - special(SPC_NOMOD) - promptgroup("52 - Output H-N") - } - field(NOVN, DBF_ULONG) { - initial("1") - interest(1) - promptgroup("52 - Output H-N") - special(SPC_NOMOD) - prompt("Max. elements in VALN") - } - field(NOVO, DBF_ULONG) { - interest(1) - promptgroup("53 - Output O-U") - special(SPC_NOMOD) - prompt("Max. elements in VALO") - initial("1") - } - field(NOVP, DBF_ULONG) { - initial("1") - prompt("Max. elements in VALP") - promptgroup("53 - Output O-U") - interest(1) - special(SPC_NOMOD) - } - field(NOVQ, DBF_ULONG) { - initial("1") - interest(1) - promptgroup("53 - Output O-U") - special(SPC_NOMOD) - prompt("Max. elements in VALQ") - } - field(NOVR, DBF_ULONG) { - prompt("Max. elements in VALR") - promptgroup("53 - Output O-U") - interest(1) - special(SPC_NOMOD) - initial("1") - } - field(NOVS, DBF_ULONG) { - initial("1") - prompt("Max. elements in VALS") - special(SPC_NOMOD) - interest(1) - promptgroup("53 - Output O-U") - } - field(NOVT, DBF_ULONG) { - prompt("Max. elements in VALT") - interest(1) - special(SPC_NOMOD) - promptgroup("53 - Output O-U") - initial("1") - } - field(NOVU, DBF_ULONG) { - prompt("Max. elements in VALU") - special(SPC_NOMOD) - interest(1) - promptgroup("53 - Output O-U") - initial("1") - } - field(NEVA, DBF_ULONG) { - initial("1") - prompt("Num. elements in VALA") - special(SPC_NOMOD) - interest(3) - } - field(NEVB, DBF_ULONG) { - initial("1") - interest(3) - special(SPC_NOMOD) - prompt("Num. elements in VALB") - } - field(NEVC, DBF_ULONG) { - initial("1") - prompt("Num. elements in VALC") - special(SPC_NOMOD) - interest(3) - } - field(NEVD, DBF_ULONG) { - prompt("Num. elements in VALD") - interest(3) - special(SPC_NOMOD) - initial("1") - } - field(NEVE, DBF_ULONG) { - prompt("Num. elements in VALE") - special(SPC_NOMOD) - interest(3) - initial("1") - } - field(NEVF, DBF_ULONG) { - prompt("Num. elements in VALF") - interest(3) - special(SPC_NOMOD) - initial("1") - } - field(NEVG, DBF_ULONG) { - initial("1") - prompt("Num. elements in VALG") - interest(3) - special(SPC_NOMOD) - } - field(NEVH, DBF_ULONG) { - prompt("Num. elements in VAlH") - special(SPC_NOMOD) - interest(3) - initial("1") - } - field(NEVI, DBF_ULONG) { - initial("1") - prompt("Num. elements in VALI") - interest(3) - special(SPC_NOMOD) - } - field(NEVJ, DBF_ULONG) { - prompt("Num. elements in VALJ") - special(SPC_NOMOD) - interest(3) - initial("1") - } - field(NEVK, DBF_ULONG) { - initial("1") - prompt("Num. elements in VALK") - special(SPC_NOMOD) - interest(3) - } - field(NEVL, DBF_ULONG) { - interest(3) - special(SPC_NOMOD) - prompt("Num. elements in VALL") - initial("1") - } - field(NEVM, DBF_ULONG) { - interest(3) - special(SPC_NOMOD) - prompt("Num. elements in VALM") - initial("1") - } - field(NEVN, DBF_ULONG) { - initial("1") - prompt("Num. elements in VALN") - special(SPC_NOMOD) - interest(3) - } - field(NEVO, DBF_ULONG) { - special(SPC_NOMOD) - interest(3) - prompt("Num. elements in VALO") - initial("1") - } - field(NEVP, DBF_ULONG) { - initial("1") - prompt("Num. elements in VALP") - special(SPC_NOMOD) - interest(3) - } - field(NEVQ, DBF_ULONG) { - initial("1") - interest(3) - special(SPC_NOMOD) - prompt("Num. elements in VALQ") - } - field(NEVR, DBF_ULONG) { - initial("1") - prompt("Num. elements in VALR") - interest(3) - special(SPC_NOMOD) - } - field(NEVS, DBF_ULONG) { - prompt("Num. elements in VALS") - special(SPC_NOMOD) - interest(3) - initial("1") - } - field(NEVT, DBF_ULONG) { - initial("1") - interest(3) - special(SPC_NOMOD) - prompt("Num. elements in VALT") - } - field(NEVU, DBF_ULONG) { - prompt("Num. elements in VALU") - special(SPC_NOMOD) - interest(3) - initial("1") - } - field(ONVA, DBF_ULONG) { - prompt("Num. elements in OVLA") - special(SPC_NOMOD) - interest(4) - initial("1") - } - field(ONVB, DBF_ULONG) { - prompt("Num. elements in OVLB") - interest(4) - special(SPC_NOMOD) - initial("1") - } - field(ONVC, DBF_ULONG) { - special(SPC_NOMOD) - interest(4) - prompt("Num. elements in OVLC") - initial("1") - } - field(ONVD, DBF_ULONG) { - prompt("Num. elements in OVLD") - interest(4) - special(SPC_NOMOD) - initial("1") - } - field(ONVE, DBF_ULONG) { - initial("1") - interest(4) - special(SPC_NOMOD) - prompt("Num. elements in OVLE") - } - field(ONVF, DBF_ULONG) { - prompt("Num. elements in OVLF") - interest(4) - special(SPC_NOMOD) - initial("1") - } - field(ONVG, DBF_ULONG) { - prompt("Num. elements in OVLG") - interest(4) - special(SPC_NOMOD) - initial("1") - } - field(ONVH, DBF_ULONG) { - prompt("Num. elements in VAlH") - special(SPC_NOMOD) - interest(4) - initial("1") - } - field(ONVI, DBF_ULONG) { - prompt("Num. elements in OVLI") - interest(4) - special(SPC_NOMOD) - initial("1") - } - field(ONVJ, DBF_ULONG) { - initial("1") - interest(4) - special(SPC_NOMOD) - prompt("Num. elements in OVLJ") - } - field(ONVK, DBF_ULONG) { - prompt("Num. elements in OVLK") - special(SPC_NOMOD) - interest(4) - initial("1") - } - field(ONVL, DBF_ULONG) { - initial("1") - interest(4) - special(SPC_NOMOD) - prompt("Num. elements in OVLL") - } - field(ONVM, DBF_ULONG) { - special(SPC_NOMOD) - interest(4) - prompt("Num. elements in OVLM") - initial("1") - } - field(ONVN, DBF_ULONG) { - prompt("Num. elements in OVLN") - interest(4) - special(SPC_NOMOD) - initial("1") - } - field(ONVO, DBF_ULONG) { - special(SPC_NOMOD) - interest(4) - prompt("Num. elements in OVLO") - initial("1") - } - field(ONVP, DBF_ULONG) { - prompt("Num. elements in OVLP") - special(SPC_NOMOD) - interest(4) - initial("1") - } - field(ONVQ, DBF_ULONG) { - special(SPC_NOMOD) - interest(4) - prompt("Num. elements in OVLQ") - initial("1") - } - field(ONVR, DBF_ULONG) { - initial("1") - prompt("Num. elements in OVLR") - special(SPC_NOMOD) - interest(4) - } - field(ONVS, DBF_ULONG) { - prompt("Num. elements in OVLS") - interest(4) - special(SPC_NOMOD) - initial("1") - } - field(ONVT, DBF_ULONG) { - prompt("Num. elements in OVLT") - interest(4) - special(SPC_NOMOD) - initial("1") - } - field(ONVU, DBF_ULONG) { - prompt("Num. elements in OVLU") - interest(4) - special(SPC_NOMOD) - initial("1") - } -} -recordtype(seq) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - field(NAME, DBF_STRING) { - special(SPC_NOMOD) - prompt("Record Name") - size(61) - } - field(DESC, DBF_STRING) { - prompt("Descriptor") - promptgroup("10 - Common") - size(41) - } - field(ASG, DBF_STRING) { - prompt("Access Security Group") - special(SPC_AS) - promptgroup("10 - Common") - size(29) - } - field(SCAN, DBF_MENU) { - menu(menuScan) - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - prompt("Scan Mechanism") - } - field(PINI, DBF_MENU) { - promptgroup("20 - Scan") - interest(1) - prompt("Process at iocInit") - menu(menuPini) - } - field(PHAS, DBF_SHORT) { - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - prompt("Scan Phase") - } - field(EVNT, DBF_STRING) { - prompt("Event Name") - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - size(40) - } - field(TSE, DBF_SHORT) { - promptgroup("20 - Scan") - interest(1) - prompt("Time Stamp Event") - } - field(TSEL, DBF_INLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Time Stamp Link") - } - field(DTYP, DBF_DEVICE) { - interest(1) - promptgroup("10 - Common") - prompt("Device Type") - } - field(DISV, DBF_SHORT) { - promptgroup("20 - Scan") - prompt("Disable Value") - initial("1") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - promptgroup("20 - Scan") - interest(1) - prompt("Scanning Disable") - } - field(MLOK, DBF_NOACCESS) { - extra("epicsMutexId mlok") - prompt("Monitor lock") - interest(4) - special(SPC_NOMOD) - } - field(MLIS, DBF_NOACCESS) { - prompt("Monitor List") - interest(4) - special(SPC_NOMOD) - extra("ELLLIST mlis") - } - field(BKLNK, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Backwards link tracking") - extra("ELLLIST bklnk") - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - interest(3) - prompt("Force Processing") - pp(TRUE) - } - field(STAT, DBF_MENU) { - initial("UDF") - menu(menuAlarmStat) - special(SPC_NOMOD) - prompt("Alarm Status") - } - field(SEVR, DBF_MENU) { - menu(menuAlarmSevr) - special(SPC_NOMOD) - prompt("Alarm Severity") - } - field(NSTA, DBF_MENU) { - menu(menuAlarmStat) - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Status") - } - field(NSEV, DBF_MENU) { - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Severity") - menu(menuAlarmSevr) - } - field(ACKS, DBF_MENU) { - menu(menuAlarmSevr) - special(SPC_NOMOD) - interest(2) - prompt("Alarm Ack Severity") - } - field(ACKT, DBF_MENU) { - initial("YES") - menu(menuYesNo) - prompt("Alarm Ack Transient") - special(SPC_NOMOD) - interest(2) - promptgroup("70 - Alarm") - } - field(DISS, DBF_MENU) { - prompt("Disable Alarm Sevrty") - interest(1) - promptgroup("70 - Alarm") - menu(menuAlarmSevr) - } - field(LCNT, DBF_UCHAR) { - prompt("Lock Count") - interest(2) - special(SPC_NOMOD) - } - field(PACT, DBF_UCHAR) { - special(SPC_NOMOD) - interest(1) - prompt("Record active") - } - field(PUTF, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("dbPutField process") - } - field(RPRO, DBF_UCHAR) { - special(SPC_NOMOD) - interest(1) - prompt("Reprocess ") - } - field(ASP, DBF_NOACCESS) { - prompt("Access Security Pvt") - special(SPC_NOMOD) - interest(4) - extra("struct asgMember *asp") - } - field(PPN, DBF_NOACCESS) { - extra("struct processNotify *ppn") - interest(4) - special(SPC_NOMOD) - prompt("pprocessNotify") - } - field(PPNR, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("pprocessNotifyRecord") - extra("struct processNotifyRecord *ppnr") - } - field(SPVT, DBF_NOACCESS) { - prompt("Scan Private") - special(SPC_NOMOD) - interest(4) - extra("struct scan_element *spvt") - } - field(RSET, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Address of RSET") - extra("struct typed_rset *rset") - } - field(DSET, DBF_NOACCESS) { - prompt("DSET address") - interest(4) - special(SPC_NOMOD) - extra("struct dset *dset") - } - field(DPVT, DBF_NOACCESS) { - prompt("Device Private") - interest(4) - special(SPC_NOMOD) - extra("void *dpvt") - } - field(RDES, DBF_NOACCESS) { - extra("struct dbRecordType *rdes") - prompt("Address of dbRecordType") - interest(4) - special(SPC_NOMOD) - } - field(LSET, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Lock Set") - extra("struct lockRecord *lset") - } - field(PRIO, DBF_MENU) { - prompt("Scheduling Priority") - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - menu(menuPriority) - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - extra("char bkpt") - prompt("Break Point") - special(SPC_NOMOD) - interest(1) - } - field(UDF, DBF_UCHAR) { - prompt("Undefined") - interest(1) - promptgroup("10 - Common") - initial("1") - pp(TRUE) - } - field(UDFS, DBF_MENU) { - initial("INVALID") - menu(menuAlarmSevr) - prompt("Undefined Alarm Sevrty") - promptgroup("70 - Alarm") - interest(1) - } - field(TIME, DBF_NOACCESS) { - extra("epicsTimeStamp time") - interest(2) - special(SPC_NOMOD) - prompt("Time") - } - field(FLNK, DBF_FWDLINK) { - promptgroup("20 - Scan") - interest(1) - prompt("Forward Process Link") - } - field(VAL, DBF_LONG) { - pp(TRUE) - prompt("Used to trigger") - asl(ASL0) - } - field(SELM, DBF_MENU) { - prompt("Select Mechanism") - promptgroup("30 - Action") - interest(1) - menu(seqSELM) - } - field(SELN, DBF_USHORT) { - initial("1") - interest(1) - prompt("Link Selection") - } - field(SELL, DBF_INLINK) { - prompt("Link Selection Loc") - interest(1) - promptgroup("30 - Action") - } - field(OFFS, DBF_SHORT) { - promptgroup("30 - Action") - interest(1) - prompt("Offset for Specified") - initial("0") - } - field(SHFT, DBF_SHORT) { - initial("-1") - interest(1) - promptgroup("30 - Action") - prompt("Shift for Mask mode") - } - field(OLDN, DBF_USHORT) { - interest(4) - prompt("Old Selection") - } - field(PREC, DBF_SHORT) { - prompt("Display Precision") - interest(1) - promptgroup("80 - Display") - } - field(DLY0, DBF_DOUBLE) { - prompt("Delay 0") - promptgroup("41 - Link 0-7") - interest(1) - } - field(DOL0, DBF_INLINK) { - prompt("Input link 0") - interest(1) - promptgroup("41 - Link 0-7") - } - field(DO0, DBF_DOUBLE) { - interest(1) - prompt("Value 0") - } - field(LNK0, DBF_OUTLINK) { - prompt("Output Link 0") - promptgroup("41 - Link 0-7") - interest(1) - } - field(DLY1, DBF_DOUBLE) { - promptgroup("41 - Link 0-7") - interest(1) - prompt("Delay 1") - } - field(DOL1, DBF_INLINK) { - interest(1) - promptgroup("41 - Link 0-7") - prompt("Input link1") - } - field(DO1, DBF_DOUBLE) { - prompt("Value 1") - interest(1) - } - field(LNK1, DBF_OUTLINK) { - prompt("Output Link 1") - interest(1) - promptgroup("41 - Link 0-7") - } - field(DLY2, DBF_DOUBLE) { - interest(1) - promptgroup("41 - Link 0-7") - prompt("Delay 2") - } - field(DOL2, DBF_INLINK) { - promptgroup("41 - Link 0-7") - interest(1) - prompt("Input link 2") - } - field(DO2, DBF_DOUBLE) { - prompt("Value 2") - interest(1) - } - field(LNK2, DBF_OUTLINK) { - promptgroup("41 - Link 0-7") - interest(1) - prompt("Output Link 2") - } - field(DLY3, DBF_DOUBLE) { - promptgroup("41 - Link 0-7") - interest(1) - prompt("Delay 3") - } - field(DOL3, DBF_INLINK) { - prompt("Input link 3") - promptgroup("41 - Link 0-7") - interest(1) - } - field(DO3, DBF_DOUBLE) { - interest(1) - prompt("Value 3") - } - field(LNK3, DBF_OUTLINK) { - interest(1) - promptgroup("41 - Link 0-7") - prompt("Output Link 3") - } - field(DLY4, DBF_DOUBLE) { - prompt("Delay 4") - promptgroup("41 - Link 0-7") - interest(1) - } - field(DOL4, DBF_INLINK) { - prompt("Input link 4") - interest(1) - promptgroup("41 - Link 0-7") - } - field(DO4, DBF_DOUBLE) { - interest(1) - prompt("Value 4") - } - field(LNK4, DBF_OUTLINK) { - prompt("Output Link 4") - interest(1) - promptgroup("41 - Link 0-7") - } - field(DLY5, DBF_DOUBLE) { - prompt("Delay 5") - interest(1) - promptgroup("41 - Link 0-7") - } - field(DOL5, DBF_INLINK) { - prompt("Input link 5") - interest(1) - promptgroup("41 - Link 0-7") - } - field(DO5, DBF_DOUBLE) { - prompt("Value 5") - interest(1) - } - field(LNK5, DBF_OUTLINK) { - prompt("Output Link 5") - promptgroup("41 - Link 0-7") - interest(1) - } - field(DLY6, DBF_DOUBLE) { - promptgroup("41 - Link 0-7") - interest(1) - prompt("Delay 6") - } - field(DOL6, DBF_INLINK) { - interest(1) - promptgroup("41 - Link 0-7") - prompt("Input link 6") - } - field(DO6, DBF_DOUBLE) { - prompt("Value 6") - interest(1) - } - field(LNK6, DBF_OUTLINK) { - promptgroup("41 - Link 0-7") - interest(1) - prompt("Output Link 6") - } - field(DLY7, DBF_DOUBLE) { - prompt("Delay 7") - promptgroup("41 - Link 0-7") - interest(1) - } - field(DOL7, DBF_INLINK) { - interest(1) - promptgroup("41 - Link 0-7") - prompt("Input link 7") - } - field(DO7, DBF_DOUBLE) { - interest(1) - prompt("Value 7") - } - field(LNK7, DBF_OUTLINK) { - interest(1) - promptgroup("41 - Link 0-7") - prompt("Output Link 7") - } - field(DLY8, DBF_DOUBLE) { - promptgroup("42 - Link 8-F") - interest(1) - prompt("Delay 8") - } - field(DOL8, DBF_INLINK) { - interest(1) - promptgroup("42 - Link 8-F") - prompt("Input link 8") - } - field(DO8, DBF_DOUBLE) { - interest(1) - prompt("Value 8") - } - field(LNK8, DBF_OUTLINK) { - interest(1) - promptgroup("42 - Link 8-F") - prompt("Output Link 8") - } - field(DLY9, DBF_DOUBLE) { - promptgroup("42 - Link 8-F") - interest(1) - prompt("Delay 9") - } - field(DOL9, DBF_INLINK) { - prompt("Input link 9") - promptgroup("42 - Link 8-F") - interest(1) - } - field(DO9, DBF_DOUBLE) { - prompt("Value 9") - interest(1) - } - field(LNK9, DBF_OUTLINK) { - prompt("Output Link 9") - promptgroup("42 - Link 8-F") - interest(1) - } - field(DLYA, DBF_DOUBLE) { - prompt("Delay 10") - interest(1) - promptgroup("42 - Link 8-F") - } - field(DOLA, DBF_INLINK) { - promptgroup("42 - Link 8-F") - interest(1) - prompt("Input link 10") - } - field(DOA, DBF_DOUBLE) { - prompt("Value 10") - interest(1) - } - field(LNKA, DBF_OUTLINK) { - prompt("Output Link 10") - interest(1) - promptgroup("42 - Link 8-F") - } - field(DLYB, DBF_DOUBLE) { - prompt("Delay 11") - interest(1) - promptgroup("42 - Link 8-F") - } - field(DOLB, DBF_INLINK) { - prompt("Input link 11") - interest(1) - promptgroup("42 - Link 8-F") - } - field(DOB, DBF_DOUBLE) { - interest(1) - prompt("Value 11") - } - field(LNKB, DBF_OUTLINK) { - promptgroup("42 - Link 8-F") - interest(1) - prompt("Output Link 11") - } - field(DLYC, DBF_DOUBLE) { - prompt("Delay 12") - interest(1) - promptgroup("42 - Link 8-F") - } - field(DOLC, DBF_INLINK) { - interest(1) - promptgroup("42 - Link 8-F") - prompt("Input link 12") - } - field(DOC, DBF_DOUBLE) { - prompt("Value 12") - interest(1) - } - field(LNKC, DBF_OUTLINK) { - promptgroup("42 - Link 8-F") - interest(1) - prompt("Output Link 12") - } - field(DLYD, DBF_DOUBLE) { - promptgroup("42 - Link 8-F") - interest(1) - prompt("Delay 13") - } - field(DOLD, DBF_INLINK) { - promptgroup("42 - Link 8-F") - interest(1) - prompt("Input link 13") - } - field(DOD, DBF_DOUBLE) { - prompt("Value 13") - interest(1) - } - field(LNKD, DBF_OUTLINK) { - prompt("Output Link 13") - promptgroup("42 - Link 8-F") - interest(1) - } - field(DLYE, DBF_DOUBLE) { - promptgroup("42 - Link 8-F") - interest(1) - prompt("Delay 14") - } - field(DOLE, DBF_INLINK) { - promptgroup("42 - Link 8-F") - interest(1) - prompt("Input link 14") - } - field(DOE, DBF_DOUBLE) { - prompt("Value 14") - interest(1) - } - field(LNKE, DBF_OUTLINK) { - prompt("Output Link 14") - interest(1) - promptgroup("42 - Link 8-F") - } - field(DLYF, DBF_DOUBLE) { - prompt("Delay 15") - promptgroup("42 - Link 8-F") - interest(1) - } - field(DOLF, DBF_INLINK) { - interest(1) - promptgroup("42 - Link 8-F") - prompt("Input link 15") - } - field(DOF, DBF_DOUBLE) { - interest(1) - prompt("Value 15") - } - field(LNKF, DBF_OUTLINK) { - promptgroup("42 - Link 8-F") - interest(1) - prompt("Output Link 15") - } -} -recordtype(aai) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - %#include "callback.h" - field(NAME, DBF_STRING) { - prompt("Record Name") - special(SPC_NOMOD) - size(61) - } - field(DESC, DBF_STRING) { - promptgroup("10 - Common") - prompt("Descriptor") - size(41) - } - field(ASG, DBF_STRING) { - prompt("Access Security Group") - special(SPC_AS) - promptgroup("10 - Common") - size(29) - } - field(SCAN, DBF_MENU) { - menu(menuScan) - prompt("Scan Mechanism") - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - } - field(PINI, DBF_MENU) { - promptgroup("20 - Scan") - interest(1) - prompt("Process at iocInit") - menu(menuPini) - } - field(PHAS, DBF_SHORT) { - prompt("Scan Phase") - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) - } - field(EVNT, DBF_STRING) { - prompt("Event Name") - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - size(40) - } - field(TSE, DBF_SHORT) { - interest(1) - promptgroup("20 - Scan") - prompt("Time Stamp Event") - } - field(TSEL, DBF_INLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Time Stamp Link") - } - field(DTYP, DBF_DEVICE) { - interest(1) - promptgroup("10 - Common") - prompt("Device Type") - } - field(DISV, DBF_SHORT) { - initial("1") - promptgroup("20 - Scan") - prompt("Disable Value") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - prompt("Scanning Disable") - interest(1) - promptgroup("20 - Scan") - } - field(MLOK, DBF_NOACCESS) { - extra("epicsMutexId mlok") - interest(4) - special(SPC_NOMOD) - prompt("Monitor lock") - } - field(MLIS, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Monitor List") - extra("ELLLIST mlis") - } - field(BKLNK, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Backwards link tracking") - extra("ELLLIST bklnk") - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - prompt("Force Processing") - interest(3) - pp(TRUE) - } - field(STAT, DBF_MENU) { - initial("UDF") - menu(menuAlarmStat) - special(SPC_NOMOD) - prompt("Alarm Status") - } - field(SEVR, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Alarm Severity") - special(SPC_NOMOD) - } - field(NSTA, DBF_MENU) { - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Status") - menu(menuAlarmStat) - } - field(NSEV, DBF_MENU) { - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Severity") - menu(menuAlarmSevr) - } - field(ACKS, DBF_MENU) { - prompt("Alarm Ack Severity") - interest(2) - special(SPC_NOMOD) - menu(menuAlarmSevr) - } - field(ACKT, DBF_MENU) { - initial("YES") - prompt("Alarm Ack Transient") - interest(2) - promptgroup("70 - Alarm") - special(SPC_NOMOD) - menu(menuYesNo) - } - field(DISS, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Disable Alarm Sevrty") - promptgroup("70 - Alarm") - interest(1) - } - field(LCNT, DBF_UCHAR) { - interest(2) - special(SPC_NOMOD) - prompt("Lock Count") - } - field(PACT, DBF_UCHAR) { - special(SPC_NOMOD) - interest(1) - prompt("Record active") - } - field(PUTF, DBF_UCHAR) { - prompt("dbPutField process") - interest(1) - special(SPC_NOMOD) - } - field(RPRO, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Reprocess ") - } - field(ASP, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Access Security Pvt") - extra("struct asgMember *asp") - } - field(PPN, DBF_NOACCESS) { - extra("struct processNotify *ppn") - prompt("pprocessNotify") - special(SPC_NOMOD) - interest(4) - } - field(PPNR, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("pprocessNotifyRecord") - extra("struct processNotifyRecord *ppnr") - } - field(SPVT, DBF_NOACCESS) { - extra("struct scan_element *spvt") - prompt("Scan Private") - interest(4) - special(SPC_NOMOD) - } - field(RSET, DBF_NOACCESS) { - extra("struct typed_rset *rset") - interest(4) - special(SPC_NOMOD) - prompt("Address of RSET") - } - field(DSET, DBF_NOACCESS) { - extra("struct dset *dset") - interest(4) - special(SPC_NOMOD) - prompt("DSET address") - } - field(DPVT, DBF_NOACCESS) { - extra("void *dpvt") - prompt("Device Private") - special(SPC_NOMOD) - interest(4) - } - field(RDES, DBF_NOACCESS) { - extra("struct dbRecordType *rdes") - prompt("Address of dbRecordType") - interest(4) - special(SPC_NOMOD) - } - field(LSET, DBF_NOACCESS) { - prompt("Lock Set") - special(SPC_NOMOD) - interest(4) - extra("struct lockRecord *lset") - } - field(PRIO, DBF_MENU) { - menu(menuPriority) - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - prompt("Scheduling Priority") - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - extra("char bkpt") - prompt("Break Point") - interest(1) - special(SPC_NOMOD) - } - field(UDF, DBF_UCHAR) { - interest(1) - promptgroup("10 - Common") - prompt("Undefined") - initial("1") - pp(TRUE) - } - field(UDFS, DBF_MENU) { - initial("INVALID") - menu(menuAlarmSevr) - prompt("Undefined Alarm Sevrty") - interest(1) - promptgroup("70 - Alarm") - } - field(TIME, DBF_NOACCESS) { - interest(2) - special(SPC_NOMOD) - prompt("Time") - extra("epicsTimeStamp time") - } - field(FLNK, DBF_FWDLINK) { - prompt("Forward Process Link") - promptgroup("20 - Scan") - interest(1) - } - field(VAL, DBF_NOACCESS) { - special(SPC_DBADDR) - prompt("Value") - asl(ASL0) - extra("void * val") - pp(TRUE) - } - field(PREC, DBF_SHORT) { - prompt("Display Precision") - prop(YES) - promptgroup("80 - Display") - interest(1) - } - field(INP, DBF_INLINK) { - promptgroup("40 - Input") - interest(1) - prompt("Input Specification") - } - field(EGU, DBF_STRING) { - prompt("Engineering Units") - prop(YES) - interest(1) - promptgroup("80 - Display") - size(16) - } - field(HOPR, DBF_DOUBLE) { - interest(1) - prop(YES) - promptgroup("80 - Display") - prompt("High Operating Range") - } - field(LOPR, DBF_DOUBLE) { - prop(YES) - interest(1) - promptgroup("80 - Display") - prompt("Low Operating Range") - } - field(NELM, DBF_ULONG) { - initial("1") - prompt("Number of Elements") - special(SPC_NOMOD) - interest(1) - promptgroup("30 - Action") - } - field(FTVL, DBF_MENU) { - special(SPC_NOMOD) - interest(1) - promptgroup("30 - Action") - prompt("Field Type of Value") - menu(menuFtype) - } - field(NORD, DBF_ULONG) { - prompt("Number elements read") - special(SPC_NOMOD) - } - field(BPTR, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Buffer Pointer") - extra("void * bptr") - } - field(SIML, DBF_INLINK) { - prompt("Simulation Mode Link") - promptgroup("90 - Simulate") - interest(1) - } - field(SIMM, DBF_MENU) { - prompt("Simulation Mode") - interest(1) - special(SPC_MOD) - menu(menuYesNo) - } - field(SIMS, DBF_MENU) { - prompt("Simulation Mode Severity") - promptgroup("90 - Simulate") - interest(2) - menu(menuAlarmSevr) - } - field(SIOL, DBF_INLINK) { - prompt("Simulation Input Link") - promptgroup("90 - Simulate") - interest(1) - } - field(OLDSIMM, DBF_MENU) { - interest(4) - special(SPC_NOMOD) - prompt("Prev. Simulation Mode") - menu(menuSimm) - } - field(SSCN, DBF_MENU) { - menu(menuScan) - prompt("Sim. Mode Scan") - interest(1) - promptgroup("90 - Simulate") - initial("65535") - } - field(SDLY, DBF_DOUBLE) { - initial("-1.0") - interest(2) - promptgroup("90 - Simulate") - prompt("Sim. Mode Async Delay") - } - field(SIMPVT, DBF_NOACCESS) { - prompt("Sim. Mode Private") - special(SPC_NOMOD) - interest(4) - extra("CALLBACK *simpvt") - } - field(MPST, DBF_MENU) { - prompt("Post Value Monitors") - interest(1) - promptgroup("80 - Display") - menu(aaiPOST) - } - field(APST, DBF_MENU) { - promptgroup("80 - Display") - interest(1) - prompt("Post Archive Monitors") - menu(aaiPOST) - } - field(HASH, DBF_ULONG) { - prompt("Hash of OnChange data.") - interest(3) - } -} -device(aai, CONSTANT, devAaiSoft, "Soft Channel") -device(aai, INST_IO, devaaiStream, "stream") -recordtype(mbbo) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - %#include "callback.h" - field(NAME, DBF_STRING) { - size(61) - special(SPC_NOMOD) - prompt("Record Name") - } - field(DESC, DBF_STRING) { - size(41) - prompt("Descriptor") - promptgroup("10 - Common") - } - field(ASG, DBF_STRING) { - special(SPC_AS) - promptgroup("10 - Common") - prompt("Access Security Group") - size(29) - } - field(SCAN, DBF_MENU) { - menu(menuScan) - prompt("Scan Mechanism") - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - } - field(PINI, DBF_MENU) { - promptgroup("20 - Scan") - interest(1) - prompt("Process at iocInit") - menu(menuPini) - } - field(PHAS, DBF_SHORT) { - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - prompt("Scan Phase") - } - field(EVNT, DBF_STRING) { - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - prompt("Event Name") - size(40) - } - field(TSE, DBF_SHORT) { - prompt("Time Stamp Event") - promptgroup("20 - Scan") - interest(1) - } - field(TSEL, DBF_INLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Time Stamp Link") - } - field(DTYP, DBF_DEVICE) { - prompt("Device Type") - promptgroup("10 - Common") - interest(1) - } - field(DISV, DBF_SHORT) { - initial("1") - promptgroup("20 - Scan") - prompt("Disable Value") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - prompt("Scanning Disable") - interest(1) - promptgroup("20 - Scan") - } - field(MLOK, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Monitor lock") - extra("epicsMutexId mlok") - } - field(MLIS, DBF_NOACCESS) { - extra("ELLLIST mlis") - prompt("Monitor List") - interest(4) - special(SPC_NOMOD) - } - field(BKLNK, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Backwards link tracking") - extra("ELLLIST bklnk") - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - interest(3) - prompt("Force Processing") - pp(TRUE) - } - field(STAT, DBF_MENU) { - initial("UDF") - menu(menuAlarmStat) - prompt("Alarm Status") - special(SPC_NOMOD) - } - field(SEVR, DBF_MENU) { - prompt("Alarm Severity") - special(SPC_NOMOD) - menu(menuAlarmSevr) - } - field(NSTA, DBF_MENU) { - menu(menuAlarmStat) - interest(2) - special(SPC_NOMOD) - prompt("New Alarm Status") - } - field(NSEV, DBF_MENU) { - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Severity") - menu(menuAlarmSevr) - } - field(ACKS, DBF_MENU) { - interest(2) - special(SPC_NOMOD) - prompt("Alarm Ack Severity") - menu(menuAlarmSevr) - } - field(ACKT, DBF_MENU) { - prompt("Alarm Ack Transient") - interest(2) - special(SPC_NOMOD) - promptgroup("70 - Alarm") - menu(menuYesNo) - initial("YES") - } - field(DISS, DBF_MENU) { - prompt("Disable Alarm Sevrty") - promptgroup("70 - Alarm") - interest(1) - menu(menuAlarmSevr) - } - field(LCNT, DBF_UCHAR) { - interest(2) - special(SPC_NOMOD) - prompt("Lock Count") - } - field(PACT, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Record active") - } - field(PUTF, DBF_UCHAR) { - special(SPC_NOMOD) - interest(1) - prompt("dbPutField process") - } - field(RPRO, DBF_UCHAR) { - prompt("Reprocess ") - interest(1) - special(SPC_NOMOD) - } - field(ASP, DBF_NOACCESS) { - extra("struct asgMember *asp") - interest(4) - special(SPC_NOMOD) - prompt("Access Security Pvt") - } - field(PPN, DBF_NOACCESS) { - extra("struct processNotify *ppn") - prompt("pprocessNotify") - special(SPC_NOMOD) - interest(4) - } - field(PPNR, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("pprocessNotifyRecord") - extra("struct processNotifyRecord *ppnr") - } - field(SPVT, DBF_NOACCESS) { - extra("struct scan_element *spvt") - prompt("Scan Private") - interest(4) - special(SPC_NOMOD) - } - field(RSET, DBF_NOACCESS) { - prompt("Address of RSET") - interest(4) - special(SPC_NOMOD) - extra("struct typed_rset *rset") - } - field(DSET, DBF_NOACCESS) { - prompt("DSET address") - interest(4) - special(SPC_NOMOD) - extra("struct dset *dset") - } - field(DPVT, DBF_NOACCESS) { - extra("void *dpvt") - special(SPC_NOMOD) - interest(4) - prompt("Device Private") - } - field(RDES, DBF_NOACCESS) { - prompt("Address of dbRecordType") - special(SPC_NOMOD) - interest(4) - extra("struct dbRecordType *rdes") - } - field(LSET, DBF_NOACCESS) { - extra("struct lockRecord *lset") - prompt("Lock Set") - interest(4) - special(SPC_NOMOD) - } - field(PRIO, DBF_MENU) { - menu(menuPriority) - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - prompt("Scheduling Priority") - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - prompt("Break Point") - special(SPC_NOMOD) - interest(1) - extra("char bkpt") - } - field(UDF, DBF_UCHAR) { - interest(1) - promptgroup("10 - Common") - prompt("Undefined") - initial("1") - pp(TRUE) - } - field(UDFS, DBF_MENU) { - initial("INVALID") - interest(1) - promptgroup("70 - Alarm") - prompt("Undefined Alarm Sevrty") - menu(menuAlarmSevr) - } - field(TIME, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(2) - prompt("Time") - extra("epicsTimeStamp time") - } - field(FLNK, DBF_FWDLINK) { - prompt("Forward Process Link") - interest(1) - promptgroup("20 - Scan") - } - field(VAL, DBF_ENUM) { - pp(TRUE) - promptgroup("50 - Output") - special(SPC_DBADDR) - prompt("Desired Value") - asl(ASL0) - } - field(DOL, DBF_INLINK) { - interest(1) - promptgroup("40 - Input") - prompt("Desired Output Loc") - } - field(OMSL, DBF_MENU) { - menu(menuOmsl) - promptgroup("50 - Output") - interest(1) - prompt("Output Mode Select") - } - field(NOBT, DBF_USHORT) { - special(SPC_NOMOD) - interest(1) - promptgroup("50 - Output") - prompt("Number of Bits") - } - field(OUT, DBF_OUTLINK) { - prompt("Output Specification") - interest(1) - promptgroup("50 - Output") - } - field(ZRVL, DBF_ULONG) { - prompt("Zero Value") - promptgroup("51 - Output 0-7") - interest(1) - special(SPC_MOD) - pp(TRUE) - base(HEX) - } - field(ONVL, DBF_ULONG) { - prompt("One Value") - interest(1) - special(SPC_MOD) - promptgroup("51 - Output 0-7") - base(HEX) - pp(TRUE) - } - field(TWVL, DBF_ULONG) { - prompt("Two Value") - interest(1) - promptgroup("51 - Output 0-7") - special(SPC_MOD) - pp(TRUE) - base(HEX) - } - field(THVL, DBF_ULONG) { - base(HEX) - pp(TRUE) - prompt("Three Value") - interest(1) - promptgroup("51 - Output 0-7") - special(SPC_MOD) - } - field(FRVL, DBF_ULONG) { - pp(TRUE) - base(HEX) - prompt("Four Value") - promptgroup("51 - Output 0-7") - interest(1) - special(SPC_MOD) - } - field(FVVL, DBF_ULONG) { - interest(1) - promptgroup("51 - Output 0-7") - special(SPC_MOD) - prompt("Five Value") - pp(TRUE) - base(HEX) - } - field(SXVL, DBF_ULONG) { - promptgroup("51 - Output 0-7") - interest(1) - special(SPC_MOD) - prompt("Six Value") - pp(TRUE) - base(HEX) - } - field(SVVL, DBF_ULONG) { - base(HEX) - pp(TRUE) - prompt("Seven Value") - interest(1) - special(SPC_MOD) - promptgroup("51 - Output 0-7") - } - field(EIVL, DBF_ULONG) { - prompt("Eight Value") - promptgroup("52 - Output 8-15") - interest(1) - special(SPC_MOD) - base(HEX) - pp(TRUE) - } - field(NIVL, DBF_ULONG) { - pp(TRUE) - base(HEX) - interest(1) - special(SPC_MOD) - promptgroup("52 - Output 8-15") - prompt("Nine Value") - } - field(TEVL, DBF_ULONG) { - base(HEX) - pp(TRUE) - prompt("Ten Value") - interest(1) - promptgroup("52 - Output 8-15") - special(SPC_MOD) - } - field(ELVL, DBF_ULONG) { - pp(TRUE) - base(HEX) - prompt("Eleven Value") - interest(1) - promptgroup("52 - Output 8-15") - special(SPC_MOD) - } - field(TVVL, DBF_ULONG) { - prompt("Twelve Value") - special(SPC_MOD) - interest(1) - promptgroup("52 - Output 8-15") - pp(TRUE) - base(HEX) - } - field(TTVL, DBF_ULONG) { - prompt("Thirteen Value") - interest(1) - promptgroup("52 - Output 8-15") - special(SPC_MOD) - pp(TRUE) - base(HEX) - } - field(FTVL, DBF_ULONG) { - base(HEX) - pp(TRUE) - prompt("Fourteen Value") - interest(1) - promptgroup("52 - Output 8-15") - special(SPC_MOD) - } - field(FFVL, DBF_ULONG) { - pp(TRUE) - base(HEX) - interest(1) - promptgroup("52 - Output 8-15") - special(SPC_MOD) - prompt("Fifteen Value") - } - field(ZRST, DBF_STRING) { - special(SPC_MOD) - interest(1) - promptgroup("81 - Display 0-7") - prompt("Zero String") - pp(TRUE) - size(26) - } - field(ONST, DBF_STRING) { - prompt("One String") - interest(1) - promptgroup("81 - Display 0-7") - special(SPC_MOD) - size(26) - pp(TRUE) - } - field(TWST, DBF_STRING) { - size(26) - pp(TRUE) - promptgroup("81 - Display 0-7") - interest(1) - special(SPC_MOD) - prompt("Two String") - } - field(THST, DBF_STRING) { - pp(TRUE) - size(26) - interest(1) - promptgroup("81 - Display 0-7") - special(SPC_MOD) - prompt("Three String") - } - field(FRST, DBF_STRING) { - interest(1) - promptgroup("81 - Display 0-7") - special(SPC_MOD) - prompt("Four String") - pp(TRUE) - size(26) - } - field(FVST, DBF_STRING) { - pp(TRUE) - size(26) - prompt("Five String") - interest(1) - promptgroup("81 - Display 0-7") - special(SPC_MOD) - } - field(SXST, DBF_STRING) { - interest(1) - promptgroup("81 - Display 0-7") - special(SPC_MOD) - prompt("Six String") - size(26) - pp(TRUE) - } - field(SVST, DBF_STRING) { - special(SPC_MOD) - interest(1) - promptgroup("81 - Display 0-7") - prompt("Seven String") - pp(TRUE) - size(26) - } - field(EIST, DBF_STRING) { - prompt("Eight String") - interest(1) - promptgroup("82 - Display 8-15") - special(SPC_MOD) - size(26) - pp(TRUE) - } - field(NIST, DBF_STRING) { - pp(TRUE) - size(26) - promptgroup("82 - Display 8-15") - interest(1) - special(SPC_MOD) - prompt("Nine String") - } - field(TEST, DBF_STRING) { - size(26) - pp(TRUE) - interest(1) - special(SPC_MOD) - promptgroup("82 - Display 8-15") - prompt("Ten String") - } - field(ELST, DBF_STRING) { - pp(TRUE) - size(26) - special(SPC_MOD) - interest(1) - promptgroup("82 - Display 8-15") - prompt("Eleven String") - } - field(TVST, DBF_STRING) { - interest(1) - promptgroup("82 - Display 8-15") - special(SPC_MOD) - prompt("Twelve String") - pp(TRUE) - size(26) - } - field(TTST, DBF_STRING) { - prompt("Thirteen String") - special(SPC_MOD) - interest(1) - promptgroup("82 - Display 8-15") - size(26) - pp(TRUE) - } - field(FTST, DBF_STRING) { - pp(TRUE) - size(26) - interest(1) - promptgroup("82 - Display 8-15") - special(SPC_MOD) - prompt("Fourteen String") - } - field(FFST, DBF_STRING) { - prompt("Fifteen String") - special(SPC_MOD) - interest(1) - promptgroup("82 - Display 8-15") - size(26) - pp(TRUE) - } - field(ZRSV, DBF_MENU) { - pp(TRUE) - interest(1) - promptgroup("71 - Alarm 0-7") - prompt("State Zero Severity") - menu(menuAlarmSevr) - } - field(ONSV, DBF_MENU) { - pp(TRUE) - menu(menuAlarmSevr) - promptgroup("71 - Alarm 0-7") - interest(1) - prompt("State One Severity") - } - field(TWSV, DBF_MENU) { - pp(TRUE) - menu(menuAlarmSevr) - prompt("State Two Severity") - promptgroup("71 - Alarm 0-7") - interest(1) - } - field(THSV, DBF_MENU) { - prompt("State Three Severity") - interest(1) - promptgroup("71 - Alarm 0-7") - menu(menuAlarmSevr) - pp(TRUE) - } - field(FRSV, DBF_MENU) { - pp(TRUE) - menu(menuAlarmSevr) - promptgroup("71 - Alarm 0-7") - interest(1) - prompt("State Four Severity") - } - field(FVSV, DBF_MENU) { - pp(TRUE) - prompt("State Five Severity") - interest(1) - promptgroup("71 - Alarm 0-7") - menu(menuAlarmSevr) - } - field(SXSV, DBF_MENU) { - pp(TRUE) - promptgroup("71 - Alarm 0-7") - interest(1) - prompt("State Six Severity") - menu(menuAlarmSevr) - } - field(SVSV, DBF_MENU) { - pp(TRUE) - menu(menuAlarmSevr) - interest(1) - promptgroup("71 - Alarm 0-7") - prompt("State Seven Severity") - } - field(EISV, DBF_MENU) { - promptgroup("72 - Alarm 8-15") - interest(1) - prompt("State Eight Severity") - menu(menuAlarmSevr) - pp(TRUE) - } - field(NISV, DBF_MENU) { - interest(1) - promptgroup("72 - Alarm 8-15") - prompt("State Nine Severity") - menu(menuAlarmSevr) - pp(TRUE) - } - field(TESV, DBF_MENU) { - prompt("State Ten Severity") - promptgroup("72 - Alarm 8-15") - interest(1) - menu(menuAlarmSevr) - pp(TRUE) - } - field(ELSV, DBF_MENU) { - pp(TRUE) - interest(1) - promptgroup("72 - Alarm 8-15") - prompt("State Eleven Severity") - menu(menuAlarmSevr) - } - field(TVSV, DBF_MENU) { - prompt("State Twelve Severity") - promptgroup("72 - Alarm 8-15") - interest(1) - menu(menuAlarmSevr) - pp(TRUE) - } - field(TTSV, DBF_MENU) { - pp(TRUE) - interest(1) - promptgroup("72 - Alarm 8-15") - prompt("State Thirteen Sevr") - menu(menuAlarmSevr) - } - field(FTSV, DBF_MENU) { - prompt("State Fourteen Sevr") - promptgroup("72 - Alarm 8-15") - interest(1) - menu(menuAlarmSevr) - pp(TRUE) - } - field(FFSV, DBF_MENU) { - prompt("State Fifteen Sevr") - promptgroup("72 - Alarm 8-15") - interest(1) - menu(menuAlarmSevr) - pp(TRUE) - } - field(UNSV, DBF_MENU) { - promptgroup("70 - Alarm") - interest(1) - prompt("Unknown State Sevr") - menu(menuAlarmSevr) - pp(TRUE) - } - field(COSV, DBF_MENU) { - pp(TRUE) - menu(menuAlarmSevr) - interest(1) - promptgroup("70 - Alarm") - prompt("Change of State Sevr") - } - field(RVAL, DBF_ULONG) { - pp(TRUE) - prompt("Raw Value") - } - field(ORAW, DBF_ULONG) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Raw Value") - } - field(RBV, DBF_ULONG) { - special(SPC_NOMOD) - prompt("Readback Value") - } - field(ORBV, DBF_ULONG) { - prompt("Prev Readback Value") - special(SPC_NOMOD) - interest(3) - } - field(MASK, DBF_ULONG) { - prompt("Hardware Mask") - special(SPC_NOMOD) - interest(1) - } - field(MLST, DBF_USHORT) { - prompt("Last Value Monitored") - special(SPC_NOMOD) - interest(3) - } - field(LALM, DBF_USHORT) { - prompt("Last Value Alarmed") - interest(3) - special(SPC_NOMOD) - } - field(SDEF, DBF_SHORT) { - prompt("States Defined") - interest(3) - special(SPC_NOMOD) - } - field(SHFT, DBF_USHORT) { - promptgroup("50 - Output") - interest(1) - prompt("Shift") - } - field(SIOL, DBF_OUTLINK) { - promptgroup("90 - Simulate") - interest(1) - prompt("Simulation Output Link") - } - field(SIML, DBF_INLINK) { - prompt("Simulation Mode Link") - promptgroup("90 - Simulate") - interest(1) - } - field(SIMM, DBF_MENU) { - interest(1) - special(SPC_MOD) - prompt("Simulation Mode") - menu(menuYesNo) - } - field(SIMS, DBF_MENU) { - promptgroup("90 - Simulate") - interest(2) - prompt("Simulation Mode Severity") - menu(menuAlarmSevr) - } - field(OLDSIMM, DBF_MENU) { - prompt("Prev. Simulation Mode") - special(SPC_NOMOD) - interest(4) - menu(menuSimm) - } - field(SSCN, DBF_MENU) { - initial("65535") - menu(menuScan) - promptgroup("90 - Simulate") - interest(1) - prompt("Sim. Mode Scan") - } - field(SDLY, DBF_DOUBLE) { - prompt("Sim. Mode Async Delay") - interest(2) - promptgroup("90 - Simulate") - initial("-1.0") - } - field(SIMPVT, DBF_NOACCESS) { - extra("CALLBACK *simpvt") - special(SPC_NOMOD) - interest(4) - prompt("Sim. Mode Private") - } - field(IVOA, DBF_MENU) { - prompt("INVALID outpt action") - promptgroup("50 - Output") - interest(2) - menu(menuIvoa) - } - field(IVOV, DBF_USHORT) { - interest(2) - promptgroup("50 - Output") - prompt("INVALID output value") - } -} -device(mbbo, CONSTANT, devMbboSoft, "Soft Channel") -device(mbbo, CONSTANT, devMbboSoftRaw, "Raw Soft Channel") -device(mbbo, CONSTANT, devMbboSoftCallback, "Async Soft Channel") -device(mbbo, INST_IO, asynMbboInt32, "asynInt32") -device(mbbo, INST_IO, asynMbboUInt32Digital, "asynUInt32Digital") -device(mbbo, INST_IO, devmbboStream, "stream") -device(mbbo, INST_IO, devMbboMPC, "asyn MPC") -device(mbbo, INST_IO, devMbboTPG261, "asyn TPG261") +} +device(stringin, CONSTANT, devSiSoft, "Soft Channel") +device(stringin, CONSTANT, devSiSoftCallback, "Async Soft Channel") +device(stringin, INST_IO, devTimestampSI, "Soft Timestamp") +device(stringin, INST_IO, devSiGeneralTime, "General Time") +device(stringin, INST_IO, devSiEnviron, "getenv") +device(stringin, INST_IO, asynSiOctetCmdResponse, "asynOctetCmdResponse") +device(stringin, INST_IO, asynSiOctetWriteRead, "asynOctetWriteRead") +device(stringin, INST_IO, asynSiOctetRead, "asynOctetRead") +device(stringin, INST_IO, devstringinStream, "stream") +device(stringin, INST_IO, devCasterSIMsg, "RecCaster") +device(stringin, INST_IO, devSiStrParm, "asyn si stringParm") +device(stringin, INST_IO, devSiMPC, "asyn MPC") +device(stringin, GPIB_IO, devSiGP307Gpib, "Vg307 GPIB Instrument") +device(stringin, INST_IO, devSiTPG261, "asyn TPG261") recordtype(printf) { %#include "epicsTypes.h" %#include "link.h" @@ -14818,46 +21759,46 @@ %/* Number of INPx fields defined */ %#define PRINTF_NLINKS 10 field(NAME, DBF_STRING) { + size(61) prompt("Record Name") special(SPC_NOMOD) - size(61) } field(DESC, DBF_STRING) { - promptgroup("10 - Common") + size(41) prompt("Descriptor") - size(41) + promptgroup("10 - Common") } field(ASG, DBF_STRING) { + special(SPC_AS) + promptgroup("10 - Common") size(29) - special(SPC_AS) - promptgroup("10 - Common") prompt("Access Security Group") } field(SCAN, DBF_MENU) { - menu(menuScan) - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) + menu(menuScan) prompt("Scan Mechanism") } field(PINI, DBF_MENU) { + prompt("Process at iocInit") + promptgroup("20 - Scan") menu(menuPini) - prompt("Process at iocInit") - interest(1) - promptgroup("20 - Scan") + interest(1) } field(PHAS, DBF_SHORT) { - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) prompt("Scan Phase") + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) } field(EVNT, DBF_STRING) { + special(SPC_SCAN) + interest(1) + promptgroup("20 - Scan") size(40) prompt("Event Name") - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) } field(TSE, DBF_SHORT) { prompt("Time Stamp Event") @@ -14865,96 +21806,96 @@ promptgroup("20 - Scan") } field(TSEL, DBF_INLINK) { + interest(1) + promptgroup("20 - Scan") prompt("Time Stamp Link") - promptgroup("20 - Scan") - interest(1) } field(DTYP, DBF_DEVICE) { - promptgroup("10 - Common") - interest(1) prompt("Device Type") + promptgroup("10 - Common") + interest(1) } field(DISV, DBF_SHORT) { promptgroup("20 - Scan") + initial("1") prompt("Disable Value") - initial("1") } field(DISA, DBF_SHORT) { prompt("Disable") } field(SDIS, DBF_INLINK) { - promptgroup("20 - Scan") - interest(1) prompt("Scanning Disable") + promptgroup("20 - Scan") + interest(1) } field(MLOK, DBF_NOACCESS) { extra("epicsMutexId mlok") prompt("Monitor lock") - interest(4) - special(SPC_NOMOD) + special(SPC_NOMOD) + interest(4) } field(MLIS, DBF_NOACCESS) { + extra("ELLLIST mlis") prompt("Monitor List") interest(4) special(SPC_NOMOD) - extra("ELLLIST mlis") } field(BKLNK, DBF_NOACCESS) { extra("ELLLIST bklnk") - interest(4) - special(SPC_NOMOD) prompt("Backwards link tracking") + special(SPC_NOMOD) + interest(4) } field(DISP, DBF_UCHAR) { prompt("Disable putField") } field(PROC, DBF_UCHAR) { + pp(TRUE) + interest(3) prompt("Force Processing") - interest(3) - pp(TRUE) } field(STAT, DBF_MENU) { + special(SPC_NOMOD) + menu(menuAlarmStat) prompt("Alarm Status") - special(SPC_NOMOD) - menu(menuAlarmStat) initial("UDF") } field(SEVR, DBF_MENU) { - special(SPC_NOMOD) prompt("Alarm Severity") + special(SPC_NOMOD) menu(menuAlarmSevr) } field(NSTA, DBF_MENU) { - special(SPC_NOMOD) - interest(2) prompt("New Alarm Status") - menu(menuAlarmStat) + special(SPC_NOMOD) + menu(menuAlarmStat) + interest(2) } field(NSEV, DBF_MENU) { - menu(menuAlarmSevr) + interest(2) + menu(menuAlarmSevr) + special(SPC_NOMOD) prompt("New Alarm Severity") - interest(2) - special(SPC_NOMOD) } field(ACKS, DBF_MENU) { + special(SPC_NOMOD) + menu(menuAlarmSevr) + interest(2) prompt("Alarm Ack Severity") - special(SPC_NOMOD) - interest(2) - menu(menuAlarmSevr) } field(ACKT, DBF_MENU) { - interest(2) - special(SPC_NOMOD) - promptgroup("70 - Alarm") + promptgroup("70 - Alarm") + special(SPC_NOMOD) + interest(2) + menu(menuYesNo) prompt("Alarm Ack Transient") - menu(menuYesNo) initial("YES") } field(DISS, DBF_MENU) { - menu(menuAlarmSevr) + interest(1) + menu(menuAlarmSevr) + promptgroup("70 - Alarm") prompt("Disable Alarm Sevrty") - interest(1) - promptgroup("70 - Alarm") } field(LCNT, DBF_UCHAR) { interest(2) @@ -14962,48 +21903,48 @@ prompt("Lock Count") } field(PACT, DBF_UCHAR) { + special(SPC_NOMOD) + interest(1) prompt("Record active") - special(SPC_NOMOD) - interest(1) } field(PUTF, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) prompt("dbPutField process") + special(SPC_NOMOD) + interest(1) } field(RPRO, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) prompt("Reprocess ") - special(SPC_NOMOD) - interest(1) } field(ASP, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) + special(SPC_NOMOD) + interest(4) prompt("Access Security Pvt") extra("struct asgMember *asp") } field(PPN, DBF_NOACCESS) { - extra("struct processNotify *ppn") + special(SPC_NOMOD) + interest(4) prompt("pprocessNotify") - interest(4) - special(SPC_NOMOD) + extra("struct processNotify *ppn") } field(PPNR, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) prompt("pprocessNotifyRecord") - interest(4) - special(SPC_NOMOD) extra("struct processNotifyRecord *ppnr") } field(SPVT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) prompt("Scan Private") - special(SPC_NOMOD) - interest(4) extra("struct scan_element *spvt") } field(RSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) extra("struct typed_rset *rset") - interest(4) - special(SPC_NOMOD) prompt("Address of RSET") } field(DSET, DBF_NOACCESS) { @@ -15013,58 +21954,58 @@ extra("struct dset *dset") } field(DPVT, DBF_NOACCESS) { + prompt("Device Private") extra("void *dpvt") - prompt("Device Private") - interest(4) - special(SPC_NOMOD) + special(SPC_NOMOD) + interest(4) } field(RDES, DBF_NOACCESS) { extra("struct dbRecordType *rdes") prompt("Address of dbRecordType") - interest(4) - special(SPC_NOMOD) + special(SPC_NOMOD) + interest(4) } field(LSET, DBF_NOACCESS) { special(SPC_NOMOD) interest(4) + extra("struct lockRecord *lset") prompt("Lock Set") - extra("struct lockRecord *lset") } field(PRIO, DBF_MENU) { prompt("Scheduling Priority") - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) + promptgroup("20 - Scan") menu(menuPriority) + interest(1) + special(SPC_SCAN) } field(TPRO, DBF_UCHAR) { prompt("Trace Processing") } field(BKPT, DBF_NOACCESS) { - interest(1) - special(SPC_NOMOD) + extra("char bkpt") prompt("Break Point") - extra("char bkpt") + special(SPC_NOMOD) + interest(1) } field(UDF, DBF_UCHAR) { - promptgroup("10 - Common") - interest(1) + interest(1) + promptgroup("10 - Common") + pp(TRUE) + initial("1") prompt("Undefined") - initial("1") - pp(TRUE) } field(UDFS, DBF_MENU) { - interest(1) - promptgroup("70 - Alarm") + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) prompt("Undefined Alarm Sevrty") - menu(menuAlarmSevr) initial("INVALID") } field(TIME, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(2) + interest(2) + special(SPC_NOMOD) + extra("epicsTimeStamp time") prompt("Time") - extra("epicsTimeStamp time") } field(FLNK, DBF_FWDLINK) { prompt("Forward Process Link") @@ -15073,58 +22014,58 @@ } field(VAL, DBF_NOACCESS) { asl(ASL0) - special(SPC_DBADDR) + extra("char *val") prompt("Result") - extra("char *val") + special(SPC_DBADDR) pp(TRUE) } field(SIZV, DBF_USHORT) { + prompt("Size of VAL buffer") initial("41") - interest(1) - promptgroup("30 - Action") - special(SPC_NOMOD) - prompt("Size of VAL buffer") + promptgroup("30 - Action") + interest(1) + special(SPC_NOMOD) } field(LEN, DBF_ULONG) { - special(SPC_NOMOD) prompt("Length of VAL") + special(SPC_NOMOD) } field(OUT, DBF_OUTLINK) { prompt("Output Specification") - interest(1) - promptgroup("50 - Output") + promptgroup("50 - Output") + interest(1) } field(FMT, DBF_STRING) { pp(TRUE) - size(81) promptgroup("30 - Action") prompt("Format String") + size(81) } field(IVLS, DBF_STRING) { + size(16) initial("LNK") - size(16) prompt("Invalid Link String") promptgroup("30 - Action") } field(INP0, DBF_INLINK) { - promptgroup("40 - Input") - interest(1) prompt("Input 0") + promptgroup("40 - Input") + interest(1) } field(INP1, DBF_INLINK) { prompt("Input 1") - promptgroup("40 - Input") - interest(1) + interest(1) + promptgroup("40 - Input") } field(INP2, DBF_INLINK) { - promptgroup("40 - Input") - interest(1) prompt("Input 2") + promptgroup("40 - Input") + interest(1) } field(INP3, DBF_INLINK) { + interest(1) + promptgroup("40 - Input") prompt("Input 3") - promptgroup("40 - Input") - interest(1) } field(INP4, DBF_INLINK) { promptgroup("40 - Input") @@ -15133,18 +22074,18 @@ } field(INP5, DBF_INLINK) { prompt("Input 5") - interest(1) - promptgroup("40 - Input") + promptgroup("40 - Input") + interest(1) } field(INP6, DBF_INLINK) { - promptgroup("40 - Input") - interest(1) + interest(1) + promptgroup("40 - Input") prompt("Input 6") } field(INP7, DBF_INLINK) { prompt("Input 7") - interest(1) - promptgroup("40 - Input") + promptgroup("40 - Input") + interest(1) } field(INP8, DBF_INLINK) { prompt("Input 8") @@ -15152,15 +22093,15 @@ promptgroup("40 - Input") } field(INP9, DBF_INLINK) { - promptgroup("40 - Input") - interest(1) prompt("Input 9") + promptgroup("40 - Input") + interest(1) } } device(printf, CONSTANT, devPrintfSoft, "Soft Channel") device(printf, CONSTANT, devPrintfSoftCallback, "Async Soft Channel") device(printf, INST_IO, devPrintfStdio, "stdio") -recordtype(ao) { +recordtype(int64out) { %#include "epicsTypes.h" %#include "link.h" %#include "epicsMutex.h" @@ -15178,630 +22119,40 @@ promptgroup("10 - Common") } field(ASG, DBF_STRING) { + special(SPC_AS) + promptgroup("10 - Common") size(29) - special(SPC_AS) - promptgroup("10 - Common") prompt("Access Security Group") } field(SCAN, DBF_MENU) { - menu(menuScan) + promptgroup("20 - Scan") + menu(menuScan) + interest(1) + special(SPC_SCAN) prompt("Scan Mechanism") - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") } field(PINI, DBF_MENU) { + promptgroup("20 - Scan") + interest(1) + menu(menuPini) prompt("Process at iocInit") - interest(1) - promptgroup("20 - Scan") - menu(menuPini) } field(PHAS, DBF_SHORT) { prompt("Scan Phase") - interest(1) - special(SPC_SCAN) + special(SPC_SCAN) + interest(1) promptgroup("20 - Scan") } field(EVNT, DBF_STRING) { - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") + size(40) prompt("Event Name") - size(40) + special(SPC_SCAN) + interest(1) + promptgroup("20 - Scan") } field(TSE, DBF_SHORT) { - interest(1) - promptgroup("20 - Scan") - prompt("Time Stamp Event") - } - field(TSEL, DBF_INLINK) { - prompt("Time Stamp Link") - promptgroup("20 - Scan") - interest(1) - } - field(DTYP, DBF_DEVICE) { - prompt("Device Type") - interest(1) - promptgroup("10 - Common") - } - field(DISV, DBF_SHORT) { - initial("1") - promptgroup("20 - Scan") - prompt("Disable Value") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - promptgroup("20 - Scan") - interest(1) - prompt("Scanning Disable") - } - field(MLOK, DBF_NOACCESS) { - extra("epicsMutexId mlok") - prompt("Monitor lock") - special(SPC_NOMOD) - interest(4) - } - field(MLIS, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Monitor List") - extra("ELLLIST mlis") - } - field(BKLNK, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Backwards link tracking") - extra("ELLLIST bklnk") - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - pp(TRUE) - prompt("Force Processing") - interest(3) - } - field(STAT, DBF_MENU) { - prompt("Alarm Status") - special(SPC_NOMOD) - menu(menuAlarmStat) - initial("UDF") - } - field(SEVR, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Alarm Severity") - special(SPC_NOMOD) - } - field(NSTA, DBF_MENU) { - prompt("New Alarm Status") - special(SPC_NOMOD) - interest(2) - menu(menuAlarmStat) - } - field(NSEV, DBF_MENU) { - menu(menuAlarmSevr) - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Severity") - } - field(ACKS, DBF_MENU) { - special(SPC_NOMOD) - interest(2) - prompt("Alarm Ack Severity") - menu(menuAlarmSevr) - } - field(ACKT, DBF_MENU) { - promptgroup("70 - Alarm") - interest(2) - special(SPC_NOMOD) - prompt("Alarm Ack Transient") - menu(menuYesNo) - initial("YES") - } - field(DISS, DBF_MENU) { - prompt("Disable Alarm Sevrty") - promptgroup("70 - Alarm") - interest(1) - menu(menuAlarmSevr) - } - field(LCNT, DBF_UCHAR) { - interest(2) - special(SPC_NOMOD) - prompt("Lock Count") - } - field(PACT, DBF_UCHAR) { - prompt("Record active") - special(SPC_NOMOD) - interest(1) - } - field(PUTF, DBF_UCHAR) { - prompt("dbPutField process") - interest(1) - special(SPC_NOMOD) - } - field(RPRO, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Reprocess ") - } - field(ASP, DBF_NOACCESS) { - prompt("Access Security Pvt") - special(SPC_NOMOD) - interest(4) - extra("struct asgMember *asp") - } - field(PPN, DBF_NOACCESS) { - prompt("pprocessNotify") - interest(4) - special(SPC_NOMOD) - extra("struct processNotify *ppn") - } - field(PPNR, DBF_NOACCESS) { - prompt("pprocessNotifyRecord") - special(SPC_NOMOD) - interest(4) - extra("struct processNotifyRecord *ppnr") - } - field(SPVT, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Scan Private") - extra("struct scan_element *spvt") - } - field(RSET, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Address of RSET") - extra("struct typed_rset *rset") - } - field(DSET, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("DSET address") - extra("struct dset *dset") - } - field(DPVT, DBF_NOACCESS) { - prompt("Device Private") - interest(4) - special(SPC_NOMOD) - extra("void *dpvt") - } - field(RDES, DBF_NOACCESS) { - prompt("Address of dbRecordType") - interest(4) - special(SPC_NOMOD) - extra("struct dbRecordType *rdes") - } - field(LSET, DBF_NOACCESS) { - prompt("Lock Set") - special(SPC_NOMOD) - interest(4) - extra("struct lockRecord *lset") - } - field(PRIO, DBF_MENU) { - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - prompt("Scheduling Priority") - menu(menuPriority) - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - prompt("Break Point") - interest(1) - special(SPC_NOMOD) - extra("char bkpt") - } - field(UDF, DBF_UCHAR) { - prompt("Undefined") - interest(1) - promptgroup("10 - Common") - initial("1") - pp(TRUE) - } - field(UDFS, DBF_MENU) { - prompt("Undefined Alarm Sevrty") - interest(1) - promptgroup("70 - Alarm") - menu(menuAlarmSevr) - initial("INVALID") - } - field(TIME, DBF_NOACCESS) { - extra("epicsTimeStamp time") - prompt("Time") - special(SPC_NOMOD) - interest(2) - } - field(FLNK, DBF_FWDLINK) { - promptgroup("20 - Scan") - interest(1) - prompt("Forward Process Link") - } - field(VAL, DBF_DOUBLE) { - pp(TRUE) - asl(ASL0) - prompt("Desired Output") - promptgroup("50 - Output") - } - field(OVAL, DBF_DOUBLE) { - prompt("Output Value") - } - field(OUT, DBF_OUTLINK) { - prompt("Output Specification") - interest(1) - promptgroup("50 - Output") - } - field(OROC, DBF_DOUBLE) { - promptgroup("50 - Output") - interest(1) - prompt("Output Rate of Change") - } - field(DOL, DBF_INLINK) { - prompt("Desired Output Loc") - interest(1) - promptgroup("40 - Input") - } - field(OMSL, DBF_MENU) { - prompt("Output Mode Select") - promptgroup("50 - Output") - interest(1) - menu(menuOmsl) - } - field(OIF, DBF_MENU) { - promptgroup("50 - Output") - interest(1) - prompt("Out Full/Incremental") - menu(aoOIF) - } - field(PREC, DBF_SHORT) { - prompt("Display Precision") - promptgroup("80 - Display") - prop(YES) - interest(1) - } - field(LINR, DBF_MENU) { - pp(TRUE) - promptgroup("60 - Convert") - interest(1) - special(SPC_LINCONV) - prompt("Linearization") - menu(menuConvert) - } - field(EGUF, DBF_DOUBLE) { - pp(TRUE) - prompt("Eng Units Full") - special(SPC_LINCONV) - interest(1) - promptgroup("60 - Convert") - } - field(EGUL, DBF_DOUBLE) { - prompt("Eng Units Low") - interest(1) - special(SPC_LINCONV) - promptgroup("60 - Convert") - pp(TRUE) - } - field(EGU, DBF_STRING) { - promptgroup("80 - Display") - prop(YES) - interest(1) - prompt("Engineering Units") - size(16) - } - field(ROFF, DBF_ULONG) { - pp(TRUE) - interest(2) - prompt("Raw Offset") - } - field(EOFF, DBF_DOUBLE) { - pp(TRUE) - promptgroup("60 - Convert") - interest(2) - prompt("EGU to Raw Offset") - } - field(ESLO, DBF_DOUBLE) { - initial("1") - pp(TRUE) - prompt("EGU to Raw Slope") - interest(2) - promptgroup("60 - Convert") - } - field(DRVH, DBF_DOUBLE) { - prompt("Drive High Limit") - prop(YES) - interest(1) - promptgroup("30 - Action") - pp(TRUE) - } - field(DRVL, DBF_DOUBLE) { - pp(TRUE) - prop(YES) - promptgroup("30 - Action") - interest(1) - prompt("Drive Low Limit") - } - field(HOPR, DBF_DOUBLE) { - prop(YES) - interest(1) - promptgroup("80 - Display") - prompt("High Operating Range") - } - field(LOPR, DBF_DOUBLE) { - prompt("Low Operating Range") - prop(YES) - interest(1) - promptgroup("80 - Display") - } - field(AOFF, DBF_DOUBLE) { - pp(TRUE) - interest(1) - promptgroup("60 - Convert") - prompt("Adjustment Offset") - } - field(ASLO, DBF_DOUBLE) { - interest(1) - promptgroup("60 - Convert") - prompt("Adjustment Slope") - pp(TRUE) - } - field(HIHI, DBF_DOUBLE) { - pp(TRUE) - prompt("Hihi Alarm Limit") - prop(YES) - promptgroup("70 - Alarm") - interest(1) - } - field(LOLO, DBF_DOUBLE) { - pp(TRUE) - prompt("Lolo Alarm Limit") - prop(YES) - interest(1) - promptgroup("70 - Alarm") - } - field(HIGH, DBF_DOUBLE) { - pp(TRUE) - prompt("High Alarm Limit") - prop(YES) - promptgroup("70 - Alarm") - interest(1) - } - field(LOW, DBF_DOUBLE) { - pp(TRUE) - prop(YES) - promptgroup("70 - Alarm") - interest(1) - prompt("Low Alarm Limit") - } - field(HHSV, DBF_MENU) { - prompt("Hihi Severity") - prop(YES) - promptgroup("70 - Alarm") - interest(1) - menu(menuAlarmSevr) - pp(TRUE) - } - field(LLSV, DBF_MENU) { - prompt("Lolo Severity") - prop(YES) - interest(1) - promptgroup("70 - Alarm") - menu(menuAlarmSevr) - pp(TRUE) - } - field(HSV, DBF_MENU) { - prop(YES) - interest(1) - promptgroup("70 - Alarm") - prompt("High Severity") - menu(menuAlarmSevr) - pp(TRUE) - } - field(LSV, DBF_MENU) { - pp(TRUE) - menu(menuAlarmSevr) - prop(YES) - promptgroup("70 - Alarm") - interest(1) - prompt("Low Severity") - } - field(HYST, DBF_DOUBLE) { - prompt("Alarm Deadband") - interest(1) - promptgroup("70 - Alarm") - } - field(ADEL, DBF_DOUBLE) { - prompt("Archive Deadband") - promptgroup("80 - Display") - interest(1) - } - field(MDEL, DBF_DOUBLE) { - promptgroup("80 - Display") - interest(1) - prompt("Monitor Deadband") - } - field(RVAL, DBF_LONG) { - prompt("Current Raw Value") - pp(TRUE) - } - field(ORAW, DBF_LONG) { - interest(3) - special(SPC_NOMOD) - prompt("Previous Raw Value") - } - field(RBV, DBF_LONG) { - prompt("Readback Value") - special(SPC_NOMOD) - } - field(ORBV, DBF_LONG) { - prompt("Prev Readback Value") - special(SPC_NOMOD) - interest(3) - } - field(PVAL, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Previous value") - } - field(LALM, DBF_DOUBLE) { - prompt("Last Value Alarmed") - interest(3) - special(SPC_NOMOD) - } - field(ALST, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Last Value Archived") - } - field(MLST, DBF_DOUBLE) { - prompt("Last Val Monitored") - interest(3) - special(SPC_NOMOD) - } - field(PBRK, DBF_NOACCESS) { - extra("void * pbrk") - interest(4) - special(SPC_NOMOD) - prompt("Ptrto brkTable") - } - field(INIT, DBF_SHORT) { - prompt("Initialized?") - interest(3) - special(SPC_NOMOD) - } - field(LBRK, DBF_SHORT) { - prompt("LastBreak Point") - interest(3) - special(SPC_NOMOD) - } - field(SIOL, DBF_OUTLINK) { - interest(1) - promptgroup("90 - Simulate") - prompt("Simulation Output Link") - } - field(SIML, DBF_INLINK) { - interest(1) - promptgroup("90 - Simulate") - prompt("Simulation Mode Link") - } - field(SIMM, DBF_MENU) { - prompt("Simulation Mode") - interest(1) - special(SPC_MOD) - menu(menuYesNo) - } - field(SIMS, DBF_MENU) { - prompt("Simulation Mode Severity") - interest(2) - promptgroup("90 - Simulate") - menu(menuAlarmSevr) - } - field(OLDSIMM, DBF_MENU) { - interest(4) - special(SPC_NOMOD) - prompt("Prev. Simulation Mode") - menu(menuSimm) - } - field(SSCN, DBF_MENU) { - promptgroup("90 - Simulate") - interest(1) - prompt("Sim. Mode Scan") - menu(menuScan) - initial("65535") - } - field(SDLY, DBF_DOUBLE) { - prompt("Sim. Mode Async Delay") - interest(2) - promptgroup("90 - Simulate") - initial("-1.0") - } - field(SIMPVT, DBF_NOACCESS) { - prompt("Sim. Mode Private") - special(SPC_NOMOD) - interest(4) - extra("CALLBACK *simpvt") - } - field(IVOA, DBF_MENU) { - prompt("INVALID output action") - promptgroup("50 - Output") - interest(2) - menu(menuIvoa) - } - field(IVOV, DBF_DOUBLE) { - promptgroup("50 - Output") - interest(2) - prompt("INVALID output value") - } - field(OMOD, DBF_UCHAR) { - special(SPC_NOMOD) - prompt("Was OVAL modified?") - } -} -device(ao, CONSTANT, devAoSoft, "Soft Channel") -device(ao, CONSTANT, devAoSoftRaw, "Raw Soft Channel") -device(ao, CONSTANT, devAoSoftCallback, "Async Soft Channel") -device(ao, INST_IO, asynAoInt32, "asynInt32") -device(ao, INST_IO, asynAoFloat64, "asynFloat64") -device(ao, INST_IO, devaoStream, "stream") -device(ao, INST_IO, devAoStrParm, "asyn ao stringParm") -device(ao, INST_IO, devAoEurotherm, "asyn ao Eurotherm") -device(ao, INST_IO, devAoMPC, "asyn MPC") -device(ao, BBGPIB_IO, devAoAX301, "PZT Bug") -device(ao, INST_IO, devAoTPG261, "asyn TPG261") -recordtype(asyn) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - field(NAME, DBF_STRING) { - size(61) - special(SPC_NOMOD) - prompt("Record Name") - } - field(DESC, DBF_STRING) { - promptgroup("10 - Common") - prompt("Descriptor") - size(41) - } - field(ASG, DBF_STRING) { - size(29) - special(SPC_AS) - promptgroup("10 - Common") - prompt("Access Security Group") - } - field(SCAN, DBF_MENU) { - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - prompt("Scan Mechanism") - menu(menuScan) - } - field(PINI, DBF_MENU) { - menu(menuPini) - prompt("Process at iocInit") - promptgroup("20 - Scan") - interest(1) - } - field(PHAS, DBF_SHORT) { - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - prompt("Scan Phase") - } - field(EVNT, DBF_STRING) { - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - prompt("Event Name") - size(40) - } - field(TSE, DBF_SHORT) { - interest(1) - promptgroup("20 - Scan") + promptgroup("20 - Scan") + interest(1) prompt("Time Stamp Event") } field(TSEL, DBF_INLINK) { @@ -15816,90 +22167,90 @@ } field(DISV, DBF_SHORT) { promptgroup("20 - Scan") + initial("1") prompt("Disable Value") - initial("1") } field(DISA, DBF_SHORT) { prompt("Disable") } field(SDIS, DBF_INLINK) { prompt("Scanning Disable") - promptgroup("20 - Scan") - interest(1) + interest(1) + promptgroup("20 - Scan") } field(MLOK, DBF_NOACCESS) { extra("epicsMutexId mlok") - interest(4) - special(SPC_NOMOD) prompt("Monitor lock") + special(SPC_NOMOD) + interest(4) } field(MLIS, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) prompt("Monitor List") extra("ELLLIST mlis") + interest(4) + special(SPC_NOMOD) } field(BKLNK, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) + interest(4) + special(SPC_NOMOD) + extra("ELLLIST bklnk") prompt("Backwards link tracking") - extra("ELLLIST bklnk") } field(DISP, DBF_UCHAR) { prompt("Disable putField") } field(PROC, DBF_UCHAR) { + interest(3) + pp(TRUE) prompt("Force Processing") - interest(3) - pp(TRUE) } field(STAT, DBF_MENU) { initial("UDF") prompt("Alarm Status") - special(SPC_NOMOD) - menu(menuAlarmStat) + menu(menuAlarmStat) + special(SPC_NOMOD) } field(SEVR, DBF_MENU) { - special(SPC_NOMOD) prompt("Alarm Severity") menu(menuAlarmSevr) + special(SPC_NOMOD) } field(NSTA, DBF_MENU) { - special(SPC_NOMOD) - interest(2) prompt("New Alarm Status") - menu(menuAlarmStat) + special(SPC_NOMOD) + menu(menuAlarmStat) + interest(2) } field(NSEV, DBF_MENU) { + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) prompt("New Alarm Severity") - special(SPC_NOMOD) - interest(2) - menu(menuAlarmSevr) } field(ACKS, DBF_MENU) { - interest(2) - special(SPC_NOMOD) prompt("Alarm Ack Severity") + special(SPC_NOMOD) + interest(2) menu(menuAlarmSevr) } field(ACKT, DBF_MENU) { + interest(2) + menu(menuYesNo) + special(SPC_NOMOD) + promptgroup("70 - Alarm") initial("YES") - menu(menuYesNo) - special(SPC_NOMOD) - interest(2) - promptgroup("70 - Alarm") prompt("Alarm Ack Transient") } field(DISS, DBF_MENU) { menu(menuAlarmSevr) - promptgroup("70 - Alarm") - interest(1) + interest(1) + promptgroup("70 - Alarm") prompt("Disable Alarm Sevrty") } field(LCNT, DBF_UCHAR) { prompt("Lock Count") - interest(2) - special(SPC_NOMOD) + special(SPC_NOMOD) + interest(2) } field(PACT, DBF_UCHAR) { interest(1) @@ -15907,654 +22258,377 @@ prompt("Record active") } field(PUTF, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) prompt("dbPutField process") - special(SPC_NOMOD) - interest(1) } field(RPRO, DBF_UCHAR) { - special(SPC_NOMOD) - interest(1) + interest(1) + special(SPC_NOMOD) prompt("Reprocess ") } field(ASP, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) + special(SPC_NOMOD) + interest(4) prompt("Access Security Pvt") extra("struct asgMember *asp") } field(PPN, DBF_NOACCESS) { interest(4) special(SPC_NOMOD) + extra("struct processNotify *ppn") prompt("pprocessNotify") - extra("struct processNotify *ppn") } field(PPNR, DBF_NOACCESS) { + extra("struct processNotifyRecord *ppnr") prompt("pprocessNotifyRecord") special(SPC_NOMOD) interest(4) - extra("struct processNotifyRecord *ppnr") } field(SPVT, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) + special(SPC_NOMOD) + interest(4) prompt("Scan Private") extra("struct scan_element *spvt") } field(RSET, DBF_NOACCESS) { - extra("struct typed_rset *rset") special(SPC_NOMOD) interest(4) prompt("Address of RSET") + extra("struct typed_rset *rset") } field(DSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) extra("struct dset *dset") prompt("DSET address") - special(SPC_NOMOD) - interest(4) } field(DPVT, DBF_NOACCESS) { - extra("void *dpvt") + special(SPC_NOMOD) + interest(4) prompt("Device Private") - special(SPC_NOMOD) - interest(4) + extra("void *dpvt") } field(RDES, DBF_NOACCESS) { - extra("struct dbRecordType *rdes") + special(SPC_NOMOD) + interest(4) prompt("Address of dbRecordType") - special(SPC_NOMOD) - interest(4) + extra("struct dbRecordType *rdes") } field(LSET, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) prompt("Lock Set") extra("struct lockRecord *lset") + special(SPC_NOMOD) + interest(4) } field(PRIO, DBF_MENU) { - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) prompt("Scheduling Priority") + special(SPC_SCAN) menu(menuPriority) + interest(1) + promptgroup("20 - Scan") } field(TPRO, DBF_UCHAR) { prompt("Trace Processing") } field(BKPT, DBF_NOACCESS) { - interest(1) - special(SPC_NOMOD) prompt("Break Point") extra("char bkpt") + interest(1) + special(SPC_NOMOD) } field(UDF, DBF_UCHAR) { interest(1) - promptgroup("10 - Common") + pp(TRUE) + promptgroup("10 - Common") + initial("1") prompt("Undefined") - pp(TRUE) - initial("1") } field(UDFS, DBF_MENU) { + prompt("Undefined Alarm Sevrty") initial("INVALID") - menu(menuAlarmSevr) - interest(1) - promptgroup("70 - Alarm") - prompt("Undefined Alarm Sevrty") + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) } field(TIME, DBF_NOACCESS) { + prompt("Time") extra("epicsTimeStamp time") interest(2) special(SPC_NOMOD) - prompt("Time") } field(FLNK, DBF_FWDLINK) { - interest(1) - promptgroup("20 - Scan") prompt("Forward Process Link") - } - field(VAL, DBF_LONG) { - asl(ASL0) - interest(4) - prompt("Value field (unused)") - } - field(PORT, DBF_STRING) { - prompt("asyn port") - interest(1) - special(SPC_MOD) - promptgroup("40 - Input") - size(40) - initial("") - } - field(ADDR, DBF_LONG) { - promptgroup("40 - Input") - interest(1) - special(SPC_MOD) - prompt("asyn address") - initial("0") - } - field(PCNCT, DBF_MENU) { - menu(asynCONNECT) - prompt("Port Connect/Disconnect") - interest(2) - special(SPC_MOD) - } - field(DRVINFO, DBF_STRING) { - promptgroup("40 - Input") - interest(2) - special(SPC_MOD) - prompt("Driver info string") - size(40) - initial("") - } - field(REASON, DBF_LONG) { - prompt("asynUser->reason") - interest(2) - special(SPC_MOD) - } - field(TMOD, DBF_MENU) { - prompt("Transaction mode") - interest(1) - promptgroup("40 - Input") - menu(asynTMOD) - } - field(TMOT, DBF_DOUBLE) { - initial("1.0") - prompt("Timeout (sec)") - promptgroup("40 - Input") - interest(1) - } - field(IFACE, DBF_MENU) { - menu(asynINTERFACE) - prompt("Interface") - special(SPC_MOD) - interest(2) - promptgroup("40 - Input") - } - field(OCTETIV, DBF_LONG) { - interest(2) - prompt("asynOctet is valid") - } - field(OPTIONIV, DBF_LONG) { - interest(2) - prompt("asynOption is valid") - } - field(GPIBIV, DBF_LONG) { - prompt("asynGPIB is valid") - interest(2) - } - field(I32IV, DBF_LONG) { - interest(2) - prompt("asynInt32 is valid") - } - field(UI32IV, DBF_LONG) { - interest(2) - prompt("asynUInt32Digital is valid") - } - field(F64IV, DBF_LONG) { - prompt("asynFloat64 is valid") - interest(2) - } - field(AOUT, DBF_STRING) { - size(40) - pp(TRUE) - interest(1) - promptgroup("50 - Output") - prompt("Output (command) string") - } - field(OEOS, DBF_STRING) { - promptgroup("50 - Output") - special(SPC_MOD) - interest(1) - prompt("Output delimiter") - size(40) - } - field(BOUT, DBF_CHAR) { - prompt("Output binary data") - interest(1) - special(SPC_DBADDR) - pp(TRUE) - } - field(OPTR, DBF_NOACCESS) { - extra("void *optr") - special(SPC_NOMOD) - interest(4) - prompt("Output buffer pointer") - } - field(OMAX, DBF_LONG) { - initial("80") - prompt("Max. size of output array") - interest(1) - special(SPC_NOMOD) - promptgroup("50 - Output") - } - field(NOWT, DBF_LONG) { - promptgroup("50 - Output") - interest(1) - prompt("Number of bytes to write") - initial("80") - } - field(NAWT, DBF_LONG) { - interest(1) - prompt("Number of bytes actually written") - } - field(OFMT, DBF_MENU) { - promptgroup("50 - Output") - interest(1) - prompt("Output format") - menu(asynFMT) - } - field(AINP, DBF_STRING) { - prompt("Input (response) string") - special(SPC_NOMOD) - interest(1) - size(40) - } - field(TINP, DBF_STRING) { - prompt("Translated input string") - special(SPC_NOMOD) - interest(1) - asl(ASL0) - size(40) - } - field(IEOS, DBF_STRING) { - prompt("Input Delimiter") - special(SPC_MOD) - interest(1) - promptgroup("40 - Input") - size(40) - } - field(BINP, DBF_CHAR) { - special(SPC_DBADDR) - prompt("Input binary data") - asl(ASL0) - } - field(IPTR, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Input buffer pointer") - extra("void *iptr") - size(4) - } - field(IMAX, DBF_LONG) { - initial("80") - prompt("Max. size of input array") - interest(1) - promptgroup("40 - Input") - special(SPC_NOMOD) - } - field(NRRD, DBF_LONG) { - promptgroup("40 - Input") - interest(1) - prompt("Number of bytes to read") - } - field(NORD, DBF_LONG) { - interest(1) - special(SPC_NOMOD) - prompt("Number of bytes read") - } - field(IFMT, DBF_MENU) { - menu(asynFMT) - prompt("Input format") - interest(1) - promptgroup("40 - Input") - } - field(EOMR, DBF_MENU) { - menu(asynEOMREASON) - special(SPC_NOMOD) - interest(1) - prompt("EOM reason") - } - field(I32INP, DBF_LONG) { - prompt("asynInt32 input") - interest(2) - special(SPC_NOMOD) - } - field(I32OUT, DBF_LONG) { - pp(TRUE) - prompt("asynInt32 output") - promptgroup("50 - Output") - interest(2) - } - field(UI32INP, DBF_ULONG) { - special(SPC_NOMOD) - interest(2) - prompt("asynUInt32Digital input") - } - field(UI32OUT, DBF_ULONG) { - interest(2) - promptgroup("50 - Output") - prompt("asynUInt32Digital output") - pp(TRUE) - } - field(UI32MASK, DBF_ULONG) { - initial("0xffffffff") - prompt("asynUInt32Digital mask") - interest(2) - promptgroup("50 - Output") - special(SPC_MOD) - } - field(F64INP, DBF_DOUBLE) { - prompt("asynFloat64 input") - interest(2) - special(SPC_NOMOD) - } - field(F64OUT, DBF_DOUBLE) { - promptgroup("50 - Output") - interest(2) - prompt("asynFloat64 output") - pp(TRUE) - } - field(BAUD, DBF_MENU) { - menu(serialBAUD) - prompt("Baud rate") - promptgroup("40 - Input") - special(SPC_MOD) - interest(2) - } - field(LBAUD, DBF_LONG) { - special(SPC_MOD) - promptgroup("40 - Input") - interest(2) - prompt("Baud rate") - } - field(PRTY, DBF_MENU) { - menu(serialPRTY) - special(SPC_MOD) - promptgroup("40 - Input") - interest(2) - prompt("Parity") - } - field(DBIT, DBF_MENU) { - special(SPC_MOD) - promptgroup("40 - Input") - interest(2) - prompt("Data bits") - menu(serialDBIT) - } - field(SBIT, DBF_MENU) { - interest(2) - special(SPC_MOD) - promptgroup("40 - Input") - prompt("Stop bits") - menu(serialSBIT) - } - field(MCTL, DBF_MENU) { - interest(2) - special(SPC_MOD) - promptgroup("40 - Input") - prompt("Modem control") - menu(serialMCTL) - } - field(FCTL, DBF_MENU) { - prompt("Flow control") - special(SPC_MOD) - interest(2) - promptgroup("40 - Input") - menu(serialFCTL) - } - field(IXON, DBF_MENU) { - menu(serialIX) - promptgroup("40 - Input") - special(SPC_MOD) - interest(2) - prompt("Output XON/XOFF") - } - field(IXOFF, DBF_MENU) { - interest(2) - special(SPC_MOD) - promptgroup("40 - Input") - prompt("Input XON/XOFF") - menu(serialIX) - } - field(IXANY, DBF_MENU) { - menu(serialIX) - special(SPC_MOD) - interest(2) - promptgroup("40 - Input") - prompt("XON=any character") - } - field(HOSTINFO, DBF_STRING) { - prompt("host info") - promptgroup("40 - Input") - interest(1) - special(SPC_MOD) - initial("") - size(40) - } - field(DRTO, DBF_MENU) { - menu(ipDRTO) - promptgroup("40 - Input") - special(SPC_MOD) - interest(2) - prompt("Disconnect on timeout") - } - field(UCMD, DBF_MENU) { - pp(TRUE) - interest(2) - promptgroup("50 - Output") - prompt("Universal command") - menu(gpibUCMD) - } - field(ACMD, DBF_MENU) { - menu(gpibACMD) - prompt("Addressed command") - promptgroup("50 - Output") - interest(2) - pp(TRUE) - } - field(SPR, DBF_UCHAR) { - special(SPC_NOMOD) - interest(2) - prompt("Serial poll response") - } - field(TMSK, DBF_LONG) { - prompt("Trace mask") - interest(1) - promptgroup("80 - Display") - special(SPC_MOD) - } - field(TB0, DBF_MENU) { - interest(1) - special(SPC_MOD) - promptgroup("80 - Display") - prompt("Trace error") - menu(asynTRACE) - } - field(TB1, DBF_MENU) { - menu(asynTRACE) - prompt("Trace IO device") - special(SPC_MOD) - interest(1) - promptgroup("80 - Display") - } - field(TB2, DBF_MENU) { - special(SPC_MOD) - interest(1) - promptgroup("80 - Display") - prompt("Trace IO filter") - menu(asynTRACE) - } - field(TB3, DBF_MENU) { - special(SPC_MOD) - interest(1) - promptgroup("80 - Display") - prompt("Trace IO driver") - menu(asynTRACE) - } - field(TB4, DBF_MENU) { - menu(asynTRACE) - prompt("Trace flow") - interest(1) - special(SPC_MOD) - promptgroup("80 - Display") - } - field(TB5, DBF_MENU) { - interest(1) - special(SPC_MOD) - promptgroup("80 - Display") - prompt("Trace warning") - menu(asynTRACE) - } - field(TIOM, DBF_LONG) { - prompt("Trace I/O mask") - promptgroup("80 - Display") - interest(1) - special(SPC_MOD) - } - field(TIB0, DBF_MENU) { - menu(asynTRACE) - prompt("Trace IO ASCII") - promptgroup("80 - Display") - interest(1) - special(SPC_MOD) - } - field(TIB1, DBF_MENU) { - menu(asynTRACE) - special(SPC_MOD) - interest(1) - promptgroup("80 - Display") - prompt("Trace IO escape") - } - field(TIB2, DBF_MENU) { - interest(1) - promptgroup("80 - Display") - special(SPC_MOD) - prompt("Trace IO hex") - menu(asynTRACE) - } - field(TINM, DBF_LONG) { - prompt("Trace Info mask") - interest(1) - promptgroup("80 - Display") - special(SPC_MOD) - } - field(TINB0, DBF_MENU) { - menu(asynTRACE) - special(SPC_MOD) - interest(1) - promptgroup("80 - Display") - prompt("Trace Info Time") - } - field(TINB1, DBF_MENU) { - prompt("Trace Info Port") - promptgroup("80 - Display") - interest(1) - special(SPC_MOD) - menu(asynTRACE) - } - field(TINB2, DBF_MENU) { - menu(asynTRACE) - prompt("Trace Info Source") - interest(1) - special(SPC_MOD) - promptgroup("80 - Display") - } - field(TINB3, DBF_MENU) { - menu(asynTRACE) - prompt("Trace Info Thread") - promptgroup("80 - Display") - interest(1) - special(SPC_MOD) - } - field(TSIZ, DBF_LONG) { - prompt("Trace IO truncate size") - interest(1) - special(SPC_MOD) - promptgroup("80 - Display") - } - field(TFIL, DBF_STRING) { - prompt("Trace IO file") - interest(1) - promptgroup("80 - Display") - special(SPC_MOD) - size(40) - } - field(AUCT, DBF_MENU) { - menu(asynAUTOCONNECT) - prompt("Autoconnect") - special(SPC_MOD) - interest(1) - promptgroup("40 - Input") - } - field(CNCT, DBF_MENU) { - special(SPC_MOD) - interest(1) - promptgroup("40 - Input") - prompt("Connect/Disconnect") - menu(asynCONNECT) - } - field(ENBL, DBF_MENU) { - menu(asynENABLE) - interest(1) - promptgroup("40 - Input") - special(SPC_MOD) - prompt("Enable/Disable") - } - field(ERRS, DBF_NOACCESS) { - interest(4) - special(SPC_DBADDR) - prompt("Error string") - extra("char *errs") - } - field(AQR, DBF_UCHAR) { - interest(4) - special(SPC_MOD) - prompt("Abort queueRequest") - } -} -device(asyn, INST_IO, asynRecordDevice, "asynRecordDevice") -recordtype(aao) { + interest(1) + promptgroup("20 - Scan") + } + field(VAL, DBF_INT64) { + prompt("Desired Output") + asl(ASL0) + promptgroup("50 - Output") + pp(TRUE) + } + field(OUT, DBF_OUTLINK) { + promptgroup("50 - Output") + interest(1) + prompt("Output Specification") + } + field(DOL, DBF_INLINK) { + interest(1) + promptgroup("40 - Input") + prompt("Desired Output Loc") + } + field(OMSL, DBF_MENU) { + prompt("Output Mode Select") + promptgroup("50 - Output") + menu(menuOmsl) + interest(1) + } + field(EGU, DBF_STRING) { + prompt("Units name") + size(16) + promptgroup("80 - Display") + interest(1) + prop(YES) + } + field(DRVH, DBF_INT64) { + prompt("Drive High Limit") + interest(1) + prop(YES) + pp(TRUE) + promptgroup("30 - Action") + } + field(DRVL, DBF_INT64) { + prompt("Drive Low Limit") + promptgroup("30 - Action") + pp(TRUE) + prop(YES) + interest(1) + } + field(HOPR, DBF_INT64) { + promptgroup("80 - Display") + prop(YES) + interest(1) + prompt("High Operating Range") + } + field(LOPR, DBF_INT64) { + prompt("Low Operating Range") + promptgroup("80 - Display") + interest(1) + prop(YES) + } + field(HIHI, DBF_INT64) { + prompt("Hihi Alarm Limit") + pp(TRUE) + promptgroup("70 - Alarm") + prop(YES) + interest(1) + } + field(LOLO, DBF_INT64) { + promptgroup("70 - Alarm") + pp(TRUE) + prop(YES) + interest(1) + prompt("Lolo Alarm Limit") + } + field(HIGH, DBF_INT64) { + promptgroup("70 - Alarm") + pp(TRUE) + interest(1) + prop(YES) + prompt("High Alarm Limit") + } + field(LOW, DBF_INT64) { + prompt("Low Alarm Limit") + promptgroup("70 - Alarm") + pp(TRUE) + interest(1) + prop(YES) + } + field(HHSV, DBF_MENU) { + prompt("Hihi Severity") + promptgroup("70 - Alarm") + pp(TRUE) + menu(menuAlarmSevr) + interest(1) + } + field(LLSV, DBF_MENU) { + prompt("Lolo Severity") + menu(menuAlarmSevr) + interest(1) + pp(TRUE) + promptgroup("70 - Alarm") + } + field(HSV, DBF_MENU) { + prompt("High Severity") + pp(TRUE) + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) + } + field(LSV, DBF_MENU) { + prompt("Low Severity") + interest(1) + menu(menuAlarmSevr) + pp(TRUE) + promptgroup("70 - Alarm") + } + field(HYST, DBF_INT64) { + promptgroup("70 - Alarm") + interest(1) + prompt("Alarm Deadband") + } + field(ADEL, DBF_INT64) { + promptgroup("80 - Display") + interest(1) + prompt("Archive Deadband") + } + field(MDEL, DBF_INT64) { + prompt("Monitor Deadband") + promptgroup("80 - Display") + interest(1) + } + field(LALM, DBF_INT64) { + special(SPC_NOMOD) + interest(3) + prompt("Last Value Alarmed") + } + field(ALST, DBF_INT64) { + special(SPC_NOMOD) + interest(3) + prompt("Last Value Archived") + } + field(MLST, DBF_INT64) { + prompt("Last Val Monitored") + special(SPC_NOMOD) + interest(3) + } + field(SIOL, DBF_OUTLINK) { + prompt("Simulation Output Link") + interest(1) + promptgroup("90 - Simulate") + } + field(SIML, DBF_INLINK) { + interest(1) + promptgroup("90 - Simulate") + prompt("Simulation Mode Link") + } + field(SIMM, DBF_MENU) { + special(SPC_MOD) + menu(menuYesNo) + interest(1) + prompt("Simulation Mode") + } + field(SIMS, DBF_MENU) { + menu(menuAlarmSevr) + interest(2) + promptgroup("90 - Simulate") + prompt("Simulation Mode Severity") + } + field(OLDSIMM, DBF_MENU) { + interest(4) + menu(menuSimm) + special(SPC_NOMOD) + prompt("Prev. Simulation Mode") + } + field(SSCN, DBF_MENU) { + prompt("Sim. Mode Scan") + initial("65535") + promptgroup("90 - Simulate") + menu(menuScan) + interest(1) + } + field(SDLY, DBF_DOUBLE) { + prompt("Sim. Mode Async Delay") + initial("-1.0") + promptgroup("90 - Simulate") + interest(2) + } + field(SIMPVT, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) + prompt("Sim. Mode Private") + extra("CALLBACK *simpvt") + } + field(IVOA, DBF_MENU) { + prompt("INVALID output action") + promptgroup("50 - Output") + interest(2) + menu(menuIvoa) + } + field(IVOV, DBF_INT64) { + promptgroup("50 - Output") + interest(2) + prompt("INVALID output value") + } +} +device(int64out, CONSTANT, devI64outSoft, "Soft Channel") +device(int64out, CONSTANT, devI64outSoftCallback, "Async Soft Channel") +recordtype(lsi) { %#include "epicsTypes.h" %#include "link.h" %#include "epicsMutex.h" %#include "ellLib.h" %#include "epicsTime.h" + %#include "devSup.h" + % + %/* Declare Device Support Entry Table */ + %typedef struct lsidset { + % long number; + % DEVSUPFUN report; + % DEVSUPFUN init; + % DEVSUPFUN init_record; + % DEVSUPFUN get_ioint_info; + % DEVSUPFUN read_string; + %} lsidset; + % %#include "callback.h" field(NAME, DBF_STRING) { special(SPC_NOMOD) + size(61) prompt("Record Name") - size(61) } field(DESC, DBF_STRING) { - size(41) - promptgroup("10 - Common") prompt("Descriptor") + size(41) + promptgroup("10 - Common") } field(ASG, DBF_STRING) { + special(SPC_AS) + promptgroup("10 - Common") size(29) prompt("Access Security Group") - promptgroup("10 - Common") - special(SPC_AS) } field(SCAN, DBF_MENU) { + promptgroup("20 - Scan") + menu(menuScan) + interest(1) + special(SPC_SCAN) prompt("Scan Mechanism") - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) - menu(menuScan) } field(PINI, DBF_MENU) { + interest(1) menu(menuPini) - interest(1) promptgroup("20 - Scan") prompt("Process at iocInit") } field(PHAS, DBF_SHORT) { - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) prompt("Scan Phase") + promptgroup("20 - Scan") + interest(1) + special(SPC_SCAN) } field(EVNT, DBF_STRING) { + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + size(40) prompt("Event Name") - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) - size(40) } field(TSE, DBF_SHORT) { prompt("Time Stamp Event") - promptgroup("20 - Scan") - interest(1) + interest(1) + promptgroup("20 - Scan") } field(TSEL, DBF_INLINK) { prompt("Time Stamp Link") @@ -16576,439 +22650,51 @@ } field(SDIS, DBF_INLINK) { prompt("Scanning Disable") - interest(1) - promptgroup("20 - Scan") + promptgroup("20 - Scan") + interest(1) } field(MLOK, DBF_NOACCESS) { + prompt("Monitor lock") extra("epicsMutexId mlok") interest(4) special(SPC_NOMOD) - prompt("Monitor lock") } field(MLIS, DBF_NOACCESS) { special(SPC_NOMOD) interest(4) + extra("ELLLIST mlis") prompt("Monitor List") - extra("ELLLIST mlis") } field(BKLNK, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) prompt("Backwards link tracking") - interest(4) - special(SPC_NOMOD) extra("ELLLIST bklnk") } field(DISP, DBF_UCHAR) { prompt("Disable putField") } field(PROC, DBF_UCHAR) { + pp(TRUE) + interest(3) prompt("Force Processing") - interest(3) - pp(TRUE) } field(STAT, DBF_MENU) { - menu(menuAlarmStat) - special(SPC_NOMOD) prompt("Alarm Status") initial("UDF") - } - field(SEVR, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Alarm Severity") - special(SPC_NOMOD) - } - field(NSTA, DBF_MENU) { - menu(menuAlarmStat) - interest(2) - special(SPC_NOMOD) - prompt("New Alarm Status") - } - field(NSEV, DBF_MENU) { - prompt("New Alarm Severity") - interest(2) - special(SPC_NOMOD) - menu(menuAlarmSevr) - } - field(ACKS, DBF_MENU) { - special(SPC_NOMOD) - interest(2) - prompt("Alarm Ack Severity") - menu(menuAlarmSevr) - } - field(ACKT, DBF_MENU) { - initial("YES") - menu(menuYesNo) - prompt("Alarm Ack Transient") - promptgroup("70 - Alarm") - interest(2) - special(SPC_NOMOD) - } - field(DISS, DBF_MENU) { - menu(menuAlarmSevr) - promptgroup("70 - Alarm") - interest(1) - prompt("Disable Alarm Sevrty") - } - field(LCNT, DBF_UCHAR) { - prompt("Lock Count") - special(SPC_NOMOD) - interest(2) - } - field(PACT, DBF_UCHAR) { - prompt("Record active") - interest(1) - special(SPC_NOMOD) - } - field(PUTF, DBF_UCHAR) { - prompt("dbPutField process") - interest(1) - special(SPC_NOMOD) - } - field(RPRO, DBF_UCHAR) { - prompt("Reprocess ") - interest(1) - special(SPC_NOMOD) - } - field(ASP, DBF_NOACCESS) { - extra("struct asgMember *asp") - special(SPC_NOMOD) - interest(4) - prompt("Access Security Pvt") - } - field(PPN, DBF_NOACCESS) { - extra("struct processNotify *ppn") - prompt("pprocessNotify") - special(SPC_NOMOD) - interest(4) - } - field(PPNR, DBF_NOACCESS) { - prompt("pprocessNotifyRecord") - special(SPC_NOMOD) - interest(4) - extra("struct processNotifyRecord *ppnr") - } - field(SPVT, DBF_NOACCESS) { - prompt("Scan Private") - special(SPC_NOMOD) - interest(4) - extra("struct scan_element *spvt") - } - field(RSET, DBF_NOACCESS) { - extra("struct typed_rset *rset") - special(SPC_NOMOD) - interest(4) - prompt("Address of RSET") - } - field(DSET, DBF_NOACCESS) { - extra("struct dset *dset") - special(SPC_NOMOD) - interest(4) - prompt("DSET address") - } - field(DPVT, DBF_NOACCESS) { - extra("void *dpvt") - prompt("Device Private") - interest(4) - special(SPC_NOMOD) - } - field(RDES, DBF_NOACCESS) { - extra("struct dbRecordType *rdes") - special(SPC_NOMOD) - interest(4) - prompt("Address of dbRecordType") - } - field(LSET, DBF_NOACCESS) { - extra("struct lockRecord *lset") - special(SPC_NOMOD) - interest(4) - prompt("Lock Set") - } - field(PRIO, DBF_MENU) { - menu(menuPriority) - prompt("Scheduling Priority") - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - interest(1) - special(SPC_NOMOD) - prompt("Break Point") - extra("char bkpt") - } - field(UDF, DBF_UCHAR) { - promptgroup("10 - Common") - interest(1) - prompt("Undefined") - pp(TRUE) - initial("1") - } - field(UDFS, DBF_MENU) { - initial("INVALID") - menu(menuAlarmSevr) - interest(1) - promptgroup("70 - Alarm") - prompt("Undefined Alarm Sevrty") - } - field(TIME, DBF_NOACCESS) { - prompt("Time") - interest(2) - special(SPC_NOMOD) - extra("epicsTimeStamp time") - } - field(FLNK, DBF_FWDLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Forward Process Link") - } - field(VAL, DBF_NOACCESS) { - asl(ASL0) - prompt("Value") - special(SPC_DBADDR) - pp(TRUE) - extra("void * val") - } - field(PREC, DBF_SHORT) { - prompt("Display Precision") - promptgroup("80 - Display") - prop(YES) - interest(1) - } - field(OUT, DBF_OUTLINK) { - promptgroup("50 - Output") - interest(1) - prompt("Output Specification") - } - field(EGU, DBF_STRING) { - size(16) - prompt("Engineering Units") - prop(YES) - interest(1) - promptgroup("80 - Display") - } - field(HOPR, DBF_DOUBLE) { - prompt("High Operating Range") - interest(1) - prop(YES) - promptgroup("80 - Display") - } - field(LOPR, DBF_DOUBLE) { - prop(YES) - promptgroup("80 - Display") - interest(1) - prompt("Low Operating Range") - } - field(NELM, DBF_ULONG) { - initial("1") - prompt("Number of Elements") - interest(1) - special(SPC_NOMOD) - promptgroup("30 - Action") - } - field(FTVL, DBF_MENU) { - prompt("Field Type of Value") - interest(1) - special(SPC_NOMOD) - promptgroup("30 - Action") - menu(menuFtype) - } - field(NORD, DBF_ULONG) { - special(SPC_NOMOD) - prompt("Number elements read") - } - field(BPTR, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Buffer Pointer") - extra("void * bptr") - } - field(SIML, DBF_INLINK) { - prompt("Simulation Mode Link") - interest(1) - promptgroup("90 - Simulate") - } - field(SIMM, DBF_MENU) { - prompt("Simulation Mode") - special(SPC_MOD) - interest(1) - menu(menuYesNo) - } - field(SIMS, DBF_MENU) { - menu(menuAlarmSevr) - interest(2) - promptgroup("90 - Simulate") - prompt("Simulation Mode Severity") - } - field(SIOL, DBF_OUTLINK) { - interest(1) - promptgroup("90 - Simulate") - prompt("Simulation Output Link") - } - field(OLDSIMM, DBF_MENU) { - interest(4) - special(SPC_NOMOD) - prompt("Prev. Simulation Mode") - menu(menuSimm) - } - field(SSCN, DBF_MENU) { - interest(1) - promptgroup("90 - Simulate") - prompt("Sim. Mode Scan") - menu(menuScan) - initial("65535") - } - field(SDLY, DBF_DOUBLE) { - initial("-1.0") - prompt("Sim. Mode Async Delay") - interest(2) - promptgroup("90 - Simulate") - } - field(SIMPVT, DBF_NOACCESS) { - extra("CALLBACK *simpvt") - prompt("Sim. Mode Private") - special(SPC_NOMOD) - interest(4) - } - field(MPST, DBF_MENU) { - menu(aaoPOST) - interest(1) - promptgroup("80 - Display") - prompt("Post Value Monitors") - } - field(APST, DBF_MENU) { - interest(1) - promptgroup("80 - Display") - prompt("Post Archive Monitors") - menu(aaoPOST) - } - field(HASH, DBF_ULONG) { - interest(3) - prompt("Hash of OnChange data.") - } -} -device(aao, CONSTANT, devAaoSoft, "Soft Channel") -device(aao, INST_IO, devaaoStream, "stream") -recordtype(bi) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - %#include "callback.h" - field(NAME, DBF_STRING) { - size(61) - prompt("Record Name") - special(SPC_NOMOD) - } - field(DESC, DBF_STRING) { - size(41) - promptgroup("10 - Common") - prompt("Descriptor") - } - field(ASG, DBF_STRING) { - promptgroup("10 - Common") - special(SPC_AS) - prompt("Access Security Group") - size(29) - } - field(SCAN, DBF_MENU) { - menu(menuScan) - prompt("Scan Mechanism") - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - } - field(PINI, DBF_MENU) { - menu(menuPini) - promptgroup("20 - Scan") - interest(1) - prompt("Process at iocInit") - } - field(PHAS, DBF_SHORT) { - prompt("Scan Phase") - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - } - field(EVNT, DBF_STRING) { - size(40) - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - prompt("Event Name") - } - field(TSE, DBF_SHORT) { - prompt("Time Stamp Event") - interest(1) - promptgroup("20 - Scan") - } - field(TSEL, DBF_INLINK) { - prompt("Time Stamp Link") - interest(1) - promptgroup("20 - Scan") - } - field(DTYP, DBF_DEVICE) { - prompt("Device Type") - promptgroup("10 - Common") - interest(1) - } - field(DISV, DBF_SHORT) { - promptgroup("20 - Scan") - prompt("Disable Value") - initial("1") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - prompt("Scanning Disable") - interest(1) - promptgroup("20 - Scan") - } - field(MLOK, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Monitor lock") - extra("epicsMutexId mlok") - } - field(MLIS, DBF_NOACCESS) { - prompt("Monitor List") - interest(4) - special(SPC_NOMOD) - extra("ELLLIST mlis") - } - field(BKLNK, DBF_NOACCESS) { - extra("ELLLIST bklnk") - prompt("Backwards link tracking") - interest(4) - special(SPC_NOMOD) - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - interest(3) - prompt("Force Processing") - pp(TRUE) - } - field(STAT, DBF_MENU) { - initial("UDF") - menu(menuAlarmStat) - prompt("Alarm Status") + menu(menuAlarmStat) special(SPC_NOMOD) } field(SEVR, DBF_MENU) { - special(SPC_NOMOD) prompt("Alarm Severity") + special(SPC_NOMOD) menu(menuAlarmSevr) } field(NSTA, DBF_MENU) { - menu(menuAlarmStat) - special(SPC_NOMOD) - interest(2) prompt("New Alarm Status") + menu(menuAlarmStat) + interest(2) + special(SPC_NOMOD) } field(NSEV, DBF_MENU) { menu(menuAlarmSevr) @@ -17017,29 +22703,29 @@ prompt("New Alarm Severity") } field(ACKS, DBF_MENU) { - menu(menuAlarmSevr) - special(SPC_NOMOD) + special(SPC_NOMOD) + menu(menuAlarmSevr) interest(2) prompt("Alarm Ack Severity") } field(ACKT, DBF_MENU) { - interest(2) - promptgroup("70 - Alarm") - special(SPC_NOMOD) prompt("Alarm Ack Transient") - menu(menuYesNo) initial("YES") + promptgroup("70 - Alarm") + special(SPC_NOMOD) + interest(2) + menu(menuYesNo) } field(DISS, DBF_MENU) { - menu(menuAlarmSevr) + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) prompt("Disable Alarm Sevrty") - promptgroup("70 - Alarm") - interest(1) } field(LCNT, DBF_UCHAR) { prompt("Lock Count") - special(SPC_NOMOD) - interest(2) + interest(2) + special(SPC_NOMOD) } field(PACT, DBF_UCHAR) { prompt("Record active") @@ -17053,97 +22739,97 @@ } field(RPRO, DBF_UCHAR) { prompt("Reprocess ") - interest(1) - special(SPC_NOMOD) + special(SPC_NOMOD) + interest(1) } field(ASP, DBF_NOACCESS) { - extra("struct asgMember *asp") interest(4) special(SPC_NOMOD) prompt("Access Security Pvt") + extra("struct asgMember *asp") } field(PPN, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) + interest(4) + special(SPC_NOMOD) prompt("pprocessNotify") extra("struct processNotify *ppn") } field(PPNR, DBF_NOACCESS) { prompt("pprocessNotifyRecord") - special(SPC_NOMOD) - interest(4) extra("struct processNotifyRecord *ppnr") + special(SPC_NOMOD) + interest(4) } field(SPVT, DBF_NOACCESS) { + extra("struct scan_element *spvt") prompt("Scan Private") - special(SPC_NOMOD) - interest(4) - extra("struct scan_element *spvt") + interest(4) + special(SPC_NOMOD) } field(RSET, DBF_NOACCESS) { interest(4) special(SPC_NOMOD) + extra("struct typed_rset *rset") prompt("Address of RSET") - extra("struct typed_rset *rset") } field(DSET, DBF_NOACCESS) { prompt("DSET address") - interest(4) - special(SPC_NOMOD) extra("struct dset *dset") + special(SPC_NOMOD) + interest(4) } field(DPVT, DBF_NOACCESS) { + extra("void *dpvt") prompt("Device Private") interest(4) special(SPC_NOMOD) - extra("void *dpvt") } field(RDES, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) extra("struct dbRecordType *rdes") prompt("Address of dbRecordType") - interest(4) - special(SPC_NOMOD) } field(LSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("struct lockRecord *lset") prompt("Lock Set") - special(SPC_NOMOD) - interest(4) - extra("struct lockRecord *lset") } field(PRIO, DBF_MENU) { + promptgroup("20 - Scan") menu(menuPriority) + interest(1) + special(SPC_SCAN) prompt("Scheduling Priority") - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) } field(TPRO, DBF_UCHAR) { prompt("Trace Processing") } field(BKPT, DBF_NOACCESS) { prompt("Break Point") - interest(1) - special(SPC_NOMOD) extra("char bkpt") + interest(1) + special(SPC_NOMOD) } field(UDF, DBF_UCHAR) { - initial("1") - pp(TRUE) - promptgroup("10 - Common") - interest(1) prompt("Undefined") + initial("1") + pp(TRUE) + promptgroup("10 - Common") + interest(1) } field(UDFS, DBF_MENU) { initial("INVALID") - menu(menuAlarmSevr) prompt("Undefined Alarm Sevrty") - promptgroup("70 - Alarm") - interest(1) + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") } field(TIME, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(2) prompt("Time") - interest(2) - special(SPC_NOMOD) extra("epicsTimeStamp time") } field(FLNK, DBF_FWDLINK) { @@ -17151,766 +22837,148 @@ interest(1) promptgroup("20 - Scan") } - field(INP, DBF_INLINK) { - prompt("Input Specification") - promptgroup("40 - Input") - interest(1) - } - field(VAL, DBF_ENUM) { - asl(ASL0) + field(VAL, DBF_NOACCESS) { + pp(TRUE) + special(SPC_DBADDR) prompt("Current Value") - promptgroup("40 - Input") - pp(TRUE) - } - field(ZSV, DBF_MENU) { - pp(TRUE) - menu(menuAlarmSevr) - prompt("Zero Error Severity") - promptgroup("70 - Alarm") - interest(1) - } - field(OSV, DBF_MENU) { - pp(TRUE) - promptgroup("70 - Alarm") - interest(1) - prompt("One Error Severity") - menu(menuAlarmSevr) - } - field(COSV, DBF_MENU) { - pp(TRUE) - menu(menuAlarmSevr) - promptgroup("70 - Alarm") - interest(1) - prompt("Change of State Svr") - } - field(ZNAM, DBF_STRING) { - prompt("Zero Name") - prop(YES) - interest(1) - promptgroup("80 - Display") - pp(TRUE) - size(26) - } - field(ONAM, DBF_STRING) { - pp(TRUE) - size(26) - prop(YES) - promptgroup("80 - Display") - interest(1) - prompt("One Name") - } - field(RVAL, DBF_ULONG) { - pp(TRUE) - prompt("Raw Value") - } - field(ORAW, DBF_ULONG) { - special(SPC_NOMOD) - interest(3) - prompt("prev Raw Value") - } - field(MASK, DBF_ULONG) { - interest(1) - special(SPC_NOMOD) - prompt("Hardware Mask") - } - field(LALM, DBF_USHORT) { - special(SPC_NOMOD) - interest(3) - prompt("Last Value Alarmed") - } - field(MLST, DBF_USHORT) { - prompt("Last Value Monitored") - interest(3) - special(SPC_NOMOD) + asl(ASL0) + extra("char *val") + } + field(OVAL, DBF_NOACCESS) { + interest(3) + special(SPC_DBADDR) + prompt("Old Value") + extra("char *oval") + } + field(SIZV, DBF_USHORT) { + initial("41") + prompt("Size of buffers") + interest(1) + special(SPC_NOMOD) + promptgroup("40 - Input") + } + field(LEN, DBF_ULONG) { + special(SPC_NOMOD) + prompt("Length of VAL") + } + field(OLEN, DBF_ULONG) { + special(SPC_NOMOD) + prompt("Length of OVAL") + } + field(INP, DBF_INLINK) { + promptgroup("40 - Input") + interest(1) + prompt("Input Specification") + } + field(MPST, DBF_MENU) { + menu(menuPost) + interest(1) + promptgroup("80 - Display") + prompt("Post Value Monitors") + } + field(APST, DBF_MENU) { + prompt("Post Archive Monitors") + promptgroup("80 - Display") + menu(menuPost) + interest(1) + } + field(SIML, DBF_INLINK) { + prompt("Simulation Mode Link") + interest(1) + promptgroup("90 - Simulate") + } + field(SIMM, DBF_MENU) { + prompt("Simulation Mode") + special(SPC_MOD) + interest(1) + menu(menuYesNo) + } + field(SIMS, DBF_MENU) { + promptgroup("90 - Simulate") + interest(2) + menu(menuAlarmSevr) + prompt("Simulation Mode Severity") } field(SIOL, DBF_INLINK) { - promptgroup("90 - Simulate") - interest(1) prompt("Simulation Input Link") - } - field(SVAL, DBF_ULONG) { - prompt("Simulation Value") - } - field(SIML, DBF_INLINK) { - promptgroup("90 - Simulate") - interest(1) - prompt("Simulation Mode Link") - } - field(SIMM, DBF_MENU) { - menu(menuSimm) - prompt("Simulation Mode") - special(SPC_MOD) - interest(1) - } - field(SIMS, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Simulation Mode Severity") - interest(2) - promptgroup("90 - Simulate") + promptgroup("90 - Simulate") + interest(1) } field(OLDSIMM, DBF_MENU) { prompt("Prev. Simulation Mode") - interest(4) - special(SPC_NOMOD) menu(menuSimm) + interest(4) + special(SPC_NOMOD) } field(SSCN, DBF_MENU) { + initial("65535") prompt("Sim. Mode Scan") - promptgroup("90 - Simulate") - interest(1) - menu(menuScan) - initial("65535") + menu(menuScan) + interest(1) + promptgroup("90 - Simulate") } field(SDLY, DBF_DOUBLE) { - promptgroup("90 - Simulate") - interest(2) + initial("-1.0") prompt("Sim. Mode Async Delay") - initial("-1.0") + interest(2) + promptgroup("90 - Simulate") } field(SIMPVT, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) + extra("CALLBACK *simpvt") prompt("Sim. Mode Private") - extra("CALLBACK *simpvt") - } -} -device(bi, CONSTANT, devBiSoft, "Soft Channel") -device(bi, CONSTANT, devBiSoftRaw, "Raw Soft Channel") -device(bi, CONSTANT, devBiSoftCallback, "Async Soft Channel") -device(bi, INST_IO, devBiDbState, "Db State") -device(bi, INST_IO, asynBiInt32, "asynInt32") -device(bi, INST_IO, asynBiUInt32Digital, "asynUInt32Digital") -device(bi, INST_IO, devbiStream, "stream") -device(bi, INST_IO, devBiStrParm, "asyn bi stringParm") -device(bi, INST_IO, devBiMPC, "asyn MPC") -device(bi, GPIB_IO, devBiGP307Gpib, "Vg307 GPIB Instrument") -device(bi, INST_IO, devBiTelevac, "asyn Televac") -device(bi, INST_IO, devBiTPG261, "asyn TPG261") -recordtype(sub) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - %struct subRecord; - %typedef long (*SUBFUNCPTR)(struct subRecord *); - field(NAME, DBF_STRING) { - size(61) - prompt("Record Name") - special(SPC_NOMOD) - } - field(DESC, DBF_STRING) { - size(41) - promptgroup("10 - Common") - prompt("Descriptor") - } - field(ASG, DBF_STRING) { - promptgroup("10 - Common") - special(SPC_AS) - prompt("Access Security Group") - size(29) - } - field(SCAN, DBF_MENU) { - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - prompt("Scan Mechanism") - menu(menuScan) - } - field(PINI, DBF_MENU) { - menu(menuPini) - prompt("Process at iocInit") - interest(1) - promptgroup("20 - Scan") - } - field(PHAS, DBF_SHORT) { - prompt("Scan Phase") - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - } - field(EVNT, DBF_STRING) { - size(40) - prompt("Event Name") - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - } - field(TSE, DBF_SHORT) { - promptgroup("20 - Scan") - interest(1) - prompt("Time Stamp Event") - } - field(TSEL, DBF_INLINK) { - prompt("Time Stamp Link") - interest(1) - promptgroup("20 - Scan") - } - field(DTYP, DBF_DEVICE) { - prompt("Device Type") - interest(1) - promptgroup("10 - Common") - } - field(DISV, DBF_SHORT) { - initial("1") - promptgroup("20 - Scan") - prompt("Disable Value") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Scanning Disable") - } - field(MLOK, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Monitor lock") - extra("epicsMutexId mlok") - } - field(MLIS, DBF_NOACCESS) { - extra("ELLLIST mlis") - prompt("Monitor List") - special(SPC_NOMOD) - interest(4) - } - field(BKLNK, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Backwards link tracking") - extra("ELLLIST bklnk") - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - pp(TRUE) - prompt("Force Processing") - interest(3) - } - field(STAT, DBF_MENU) { - special(SPC_NOMOD) - prompt("Alarm Status") - menu(menuAlarmStat) - initial("UDF") - } - field(SEVR, DBF_MENU) { - special(SPC_NOMOD) - prompt("Alarm Severity") - menu(menuAlarmSevr) - } - field(NSTA, DBF_MENU) { - interest(2) - special(SPC_NOMOD) - prompt("New Alarm Status") - menu(menuAlarmStat) - } - field(NSEV, DBF_MENU) { - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Severity") - menu(menuAlarmSevr) - } - field(ACKS, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Alarm Ack Severity") - interest(2) - special(SPC_NOMOD) - } - field(ACKT, DBF_MENU) { - initial("YES") - prompt("Alarm Ack Transient") - promptgroup("70 - Alarm") - interest(2) - special(SPC_NOMOD) - menu(menuYesNo) - } - field(DISS, DBF_MENU) { - prompt("Disable Alarm Sevrty") - promptgroup("70 - Alarm") - interest(1) - menu(menuAlarmSevr) - } - field(LCNT, DBF_UCHAR) { - special(SPC_NOMOD) - interest(2) - prompt("Lock Count") - } - field(PACT, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Record active") - } - field(PUTF, DBF_UCHAR) { - special(SPC_NOMOD) - interest(1) - prompt("dbPutField process") - } - field(RPRO, DBF_UCHAR) { - special(SPC_NOMOD) - interest(1) - prompt("Reprocess ") - } - field(ASP, DBF_NOACCESS) { - extra("struct asgMember *asp") - special(SPC_NOMOD) - interest(4) - prompt("Access Security Pvt") - } - field(PPN, DBF_NOACCESS) { - extra("struct processNotify *ppn") - interest(4) - special(SPC_NOMOD) - prompt("pprocessNotify") - } - field(PPNR, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("pprocessNotifyRecord") - extra("struct processNotifyRecord *ppnr") - } - field(SPVT, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Scan Private") - extra("struct scan_element *spvt") - } - field(RSET, DBF_NOACCESS) { - extra("struct typed_rset *rset") - interest(4) - special(SPC_NOMOD) - prompt("Address of RSET") - } - field(DSET, DBF_NOACCESS) { - extra("struct dset *dset") - prompt("DSET address") - special(SPC_NOMOD) - interest(4) - } - field(DPVT, DBF_NOACCESS) { - extra("void *dpvt") - prompt("Device Private") - special(SPC_NOMOD) - interest(4) - } - field(RDES, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Address of dbRecordType") - extra("struct dbRecordType *rdes") - } - field(LSET, DBF_NOACCESS) { - prompt("Lock Set") - special(SPC_NOMOD) - interest(4) - extra("struct lockRecord *lset") - } - field(PRIO, DBF_MENU) { - prompt("Scheduling Priority") - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) - menu(menuPriority) - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(1) - prompt("Break Point") - extra("char bkpt") - } - field(UDF, DBF_UCHAR) { - pp(TRUE) - initial("1") - promptgroup("10 - Common") - interest(1) - prompt("Undefined") - } - field(UDFS, DBF_MENU) { - menu(menuAlarmSevr) - promptgroup("70 - Alarm") - interest(1) - prompt("Undefined Alarm Sevrty") - initial("INVALID") - } - field(TIME, DBF_NOACCESS) { - extra("epicsTimeStamp time") - interest(2) - special(SPC_NOMOD) - prompt("Time") - } - field(FLNK, DBF_FWDLINK) { - prompt("Forward Process Link") - interest(1) - promptgroup("20 - Scan") - } - field(VAL, DBF_DOUBLE) { - pp(TRUE) - prompt("Result") - asl(ASL0) - } - field(INAM, DBF_STRING) { - size(40) - special(SPC_NOMOD) - interest(1) - promptgroup("30 - Action") - prompt("Init Routine Name") - } - field(SNAM, DBF_STRING) { - size(40) - prompt("Subroutine Name") - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - } - field(SADR, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Subroutine Address") - extra("SUBFUNCPTR sadr") - } - field(INPA, DBF_INLINK) { - prompt("Input A") - promptgroup("41 - Input A-F") - interest(1) - } - field(INPB, DBF_INLINK) { - prompt("Input B") - promptgroup("41 - Input A-F") - interest(1) - } - field(INPC, DBF_INLINK) { - promptgroup("41 - Input A-F") - interest(1) - prompt("Input C") - } - field(INPD, DBF_INLINK) { - interest(1) - promptgroup("41 - Input A-F") - prompt("Input D") - } - field(INPE, DBF_INLINK) { - prompt("Input E") - promptgroup("41 - Input A-F") - interest(1) - } - field(INPF, DBF_INLINK) { - prompt("Input F") - promptgroup("41 - Input A-F") - interest(1) - } - field(INPG, DBF_INLINK) { - prompt("Input G") - promptgroup("42 - Input G-L") - interest(1) - } - field(INPH, DBF_INLINK) { - prompt("Input H") - interest(1) - promptgroup("42 - Input G-L") - } - field(INPI, DBF_INLINK) { - promptgroup("42 - Input G-L") - interest(1) - prompt("Input I") - } - field(INPJ, DBF_INLINK) { - prompt("Input J") - interest(1) - promptgroup("42 - Input G-L") - } - field(INPK, DBF_INLINK) { - interest(1) - promptgroup("42 - Input G-L") - prompt("Input K") - } - field(INPL, DBF_INLINK) { - promptgroup("42 - Input G-L") - interest(1) - prompt("Input L") - } - field(EGU, DBF_STRING) { - prompt("Engineering Units") - prop(YES) - interest(1) - promptgroup("80 - Display") - size(16) - } - field(HOPR, DBF_DOUBLE) { - prompt("High Operating Range") - prop(YES) - promptgroup("80 - Display") - interest(1) - } - field(LOPR, DBF_DOUBLE) { - prompt("Low Operating Range") - prop(YES) - promptgroup("80 - Display") - interest(1) - } - field(HIHI, DBF_DOUBLE) { - promptgroup("70 - Alarm") - prop(YES) - interest(1) - prompt("Hihi Alarm Limit") - pp(TRUE) - } - field(LOLO, DBF_DOUBLE) { - pp(TRUE) - interest(1) - prop(YES) - promptgroup("70 - Alarm") - prompt("Lolo Alarm Limit") - } - field(HIGH, DBF_DOUBLE) { - prompt("High Alarm Limit") - interest(1) - prop(YES) - promptgroup("70 - Alarm") - pp(TRUE) - } - field(LOW, DBF_DOUBLE) { - prompt("Low Alarm Limit") - prop(YES) - promptgroup("70 - Alarm") - interest(1) - pp(TRUE) - } - field(PREC, DBF_SHORT) { - prompt("Display Precision") - interest(1) - prop(YES) - promptgroup("80 - Display") - } - field(BRSV, DBF_MENU) { - pp(TRUE) - menu(menuAlarmSevr) - prompt("Bad Return Severity") - promptgroup("70 - Alarm") - interest(1) - } - field(HHSV, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Hihi Severity") - interest(1) - prop(YES) - promptgroup("70 - Alarm") - pp(TRUE) - } - field(LLSV, DBF_MENU) { - menu(menuAlarmSevr) - interest(1) - prop(YES) - promptgroup("70 - Alarm") - prompt("Lolo Severity") - pp(TRUE) - } - field(HSV, DBF_MENU) { - pp(TRUE) - menu(menuAlarmSevr) - interest(1) - prop(YES) - promptgroup("70 - Alarm") - prompt("High Severity") - } - field(LSV, DBF_MENU) { - promptgroup("70 - Alarm") - prop(YES) - interest(1) - prompt("Low Severity") - menu(menuAlarmSevr) - pp(TRUE) - } - field(HYST, DBF_DOUBLE) { - promptgroup("70 - Alarm") - interest(1) - prompt("Alarm Deadband") - } - field(ADEL, DBF_DOUBLE) { - prompt("Archive Deadband") - interest(1) - promptgroup("80 - Display") - } - field(MDEL, DBF_DOUBLE) { - prompt("Monitor Deadband") - promptgroup("80 - Display") - interest(1) - } - field(A, DBF_DOUBLE) { - prompt("Value of Input A") - pp(TRUE) - } - field(B, DBF_DOUBLE) { - prompt("Value of Input B") - pp(TRUE) - } - field(C, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input C") - } - field(D, DBF_DOUBLE) { - prompt("Value of Input D") - pp(TRUE) - } - field(E, DBF_DOUBLE) { - prompt("Value of Input E") - pp(TRUE) - } - field(F, DBF_DOUBLE) { - prompt("Value of Input F") - pp(TRUE) - } - field(G, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of Input G") - } - field(H, DBF_DOUBLE) { - prompt("Value of Input H") - pp(TRUE) - } - field(I, DBF_DOUBLE) { - prompt("Value of Input I") - pp(TRUE) - } - field(J, DBF_DOUBLE) { - prompt("Value of Input J") - pp(TRUE) - } - field(K, DBF_DOUBLE) { - prompt("Value of Input K") - pp(TRUE) - } - field(L, DBF_DOUBLE) { - prompt("Value of Input L") - pp(TRUE) - } - field(LA, DBF_DOUBLE) { - prompt("Prev Value of A") - interest(3) - special(SPC_NOMOD) - } - field(LB, DBF_DOUBLE) { - prompt("Prev Value of B") - interest(3) - special(SPC_NOMOD) - } - field(LC, DBF_DOUBLE) { - prompt("Prev Value of C") - interest(3) - special(SPC_NOMOD) - } - field(LD, DBF_DOUBLE) { - prompt("Prev Value of D") - interest(3) - special(SPC_NOMOD) - } - field(LE, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of E") - } - field(LF, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Value of F") - } - field(LG, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Value of G") - } - field(LH, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Value of H") - } - field(LI, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of I") - } - field(LJ, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of J") - } - field(LK, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of K") - } - field(LL, DBF_DOUBLE) { - prompt("Prev Value of L") - special(SPC_NOMOD) - interest(3) - } - field(LALM, DBF_DOUBLE) { - prompt("Last Value Alarmed") - interest(3) - special(SPC_NOMOD) - } - field(ALST, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Last Value Archived") - } - field(MLST, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Last Value Monitored") - } -} -recordtype(transform) { + interest(4) + special(SPC_NOMOD) + } +} +device(lsi, CONSTANT, devLsiSoft, "Soft Channel") +device(lsi, INST_IO, devLsiEnviron, "getenv") +recordtype(swait) { %#include "epicsTypes.h" %#include "link.h" %#include "epicsMutex.h" %#include "ellLib.h" %#include "epicsTime.h" field(NAME, DBF_STRING) { - special(SPC_NOMOD) prompt("Record Name") size(61) + special(SPC_NOMOD) } field(DESC, DBF_STRING) { + size(41) prompt("Descriptor") promptgroup("10 - Common") - size(41) } field(ASG, DBF_STRING) { - promptgroup("10 - Common") special(SPC_AS) + promptgroup("10 - Common") + size(29) prompt("Access Security Group") - size(29) } field(SCAN, DBF_MENU) { - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") prompt("Scan Mechanism") - menu(menuScan) + interest(1) + menu(menuScan) + special(SPC_SCAN) + promptgroup("20 - Scan") } field(PINI, DBF_MENU) { - promptgroup("20 - Scan") - interest(1) prompt("Process at iocInit") menu(menuPini) + interest(1) + promptgroup("20 - Scan") } field(PHAS, DBF_SHORT) { - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") + promptgroup("20 - Scan") + special(SPC_SCAN) + interest(1) prompt("Scan Phase") } field(EVNT, DBF_STRING) { size(40) - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") prompt("Event Name") + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") } field(TSE, DBF_SHORT) { prompt("Time Stamp Event") @@ -17923,2010 +22991,14 @@ prompt("Time Stamp Link") } field(DTYP, DBF_DEVICE) { - promptgroup("10 - Common") - interest(1) - prompt("Device Type") - } - field(DISV, DBF_SHORT) { - promptgroup("20 - Scan") - prompt("Disable Value") - initial("1") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - prompt("Scanning Disable") - interest(1) - promptgroup("20 - Scan") - } - field(MLOK, DBF_NOACCESS) { - extra("epicsMutexId mlok") - prompt("Monitor lock") - special(SPC_NOMOD) - interest(4) - } - field(MLIS, DBF_NOACCESS) { - extra("ELLLIST mlis") - interest(4) - special(SPC_NOMOD) - prompt("Monitor List") - } - field(BKLNK, DBF_NOACCESS) { - prompt("Backwards link tracking") - interest(4) - special(SPC_NOMOD) - extra("ELLLIST bklnk") - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - interest(3) - prompt("Force Processing") - pp(TRUE) - } - field(STAT, DBF_MENU) { - initial("UDF") - special(SPC_NOMOD) - prompt("Alarm Status") - menu(menuAlarmStat) - } - field(SEVR, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Alarm Severity") - special(SPC_NOMOD) - } - field(NSTA, DBF_MENU) { - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Status") - menu(menuAlarmStat) - } - field(NSEV, DBF_MENU) { - menu(menuAlarmSevr) - interest(2) - special(SPC_NOMOD) - prompt("New Alarm Severity") - } - field(ACKS, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Alarm Ack Severity") - interest(2) - special(SPC_NOMOD) - } - field(ACKT, DBF_MENU) { - initial("YES") - menu(menuYesNo) - prompt("Alarm Ack Transient") - special(SPC_NOMOD) - interest(2) - promptgroup("70 - Alarm") - } - field(DISS, DBF_MENU) { - prompt("Disable Alarm Sevrty") - promptgroup("70 - Alarm") - interest(1) - menu(menuAlarmSevr) - } - field(LCNT, DBF_UCHAR) { - interest(2) - special(SPC_NOMOD) - prompt("Lock Count") - } - field(PACT, DBF_UCHAR) { - prompt("Record active") - special(SPC_NOMOD) - interest(1) - } - field(PUTF, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("dbPutField process") - } - field(RPRO, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Reprocess ") - } - field(ASP, DBF_NOACCESS) { - extra("struct asgMember *asp") - prompt("Access Security Pvt") - special(SPC_NOMOD) - interest(4) - } - field(PPN, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("pprocessNotify") - extra("struct processNotify *ppn") - } - field(PPNR, DBF_NOACCESS) { - extra("struct processNotifyRecord *ppnr") - special(SPC_NOMOD) - interest(4) - prompt("pprocessNotifyRecord") - } - field(SPVT, DBF_NOACCESS) { - prompt("Scan Private") - interest(4) - special(SPC_NOMOD) - extra("struct scan_element *spvt") - } - field(RSET, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Address of RSET") - extra("struct typed_rset *rset") - } - field(DSET, DBF_NOACCESS) { - extra("struct dset *dset") - interest(4) - special(SPC_NOMOD) - prompt("DSET address") - } - field(DPVT, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Device Private") - extra("void *dpvt") - } - field(RDES, DBF_NOACCESS) { - extra("struct dbRecordType *rdes") - prompt("Address of dbRecordType") - interest(4) - special(SPC_NOMOD) - } - field(LSET, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Lock Set") - extra("struct lockRecord *lset") - } - field(PRIO, DBF_MENU) { - menu(menuPriority) - prompt("Scheduling Priority") - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - extra("char bkpt") - interest(1) - special(SPC_NOMOD) - prompt("Break Point") - } - field(UDF, DBF_UCHAR) { - pp(TRUE) - initial("1") - promptgroup("10 - Common") - interest(1) - prompt("Undefined") - } - field(UDFS, DBF_MENU) { - menu(menuAlarmSevr) - interest(1) - promptgroup("70 - Alarm") - prompt("Undefined Alarm Sevrty") - initial("INVALID") - } - field(TIME, DBF_NOACCESS) { - interest(2) - special(SPC_NOMOD) - prompt("Time") - extra("epicsTimeStamp time") - } - field(FLNK, DBF_FWDLINK) { - prompt("Forward Process Link") - interest(1) - promptgroup("20 - Scan") - } - field(VERS, DBF_FLOAT) { - special(SPC_NOMOD) - prompt("Code Version") - initial("1") - } - field(RPVT, DBF_NOACCESS) { - size(4) - extra("void * rpvt") - prompt("Record Private") - interest(4) - special(SPC_NOMOD) - } - field(IVLA, DBF_MENU) { - initial("0") - menu(transformIVLA) - interest(1) - promptgroup("10 - Common") - prompt("Invalid link action") - } - field(COPT, DBF_MENU) { - prompt("Calc option") - promptgroup("10 - Common") - interest(1) - menu(transformCOPT) - initial("Conditional") - } - field(VAL, DBF_DOUBLE) { - prompt("Result") - } - field(CLCA, DBF_STRING) { - size(120) - prompt("Calculation A") - promptgroup("10 - Common") - special(SPC_MOD) - } - field(CLCB, DBF_STRING) { - size(120) - special(SPC_MOD) - promptgroup("10 - Common") - prompt("Calculation B") - } - field(CLCC, DBF_STRING) { - special(SPC_MOD) - promptgroup("10 - Common") - prompt("Calculation C") - size(120) - } - field(CLCD, DBF_STRING) { - prompt("Calculation D") - special(SPC_MOD) - promptgroup("10 - Common") - size(120) - } - field(CLCE, DBF_STRING) { - prompt("Calculation E") - special(SPC_MOD) - promptgroup("10 - Common") - size(120) - } - field(CLCF, DBF_STRING) { - prompt("Calculation F") - promptgroup("10 - Common") - special(SPC_MOD) - size(120) - } - field(CLCG, DBF_STRING) { - prompt("Calculation G") - special(SPC_MOD) - promptgroup("10 - Common") - size(120) - } - field(CLCH, DBF_STRING) { - size(120) - promptgroup("10 - Common") - special(SPC_MOD) - prompt("Calculation H") - } - field(CLCI, DBF_STRING) { - promptgroup("10 - Common") - special(SPC_MOD) - prompt("Calculation I") - size(120) - } - field(CLCJ, DBF_STRING) { - promptgroup("10 - Common") - special(SPC_MOD) - prompt("Calculation J") - size(120) - } - field(CLCK, DBF_STRING) { - size(120) - prompt("Calculation K") - special(SPC_MOD) - promptgroup("10 - Common") - } - field(CLCL, DBF_STRING) { - size(120) - prompt("Calculation L") - promptgroup("10 - Common") - special(SPC_MOD) - } - field(CLCM, DBF_STRING) { - prompt("Calculation M") - special(SPC_MOD) - promptgroup("10 - Common") - size(120) - } - field(CLCN, DBF_STRING) { - special(SPC_MOD) - promptgroup("10 - Common") - prompt("Calculation N") - size(120) - } - field(CLCO, DBF_STRING) { - size(120) - special(SPC_MOD) - promptgroup("10 - Common") - prompt("Calculation O") - } - field(CLCP, DBF_STRING) { - promptgroup("10 - Common") - special(SPC_MOD) - prompt("Calculation P") - size(120) - } - field(CAV, DBF_LONG) { - interest(1) - prompt("CALC Invalid") - } - field(CBV, DBF_LONG) { - interest(1) - prompt("CALC Invalid") - } - field(CCV, DBF_LONG) { - interest(1) - prompt("CALC Invalid") - } - field(CDV, DBF_LONG) { - prompt("CALC Invalid") - interest(1) - } - field(CEV, DBF_LONG) { - prompt("CALC Invalid") - interest(1) - } - field(CFV, DBF_LONG) { - prompt("CALC Invalid") - interest(1) - } - field(CGV, DBF_LONG) { - prompt("CALC Invalid") - interest(1) - } - field(CHV, DBF_LONG) { - interest(1) - prompt("CALC Invalid") - } - field(CIV, DBF_LONG) { - prompt("CALC Invalid") - interest(1) - } - field(CJV, DBF_LONG) { - prompt("CALC Invalid") - interest(1) - } - field(CKV, DBF_LONG) { - prompt("CALC Invalid") - interest(1) - } - field(CLV, DBF_LONG) { - interest(1) - prompt("CALC Invalid") - } - field(CMV, DBF_LONG) { - prompt("CALC Invalid") - interest(1) - } - field(CNV, DBF_LONG) { - prompt("CALC Invalid") - interest(1) - } - field(COV, DBF_LONG) { - interest(1) - prompt("CALC Invalid") - } - field(CPV, DBF_LONG) { - interest(1) - prompt("CALC Invalid") - } - field(INPA, DBF_INLINK) { - prompt("Input A") - interest(1) - promptgroup("10 - Common") - special(SPC_MOD) - } - field(INPB, DBF_INLINK) { - promptgroup("10 - Common") - interest(1) - special(SPC_MOD) - prompt("Input B") - } - field(INPC, DBF_INLINK) { - promptgroup("10 - Common") - interest(1) - special(SPC_MOD) - prompt("Input C") - } - field(INPD, DBF_INLINK) { - prompt("Input D") - promptgroup("10 - Common") - interest(1) - special(SPC_MOD) - } - field(INPE, DBF_INLINK) { - interest(1) - promptgroup("10 - Common") - special(SPC_MOD) - prompt("Input E") - } - field(INPF, DBF_INLINK) { - prompt("Input F") - interest(1) - promptgroup("10 - Common") - special(SPC_MOD) - } - field(INPG, DBF_INLINK) { - prompt("Input G") - promptgroup("10 - Common") - interest(1) - special(SPC_MOD) - } - field(INPH, DBF_INLINK) { - special(SPC_MOD) - interest(1) - promptgroup("10 - Common") - prompt("Input H") - } - field(INPI, DBF_INLINK) { - promptgroup("10 - Common") - interest(1) - special(SPC_MOD) - prompt("Input I") - } - field(INPJ, DBF_INLINK) { - interest(1) - special(SPC_MOD) - promptgroup("10 - Common") - prompt("Input J") - } - field(INPK, DBF_INLINK) { - prompt("Input K") - interest(1) - special(SPC_MOD) - promptgroup("10 - Common") - } - field(INPL, DBF_INLINK) { - prompt("Input L") - interest(1) - special(SPC_MOD) - promptgroup("10 - Common") - } - field(INPM, DBF_INLINK) { - interest(1) - promptgroup("10 - Common") - special(SPC_MOD) - prompt("Input M") - } - field(INPN, DBF_INLINK) { - prompt("Input N") - promptgroup("10 - Common") - interest(1) - special(SPC_MOD) - } - field(INPO, DBF_INLINK) { - promptgroup("10 - Common") - interest(1) - special(SPC_MOD) - prompt("Input O") - } - field(INPP, DBF_INLINK) { - promptgroup("10 - Common") - interest(1) - special(SPC_MOD) - prompt("Input P") - } - field(OUTA, DBF_OUTLINK) { - interest(1) - special(SPC_MOD) - promptgroup("10 - Common") - prompt("Output A") - } - field(OUTB, DBF_OUTLINK) { - prompt("Output B") - promptgroup("10 - Common") - interest(1) - special(SPC_MOD) - } - field(OUTC, DBF_OUTLINK) { - prompt("Output C") - special(SPC_MOD) - interest(1) - promptgroup("10 - Common") - } - field(OUTD, DBF_OUTLINK) { - special(SPC_MOD) - interest(1) - promptgroup("10 - Common") - prompt("Output D") - } - field(OUTE, DBF_OUTLINK) { - prompt("Output E") - promptgroup("10 - Common") - interest(1) - special(SPC_MOD) - } - field(OUTF, DBF_OUTLINK) { - interest(1) - special(SPC_MOD) - promptgroup("10 - Common") - prompt("Output F") - } - field(OUTG, DBF_OUTLINK) { - promptgroup("10 - Common") - interest(1) - special(SPC_MOD) - prompt("Output G") - } - field(OUTH, DBF_OUTLINK) { - promptgroup("10 - Common") - interest(1) - special(SPC_MOD) - prompt("Output H") - } - field(OUTI, DBF_OUTLINK) { - prompt("Output I") - special(SPC_MOD) - interest(1) - promptgroup("10 - Common") - } - field(OUTJ, DBF_OUTLINK) { - promptgroup("10 - Common") - interest(1) - special(SPC_MOD) - prompt("Output J") - } - field(OUTK, DBF_OUTLINK) { - prompt("Output K") - promptgroup("10 - Common") - interest(1) - special(SPC_MOD) - } - field(OUTL, DBF_OUTLINK) { - prompt("Output L") - interest(1) - special(SPC_MOD) - promptgroup("10 - Common") - } - field(OUTM, DBF_OUTLINK) { - special(SPC_MOD) - interest(1) - promptgroup("10 - Common") - prompt("Output M") - } - field(OUTN, DBF_OUTLINK) { - interest(1) - promptgroup("10 - Common") - special(SPC_MOD) - prompt("Output N") - } - field(OUTO, DBF_OUTLINK) { - prompt("Output O") - interest(1) - promptgroup("10 - Common") - special(SPC_MOD) - } - field(OUTP, DBF_OUTLINK) { - promptgroup("10 - Common") - interest(1) - special(SPC_MOD) - prompt("Output P") - } - field(EGU, DBF_STRING) { - interest(1) - promptgroup("10 - Common") - prompt("Units Name") - size(16) - } - field(PREC, DBF_SHORT) { - prompt("Display Precision") - interest(1) - promptgroup("10 - Common") - } - field(A, DBF_DOUBLE) { - pp(TRUE) - special(SPC_MOD) - promptgroup("10 - Common") - prompt("Value of A") - } - field(B, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of B") - promptgroup("10 - Common") - special(SPC_MOD) - } - field(C, DBF_DOUBLE) { - pp(TRUE) - promptgroup("10 - Common") - special(SPC_MOD) - prompt("Value of C") - } - field(D, DBF_DOUBLE) { - prompt("Value of D") - promptgroup("10 - Common") - special(SPC_MOD) - pp(TRUE) - } - field(E, DBF_DOUBLE) { - prompt("Value of E") - promptgroup("10 - Common") - special(SPC_MOD) - pp(TRUE) - } - field(F, DBF_DOUBLE) { - pp(TRUE) - promptgroup("10 - Common") - special(SPC_MOD) - prompt("Value of F") - } - field(G, DBF_DOUBLE) { - pp(TRUE) - special(SPC_MOD) - promptgroup("10 - Common") - prompt("Value of G") - } - field(H, DBF_DOUBLE) { - pp(TRUE) - special(SPC_MOD) - promptgroup("10 - Common") - prompt("Value of H") - } - field(I, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of I") - promptgroup("10 - Common") - special(SPC_MOD) - } - field(J, DBF_DOUBLE) { - promptgroup("10 - Common") - special(SPC_MOD) - prompt("Value of J") - pp(TRUE) - } - field(K, DBF_DOUBLE) { - pp(TRUE) - promptgroup("10 - Common") - special(SPC_MOD) - prompt("Value of K") - } - field(L, DBF_DOUBLE) { - promptgroup("10 - Common") - special(SPC_MOD) - prompt("Value of L") - pp(TRUE) - } - field(M, DBF_DOUBLE) { - special(SPC_MOD) - promptgroup("10 - Common") - prompt("Value of M") - pp(TRUE) - } - field(N, DBF_DOUBLE) { - prompt("Value of N") - promptgroup("10 - Common") - special(SPC_MOD) - pp(TRUE) - } - field(O, DBF_DOUBLE) { - prompt("Value of O") - promptgroup("10 - Common") - special(SPC_MOD) - pp(TRUE) - } - field(P, DBF_DOUBLE) { - pp(TRUE) - prompt("Value of P") - promptgroup("10 - Common") - special(SPC_MOD) - } - field(LA, DBF_DOUBLE) { - prompt("Prev Value of A") - special(SPC_NOMOD) - interest(3) - } - field(LB, DBF_DOUBLE) { - prompt("Prev Value of B") - special(SPC_NOMOD) - interest(3) - } - field(LC, DBF_DOUBLE) { - prompt("Prev Value of C") - interest(3) - special(SPC_NOMOD) - } - field(LD, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of D") - } - field(LE, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of E") - } - field(LF, DBF_DOUBLE) { - prompt("Prev Value of F") - special(SPC_NOMOD) - interest(3) - } - field(LG, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Value of G") - } - field(LH, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Value of H") - } - field(LI, DBF_DOUBLE) { - prompt("Prev Value of I") - interest(3) - special(SPC_NOMOD) - } - field(LJ, DBF_DOUBLE) { - prompt("Prev Value of J") - special(SPC_NOMOD) - interest(3) - } - field(LK, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of K") - } - field(LL, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Value of L") - } - field(LM, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of M") - } - field(LN, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Prev Value of N") - } - field(LO, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Value of O") - } - field(LP, DBF_DOUBLE) { - prompt("Prev Value of P") - interest(3) - special(SPC_NOMOD) - } - field(RPCA, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Postfix Calc A") - extra("unsigned char rpca[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") - } - field(RPCB, DBF_NOACCESS) { - extra("unsigned char rpcb[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") - prompt("Postfix Calc B") - special(SPC_NOMOD) - interest(4) - } - field(RPCC, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Postfix Calc C") - extra("unsigned char rpcc[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") - } - field(RPCD, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Postfix Calc D") - extra("unsigned char rpcd[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") - } - field(RPCE, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Postfix Calc E") - extra("unsigned char rpce[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") - } - field(RPCF, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Postfix Calc F") - extra("unsigned char rpcf[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") - } - field(RPCG, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Postfix Calc G") - extra("unsigned char rpcg[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") - } - field(RPCH, DBF_NOACCESS) { - prompt("Postfix Calc H") - interest(4) - special(SPC_NOMOD) - extra("unsigned char rpch[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") - } - field(RPCI, DBF_NOACCESS) { - prompt("Postfix Calc I") - special(SPC_NOMOD) - interest(4) - extra("unsigned char rpci[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") - } - field(RPCJ, DBF_NOACCESS) { - prompt("Postfix Calc J") - interest(4) - special(SPC_NOMOD) - extra("unsigned char rpcj[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") - } - field(RPCK, DBF_NOACCESS) { - extra("unsigned char rpck[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") - prompt("Postfix Calc K") - special(SPC_NOMOD) - interest(4) - } - field(RPCL, DBF_NOACCESS) { - extra("unsigned char rpcl[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") - prompt("Postfix Calc L") - interest(4) - special(SPC_NOMOD) - } - field(RPCM, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Postfix Calc M") - extra("unsigned char rpcm[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") - } - field(RPCN, DBF_NOACCESS) { - extra("unsigned char rpcn[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") - prompt("Postfix Calc N") - interest(4) - special(SPC_NOMOD) - } - field(RPCO, DBF_NOACCESS) { - extra("unsigned char rpco[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") - special(SPC_NOMOD) - interest(4) - prompt("Postfix Calc O") - } - field(RPCP, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Postfix Calc P") - extra("unsigned char rpcp[SCALC_INFIX_TO_POSTFIX_SIZE(120)]") - } - field(CMTA, DBF_STRING) { - prompt("Comment A") - promptgroup("10 - Common") - size(39) - } - field(CMTB, DBF_STRING) { - size(39) - prompt("Comment B") - promptgroup("10 - Common") - } - field(CMTC, DBF_STRING) { - size(39) - prompt("Comment C") - promptgroup("10 - Common") - } - field(CMTD, DBF_STRING) { - promptgroup("10 - Common") - prompt("Comment D") - size(39) - } - field(CMTE, DBF_STRING) { - prompt("Comment E") - promptgroup("10 - Common") - size(39) - } - field(CMTF, DBF_STRING) { - promptgroup("10 - Common") - prompt("Comment F") - size(39) - } - field(CMTG, DBF_STRING) { - size(39) - prompt("Comment G") - promptgroup("10 - Common") - } - field(CMTH, DBF_STRING) { - promptgroup("10 - Common") - prompt("Comment H") - size(39) - } - field(CMTI, DBF_STRING) { - promptgroup("10 - Common") - prompt("Comment I") - size(39) - } - field(CMTJ, DBF_STRING) { - size(39) - prompt("Comment J") - promptgroup("10 - Common") - } - field(CMTK, DBF_STRING) { - promptgroup("10 - Common") - prompt("Comment K") - size(39) - } - field(CMTL, DBF_STRING) { - size(39) - prompt("Comment L") - promptgroup("10 - Common") - } - field(CMTM, DBF_STRING) { - size(39) - prompt("Comment M") - promptgroup("10 - Common") - } - field(CMTN, DBF_STRING) { - size(39) - prompt("Comment N") - promptgroup("10 - Common") - } - field(CMTO, DBF_STRING) { - size(39) - prompt("Comment O") - promptgroup("10 - Common") - } - field(CMTP, DBF_STRING) { - promptgroup("10 - Common") - prompt("Comment P") - size(39) - } - field(MAP, DBF_SHORT) { - prompt("Input bitmap") - interest(3) - promptgroup("10 - Common") - } - field(IAV, DBF_MENU) { - menu(transformIAV) - interest(1) - special(SPC_NOMOD) - prompt("Input link valid") - initial("1") - } - field(IBV, DBF_MENU) { - initial("1") - menu(transformIAV) - prompt("Input link valid") - interest(1) - special(SPC_NOMOD) - } - field(ICV, DBF_MENU) { - initial("1") - special(SPC_NOMOD) - interest(1) - prompt("Input link valid") - menu(transformIAV) - } - field(IDV, DBF_MENU) { - menu(transformIAV) - prompt("Input link valid") - interest(1) - special(SPC_NOMOD) - initial("1") - } - field(IEV, DBF_MENU) { - interest(1) - special(SPC_NOMOD) - prompt("Input link valid") - menu(transformIAV) - initial("1") - } - field(IFV, DBF_MENU) { - initial("1") - menu(transformIAV) - interest(1) - special(SPC_NOMOD) - prompt("Input link valid") - } - field(IGV, DBF_MENU) { - menu(transformIAV) - special(SPC_NOMOD) - interest(1) - prompt("Input link valid") - initial("1") - } - field(IHV, DBF_MENU) { - initial("1") - special(SPC_NOMOD) - interest(1) - prompt("Input link valid") - menu(transformIAV) - } - field(IIV, DBF_MENU) { - menu(transformIAV) - special(SPC_NOMOD) - interest(1) - prompt("Input link valid") - initial("1") - } - field(IJV, DBF_MENU) { - menu(transformIAV) - special(SPC_NOMOD) - interest(1) - prompt("Input link valid") - initial("1") - } - field(IKV, DBF_MENU) { - initial("1") - interest(1) - special(SPC_NOMOD) - prompt("Input link valid") - menu(transformIAV) - } - field(ILV, DBF_MENU) { - initial("1") - prompt("Input link valid") - special(SPC_NOMOD) - interest(1) - menu(transformIAV) - } - field(IMV, DBF_MENU) { - initial("1") - menu(transformIAV) - prompt("Input link valid") - interest(1) - special(SPC_NOMOD) - } - field(INV, DBF_MENU) { - initial("1") - prompt("Input link valid") - interest(1) - special(SPC_NOMOD) - menu(transformIAV) - } - field(IOV, DBF_MENU) { - menu(transformIAV) - interest(1) - special(SPC_NOMOD) - prompt("Input link valid") - initial("1") - } - field(IPV, DBF_MENU) { - initial("1") - prompt("Input link valid") - special(SPC_NOMOD) - interest(1) - menu(transformIAV) - } - field(OAV, DBF_MENU) { - initial("1") - menu(transformIAV) - interest(1) - special(SPC_NOMOD) - prompt("Output link valid") - } - field(OBV, DBF_MENU) { - menu(transformIAV) - interest(1) - special(SPC_NOMOD) - prompt("Output link valid") - initial("1") - } - field(OCV, DBF_MENU) { - interest(1) - special(SPC_NOMOD) - prompt("Output link valid") - menu(transformIAV) - initial("1") - } - field(ODV, DBF_MENU) { - initial("1") - interest(1) - special(SPC_NOMOD) - prompt("Output link valid") - menu(transformIAV) - } - field(OEV, DBF_MENU) { - initial("1") - menu(transformIAV) - prompt("Output link valid") - special(SPC_NOMOD) - interest(1) - } - field(OFV, DBF_MENU) { - special(SPC_NOMOD) - interest(1) - prompt("Output link valid") - menu(transformIAV) - initial("1") - } - field(OGV, DBF_MENU) { - menu(transformIAV) - prompt("Output link valid") - interest(1) - special(SPC_NOMOD) - initial("1") - } - field(OHV, DBF_MENU) { - initial("1") - menu(transformIAV) - interest(1) - special(SPC_NOMOD) - prompt("Output link valid") - } - field(OIV, DBF_MENU) { - interest(1) - special(SPC_NOMOD) - prompt("Output link valid") - menu(transformIAV) - initial("1") - } - field(OJV, DBF_MENU) { - prompt("Output link valid") - interest(1) - special(SPC_NOMOD) - menu(transformIAV) - initial("1") - } - field(OKV, DBF_MENU) { - menu(transformIAV) - prompt("Output link valid") - interest(1) - special(SPC_NOMOD) - initial("1") - } - field(OLV, DBF_MENU) { - initial("1") - prompt("Output link valid") - special(SPC_NOMOD) - interest(1) - menu(transformIAV) - } - field(OMV, DBF_MENU) { - initial("1") - interest(1) - special(SPC_NOMOD) - prompt("Output link valid") - menu(transformIAV) - } - field(ONV, DBF_MENU) { - initial("1") - prompt("Output link valid") - interest(1) - special(SPC_NOMOD) - menu(transformIAV) - } - field(OOV, DBF_MENU) { - initial("1") - menu(transformIAV) - interest(1) - special(SPC_NOMOD) - prompt("Output link valid") - } - field(OPV, DBF_MENU) { - prompt("Output link valid") - interest(1) - special(SPC_NOMOD) - menu(transformIAV) - initial("1") - } -} -recordtype(mbbi) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - %#include "callback.h" - field(NAME, DBF_STRING) { - size(61) - special(SPC_NOMOD) - prompt("Record Name") - } - field(DESC, DBF_STRING) { - size(41) - prompt("Descriptor") - promptgroup("10 - Common") - } - field(ASG, DBF_STRING) { - promptgroup("10 - Common") - special(SPC_AS) - prompt("Access Security Group") - size(29) - } - field(SCAN, DBF_MENU) { - prompt("Scan Mechanism") - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - menu(menuScan) - } - field(PINI, DBF_MENU) { - menu(menuPini) - prompt("Process at iocInit") - interest(1) - promptgroup("20 - Scan") - } - field(PHAS, DBF_SHORT) { - prompt("Scan Phase") - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - } - field(EVNT, DBF_STRING) { - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - prompt("Event Name") - size(40) - } - field(TSE, DBF_SHORT) { - prompt("Time Stamp Event") - interest(1) - promptgroup("20 - Scan") - } - field(TSEL, DBF_INLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Time Stamp Link") - } - field(DTYP, DBF_DEVICE) { - prompt("Device Type") - interest(1) - promptgroup("10 - Common") - } - field(DISV, DBF_SHORT) { - prompt("Disable Value") - promptgroup("20 - Scan") - initial("1") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Scanning Disable") - } - field(MLOK, DBF_NOACCESS) { - extra("epicsMutexId mlok") - interest(4) - special(SPC_NOMOD) - prompt("Monitor lock") - } - field(MLIS, DBF_NOACCESS) { - extra("ELLLIST mlis") - prompt("Monitor List") - special(SPC_NOMOD) - interest(4) - } - field(BKLNK, DBF_NOACCESS) { - prompt("Backwards link tracking") - special(SPC_NOMOD) - interest(4) - extra("ELLLIST bklnk") - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - prompt("Force Processing") - interest(3) - pp(TRUE) - } - field(STAT, DBF_MENU) { - initial("UDF") - prompt("Alarm Status") - special(SPC_NOMOD) - menu(menuAlarmStat) - } - field(SEVR, DBF_MENU) { - special(SPC_NOMOD) - prompt("Alarm Severity") - menu(menuAlarmSevr) - } - field(NSTA, DBF_MENU) { - menu(menuAlarmStat) - interest(2) - special(SPC_NOMOD) - prompt("New Alarm Status") - } - field(NSEV, DBF_MENU) { - prompt("New Alarm Severity") - interest(2) - special(SPC_NOMOD) - menu(menuAlarmSevr) - } - field(ACKS, DBF_MENU) { - menu(menuAlarmSevr) - interest(2) - special(SPC_NOMOD) - prompt("Alarm Ack Severity") - } - field(ACKT, DBF_MENU) { - initial("YES") - menu(menuYesNo) - special(SPC_NOMOD) - interest(2) - promptgroup("70 - Alarm") - prompt("Alarm Ack Transient") - } - field(DISS, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Disable Alarm Sevrty") - interest(1) - promptgroup("70 - Alarm") - } - field(LCNT, DBF_UCHAR) { - prompt("Lock Count") - special(SPC_NOMOD) - interest(2) - } - field(PACT, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Record active") - } - field(PUTF, DBF_UCHAR) { - prompt("dbPutField process") - interest(1) - special(SPC_NOMOD) - } - field(RPRO, DBF_UCHAR) { - prompt("Reprocess ") - special(SPC_NOMOD) - interest(1) - } - field(ASP, DBF_NOACCESS) { - extra("struct asgMember *asp") - special(SPC_NOMOD) - interest(4) - prompt("Access Security Pvt") - } - field(PPN, DBF_NOACCESS) { - prompt("pprocessNotify") - interest(4) - special(SPC_NOMOD) - extra("struct processNotify *ppn") - } - field(PPNR, DBF_NOACCESS) { - extra("struct processNotifyRecord *ppnr") - interest(4) - special(SPC_NOMOD) - prompt("pprocessNotifyRecord") - } - field(SPVT, DBF_NOACCESS) { - extra("struct scan_element *spvt") - special(SPC_NOMOD) - interest(4) - prompt("Scan Private") - } - field(RSET, DBF_NOACCESS) { - prompt("Address of RSET") - special(SPC_NOMOD) - interest(4) - extra("struct typed_rset *rset") - } - field(DSET, DBF_NOACCESS) { - extra("struct dset *dset") - special(SPC_NOMOD) - interest(4) - prompt("DSET address") - } - field(DPVT, DBF_NOACCESS) { - extra("void *dpvt") - interest(4) - special(SPC_NOMOD) - prompt("Device Private") - } - field(RDES, DBF_NOACCESS) { - extra("struct dbRecordType *rdes") - prompt("Address of dbRecordType") - special(SPC_NOMOD) - interest(4) - } - field(LSET, DBF_NOACCESS) { - prompt("Lock Set") - special(SPC_NOMOD) - interest(4) - extra("struct lockRecord *lset") - } - field(PRIO, DBF_MENU) { - menu(menuPriority) - prompt("Scheduling Priority") - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - extra("char bkpt") - prompt("Break Point") - special(SPC_NOMOD) - interest(1) - } - field(UDF, DBF_UCHAR) { - initial("1") - pp(TRUE) - promptgroup("10 - Common") - interest(1) - prompt("Undefined") - } - field(UDFS, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Undefined Alarm Sevrty") - promptgroup("70 - Alarm") - interest(1) - initial("INVALID") - } - field(TIME, DBF_NOACCESS) { - extra("epicsTimeStamp time") - prompt("Time") - special(SPC_NOMOD) - interest(2) - } - field(FLNK, DBF_FWDLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Forward Process Link") - } - field(VAL, DBF_ENUM) { - pp(TRUE) - prompt("Current Value") - promptgroup("40 - Input") - asl(ASL0) - } - field(NOBT, DBF_USHORT) { - promptgroup("40 - Input") - interest(1) - special(SPC_NOMOD) - prompt("Number of Bits") - } - field(INP, DBF_INLINK) { - promptgroup("40 - Input") - interest(1) - prompt("Input Specification") - } - field(ZRVL, DBF_ULONG) { - base(HEX) - pp(TRUE) - interest(1) - promptgroup("41 - Input 0-7") - special(SPC_MOD) - prompt("Zero Value") - } - field(ONVL, DBF_ULONG) { - interest(1) - special(SPC_MOD) - promptgroup("41 - Input 0-7") - prompt("One Value") - base(HEX) - pp(TRUE) - } - field(TWVL, DBF_ULONG) { - base(HEX) - pp(TRUE) - promptgroup("41 - Input 0-7") - interest(1) - special(SPC_MOD) - prompt("Two Value") - } - field(THVL, DBF_ULONG) { - prompt("Three Value") - interest(1) - special(SPC_MOD) - promptgroup("41 - Input 0-7") - base(HEX) - pp(TRUE) - } - field(FRVL, DBF_ULONG) { - base(HEX) - pp(TRUE) - interest(1) - special(SPC_MOD) - promptgroup("41 - Input 0-7") - prompt("Four Value") - } - field(FVVL, DBF_ULONG) { - pp(TRUE) - base(HEX) - interest(1) - special(SPC_MOD) - promptgroup("41 - Input 0-7") - prompt("Five Value") - } - field(SXVL, DBF_ULONG) { - base(HEX) - pp(TRUE) - interest(1) - promptgroup("41 - Input 0-7") - special(SPC_MOD) - prompt("Six Value") - } - field(SVVL, DBF_ULONG) { - prompt("Seven Value") - interest(1) - special(SPC_MOD) - promptgroup("41 - Input 0-7") - pp(TRUE) - base(HEX) - } - field(EIVL, DBF_ULONG) { - prompt("Eight Value") - special(SPC_MOD) - interest(1) - promptgroup("42 - Input 8-15") - pp(TRUE) - base(HEX) - } - field(NIVL, DBF_ULONG) { - interest(1) - special(SPC_MOD) - promptgroup("42 - Input 8-15") - prompt("Nine Value") - pp(TRUE) - base(HEX) - } - field(TEVL, DBF_ULONG) { - special(SPC_MOD) - interest(1) - promptgroup("42 - Input 8-15") - prompt("Ten Value") - base(HEX) - pp(TRUE) - } - field(ELVL, DBF_ULONG) { - pp(TRUE) - base(HEX) - prompt("Eleven Value") - interest(1) - special(SPC_MOD) - promptgroup("42 - Input 8-15") - } - field(TVVL, DBF_ULONG) { - prompt("Twelve Value") - interest(1) - promptgroup("42 - Input 8-15") - special(SPC_MOD) - base(HEX) - pp(TRUE) - } - field(TTVL, DBF_ULONG) { - pp(TRUE) - base(HEX) - prompt("Thirteen Value") - special(SPC_MOD) - interest(1) - promptgroup("42 - Input 8-15") - } - field(FTVL, DBF_ULONG) { - base(HEX) - pp(TRUE) - special(SPC_MOD) - interest(1) - promptgroup("42 - Input 8-15") - prompt("Fourteen Value") - } - field(FFVL, DBF_ULONG) { - base(HEX) - pp(TRUE) - prompt("Fifteen Value") - interest(1) - special(SPC_MOD) - promptgroup("42 - Input 8-15") - } - field(ZRST, DBF_STRING) { - interest(1) - special(SPC_MOD) - promptgroup("81 - Display 0-7") - prompt("Zero String") - pp(TRUE) - size(26) - } - field(ONST, DBF_STRING) { - promptgroup("81 - Display 0-7") - interest(1) - special(SPC_MOD) - prompt("One String") - pp(TRUE) - size(26) - } - field(TWST, DBF_STRING) { - special(SPC_MOD) - interest(1) - promptgroup("81 - Display 0-7") - prompt("Two String") - size(26) - pp(TRUE) - } - field(THST, DBF_STRING) { - pp(TRUE) - size(26) - interest(1) - special(SPC_MOD) - promptgroup("81 - Display 0-7") - prompt("Three String") - } - field(FRST, DBF_STRING) { - prompt("Four String") - interest(1) - promptgroup("81 - Display 0-7") - special(SPC_MOD) - size(26) - pp(TRUE) - } - field(FVST, DBF_STRING) { - pp(TRUE) - size(26) - prompt("Five String") - special(SPC_MOD) - interest(1) - promptgroup("81 - Display 0-7") - } - field(SXST, DBF_STRING) { - special(SPC_MOD) - interest(1) - promptgroup("81 - Display 0-7") - prompt("Six String") - size(26) - pp(TRUE) - } - field(SVST, DBF_STRING) { - prompt("Seven String") - interest(1) - special(SPC_MOD) - promptgroup("81 - Display 0-7") - pp(TRUE) - size(26) - } - field(EIST, DBF_STRING) { - special(SPC_MOD) - interest(1) - promptgroup("82 - Display 8-15") - prompt("Eight String") - pp(TRUE) - size(26) - } - field(NIST, DBF_STRING) { - special(SPC_MOD) - interest(1) - promptgroup("82 - Display 8-15") - prompt("Nine String") - size(26) - pp(TRUE) - } - field(TEST, DBF_STRING) { - interest(1) - promptgroup("82 - Display 8-15") - special(SPC_MOD) - prompt("Ten String") - pp(TRUE) - size(26) - } - field(ELST, DBF_STRING) { - size(26) - pp(TRUE) - interest(1) - promptgroup("82 - Display 8-15") - special(SPC_MOD) - prompt("Eleven String") - } - field(TVST, DBF_STRING) { - interest(1) - promptgroup("82 - Display 8-15") - special(SPC_MOD) - prompt("Twelve String") - pp(TRUE) - size(26) - } - field(TTST, DBF_STRING) { - size(26) - pp(TRUE) - prompt("Thirteen String") - special(SPC_MOD) - interest(1) - promptgroup("82 - Display 8-15") - } - field(FTST, DBF_STRING) { - size(26) - pp(TRUE) - promptgroup("82 - Display 8-15") - interest(1) - special(SPC_MOD) - prompt("Fourteen String") - } - field(FFST, DBF_STRING) { - prompt("Fifteen String") - special(SPC_MOD) - interest(1) - promptgroup("82 - Display 8-15") - pp(TRUE) - size(26) - } - field(ZRSV, DBF_MENU) { - pp(TRUE) - interest(1) - promptgroup("71 - Alarm 0-7") - prompt("State Zero Severity") - menu(menuAlarmSevr) - } - field(ONSV, DBF_MENU) { - prompt("State One Severity") - promptgroup("71 - Alarm 0-7") - interest(1) - menu(menuAlarmSevr) - pp(TRUE) - } - field(TWSV, DBF_MENU) { - pp(TRUE) - prompt("State Two Severity") - promptgroup("71 - Alarm 0-7") - interest(1) - menu(menuAlarmSevr) - } - field(THSV, DBF_MENU) { - pp(TRUE) - prompt("State Three Severity") - promptgroup("71 - Alarm 0-7") - interest(1) - menu(menuAlarmSevr) - } - field(FRSV, DBF_MENU) { - pp(TRUE) - promptgroup("71 - Alarm 0-7") - interest(1) - prompt("State Four Severity") - menu(menuAlarmSevr) - } - field(FVSV, DBF_MENU) { - pp(TRUE) - menu(menuAlarmSevr) - promptgroup("71 - Alarm 0-7") - interest(1) - prompt("State Five Severity") - } - field(SXSV, DBF_MENU) { - interest(1) - promptgroup("71 - Alarm 0-7") - prompt("State Six Severity") - menu(menuAlarmSevr) - pp(TRUE) - } - field(SVSV, DBF_MENU) { - pp(TRUE) - menu(menuAlarmSevr) - interest(1) - promptgroup("71 - Alarm 0-7") - prompt("State Seven Severity") - } - field(EISV, DBF_MENU) { - menu(menuAlarmSevr) - prompt("State Eight Severity") - interest(1) - promptgroup("72 - Alarm 8-15") - pp(TRUE) - } - field(NISV, DBF_MENU) { - prompt("State Nine Severity") - interest(1) - promptgroup("72 - Alarm 8-15") - menu(menuAlarmSevr) - pp(TRUE) - } - field(TESV, DBF_MENU) { - pp(TRUE) - interest(1) - promptgroup("72 - Alarm 8-15") - prompt("State Ten Severity") - menu(menuAlarmSevr) - } - field(ELSV, DBF_MENU) { - pp(TRUE) - promptgroup("72 - Alarm 8-15") - interest(1) - prompt("State Eleven Severity") - menu(menuAlarmSevr) - } - field(TVSV, DBF_MENU) { - pp(TRUE) - menu(menuAlarmSevr) - prompt("State Twelve Severity") - interest(1) - promptgroup("72 - Alarm 8-15") - } - field(TTSV, DBF_MENU) { - pp(TRUE) - menu(menuAlarmSevr) - interest(1) - promptgroup("72 - Alarm 8-15") - prompt("State Thirteen Sevr") - } - field(FTSV, DBF_MENU) { - pp(TRUE) - interest(1) - promptgroup("72 - Alarm 8-15") - prompt("State Fourteen Sevr") - menu(menuAlarmSevr) - } - field(FFSV, DBF_MENU) { - pp(TRUE) - prompt("State Fifteen Severity") - interest(1) - promptgroup("72 - Alarm 8-15") - menu(menuAlarmSevr) - } - field(AFTC, DBF_DOUBLE) { - prompt("Alarm Filter Time Constant") - interest(1) - promptgroup("70 - Alarm") - } - field(AFVL, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Alarm Filter Value") - } - field(UNSV, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Unknown State Severity") - promptgroup("70 - Alarm") - interest(1) - pp(TRUE) - } - field(COSV, DBF_MENU) { - pp(TRUE) - prompt("Change of State Svr") - promptgroup("70 - Alarm") - interest(1) - menu(menuAlarmSevr) - } - field(RVAL, DBF_ULONG) { - prompt("Raw Value") - pp(TRUE) - } - field(ORAW, DBF_ULONG) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Raw Value") - } - field(MASK, DBF_ULONG) { - special(SPC_NOMOD) - interest(1) - prompt("Hardware Mask") - } - field(MLST, DBF_USHORT) { - interest(3) - special(SPC_NOMOD) - prompt("Last Value Monitored") - } - field(LALM, DBF_USHORT) { - interest(3) - special(SPC_NOMOD) - prompt("Last Value Alarmed") - } - field(SDEF, DBF_SHORT) { - prompt("States Defined") - interest(3) - special(SPC_NOMOD) - } - field(SHFT, DBF_USHORT) { - interest(1) - promptgroup("40 - Input") - prompt("Shift") - } - field(SIOL, DBF_INLINK) { - prompt("Simulation Input Link") - promptgroup("90 - Simulate") - interest(1) - } - field(SVAL, DBF_ULONG) { - prompt("Simulation Value") - } - field(SIML, DBF_INLINK) { - prompt("Simulation Mode Link") - interest(1) - promptgroup("90 - Simulate") - } - field(SIMM, DBF_MENU) { - menu(menuSimm) - interest(1) - special(SPC_MOD) - prompt("Simulation Mode") - } - field(SIMS, DBF_MENU) { - prompt("Simulation Mode Severity") - interest(2) - promptgroup("90 - Simulate") - menu(menuAlarmSevr) - } - field(OLDSIMM, DBF_MENU) { - interest(4) - special(SPC_NOMOD) - prompt("Prev. Simulation Mode") - menu(menuSimm) - } - field(SSCN, DBF_MENU) { - interest(1) - promptgroup("90 - Simulate") - prompt("Sim. Mode Scan") - menu(menuScan) - initial("65535") - } - field(SDLY, DBF_DOUBLE) { - promptgroup("90 - Simulate") - interest(2) - prompt("Sim. Mode Async Delay") - initial("-1.0") - } - field(SIMPVT, DBF_NOACCESS) { - prompt("Sim. Mode Private") - interest(4) - special(SPC_NOMOD) - extra("CALLBACK *simpvt") - } -} -device(mbbi, CONSTANT, devMbbiSoft, "Soft Channel") -device(mbbi, CONSTANT, devMbbiSoftRaw, "Raw Soft Channel") -device(mbbi, CONSTANT, devMbbiSoftCallback, "Async Soft Channel") -device(mbbi, INST_IO, asynMbbiInt32, "asynInt32") -device(mbbi, INST_IO, asynMbbiUInt32Digital, "asynUInt32Digital") -device(mbbi, INST_IO, devmbbiStream, "stream") -device(mbbi, INST_IO, devMbbiTPG261, "asyn TPG261") -recordtype(swait) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - field(NAME, DBF_STRING) { - size(61) - special(SPC_NOMOD) - prompt("Record Name") - } - field(DESC, DBF_STRING) { - promptgroup("10 - Common") - prompt("Descriptor") - size(41) - } - field(ASG, DBF_STRING) { - size(29) - prompt("Access Security Group") - special(SPC_AS) - promptgroup("10 - Common") - } - field(SCAN, DBF_MENU) { - menu(menuScan) - prompt("Scan Mechanism") - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - } - field(PINI, DBF_MENU) { - prompt("Process at iocInit") - interest(1) - promptgroup("20 - Scan") - menu(menuPini) - } - field(PHAS, DBF_SHORT) { - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) - prompt("Scan Phase") - } - field(EVNT, DBF_STRING) { - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) - prompt("Event Name") - size(40) - } - field(TSE, DBF_SHORT) { - promptgroup("20 - Scan") - interest(1) - prompt("Time Stamp Event") - } - field(TSEL, DBF_INLINK) { - promptgroup("20 - Scan") - interest(1) - prompt("Time Stamp Link") - } - field(DTYP, DBF_DEVICE) { interest(1) promptgroup("10 - Common") prompt("Device Type") } field(DISV, DBF_SHORT) { initial("1") - promptgroup("20 - Scan") prompt("Disable Value") + promptgroup("20 - Scan") } field(DISA, DBF_SHORT) { prompt("Disable") @@ -19937,73 +23009,73 @@ interest(1) } field(MLOK, DBF_NOACCESS) { - extra("epicsMutexId mlok") + interest(4) + special(SPC_NOMOD) prompt("Monitor lock") - interest(4) - special(SPC_NOMOD) + extra("epicsMutexId mlok") } field(MLIS, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) extra("ELLLIST mlis") prompt("Monitor List") - special(SPC_NOMOD) - interest(4) } field(BKLNK, DBF_NOACCESS) { - prompt("Backwards link tracking") special(SPC_NOMOD) interest(4) extra("ELLLIST bklnk") + prompt("Backwards link tracking") } field(DISP, DBF_UCHAR) { prompt("Disable putField") } field(PROC, DBF_UCHAR) { - pp(TRUE) - interest(3) prompt("Force Processing") + pp(TRUE) + interest(3) } field(STAT, DBF_MENU) { menu(menuAlarmStat) + special(SPC_NOMOD) prompt("Alarm Status") - special(SPC_NOMOD) initial("UDF") } field(SEVR, DBF_MENU) { + menu(menuAlarmSevr) special(SPC_NOMOD) prompt("Alarm Severity") - menu(menuAlarmSevr) } field(NSTA, DBF_MENU) { - special(SPC_NOMOD) - interest(2) + interest(2) + menu(menuAlarmStat) + special(SPC_NOMOD) prompt("New Alarm Status") - menu(menuAlarmStat) } field(NSEV, DBF_MENU) { - menu(menuAlarmSevr) - interest(2) - special(SPC_NOMOD) prompt("New Alarm Severity") + interest(2) + menu(menuAlarmSevr) + special(SPC_NOMOD) } field(ACKS, DBF_MENU) { - menu(menuAlarmSevr) - interest(2) - special(SPC_NOMOD) prompt("Alarm Ack Severity") + special(SPC_NOMOD) + interest(2) + menu(menuAlarmSevr) } field(ACKT, DBF_MENU) { menu(menuYesNo) + interest(2) + special(SPC_NOMOD) + promptgroup("70 - Alarm") + initial("YES") prompt("Alarm Ack Transient") - interest(2) - promptgroup("70 - Alarm") - special(SPC_NOMOD) - initial("YES") } field(DISS, DBF_MENU) { - menu(menuAlarmSevr) - promptgroup("70 - Alarm") - interest(1) prompt("Disable Alarm Sevrty") + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") } field(LCNT, DBF_UCHAR) { prompt("Lock Count") @@ -20017,8 +23089,8 @@ } field(PUTF, DBF_UCHAR) { prompt("dbPutField process") - interest(1) - special(SPC_NOMOD) + special(SPC_NOMOD) + interest(1) } field(RPRO, DBF_UCHAR) { prompt("Reprocess ") @@ -20026,110 +23098,110 @@ interest(1) } field(ASP, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) prompt("Access Security Pvt") - special(SPC_NOMOD) - interest(4) extra("struct asgMember *asp") } field(PPN, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + prompt("pprocessNotify") extra("struct processNotify *ppn") - special(SPC_NOMOD) - interest(4) - prompt("pprocessNotify") } field(PPNR, DBF_NOACCESS) { + prompt("pprocessNotifyRecord") extra("struct processNotifyRecord *ppnr") - prompt("pprocessNotifyRecord") - special(SPC_NOMOD) - interest(4) + interest(4) + special(SPC_NOMOD) } field(SPVT, DBF_NOACCESS) { + prompt("Scan Private") extra("struct scan_element *spvt") interest(4) special(SPC_NOMOD) - prompt("Scan Private") } field(RSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) prompt("Address of RSET") - special(SPC_NOMOD) - interest(4) extra("struct typed_rset *rset") } field(DSET, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) extra("struct dset *dset") prompt("DSET address") - special(SPC_NOMOD) - interest(4) } field(DPVT, DBF_NOACCESS) { + extra("void *dpvt") prompt("Device Private") - special(SPC_NOMOD) - interest(4) - extra("void *dpvt") + interest(4) + special(SPC_NOMOD) } field(RDES, DBF_NOACCESS) { + prompt("Address of dbRecordType") extra("struct dbRecordType *rdes") - interest(4) - special(SPC_NOMOD) - prompt("Address of dbRecordType") + special(SPC_NOMOD) + interest(4) } field(LSET, DBF_NOACCESS) { special(SPC_NOMOD) interest(4) + extra("struct lockRecord *lset") prompt("Lock Set") - extra("struct lockRecord *lset") } field(PRIO, DBF_MENU) { - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) prompt("Scheduling Priority") + promptgroup("20 - Scan") + special(SPC_SCAN) menu(menuPriority) + interest(1) } field(TPRO, DBF_UCHAR) { prompt("Trace Processing") } field(BKPT, DBF_NOACCESS) { - interest(1) - special(SPC_NOMOD) + extra("char bkpt") prompt("Break Point") - extra("char bkpt") + special(SPC_NOMOD) + interest(1) } field(UDF, DBF_UCHAR) { - pp(TRUE) - initial("1") - interest(1) - promptgroup("10 - Common") prompt("Undefined") + initial("1") + pp(TRUE) + promptgroup("10 - Common") + interest(1) } field(UDFS, DBF_MENU) { initial("INVALID") prompt("Undefined Alarm Sevrty") - interest(1) - promptgroup("70 - Alarm") - menu(menuAlarmSevr) + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") } field(TIME, DBF_NOACCESS) { + prompt("Time") extra("epicsTimeStamp time") - interest(2) - special(SPC_NOMOD) - prompt("Time") + special(SPC_NOMOD) + interest(2) } field(FLNK, DBF_FWDLINK) { + promptgroup("20 - Scan") + interest(1) prompt("Forward Process Link") - interest(1) - promptgroup("20 - Scan") } field(VERS, DBF_FLOAT) { initial("1") - special(SPC_NOMOD) prompt("Code Version") + special(SPC_NOMOD) } field(HOPR, DBF_FLOAT) { asl(ASL0) - interest(1) - promptgroup("70 - Alarm") prompt("High Operating Range") + interest(1) + promptgroup("70 - Alarm") } field(LOPR, DBF_FLOAT) { promptgroup("41 - Bits (1)") @@ -20138,210 +23210,210 @@ asl(ASL0) } field(INIT, DBF_SHORT) { - special(SPC_NOMOD) - interest(3) prompt("Initialized?") + special(SPC_NOMOD) + interest(3) } field(CBST, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) + size(4) + extra("void * cbst") prompt("Pointer to cbStruct") - extra("void * cbst") - size(4) + interest(4) + special(SPC_NOMOD) } field(INAN, DBF_STRING) { - size(40) - asl(ASL0) prompt("INPA PV Name") + asl(ASL0) + size(40) promptgroup("30 - Action") interest(1) special(SPC_MOD) } field(INBN, DBF_STRING) { - asl(ASL0) + interest(1) + special(SPC_MOD) + promptgroup("30 - Action") + asl(ASL0) + size(40) prompt("INPB PV Name") - promptgroup("30 - Action") - interest(1) - special(SPC_MOD) - size(40) } field(INCN, DBF_STRING) { - size(40) prompt("INPC PV Name") - special(SPC_MOD) - interest(1) - promptgroup("30 - Action") - asl(ASL0) + asl(ASL0) + size(40) + promptgroup("30 - Action") + interest(1) + special(SPC_MOD) } field(INDN, DBF_STRING) { + promptgroup("30 - Action") + interest(1) + special(SPC_MOD) prompt("INPD PV Name") - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") asl(ASL0) size(40) } field(INEN, DBF_STRING) { prompt("INPE PV Name") - special(SPC_MOD) - interest(1) - promptgroup("30 - Action") - asl(ASL0) - size(40) + asl(ASL0) + size(40) + promptgroup("30 - Action") + interest(1) + special(SPC_MOD) } field(INFN, DBF_STRING) { - size(40) - asl(ASL0) - special(SPC_MOD) - interest(1) - promptgroup("30 - Action") + special(SPC_MOD) + interest(1) + promptgroup("30 - Action") + size(40) + asl(ASL0) prompt("INPF PV Name") } field(INGN, DBF_STRING) { - size(40) - interest(1) - promptgroup("30 - Action") - special(SPC_MOD) + promptgroup("30 - Action") + special(SPC_MOD) + interest(1) prompt("INPG PV Name") + size(40) asl(ASL0) } field(INHN, DBF_STRING) { + interest(1) + special(SPC_MOD) + promptgroup("30 - Action") + asl(ASL0) + size(40) prompt("INPH PV Name") - promptgroup("30 - Action") - interest(1) - special(SPC_MOD) - asl(ASL0) - size(40) } field(ININ, DBF_STRING) { - asl(ASL0) + promptgroup("30 - Action") + special(SPC_MOD) + interest(1) prompt("INPI PV Name") - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - size(40) + size(40) + asl(ASL0) } field(INJN, DBF_STRING) { - size(40) - asl(ASL0) prompt("INPJ PV Name") - special(SPC_MOD) - interest(1) - promptgroup("30 - Action") + asl(ASL0) + size(40) + promptgroup("30 - Action") + interest(1) + special(SPC_MOD) } field(INKN, DBF_STRING) { - size(40) - asl(ASL0) - interest(1) - promptgroup("30 - Action") + promptgroup("30 - Action") + interest(1) special(SPC_MOD) prompt("INPK PV Name") + asl(ASL0) + size(40) } field(INLN, DBF_STRING) { - size(40) - special(SPC_MOD) - interest(1) - promptgroup("30 - Action") + special(SPC_MOD) + interest(1) + promptgroup("30 - Action") + size(40) + asl(ASL0) prompt("INPL PV Name") - asl(ASL0) } field(DOLN, DBF_STRING) { - asl(ASL0) + promptgroup("30 - Action") + special(SPC_MOD) + interest(1) prompt("DOL PV Name") - promptgroup("30 - Action") - interest(1) - special(SPC_MOD) - size(40) + size(40) + asl(ASL0) } field(OUTN, DBF_STRING) { - size(40) + special(SPC_MOD) + interest(1) + promptgroup("30 - Action") + size(40) + asl(ASL0) prompt("OUT PV Name") - interest(1) - special(SPC_MOD) - promptgroup("30 - Action") - asl(ASL0) } field(INAV, DBF_MENU) { + interest(1) menu(swaitINAV) + special(SPC_NOMOD) prompt("INPA PV Status") - special(SPC_NOMOD) - interest(1) } field(INBV, DBF_MENU) { + prompt("INPB PV Status") + special(SPC_NOMOD) menu(swaitINAV) - special(SPC_NOMOD) - interest(1) - prompt("INPB PV Status") + interest(1) } field(INCV, DBF_MENU) { - interest(1) - special(SPC_NOMOD) + special(SPC_NOMOD) + interest(1) + menu(swaitINAV) prompt("INPC PV Status") - menu(swaitINAV) } field(INDV, DBF_MENU) { prompt("INPD PV Status") - interest(1) - special(SPC_NOMOD) + special(SPC_NOMOD) + interest(1) menu(swaitINAV) } field(INEV, DBF_MENU) { + prompt("INPE PV Status") + special(SPC_NOMOD) menu(swaitINAV) - prompt("INPE PV Status") - special(SPC_NOMOD) interest(1) } field(INFV, DBF_MENU) { prompt("INPF PV Status") - special(SPC_NOMOD) interest(1) menu(swaitINAV) + special(SPC_NOMOD) } field(INGV, DBF_MENU) { - prompt("INPG PV Status") - special(SPC_NOMOD) interest(1) menu(swaitINAV) + special(SPC_NOMOD) + prompt("INPG PV Status") } field(INHV, DBF_MENU) { prompt("INPH PV Status") - special(SPC_NOMOD) interest(1) menu(swaitINAV) + special(SPC_NOMOD) } field(INIV, DBF_MENU) { + special(SPC_NOMOD) menu(swaitINAV) interest(1) - special(SPC_NOMOD) prompt("INPI PV Status") } field(INJV, DBF_MENU) { + menu(swaitINAV) + interest(1) + special(SPC_NOMOD) prompt("INPJ PV Status") - interest(1) - special(SPC_NOMOD) - menu(swaitINAV) } field(INKV, DBF_MENU) { + special(SPC_NOMOD) menu(swaitINAV) + interest(1) prompt("INPK PV Status") - special(SPC_NOMOD) - interest(1) } field(INLV, DBF_MENU) { - prompt("INPL PV Status") special(SPC_NOMOD) interest(1) menu(swaitINAV) + prompt("INPL PV Status") } field(DOLV, DBF_MENU) { + menu(swaitINAV) + interest(1) + special(SPC_NOMOD) prompt("DOL PV Status") - interest(1) - special(SPC_NOMOD) - menu(swaitINAV) } field(OUTV, DBF_MENU) { + interest(1) menu(swaitINAV) - interest(1) special(SPC_NOMOD) prompt("OUT PV Status") } @@ -20358,8 +23430,8 @@ pp(TRUE) } field(D, DBF_DOUBLE) { + pp(TRUE) prompt("Value of Input D") - pp(TRUE) } field(E, DBF_DOUBLE) { prompt("Value of Input E") @@ -20370,16 +23442,16 @@ prompt("Value of Input F") } field(G, DBF_DOUBLE) { + pp(TRUE) prompt("Value of Input G") - pp(TRUE) } field(H, DBF_DOUBLE) { + pp(TRUE) prompt("Value of Input H") - pp(TRUE) } field(I, DBF_DOUBLE) { - pp(TRUE) prompt("Value of Input I") + pp(TRUE) } field(J, DBF_DOUBLE) { pp(TRUE) @@ -20390,8 +23462,8 @@ prompt("Value of Input K") } field(L, DBF_DOUBLE) { - pp(TRUE) prompt("Value of Input L") + pp(TRUE) } field(LA, DBF_DOUBLE) { prompt("Last Val of Input A") @@ -20430,107 +23502,107 @@ prompt("Last Val of Input L") } field(INAP, DBF_MENU) { - initial("Yes") - menu(swaitINAP) - interest(1) - promptgroup("30 - Action") - prompt("INPA causes I/O INTR") - } - field(INBP, DBF_MENU) { - menu(swaitINAP) - interest(1) - promptgroup("30 - Action") - prompt("INPB causes I/O INTR") - initial("Yes") - } - field(INCP, DBF_MENU) { - prompt("INPC causes I/O INTR") promptgroup("30 - Action") interest(1) menu(swaitINAP) + prompt("INPA causes I/O INTR") + initial("Yes") + } + field(INBP, DBF_MENU) { + prompt("INPB causes I/O INTR") + initial("Yes") + promptgroup("30 - Action") + interest(1) + menu(swaitINAP) + } + field(INCP, DBF_MENU) { + promptgroup("30 - Action") + interest(1) + menu(swaitINAP) + prompt("INPC causes I/O INTR") initial("Yes") } field(INDP, DBF_MENU) { - initial("Yes") - prompt("INPD causes I/O INTR") promptgroup("30 - Action") interest(1) menu(swaitINAP) + prompt("INPD causes I/O INTR") + initial("Yes") } field(INEP, DBF_MENU) { initial("Yes") - interest(1) - promptgroup("30 - Action") prompt("INPE causes I/O INTR") menu(swaitINAP) + interest(1) + promptgroup("30 - Action") } field(INFP, DBF_MENU) { + promptgroup("30 - Action") + interest(1) menu(swaitINAP) prompt("INPF causes I/O INTR") - promptgroup("30 - Action") - interest(1) initial("Yes") } field(INGP, DBF_MENU) { - initial("Yes") + promptgroup("30 - Action") menu(swaitINAP) + interest(1) prompt("INPG causes I/O INTR") - interest(1) - promptgroup("30 - Action") + initial("Yes") } field(INHP, DBF_MENU) { menu(swaitINAP) interest(1) promptgroup("30 - Action") + initial("Yes") prompt("INPH causes I/O INTR") - initial("Yes") } field(INIP, DBF_MENU) { initial("Yes") + prompt("INPI causes I/O INTR") menu(swaitINAP) interest(1) promptgroup("30 - Action") - prompt("INPI causes I/O INTR") } field(INJP, DBF_MENU) { + interest(1) + menu(swaitINAP) + promptgroup("30 - Action") initial("Yes") prompt("INPJ causes I/O INTR") + } + field(INKP, DBF_MENU) { promptgroup("30 - Action") interest(1) menu(swaitINAP) - } - field(INKP, DBF_MENU) { prompt("INPK causes I/O INTR") - promptgroup("30 - Action") - interest(1) - menu(swaitINAP) initial("Yes") } field(INLP, DBF_MENU) { - interest(1) - promptgroup("30 - Action") + promptgroup("30 - Action") + menu(swaitINAP) + interest(1) prompt("INPL causes I/O INTR") - menu(swaitINAP) initial("Yes") } field(CALC, DBF_STRING) { + prompt("Calculation") initial("0") + asl(ASL0) size(36) promptgroup("30 - Action") special(SPC_CALC) - prompt("Calculation") - asl(ASL0) } field(RPCL, DBF_NOACCESS) { - extra("char rpcl[184]") + interest(4) + special(SPC_NOMOD) size(184) - interest(4) - special(SPC_NOMOD) + extra("char rpcl[184]") prompt("Reverse Polish Calc") } field(CLCV, DBF_LONG) { + interest(1) prompt("CALC Valid") - interest(1) } field(VAL, DBF_DOUBLE) { prompt("Value Field") @@ -20544,33 +23616,33 @@ interest(1) } field(OOPT, DBF_MENU) { + prompt("Output Execute Opt") + interest(1) menu(swaitOOPT) promptgroup("30 - Action") - interest(1) - prompt("Output Execute Opt") } field(ODLY, DBF_FLOAT) { + asl(ASL0) prompt("Output Execute Delay") - promptgroup("70 - Alarm") - interest(1) - asl(ASL0) + interest(1) + promptgroup("70 - Alarm") } field(DOPT, DBF_MENU) { + interest(1) menu(swaitDOPT) - interest(1) promptgroup("30 - Action") prompt("Output Data Option") } field(DOLD, DBF_DOUBLE) { - interest(1) - promptgroup("30 - Action") + asl(ASL0) prompt("Desired Output Data") - asl(ASL0) + interest(1) + promptgroup("30 - Action") } field(OEVT, DBF_USHORT) { prompt("Event To Issue") - promptgroup("30 - Action") - asl(ASL0) + asl(ASL0) + promptgroup("30 - Action") } field(ADEL, DBF_DOUBLE) { prompt("Archive Deadband") @@ -20583,9 +23655,9 @@ prompt("Monitor Deadband") } field(ALST, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) prompt("Last Value Archived") - interest(3) - special(SPC_NOMOD) } field(MLST, DBF_DOUBLE) { prompt("Last Val Monitored") @@ -20593,17 +23665,17 @@ interest(3) } field(SIOL, DBF_INLINK) { + promptgroup("30 - Action") + interest(1) prompt("Sim Input Specifctn") - interest(1) - promptgroup("30 - Action") } field(SVAL, DBF_DOUBLE) { prompt("Simulation Value") } field(SIML, DBF_INLINK) { + promptgroup("30 - Action") + interest(1) prompt("Sim Mode Location") - promptgroup("30 - Action") - interest(1) } field(SIMM, DBF_MENU) { menu(menuYesNo) @@ -20611,66 +23683,66 @@ prompt("Simulation Mode") } field(SIMS, DBF_MENU) { - menu(menuAlarmSevr) + promptgroup("40 - Input") + menu(menuAlarmSevr) + interest(2) prompt("Sim mode Alarm Svrty") - interest(2) - promptgroup("40 - Input") } } device(swait, CONSTANT, devSWaitIoEvent, "Soft Channel") -recordtype(ai) { +recordtype(calc) { %#include "epicsTypes.h" %#include "link.h" %#include "epicsMutex.h" %#include "ellLib.h" %#include "epicsTime.h" - %#include "callback.h" + %#include "postfix.h" field(NAME, DBF_STRING) { + prompt("Record Name") size(61) - prompt("Record Name") special(SPC_NOMOD) } field(DESC, DBF_STRING) { + promptgroup("10 - Common") size(41) prompt("Descriptor") - promptgroup("10 - Common") } field(ASG, DBF_STRING) { - prompt("Access Security Group") special(SPC_AS) promptgroup("10 - Common") size(29) + prompt("Access Security Group") } field(SCAN, DBF_MENU) { - menu(menuScan) - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) prompt("Scan Mechanism") + interest(1) + menu(menuScan) + special(SPC_SCAN) + promptgroup("20 - Scan") } field(PINI, DBF_MENU) { + prompt("Process at iocInit") + promptgroup("20 - Scan") menu(menuPini) - promptgroup("20 - Scan") - interest(1) - prompt("Process at iocInit") + interest(1) } field(PHAS, DBF_SHORT) { + promptgroup("20 - Scan") + interest(1) + special(SPC_SCAN) prompt("Scan Phase") - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") } field(EVNT, DBF_STRING) { + interest(1) + special(SPC_SCAN) + promptgroup("20 - Scan") + size(40) prompt("Event Name") - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - size(40) } field(TSE, DBF_SHORT) { - interest(1) - promptgroup("20 - Scan") prompt("Time Stamp Event") + promptgroup("20 - Scan") + interest(1) } field(TSEL, DBF_INLINK) { prompt("Time Stamp Link") @@ -20683,9 +23755,9 @@ prompt("Device Type") } field(DISV, DBF_SHORT) { + initial("1") prompt("Disable Value") promptgroup("20 - Scan") - initial("1") } field(DISA, DBF_SHORT) { prompt("Disable") @@ -20696,1011 +23768,14 @@ prompt("Scanning Disable") } field(MLOK, DBF_NOACCESS) { - prompt("Monitor lock") interest(4) special(SPC_NOMOD) extra("epicsMutexId mlok") - } - field(MLIS, DBF_NOACCESS) { - extra("ELLLIST mlis") - interest(4) - special(SPC_NOMOD) - prompt("Monitor List") - } - field(BKLNK, DBF_NOACCESS) { - extra("ELLLIST bklnk") - interest(4) - special(SPC_NOMOD) - prompt("Backwards link tracking") - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - prompt("Force Processing") - interest(3) - pp(TRUE) - } - field(STAT, DBF_MENU) { - special(SPC_NOMOD) - prompt("Alarm Status") - menu(menuAlarmStat) - initial("UDF") - } - field(SEVR, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Alarm Severity") - special(SPC_NOMOD) - } - field(NSTA, DBF_MENU) { - menu(menuAlarmStat) - prompt("New Alarm Status") - special(SPC_NOMOD) - interest(2) - } - field(NSEV, DBF_MENU) { - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Severity") - menu(menuAlarmSevr) - } - field(ACKS, DBF_MENU) { - interest(2) - special(SPC_NOMOD) - prompt("Alarm Ack Severity") - menu(menuAlarmSevr) - } - field(ACKT, DBF_MENU) { - initial("YES") - interest(2) - promptgroup("70 - Alarm") - special(SPC_NOMOD) - prompt("Alarm Ack Transient") - menu(menuYesNo) - } - field(DISS, DBF_MENU) { - interest(1) - promptgroup("70 - Alarm") - prompt("Disable Alarm Sevrty") - menu(menuAlarmSevr) - } - field(LCNT, DBF_UCHAR) { - prompt("Lock Count") - special(SPC_NOMOD) - interest(2) - } - field(PACT, DBF_UCHAR) { - special(SPC_NOMOD) - interest(1) - prompt("Record active") - } - field(PUTF, DBF_UCHAR) { - special(SPC_NOMOD) - interest(1) - prompt("dbPutField process") - } - field(RPRO, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Reprocess ") - } - field(ASP, DBF_NOACCESS) { - prompt("Access Security Pvt") - interest(4) - special(SPC_NOMOD) - extra("struct asgMember *asp") - } - field(PPN, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("pprocessNotify") - extra("struct processNotify *ppn") - } - field(PPNR, DBF_NOACCESS) { - prompt("pprocessNotifyRecord") - interest(4) - special(SPC_NOMOD) - extra("struct processNotifyRecord *ppnr") - } - field(SPVT, DBF_NOACCESS) { - extra("struct scan_element *spvt") - prompt("Scan Private") - interest(4) - special(SPC_NOMOD) - } - field(RSET, DBF_NOACCESS) { - extra("struct typed_rset *rset") - prompt("Address of RSET") - special(SPC_NOMOD) - interest(4) - } - field(DSET, DBF_NOACCESS) { - prompt("DSET address") - interest(4) - special(SPC_NOMOD) - extra("struct dset *dset") - } - field(DPVT, DBF_NOACCESS) { - prompt("Device Private") - interest(4) - special(SPC_NOMOD) - extra("void *dpvt") - } - field(RDES, DBF_NOACCESS) { - prompt("Address of dbRecordType") - interest(4) - special(SPC_NOMOD) - extra("struct dbRecordType *rdes") - } - field(LSET, DBF_NOACCESS) { - extra("struct lockRecord *lset") - interest(4) - special(SPC_NOMOD) - prompt("Lock Set") - } - field(PRIO, DBF_MENU) { - menu(menuPriority) - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) - prompt("Scheduling Priority") - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - prompt("Break Point") - special(SPC_NOMOD) - interest(1) - extra("char bkpt") - } - field(UDF, DBF_UCHAR) { - pp(TRUE) - initial("1") - interest(1) - promptgroup("10 - Common") - prompt("Undefined") - } - field(UDFS, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Undefined Alarm Sevrty") - interest(1) - promptgroup("70 - Alarm") - initial("INVALID") - } - field(TIME, DBF_NOACCESS) { - extra("epicsTimeStamp time") - prompt("Time") - special(SPC_NOMOD) - interest(2) - } - field(FLNK, DBF_FWDLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Forward Process Link") - } - field(VAL, DBF_DOUBLE) { - pp(TRUE) - promptgroup("40 - Input") - prompt("Current EGU Value") - asl(ASL0) - } - field(INP, DBF_INLINK) { - prompt("Input Specification") - interest(1) - promptgroup("40 - Input") - } - field(PREC, DBF_SHORT) { - prompt("Display Precision") - interest(1) - prop(YES) - promptgroup("80 - Display") - } - field(LINR, DBF_MENU) { - pp(TRUE) - interest(1) - special(SPC_LINCONV) - promptgroup("60 - Convert") - prompt("Linearization") - menu(menuConvert) - } - field(EGUF, DBF_DOUBLE) { - pp(TRUE) - prompt("Engineer Units Full") - interest(1) - special(SPC_LINCONV) - promptgroup("60 - Convert") - } - field(EGUL, DBF_DOUBLE) { - interest(1) - promptgroup("60 - Convert") - special(SPC_LINCONV) - prompt("Engineer Units Low") - pp(TRUE) - } - field(EGU, DBF_STRING) { - size(16) - prop(YES) - promptgroup("80 - Display") - interest(1) - prompt("Engineering Units") - } - field(HOPR, DBF_DOUBLE) { - promptgroup("80 - Display") - prop(YES) - interest(1) - prompt("High Operating Range") - } - field(LOPR, DBF_DOUBLE) { - prompt("Low Operating Range") - prop(YES) - interest(1) - promptgroup("80 - Display") - } - field(AOFF, DBF_DOUBLE) { - interest(1) - promptgroup("60 - Convert") - prompt("Adjustment Offset") - pp(TRUE) - } - field(ASLO, DBF_DOUBLE) { - pp(TRUE) - initial("1") - prompt("Adjustment Slope") - interest(1) - promptgroup("60 - Convert") - } - field(SMOO, DBF_DOUBLE) { - prompt("Smoothing") - interest(1) - promptgroup("60 - Convert") - } - field(HIHI, DBF_DOUBLE) { - pp(TRUE) - interest(1) - prop(YES) - promptgroup("70 - Alarm") - prompt("Hihi Alarm Limit") - } - field(LOLO, DBF_DOUBLE) { - pp(TRUE) - promptgroup("70 - Alarm") - prop(YES) - interest(1) - prompt("Lolo Alarm Limit") - } - field(HIGH, DBF_DOUBLE) { - pp(TRUE) - prompt("High Alarm Limit") - interest(1) - prop(YES) - promptgroup("70 - Alarm") - } - field(LOW, DBF_DOUBLE) { - prop(YES) - interest(1) - promptgroup("70 - Alarm") - prompt("Low Alarm Limit") - pp(TRUE) - } - field(HHSV, DBF_MENU) { - pp(TRUE) - prompt("Hihi Severity") - prop(YES) - interest(1) - promptgroup("70 - Alarm") - menu(menuAlarmSevr) - } - field(LLSV, DBF_MENU) { - pp(TRUE) - menu(menuAlarmSevr) - prompt("Lolo Severity") - prop(YES) - promptgroup("70 - Alarm") - interest(1) - } - field(HSV, DBF_MENU) { - pp(TRUE) - menu(menuAlarmSevr) - prop(YES) - promptgroup("70 - Alarm") - interest(1) - prompt("High Severity") - } - field(LSV, DBF_MENU) { - pp(TRUE) - prompt("Low Severity") - interest(1) - prop(YES) - promptgroup("70 - Alarm") - menu(menuAlarmSevr) - } - field(HYST, DBF_DOUBLE) { - interest(1) - promptgroup("70 - Alarm") - prompt("Alarm Deadband") - } - field(AFTC, DBF_DOUBLE) { - interest(1) - promptgroup("70 - Alarm") - prompt("Alarm Filter Time Constant") - } - field(ADEL, DBF_DOUBLE) { - prompt("Archive Deadband") - interest(1) - promptgroup("80 - Display") - } - field(MDEL, DBF_DOUBLE) { - prompt("Monitor Deadband") - interest(1) - promptgroup("80 - Display") - } - field(LALM, DBF_DOUBLE) { - prompt("Last Value Alarmed") - special(SPC_NOMOD) - interest(3) - } - field(AFVL, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Alarm Filter Value") - } - field(ALST, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Last Value Archived") - } - field(MLST, DBF_DOUBLE) { - special(SPC_NOMOD) - interest(3) - prompt("Last Val Monitored") - } - field(ESLO, DBF_DOUBLE) { - prompt("Raw to EGU Slope") - promptgroup("60 - Convert") - interest(2) - initial("1") - pp(TRUE) - } - field(EOFF, DBF_DOUBLE) { - promptgroup("60 - Convert") - interest(2) - prompt("Raw to EGU Offset") - pp(TRUE) - } - field(ROFF, DBF_ULONG) { - prompt("Raw Offset") - interest(2) - pp(TRUE) - } - field(PBRK, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Ptrto brkTable") - extra("void * pbrk") - } - field(INIT, DBF_SHORT) { - interest(3) - special(SPC_NOMOD) - prompt("Initialized?") - } - field(LBRK, DBF_SHORT) { - special(SPC_NOMOD) - interest(3) - prompt("LastBreak Point") - } - field(RVAL, DBF_LONG) { - pp(TRUE) - prompt("Current Raw Value") - } - field(ORAW, DBF_LONG) { - prompt("Previous Raw Value") - interest(3) - special(SPC_NOMOD) - } - field(SIOL, DBF_INLINK) { - interest(1) - promptgroup("90 - Simulate") - prompt("Simulation Input Link") - } - field(SVAL, DBF_DOUBLE) { - prompt("Simulation Value") - } - field(SIML, DBF_INLINK) { - prompt("Simulation Mode Link") - promptgroup("90 - Simulate") - interest(1) - } - field(SIMM, DBF_MENU) { - menu(menuSimm) - prompt("Simulation Mode") - interest(1) - special(SPC_MOD) - } - field(SIMS, DBF_MENU) { - menu(menuAlarmSevr) - promptgroup("90 - Simulate") - interest(2) - prompt("Simulation Mode Severity") - } - field(OLDSIMM, DBF_MENU) { - menu(menuSimm) - interest(4) - special(SPC_NOMOD) - prompt("Prev. Simulation Mode") - } - field(SSCN, DBF_MENU) { - initial("65535") - prompt("Sim. Mode Scan") - promptgroup("90 - Simulate") - interest(1) - menu(menuScan) - } - field(SDLY, DBF_DOUBLE) { - initial("-1.0") - interest(2) - promptgroup("90 - Simulate") - prompt("Sim. Mode Async Delay") - } - field(SIMPVT, DBF_NOACCESS) { - extra("CALLBACK *simpvt") - interest(4) - special(SPC_NOMOD) - prompt("Sim. Mode Private") - } -} -device(ai, CONSTANT, devAiSoft, "Soft Channel") -device(ai, CONSTANT, devAiSoftRaw, "Raw Soft Channel") -device(ai, CONSTANT, devAiSoftCallback, "Async Soft Channel") -device(ai, INST_IO, devTimestampAI, "Soft Timestamp") -device(ai, INST_IO, devAiGeneralTime, "General Time") -device(ai, INST_IO, asynAiInt32, "asynInt32") -device(ai, INST_IO, asynAiInt32Average, "asynInt32Average") -device(ai, INST_IO, asynAiFloat64, "asynFloat64") -device(ai, INST_IO, asynAiFloat64Average, "asynFloat64Average") -device(ai, INST_IO, devaiStream, "stream") -device(ai, INST_IO, devAiStrParm, "asyn ai stringParm") -device(ai, INST_IO, devAiHeidND261, "asyn ai HeidND261") -device(ai, INST_IO, devAiMKS, "HPS SensaVac 937") -device(ai, INST_IO, devAiMPC, "asyn MPC") -device(ai, GPIB_IO, devAiGP307Gpib, "Vg307 GPIB Instrument") -device(ai, BBGPIB_IO, devAiAX301, "PZT Bug") -device(ai, INST_IO, devAiTelevac, "asyn Televac") -device(ai, INST_IO, devAiTPG261, "asyn TPG261") -recordtype(dfanout) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - field(NAME, DBF_STRING) { - prompt("Record Name") - special(SPC_NOMOD) - size(61) - } - field(DESC, DBF_STRING) { - prompt("Descriptor") - promptgroup("10 - Common") - size(41) - } - field(ASG, DBF_STRING) { - size(29) - promptgroup("10 - Common") - special(SPC_AS) - prompt("Access Security Group") - } - field(SCAN, DBF_MENU) { - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - prompt("Scan Mechanism") - menu(menuScan) - } - field(PINI, DBF_MENU) { - prompt("Process at iocInit") - interest(1) - promptgroup("20 - Scan") - menu(menuPini) - } - field(PHAS, DBF_SHORT) { - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) - prompt("Scan Phase") - } - field(EVNT, DBF_STRING) { - prompt("Event Name") - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - size(40) - } - field(TSE, DBF_SHORT) { - prompt("Time Stamp Event") - interest(1) - promptgroup("20 - Scan") - } - field(TSEL, DBF_INLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Time Stamp Link") - } - field(DTYP, DBF_DEVICE) { - prompt("Device Type") - interest(1) - promptgroup("10 - Common") - } - field(DISV, DBF_SHORT) { - initial("1") - promptgroup("20 - Scan") - prompt("Disable Value") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - promptgroup("20 - Scan") - interest(1) - prompt("Scanning Disable") - } - field(MLOK, DBF_NOACCESS) { - extra("epicsMutexId mlok") - special(SPC_NOMOD) - interest(4) prompt("Monitor lock") } field(MLIS, DBF_NOACCESS) { - extra("ELLLIST mlis") - prompt("Monitor List") - special(SPC_NOMOD) - interest(4) - } - field(BKLNK, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Backwards link tracking") - extra("ELLLIST bklnk") - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - interest(3) - prompt("Force Processing") - pp(TRUE) - } - field(STAT, DBF_MENU) { - initial("UDF") - menu(menuAlarmStat) - special(SPC_NOMOD) - prompt("Alarm Status") - } - field(SEVR, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Alarm Severity") - special(SPC_NOMOD) - } - field(NSTA, DBF_MENU) { - prompt("New Alarm Status") - special(SPC_NOMOD) - interest(2) - menu(menuAlarmStat) - } - field(NSEV, DBF_MENU) { - prompt("New Alarm Severity") - interest(2) - special(SPC_NOMOD) - menu(menuAlarmSevr) - } - field(ACKS, DBF_MENU) { - interest(2) - special(SPC_NOMOD) - prompt("Alarm Ack Severity") - menu(menuAlarmSevr) - } - field(ACKT, DBF_MENU) { - initial("YES") - menu(menuYesNo) - interest(2) - special(SPC_NOMOD) - promptgroup("70 - Alarm") - prompt("Alarm Ack Transient") - } - field(DISS, DBF_MENU) { - promptgroup("70 - Alarm") - interest(1) - prompt("Disable Alarm Sevrty") - menu(menuAlarmSevr) - } - field(LCNT, DBF_UCHAR) { - prompt("Lock Count") - special(SPC_NOMOD) - interest(2) - } - field(PACT, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Record active") - } - field(PUTF, DBF_UCHAR) { - prompt("dbPutField process") - interest(1) - special(SPC_NOMOD) - } - field(RPRO, DBF_UCHAR) { - prompt("Reprocess ") - special(SPC_NOMOD) - interest(1) - } - field(ASP, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Access Security Pvt") - extra("struct asgMember *asp") - } - field(PPN, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("pprocessNotify") - extra("struct processNotify *ppn") - } - field(PPNR, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("pprocessNotifyRecord") - extra("struct processNotifyRecord *ppnr") - } - field(SPVT, DBF_NOACCESS) { - extra("struct scan_element *spvt") - special(SPC_NOMOD) - interest(4) - prompt("Scan Private") - } - field(RSET, DBF_NOACCESS) { - extra("struct typed_rset *rset") - interest(4) - special(SPC_NOMOD) - prompt("Address of RSET") - } - field(DSET, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("DSET address") - extra("struct dset *dset") - } - field(DPVT, DBF_NOACCESS) { - prompt("Device Private") - special(SPC_NOMOD) - interest(4) - extra("void *dpvt") - } - field(RDES, DBF_NOACCESS) { - extra("struct dbRecordType *rdes") - interest(4) - special(SPC_NOMOD) - prompt("Address of dbRecordType") - } - field(LSET, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Lock Set") - extra("struct lockRecord *lset") - } - field(PRIO, DBF_MENU) { - menu(menuPriority) - prompt("Scheduling Priority") - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - prompt("Break Point") - special(SPC_NOMOD) - interest(1) - extra("char bkpt") - } - field(UDF, DBF_UCHAR) { - pp(TRUE) - initial("1") - prompt("Undefined") - promptgroup("10 - Common") - interest(1) - } - field(UDFS, DBF_MENU) { - initial("INVALID") - interest(1) - promptgroup("70 - Alarm") - prompt("Undefined Alarm Sevrty") - menu(menuAlarmSevr) - } - field(TIME, DBF_NOACCESS) { - extra("epicsTimeStamp time") - special(SPC_NOMOD) - interest(2) - prompt("Time") - } - field(FLNK, DBF_FWDLINK) { - promptgroup("20 - Scan") - interest(1) - prompt("Forward Process Link") - } - field(VAL, DBF_DOUBLE) { - pp(TRUE) - asl(ASL0) - promptgroup("40 - Input") - prompt("Desired Output") - } - field(SELM, DBF_MENU) { - promptgroup("30 - Action") - interest(1) - prompt("Select Mechanism") - menu(dfanoutSELM) - } - field(SELN, DBF_USHORT) { - prompt("Link Selection") - interest(1) - initial("1") - } - field(SELL, DBF_INLINK) { - promptgroup("30 - Action") - interest(1) - prompt("Link Selection Loc") - } - field(OUTA, DBF_OUTLINK) { - prompt("Output Spec A") - promptgroup("50 - Output") - interest(1) - } - field(OUTB, DBF_OUTLINK) { - prompt("Output Spec B") - interest(1) - promptgroup("50 - Output") - } - field(OUTC, DBF_OUTLINK) { - prompt("Output Spec C") - promptgroup("50 - Output") - interest(1) - } - field(OUTD, DBF_OUTLINK) { - prompt("Output Spec D") - interest(1) - promptgroup("50 - Output") - } - field(OUTE, DBF_OUTLINK) { - prompt("Output Spec E") - promptgroup("50 - Output") - interest(1) - } - field(OUTF, DBF_OUTLINK) { - interest(1) - promptgroup("50 - Output") - prompt("Output Spec F") - } - field(OUTG, DBF_OUTLINK) { - promptgroup("50 - Output") - interest(1) - prompt("Output Spec G") - } - field(OUTH, DBF_OUTLINK) { - prompt("Output Spec H") - promptgroup("50 - Output") - interest(1) - } - field(DOL, DBF_INLINK) { - interest(1) - promptgroup("40 - Input") - prompt("Desired Output Loc") - } - field(OMSL, DBF_MENU) { - promptgroup("50 - Output") - interest(1) - prompt("Output Mode Select") - menu(menuOmsl) - } - field(EGU, DBF_STRING) { - prompt("Engineering Units") - promptgroup("80 - Display") - prop(YES) - interest(1) - size(16) - } - field(PREC, DBF_SHORT) { - promptgroup("80 - Display") - prop(YES) - interest(1) - prompt("Display Precision") - } - field(HOPR, DBF_DOUBLE) { - prompt("High Operating Range") - prop(YES) - interest(1) - promptgroup("80 - Display") - } - field(LOPR, DBF_DOUBLE) { - prop(YES) - interest(1) - promptgroup("80 - Display") - prompt("Low Operating Range") - } - field(HIHI, DBF_DOUBLE) { - promptgroup("70 - Alarm") - prop(YES) - interest(1) - prompt("Hihi Alarm Limit") - pp(TRUE) - } - field(LOLO, DBF_DOUBLE) { - pp(TRUE) - prompt("Lolo Alarm Limit") - prop(YES) - promptgroup("70 - Alarm") - interest(1) - } - field(HIGH, DBF_DOUBLE) { - pp(TRUE) - promptgroup("70 - Alarm") - prop(YES) - interest(1) - prompt("High Alarm Limit") - } - field(LOW, DBF_DOUBLE) { - pp(TRUE) - prompt("Low Alarm Limit") - promptgroup("70 - Alarm") - prop(YES) - interest(1) - } - field(HHSV, DBF_MENU) { - pp(TRUE) - interest(1) - prop(YES) - promptgroup("70 - Alarm") - prompt("Hihi Severity") - menu(menuAlarmSevr) - } - field(LLSV, DBF_MENU) { - pp(TRUE) - menu(menuAlarmSevr) - prompt("Lolo Severity") - prop(YES) - promptgroup("70 - Alarm") - interest(1) - } - field(HSV, DBF_MENU) { - pp(TRUE) - prompt("High Severity") - promptgroup("70 - Alarm") - prop(YES) - interest(1) - menu(menuAlarmSevr) - } - field(LSV, DBF_MENU) { - interest(1) - prop(YES) - promptgroup("70 - Alarm") - prompt("Low Severity") - menu(menuAlarmSevr) - pp(TRUE) - } - field(HYST, DBF_DOUBLE) { - prompt("Alarm Deadband") - promptgroup("70 - Alarm") - interest(1) - } - field(ADEL, DBF_DOUBLE) { - prompt("Archive Deadband") - interest(1) - promptgroup("80 - Display") - } - field(MDEL, DBF_DOUBLE) { - prompt("Monitor Deadband") - promptgroup("80 - Display") - interest(1) - } - field(LALM, DBF_DOUBLE) { - prompt("Last Value Alarmed") - interest(3) - special(SPC_NOMOD) - } - field(ALST, DBF_DOUBLE) { - prompt("Last Value Archived") - interest(3) - special(SPC_NOMOD) - } - field(MLST, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Last Val Monitored") - } -} -recordtype(compress) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - field(NAME, DBF_STRING) { - prompt("Record Name") - special(SPC_NOMOD) - size(61) - } - field(DESC, DBF_STRING) { - promptgroup("10 - Common") - prompt("Descriptor") - size(41) - } - field(ASG, DBF_STRING) { - size(29) - prompt("Access Security Group") - special(SPC_AS) - promptgroup("10 - Common") - } - field(SCAN, DBF_MENU) { - menu(menuScan) - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - prompt("Scan Mechanism") - } - field(PINI, DBF_MENU) { - interest(1) - promptgroup("20 - Scan") - prompt("Process at iocInit") - menu(menuPini) - } - field(PHAS, DBF_SHORT) { - prompt("Scan Phase") - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - } - field(EVNT, DBF_STRING) { - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - prompt("Event Name") - size(40) - } - field(TSE, DBF_SHORT) { - promptgroup("20 - Scan") - interest(1) - prompt("Time Stamp Event") - } - field(TSEL, DBF_INLINK) { - prompt("Time Stamp Link") - interest(1) - promptgroup("20 - Scan") - } - field(DTYP, DBF_DEVICE) { - promptgroup("10 - Common") - interest(1) - prompt("Device Type") - } - field(DISV, DBF_SHORT) { - promptgroup("20 - Scan") - prompt("Disable Value") - initial("1") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - prompt("Scanning Disable") - interest(1) - promptgroup("20 - Scan") - } - field(MLOK, DBF_NOACCESS) { - extra("epicsMutexId mlok") - interest(4) - special(SPC_NOMOD) - prompt("Monitor lock") - } - field(MLIS, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) + special(SPC_NOMOD) + interest(4) prompt("Monitor List") extra("ELLLIST mlis") } @@ -21715,781 +23790,19 @@ } field(PROC, DBF_UCHAR) { pp(TRUE) + interest(3) prompt("Force Processing") - interest(3) - } - field(STAT, DBF_MENU) { - menu(menuAlarmStat) - special(SPC_NOMOD) - prompt("Alarm Status") - initial("UDF") - } - field(SEVR, DBF_MENU) { - prompt("Alarm Severity") - special(SPC_NOMOD) - menu(menuAlarmSevr) - } - field(NSTA, DBF_MENU) { - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Status") - menu(menuAlarmStat) - } - field(NSEV, DBF_MENU) { - prompt("New Alarm Severity") - interest(2) - special(SPC_NOMOD) - menu(menuAlarmSevr) - } - field(ACKS, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Alarm Ack Severity") - interest(2) - special(SPC_NOMOD) - } - field(ACKT, DBF_MENU) { - initial("YES") - promptgroup("70 - Alarm") - interest(2) - special(SPC_NOMOD) - prompt("Alarm Ack Transient") - menu(menuYesNo) - } - field(DISS, DBF_MENU) { - prompt("Disable Alarm Sevrty") - interest(1) - promptgroup("70 - Alarm") - menu(menuAlarmSevr) - } - field(LCNT, DBF_UCHAR) { - prompt("Lock Count") - special(SPC_NOMOD) - interest(2) - } - field(PACT, DBF_UCHAR) { - prompt("Record active") - special(SPC_NOMOD) - interest(1) - } - field(PUTF, DBF_UCHAR) { - special(SPC_NOMOD) - interest(1) - prompt("dbPutField process") - } - field(RPRO, DBF_UCHAR) { - prompt("Reprocess ") - interest(1) - special(SPC_NOMOD) - } - field(ASP, DBF_NOACCESS) { - extra("struct asgMember *asp") - prompt("Access Security Pvt") - special(SPC_NOMOD) - interest(4) - } - field(PPN, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("pprocessNotify") - extra("struct processNotify *ppn") - } - field(PPNR, DBF_NOACCESS) { - extra("struct processNotifyRecord *ppnr") - prompt("pprocessNotifyRecord") - interest(4) - special(SPC_NOMOD) - } - field(SPVT, DBF_NOACCESS) { - prompt("Scan Private") - special(SPC_NOMOD) - interest(4) - extra("struct scan_element *spvt") - } - field(RSET, DBF_NOACCESS) { - prompt("Address of RSET") - special(SPC_NOMOD) - interest(4) - extra("struct typed_rset *rset") - } - field(DSET, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("DSET address") - extra("struct dset *dset") - } - field(DPVT, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Device Private") - extra("void *dpvt") - } - field(RDES, DBF_NOACCESS) { - extra("struct dbRecordType *rdes") - prompt("Address of dbRecordType") - special(SPC_NOMOD) - interest(4) - } - field(LSET, DBF_NOACCESS) { - extra("struct lockRecord *lset") - interest(4) - special(SPC_NOMOD) - prompt("Lock Set") - } - field(PRIO, DBF_MENU) { - menu(menuPriority) - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - prompt("Scheduling Priority") - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(1) - prompt("Break Point") - extra("char bkpt") - } - field(UDF, DBF_UCHAR) { - pp(TRUE) - initial("1") - prompt("Undefined") - promptgroup("10 - Common") - interest(1) - } - field(UDFS, DBF_MENU) { - prompt("Undefined Alarm Sevrty") - promptgroup("70 - Alarm") - interest(1) - menu(menuAlarmSevr) - initial("INVALID") - } - field(TIME, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(2) - prompt("Time") - extra("epicsTimeStamp time") - } - field(FLNK, DBF_FWDLINK) { - promptgroup("20 - Scan") - interest(1) - prompt("Forward Process Link") - } - field(VAL, DBF_NOACCESS) { - extra("void * val") - pp(TRUE) - special(SPC_DBADDR) - prompt("Value") - asl(ASL0) - } - field(INP, DBF_INLINK) { - prompt("Input Specification") - promptgroup("40 - Input") - interest(1) - } - field(RES, DBF_SHORT) { - prompt("Reset") - interest(3) - special(SPC_RESET) - asl(ASL0) - } - field(ALG, DBF_MENU) { - promptgroup("30 - Action") - interest(1) - special(SPC_RESET) - prompt("Compression Algorithm") - menu(compressALG) - } - field(BALG, DBF_MENU) { - interest(1) - promptgroup("30 - Action") - special(SPC_RESET) - prompt("Buffering Algorithm") - menu(bufferingALG) - } - field(NSAM, DBF_ULONG) { - prompt("Number of Values") - promptgroup("30 - Action") - interest(1) - special(SPC_NOMOD) - initial("1") - } - field(N, DBF_ULONG) { - initial("1") - interest(1) - promptgroup("30 - Action") - special(SPC_RESET) - prompt("N to 1 Compression") - } - field(IHIL, DBF_DOUBLE) { - interest(1) - promptgroup("30 - Action") - prompt("Init High Interest Lim") - } - field(ILIL, DBF_DOUBLE) { - prompt("Init Low Interest Lim") - promptgroup("30 - Action") - interest(1) - } - field(HOPR, DBF_DOUBLE) { - prompt("High Operating Range") - prop(YES) - promptgroup("80 - Display") - interest(1) - } - field(LOPR, DBF_DOUBLE) { - prop(YES) - interest(1) - promptgroup("80 - Display") - prompt("Low Operating Range") - } - field(PREC, DBF_SHORT) { - prompt("Display Precision") - prop(YES) - interest(1) - promptgroup("80 - Display") - } - field(EGU, DBF_STRING) { - size(16) - promptgroup("80 - Display") - prop(YES) - interest(1) - prompt("Engineering Units") - } - field(OFF, DBF_ULONG) { - special(SPC_NOMOD) - prompt("Offset") - } - field(NUSE, DBF_ULONG) { - prompt("Number Used") - special(SPC_NOMOD) - } - field(OUSE, DBF_ULONG) { - special(SPC_NOMOD) - prompt("Old Number Used") - } - field(BPTR, DBF_NOACCESS) { - prompt("Buffer Pointer") - special(SPC_NOMOD) - interest(4) - extra("double *bptr") - } - field(SPTR, DBF_NOACCESS) { - prompt("Summing Buffer Ptr") - special(SPC_NOMOD) - interest(4) - extra("double *sptr") - } - field(WPTR, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Working Buffer Ptr") - extra("double *wptr") - } - field(INPN, DBF_LONG) { - interest(4) - special(SPC_NOMOD) - prompt("Number of elements in Working Buffer") - } - field(CVB, DBF_DOUBLE) { - interest(3) - special(SPC_NOMOD) - prompt("Compress Value Buffer") - } - field(INX, DBF_ULONG) { - prompt("Compressed Array Inx") - interest(3) - special(SPC_NOMOD) - } -} -recordtype(fanout) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - field(NAME, DBF_STRING) { - special(SPC_NOMOD) - prompt("Record Name") - size(61) - } - field(DESC, DBF_STRING) { - prompt("Descriptor") - promptgroup("10 - Common") - size(41) - } - field(ASG, DBF_STRING) { - prompt("Access Security Group") - promptgroup("10 - Common") - special(SPC_AS) - size(29) - } - field(SCAN, DBF_MENU) { - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - prompt("Scan Mechanism") - menu(menuScan) - } - field(PINI, DBF_MENU) { - prompt("Process at iocInit") - promptgroup("20 - Scan") - interest(1) - menu(menuPini) - } - field(PHAS, DBF_SHORT) { - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) - prompt("Scan Phase") - } - field(EVNT, DBF_STRING) { - size(40) - prompt("Event Name") - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - } - field(TSE, DBF_SHORT) { - prompt("Time Stamp Event") - promptgroup("20 - Scan") - interest(1) - } - field(TSEL, DBF_INLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Time Stamp Link") - } - field(DTYP, DBF_DEVICE) { - interest(1) - promptgroup("10 - Common") - prompt("Device Type") - } - field(DISV, DBF_SHORT) { - initial("1") - prompt("Disable Value") - promptgroup("20 - Scan") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - prompt("Scanning Disable") - promptgroup("20 - Scan") - interest(1) - } - field(MLOK, DBF_NOACCESS) { - extra("epicsMutexId mlok") - prompt("Monitor lock") - special(SPC_NOMOD) - interest(4) - } - field(MLIS, DBF_NOACCESS) { - extra("ELLLIST mlis") - prompt("Monitor List") - special(SPC_NOMOD) - interest(4) - } - field(BKLNK, DBF_NOACCESS) { - extra("ELLLIST bklnk") - prompt("Backwards link tracking") - interest(4) - special(SPC_NOMOD) - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - prompt("Force Processing") - interest(3) - pp(TRUE) - } - field(STAT, DBF_MENU) { - special(SPC_NOMOD) - prompt("Alarm Status") - menu(menuAlarmStat) - initial("UDF") - } - field(SEVR, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Alarm Severity") - special(SPC_NOMOD) - } - field(NSTA, DBF_MENU) { - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Status") - menu(menuAlarmStat) - } - field(NSEV, DBF_MENU) { - menu(menuAlarmSevr) - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Severity") - } - field(ACKS, DBF_MENU) { - prompt("Alarm Ack Severity") - interest(2) - special(SPC_NOMOD) - menu(menuAlarmSevr) - } - field(ACKT, DBF_MENU) { - special(SPC_NOMOD) - interest(2) - promptgroup("70 - Alarm") - prompt("Alarm Ack Transient") - menu(menuYesNo) - initial("YES") - } - field(DISS, DBF_MENU) { - prompt("Disable Alarm Sevrty") - interest(1) - promptgroup("70 - Alarm") - menu(menuAlarmSevr) - } - field(LCNT, DBF_UCHAR) { - prompt("Lock Count") - special(SPC_NOMOD) - interest(2) - } - field(PACT, DBF_UCHAR) { - special(SPC_NOMOD) - interest(1) - prompt("Record active") - } - field(PUTF, DBF_UCHAR) { - prompt("dbPutField process") - special(SPC_NOMOD) - interest(1) - } - field(RPRO, DBF_UCHAR) { - prompt("Reprocess ") - interest(1) - special(SPC_NOMOD) - } - field(ASP, DBF_NOACCESS) { - extra("struct asgMember *asp") - prompt("Access Security Pvt") - interest(4) - special(SPC_NOMOD) - } - field(PPN, DBF_NOACCESS) { - prompt("pprocessNotify") - special(SPC_NOMOD) - interest(4) - extra("struct processNotify *ppn") - } - field(PPNR, DBF_NOACCESS) { - prompt("pprocessNotifyRecord") - interest(4) - special(SPC_NOMOD) - extra("struct processNotifyRecord *ppnr") - } - field(SPVT, DBF_NOACCESS) { - extra("struct scan_element *spvt") - prompt("Scan Private") - special(SPC_NOMOD) - interest(4) - } - field(RSET, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Address of RSET") - extra("struct typed_rset *rset") - } - field(DSET, DBF_NOACCESS) { - extra("struct dset *dset") - special(SPC_NOMOD) - interest(4) - prompt("DSET address") - } - field(DPVT, DBF_NOACCESS) { - extra("void *dpvt") - interest(4) - special(SPC_NOMOD) - prompt("Device Private") - } - field(RDES, DBF_NOACCESS) { - extra("struct dbRecordType *rdes") - special(SPC_NOMOD) - interest(4) - prompt("Address of dbRecordType") - } - field(LSET, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Lock Set") - extra("struct lockRecord *lset") - } - field(PRIO, DBF_MENU) { - prompt("Scheduling Priority") - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - menu(menuPriority) - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - extra("char bkpt") - prompt("Break Point") - special(SPC_NOMOD) - interest(1) - } - field(UDF, DBF_UCHAR) { - initial("1") - pp(TRUE) - prompt("Undefined") - interest(1) - promptgroup("10 - Common") - } - field(UDFS, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Undefined Alarm Sevrty") - interest(1) - promptgroup("70 - Alarm") - initial("INVALID") - } - field(TIME, DBF_NOACCESS) { - extra("epicsTimeStamp time") - prompt("Time") - interest(2) - special(SPC_NOMOD) - } - field(FLNK, DBF_FWDLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Forward Process Link") - } - field(VAL, DBF_LONG) { - pp(TRUE) - asl(ASL0) - prompt("Used to trigger") - } - field(SELM, DBF_MENU) { - prompt("Select Mechanism") - promptgroup("30 - Action") - interest(1) - menu(fanoutSELM) - } - field(SELN, DBF_USHORT) { - interest(1) - prompt("Link Selection") - initial("1") - } - field(SELL, DBF_INLINK) { - interest(1) - promptgroup("30 - Action") - prompt("Link Selection Loc") - } - field(OFFS, DBF_SHORT) { - initial("0") - prompt("Offset for Specified") - interest(1) - promptgroup("30 - Action") - } - field(SHFT, DBF_SHORT) { - promptgroup("30 - Action") - interest(1) - prompt("Shift for Mask mode") - initial("-1") - } - field(LNK0, DBF_FWDLINK) { - promptgroup("51 - Output 0-7") - interest(1) - prompt("Forward Link 0") - } - field(LNK1, DBF_FWDLINK) { - interest(1) - promptgroup("51 - Output 0-7") - prompt("Forward Link 1") - } - field(LNK2, DBF_FWDLINK) { - prompt("Forward Link 2") - interest(1) - promptgroup("51 - Output 0-7") - } - field(LNK3, DBF_FWDLINK) { - prompt("Forward Link 3") - interest(1) - promptgroup("51 - Output 0-7") - } - field(LNK4, DBF_FWDLINK) { - interest(1) - promptgroup("51 - Output 0-7") - prompt("Forward Link 4") - } - field(LNK5, DBF_FWDLINK) { - interest(1) - promptgroup("51 - Output 0-7") - prompt("Forward Link 5") - } - field(LNK6, DBF_FWDLINK) { - promptgroup("51 - Output 0-7") - interest(1) - prompt("Forward Link 6") - } - field(LNK7, DBF_FWDLINK) { - prompt("Forward Link 7") - promptgroup("51 - Output 0-7") - interest(1) - } - field(LNK8, DBF_FWDLINK) { - promptgroup("52 - Output 8-F") - interest(1) - prompt("Forward Link 8") - } - field(LNK9, DBF_FWDLINK) { - prompt("Forward Link 9") - promptgroup("52 - Output 8-F") - interest(1) - } - field(LNKA, DBF_FWDLINK) { - promptgroup("52 - Output 8-F") - interest(1) - prompt("Forward Link 10") - } - field(LNKB, DBF_FWDLINK) { - promptgroup("52 - Output 8-F") - interest(1) - prompt("Forward Link 11") - } - field(LNKC, DBF_FWDLINK) { - interest(1) - promptgroup("52 - Output 8-F") - prompt("Forward Link 12") - } - field(LNKD, DBF_FWDLINK) { - interest(1) - promptgroup("52 - Output 8-F") - prompt("Forward Link 13") - } - field(LNKE, DBF_FWDLINK) { - promptgroup("52 - Output 8-F") - interest(1) - prompt("Forward Link 14") - } - field(LNKF, DBF_FWDLINK) { - promptgroup("52 - Output 8-F") - interest(1) - prompt("Forward Link 15") - } -} -recordtype(longout) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - %#include "callback.h" - field(NAME, DBF_STRING) { - special(SPC_NOMOD) - prompt("Record Name") - size(61) - } - field(DESC, DBF_STRING) { - promptgroup("10 - Common") - prompt("Descriptor") - size(41) - } - field(ASG, DBF_STRING) { - promptgroup("10 - Common") - special(SPC_AS) - prompt("Access Security Group") - size(29) - } - field(SCAN, DBF_MENU) { - menu(menuScan) - prompt("Scan Mechanism") - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - } - field(PINI, DBF_MENU) { - menu(menuPini) - prompt("Process at iocInit") - interest(1) - promptgroup("20 - Scan") - } - field(PHAS, DBF_SHORT) { - prompt("Scan Phase") - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - } - field(EVNT, DBF_STRING) { - prompt("Event Name") - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - size(40) - } - field(TSE, DBF_SHORT) { - promptgroup("20 - Scan") - interest(1) - prompt("Time Stamp Event") - } - field(TSEL, DBF_INLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Time Stamp Link") - } - field(DTYP, DBF_DEVICE) { - interest(1) - promptgroup("10 - Common") - prompt("Device Type") - } - field(DISV, DBF_SHORT) { - promptgroup("20 - Scan") - prompt("Disable Value") - initial("1") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - interest(1) - promptgroup("20 - Scan") - prompt("Scanning Disable") - } - field(MLOK, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Monitor lock") - extra("epicsMutexId mlok") - } - field(MLIS, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Monitor List") - extra("ELLLIST mlis") - } - field(BKLNK, DBF_NOACCESS) { - extra("ELLLIST bklnk") - prompt("Backwards link tracking") - interest(4) - special(SPC_NOMOD) - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - pp(TRUE) - prompt("Force Processing") - interest(3) } field(STAT, DBF_MENU) { initial("UDF") - menu(menuAlarmStat) - special(SPC_NOMOD) prompt("Alarm Status") + menu(menuAlarmStat) + special(SPC_NOMOD) } field(SEVR, DBF_MENU) { + special(SPC_NOMOD) menu(menuAlarmSevr) prompt("Alarm Severity") - special(SPC_NOMOD) } field(NSTA, DBF_MENU) { prompt("New Alarm Status") @@ -22498,35 +23811,35 @@ menu(menuAlarmStat) } field(NSEV, DBF_MENU) { - menu(menuAlarmSevr) - special(SPC_NOMOD) + special(SPC_NOMOD) + menu(menuAlarmSevr) interest(2) prompt("New Alarm Severity") } field(ACKS, DBF_MENU) { - menu(menuAlarmSevr) - special(SPC_NOMOD) + special(SPC_NOMOD) + menu(menuAlarmSevr) interest(2) prompt("Alarm Ack Severity") } field(ACKT, DBF_MENU) { - interest(2) - special(SPC_NOMOD) - promptgroup("70 - Alarm") prompt("Alarm Ack Transient") - menu(menuYesNo) initial("YES") + promptgroup("70 - Alarm") + special(SPC_NOMOD) + interest(2) + menu(menuYesNo) } field(DISS, DBF_MENU) { - menu(menuAlarmSevr) prompt("Disable Alarm Sevrty") - promptgroup("70 - Alarm") - interest(1) + interest(1) + menu(menuAlarmSevr) + promptgroup("70 - Alarm") } field(LCNT, DBF_UCHAR) { + special(SPC_NOMOD) + interest(2) prompt("Lock Count") - special(SPC_NOMOD) - interest(2) } field(PACT, DBF_UCHAR) { interest(1) @@ -22534,73 +23847,73 @@ prompt("Record active") } field(PUTF, DBF_UCHAR) { + special(SPC_NOMOD) + interest(1) prompt("dbPutField process") - interest(1) - special(SPC_NOMOD) } field(RPRO, DBF_UCHAR) { + interest(1) + special(SPC_NOMOD) prompt("Reprocess ") - interest(1) - special(SPC_NOMOD) } field(ASP, DBF_NOACCESS) { - prompt("Access Security Pvt") special(SPC_NOMOD) interest(4) extra("struct asgMember *asp") + prompt("Access Security Pvt") } field(PPN, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) extra("struct processNotify *ppn") prompt("pprocessNotify") - special(SPC_NOMOD) - interest(4) } field(PPNR, DBF_NOACCESS) { extra("struct processNotifyRecord *ppnr") - special(SPC_NOMOD) - interest(4) prompt("pprocessNotifyRecord") + interest(4) + special(SPC_NOMOD) } field(SPVT, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) extra("struct scan_element *spvt") prompt("Scan Private") - interest(4) - special(SPC_NOMOD) } field(RSET, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) + extra("struct typed_rset *rset") prompt("Address of RSET") - extra("struct typed_rset *rset") + special(SPC_NOMOD) + interest(4) } field(DSET, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) extra("struct dset *dset") - interest(4) - special(SPC_NOMOD) prompt("DSET address") } field(DPVT, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) prompt("Device Private") extra("void *dpvt") + interest(4) + special(SPC_NOMOD) } field(RDES, DBF_NOACCESS) { + special(SPC_NOMOD) + interest(4) extra("struct dbRecordType *rdes") - special(SPC_NOMOD) - interest(4) prompt("Address of dbRecordType") } field(LSET, DBF_NOACCESS) { prompt("Lock Set") - special(SPC_NOMOD) - interest(4) extra("struct lockRecord *lset") + interest(4) + special(SPC_NOMOD) } field(PRIO, DBF_MENU) { + promptgroup("20 - Scan") + interest(1) menu(menuPriority) - interest(1) - promptgroup("20 - Scan") special(SPC_SCAN) prompt("Scheduling Priority") } @@ -22608,885 +23921,24 @@ prompt("Trace Processing") } field(BKPT, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(1) + extra("char bkpt") prompt("Break Point") - extra("char bkpt") + interest(1) + special(SPC_NOMOD) } field(UDF, DBF_UCHAR) { - initial("1") - pp(TRUE) - prompt("Undefined") - promptgroup("10 - Common") - interest(1) - } - field(UDFS, DBF_MENU) { - initial("INVALID") - promptgroup("70 - Alarm") - interest(1) - prompt("Undefined Alarm Sevrty") - menu(menuAlarmSevr) - } - field(TIME, DBF_NOACCESS) { - extra("epicsTimeStamp time") - special(SPC_NOMOD) - interest(2) - prompt("Time") - } - field(FLNK, DBF_FWDLINK) { - promptgroup("20 - Scan") - interest(1) - prompt("Forward Process Link") - } - field(VAL, DBF_LONG) { - pp(TRUE) - prompt("Desired Output") - promptgroup("50 - Output") - asl(ASL0) - } - field(OUT, DBF_OUTLINK) { - prompt("Output Specification") - interest(1) - promptgroup("50 - Output") - } - field(DOL, DBF_INLINK) { - prompt("Desired Output Loc") - interest(1) - promptgroup("40 - Input") - } - field(OMSL, DBF_MENU) { - prompt("Output Mode Select") - interest(1) - promptgroup("50 - Output") - menu(menuOmsl) - } - field(EGU, DBF_STRING) { - prompt("Engineering Units") - prop(YES) - promptgroup("80 - Display") - interest(1) - size(16) - } - field(DRVH, DBF_LONG) { - pp(TRUE) - prop(YES) - promptgroup("30 - Action") - interest(1) - prompt("Drive High Limit") - } - field(DRVL, DBF_LONG) { - pp(TRUE) - promptgroup("30 - Action") - prop(YES) - interest(1) - prompt("Drive Low Limit") - } - field(HOPR, DBF_LONG) { - prompt("High Operating Range") - prop(YES) - interest(1) - promptgroup("80 - Display") - } - field(LOPR, DBF_LONG) { - prompt("Low Operating Range") - prop(YES) - promptgroup("80 - Display") - interest(1) - } - field(HIHI, DBF_LONG) { - interest(1) - prop(YES) - promptgroup("70 - Alarm") - prompt("Hihi Alarm Limit") - pp(TRUE) - } - field(LOLO, DBF_LONG) { - pp(TRUE) - prompt("Lolo Alarm Limit") - promptgroup("70 - Alarm") - prop(YES) - interest(1) - } - field(HIGH, DBF_LONG) { - prompt("High Alarm Limit") - prop(YES) - interest(1) - promptgroup("70 - Alarm") - pp(TRUE) - } - field(LOW, DBF_LONG) { - pp(TRUE) - promptgroup("70 - Alarm") - prop(YES) - interest(1) - prompt("Low Alarm Limit") - } - field(HHSV, DBF_MENU) { - pp(TRUE) - promptgroup("70 - Alarm") - interest(1) - prompt("Hihi Severity") - menu(menuAlarmSevr) - } - field(LLSV, DBF_MENU) { - pp(TRUE) - menu(menuAlarmSevr) - prompt("Lolo Severity") - interest(1) - promptgroup("70 - Alarm") - } - field(HSV, DBF_MENU) { - menu(menuAlarmSevr) - prompt("High Severity") - promptgroup("70 - Alarm") - interest(1) - pp(TRUE) - } - field(LSV, DBF_MENU) { - promptgroup("70 - Alarm") - interest(1) - prompt("Low Severity") - menu(menuAlarmSevr) - pp(TRUE) - } - field(HYST, DBF_LONG) { - promptgroup("70 - Alarm") - interest(1) - prompt("Alarm Deadband") - } - field(ADEL, DBF_LONG) { - prompt("Archive Deadband") - interest(1) - promptgroup("80 - Display") - } - field(MDEL, DBF_LONG) { - interest(1) - promptgroup("80 - Display") - prompt("Monitor Deadband") - } - field(LALM, DBF_LONG) { - special(SPC_NOMOD) - interest(3) - prompt("Last Value Alarmed") - } - field(ALST, DBF_LONG) { - prompt("Last Value Archived") - special(SPC_NOMOD) - interest(3) - } - field(MLST, DBF_LONG) { - special(SPC_NOMOD) - interest(3) - prompt("Last Val Monitored") - } - field(SIOL, DBF_OUTLINK) { - interest(1) - promptgroup("90 - Simulate") - prompt("Simulation Output Link") - } - field(SIML, DBF_INLINK) { - prompt("Simulation Mode Link") - promptgroup("90 - Simulate") - interest(1) - } - field(SIMM, DBF_MENU) { - menu(menuYesNo) - prompt("Simulation Mode") - special(SPC_MOD) - interest(1) - } - field(SIMS, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Simulation Mode Severity") - interest(2) - promptgroup("90 - Simulate") - } - field(OLDSIMM, DBF_MENU) { - special(SPC_NOMOD) - interest(4) - prompt("Prev. Simulation Mode") - menu(menuSimm) - } - field(SSCN, DBF_MENU) { - prompt("Sim. Mode Scan") - promptgroup("90 - Simulate") - interest(1) - menu(menuScan) - initial("65535") - } - field(SDLY, DBF_DOUBLE) { - prompt("Sim. Mode Async Delay") - promptgroup("90 - Simulate") - interest(2) - initial("-1.0") - } - field(SIMPVT, DBF_NOACCESS) { - extra("CALLBACK *simpvt") - prompt("Sim. Mode Private") - interest(4) - special(SPC_NOMOD) - } - field(IVOA, DBF_MENU) { - prompt("INVALID output action") - promptgroup("50 - Output") - interest(2) - menu(menuIvoa) - } - field(IVOV, DBF_LONG) { - interest(2) - promptgroup("50 - Output") - prompt("INVALID output value") - } -} -device(longout, CONSTANT, devLoSoft, "Soft Channel") -device(longout, CONSTANT, devLoSoftCallback, "Async Soft Channel") -device(longout, INST_IO, asynLoInt32, "asynInt32") -device(longout, INST_IO, asynLoUInt32Digital, "asynUInt32Digital") -device(longout, INST_IO, devlongoutStream, "stream") -device(longout, INST_IO, devLoStrParm, "asyn lo stringParm") -device(longout, BBGPIB_IO, devLoAX301, "PZT Bug") -recordtype(lso) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - %#include "devSup.h" - % - %/* Declare Device Support Entry Table */ - %typedef struct lsodset { - % long number; - % DEVSUPFUN report; - % DEVSUPFUN init; - % DEVSUPFUN init_record; - % DEVSUPFUN get_ioint_info; - % DEVSUPFUN write_string; - %} lsodset; - % - %#include "callback.h" - field(NAME, DBF_STRING) { - prompt("Record Name") - special(SPC_NOMOD) - size(61) - } - field(DESC, DBF_STRING) { - size(41) - prompt("Descriptor") - promptgroup("10 - Common") - } - field(ASG, DBF_STRING) { - prompt("Access Security Group") - promptgroup("10 - Common") - special(SPC_AS) - size(29) - } - field(SCAN, DBF_MENU) { - menu(menuScan) - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) - prompt("Scan Mechanism") - } - field(PINI, DBF_MENU) { - prompt("Process at iocInit") - promptgroup("20 - Scan") - interest(1) - menu(menuPini) - } - field(PHAS, DBF_SHORT) { - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - prompt("Scan Phase") - } - field(EVNT, DBF_STRING) { - size(40) - prompt("Event Name") - promptgroup("20 - Scan") - interest(1) - special(SPC_SCAN) - } - field(TSE, DBF_SHORT) { - interest(1) - promptgroup("20 - Scan") - prompt("Time Stamp Event") - } - field(TSEL, DBF_INLINK) { - prompt("Time Stamp Link") - interest(1) - promptgroup("20 - Scan") - } - field(DTYP, DBF_DEVICE) { - prompt("Device Type") - promptgroup("10 - Common") - interest(1) - } - field(DISV, DBF_SHORT) { - initial("1") - promptgroup("20 - Scan") - prompt("Disable Value") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - promptgroup("20 - Scan") - interest(1) - prompt("Scanning Disable") - } - field(MLOK, DBF_NOACCESS) { - extra("epicsMutexId mlok") - prompt("Monitor lock") - special(SPC_NOMOD) - interest(4) - } - field(MLIS, DBF_NOACCESS) { - prompt("Monitor List") - special(SPC_NOMOD) - interest(4) - extra("ELLLIST mlis") - } - field(BKLNK, DBF_NOACCESS) { - extra("ELLLIST bklnk") - prompt("Backwards link tracking") - interest(4) - special(SPC_NOMOD) - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - interest(3) - prompt("Force Processing") - pp(TRUE) - } - field(STAT, DBF_MENU) { - initial("UDF") - menu(menuAlarmStat) - prompt("Alarm Status") - special(SPC_NOMOD) - } - field(SEVR, DBF_MENU) { - menu(menuAlarmSevr) - special(SPC_NOMOD) - prompt("Alarm Severity") - } - field(NSTA, DBF_MENU) { - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Status") - menu(menuAlarmStat) - } - field(NSEV, DBF_MENU) { - interest(2) - special(SPC_NOMOD) - prompt("New Alarm Severity") - menu(menuAlarmSevr) - } - field(ACKS, DBF_MENU) { - prompt("Alarm Ack Severity") - interest(2) - special(SPC_NOMOD) - menu(menuAlarmSevr) - } - field(ACKT, DBF_MENU) { - promptgroup("70 - Alarm") - interest(2) - special(SPC_NOMOD) - prompt("Alarm Ack Transient") - menu(menuYesNo) - initial("YES") - } - field(DISS, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Disable Alarm Sevrty") - promptgroup("70 - Alarm") - interest(1) - } - field(LCNT, DBF_UCHAR) { - interest(2) - special(SPC_NOMOD) - prompt("Lock Count") - } - field(PACT, DBF_UCHAR) { - special(SPC_NOMOD) - interest(1) - prompt("Record active") - } - field(PUTF, DBF_UCHAR) { - prompt("dbPutField process") - interest(1) - special(SPC_NOMOD) - } - field(RPRO, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Reprocess ") - } - field(ASP, DBF_NOACCESS) { - extra("struct asgMember *asp") - special(SPC_NOMOD) - interest(4) - prompt("Access Security Pvt") - } - field(PPN, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("pprocessNotify") - extra("struct processNotify *ppn") - } - field(PPNR, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("pprocessNotifyRecord") - extra("struct processNotifyRecord *ppnr") - } - field(SPVT, DBF_NOACCESS) { - extra("struct scan_element *spvt") - prompt("Scan Private") - special(SPC_NOMOD) - interest(4) - } - field(RSET, DBF_NOACCESS) { - prompt("Address of RSET") - interest(4) - special(SPC_NOMOD) - extra("struct typed_rset *rset") - } - field(DSET, DBF_NOACCESS) { - prompt("DSET address") - special(SPC_NOMOD) - interest(4) - extra("struct dset *dset") - } - field(DPVT, DBF_NOACCESS) { - special(SPC_NOMOD) - interest(4) - prompt("Device Private") - extra("void *dpvt") - } - field(RDES, DBF_NOACCESS) { - extra("struct dbRecordType *rdes") - prompt("Address of dbRecordType") - interest(4) - special(SPC_NOMOD) - } - field(LSET, DBF_NOACCESS) { - extra("struct lockRecord *lset") - prompt("Lock Set") - interest(4) - special(SPC_NOMOD) - } - field(PRIO, DBF_MENU) { - menu(menuPriority) - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - prompt("Scheduling Priority") - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - interest(1) - special(SPC_NOMOD) - prompt("Break Point") - extra("char bkpt") - } - field(UDF, DBF_UCHAR) { - pp(TRUE) - initial("1") - interest(1) - promptgroup("10 - Common") + interest(1) + pp(TRUE) + promptgroup("10 - Common") + initial("1") prompt("Undefined") } field(UDFS, DBF_MENU) { - menu(menuAlarmSevr) prompt("Undefined Alarm Sevrty") - promptgroup("70 - Alarm") - interest(1) initial("INVALID") - } - field(TIME, DBF_NOACCESS) { - extra("epicsTimeStamp time") - special(SPC_NOMOD) - interest(2) - prompt("Time") - } - field(FLNK, DBF_FWDLINK) { - prompt("Forward Process Link") - interest(1) - promptgroup("20 - Scan") - } - field(VAL, DBF_NOACCESS) { - asl(ASL0) - prompt("Current Value") - special(SPC_DBADDR) - pp(TRUE) - extra("char *val") - } - field(OVAL, DBF_NOACCESS) { - special(SPC_DBADDR) - interest(3) - prompt("Previous Value") - extra("char *oval") - } - field(SIZV, DBF_USHORT) { - prompt("Size of buffers") - interest(1) - promptgroup("50 - Output") - special(SPC_NOMOD) - initial("41") - } - field(LEN, DBF_ULONG) { - prompt("Length of VAL") - special(SPC_NOMOD) - } - field(OLEN, DBF_ULONG) { - special(SPC_NOMOD) - interest(3) - prompt("Length of OVAL") - } - field(DOL, DBF_INLINK) { - interest(1) - promptgroup("40 - Input") - prompt("Desired Output Link") - } - field(IVOA, DBF_MENU) { - menu(menuIvoa) - prompt("INVALID Output Action") - interest(2) - promptgroup("50 - Output") - } - field(IVOV, DBF_STRING) { - size(40) - prompt("INVALID Output Value") - interest(2) - promptgroup("50 - Output") - } - field(OMSL, DBF_MENU) { - promptgroup("50 - Output") - interest(1) - prompt("Output Mode Select") - menu(menuOmsl) - } - field(OUT, DBF_OUTLINK) { - promptgroup("50 - Output") - interest(1) - prompt("Output Specification") - } - field(MPST, DBF_MENU) { - menu(menuPost) - promptgroup("80 - Display") - interest(1) - prompt("Post Value Monitors") - } - field(APST, DBF_MENU) { - interest(1) - promptgroup("80 - Display") - prompt("Post Archive Monitors") - menu(menuPost) - } - field(SIML, DBF_INLINK) { - promptgroup("90 - Simulate") - interest(1) - prompt("Simulation Mode link") - } - field(SIMM, DBF_MENU) { - menu(menuYesNo) - special(SPC_MOD) - interest(1) - prompt("Simulation Mode") - } - field(SIMS, DBF_MENU) { - menu(menuAlarmSevr) - promptgroup("90 - Simulate") - interest(2) - prompt("Simulation Mode Severity") - } - field(SIOL, DBF_OUTLINK) { - prompt("Simulation Output Link") - promptgroup("90 - Simulate") - interest(1) - } - field(OLDSIMM, DBF_MENU) { - prompt("Prev. Simulation Mode") - interest(4) - special(SPC_NOMOD) - menu(menuSimm) - } - field(SSCN, DBF_MENU) { - prompt("Sim. Mode Scan") - promptgroup("90 - Simulate") - interest(1) - menu(menuScan) - initial("65535") - } - field(SDLY, DBF_DOUBLE) { - initial("-1.0") - prompt("Sim. Mode Async Delay") - promptgroup("90 - Simulate") - interest(2) - } - field(SIMPVT, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Sim. Mode Private") - extra("CALLBACK *simpvt") - } -} -device(lso, CONSTANT, devLsoSoft, "Soft Channel") -device(lso, CONSTANT, devLsoSoftCallback, "Async Soft Channel") -device(lso, INST_IO, devLsoStdio, "stdio") -recordtype(mbboDirect) { - %#include "epicsTypes.h" - %#include "link.h" - %#include "epicsMutex.h" - %#include "ellLib.h" - %#include "epicsTime.h" - %#include "callback.h" - field(NAME, DBF_STRING) { - size(61) - prompt("Record Name") - special(SPC_NOMOD) - } - field(DESC, DBF_STRING) { - size(41) - promptgroup("10 - Common") - prompt("Descriptor") - } - field(ASG, DBF_STRING) { - size(29) - prompt("Access Security Group") - promptgroup("10 - Common") - special(SPC_AS) - } - field(SCAN, DBF_MENU) { - menu(menuScan) - prompt("Scan Mechanism") - interest(1) - promptgroup("20 - Scan") - special(SPC_SCAN) - } - field(PINI, DBF_MENU) { - menu(menuPini) - prompt("Process at iocInit") - promptgroup("20 - Scan") - interest(1) - } - field(PHAS, DBF_SHORT) { - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - prompt("Scan Phase") - } - field(EVNT, DBF_STRING) { - interest(1) - special(SPC_SCAN) - promptgroup("20 - Scan") - prompt("Event Name") - size(40) - } - field(TSE, DBF_SHORT) { - prompt("Time Stamp Event") - promptgroup("20 - Scan") - interest(1) - } - field(TSEL, DBF_INLINK) { - prompt("Time Stamp Link") - promptgroup("20 - Scan") - interest(1) - } - field(DTYP, DBF_DEVICE) { - prompt("Device Type") - interest(1) - promptgroup("10 - Common") - } - field(DISV, DBF_SHORT) { - initial("1") - promptgroup("20 - Scan") - prompt("Disable Value") - } - field(DISA, DBF_SHORT) { - prompt("Disable") - } - field(SDIS, DBF_INLINK) { - prompt("Scanning Disable") - interest(1) - promptgroup("20 - Scan") - } - field(MLOK, DBF_NOACCESS) { - prompt("Monitor lock") - special(SPC_NOMOD) - interest(4) - extra("epicsMutexId mlok") - } - field(MLIS, DBF_NOACCESS) { - prompt("Monitor List") - special(SPC_NOMOD) - interest(4) - extra("ELLLIST mlis") - } - field(BKLNK, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Backwards link tracking") - extra("ELLLIST bklnk") - } - field(DISP, DBF_UCHAR) { - prompt("Disable putField") - } - field(PROC, DBF_UCHAR) { - interest(3) - prompt("Force Processing") - pp(TRUE) - } - field(STAT, DBF_MENU) { - initial("UDF") - special(SPC_NOMOD) - prompt("Alarm Status") - menu(menuAlarmStat) - } - field(SEVR, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Alarm Severity") - special(SPC_NOMOD) - } - field(NSTA, DBF_MENU) { - special(SPC_NOMOD) - interest(2) - prompt("New Alarm Status") - menu(menuAlarmStat) - } - field(NSEV, DBF_MENU) { - prompt("New Alarm Severity") - special(SPC_NOMOD) - interest(2) - menu(menuAlarmSevr) - } - field(ACKS, DBF_MENU) { - menu(menuAlarmSevr) - interest(2) - special(SPC_NOMOD) - prompt("Alarm Ack Severity") - } - field(ACKT, DBF_MENU) { - initial("YES") - menu(menuYesNo) - interest(2) - special(SPC_NOMOD) - promptgroup("70 - Alarm") - prompt("Alarm Ack Transient") - } - field(DISS, DBF_MENU) { - menu(menuAlarmSevr) - prompt("Disable Alarm Sevrty") - promptgroup("70 - Alarm") - interest(1) - } - field(LCNT, DBF_UCHAR) { - prompt("Lock Count") - interest(2) - special(SPC_NOMOD) - } - field(PACT, DBF_UCHAR) { - special(SPC_NOMOD) - interest(1) - prompt("Record active") - } - field(PUTF, DBF_UCHAR) { - prompt("dbPutField process") - special(SPC_NOMOD) - interest(1) - } - field(RPRO, DBF_UCHAR) { - interest(1) - special(SPC_NOMOD) - prompt("Reprocess ") - } - field(ASP, DBF_NOACCESS) { - interest(4) - special(SPC_NOMOD) - prompt("Access Security Pvt") - extra("struct asgMember *asp") - } - field(PPN, DBF_NOACCESS) { - extra("struct processNotify *ppn") - prompt("pprocessNotify") - special(SPC_NOMOD) - interest(4) - } - field(PPNR, DBF_NOACCESS) { - extra("struct processNotifyRecord *ppnr") - prompt("pprocessNotifyRecord") - special(SPC_NOMOD) - interest(4) - } - field(SPVT, DBF_NOACCESS) { - extra("struct scan_element *spvt") - interest(4) - special(SPC_NOMOD) - prompt("Scan Private") - } - field(RSET, DBF_NOACCESS) { - extra("struct typed_rset *rset") - special(SPC_NOMOD) - interest(4) - prompt("Address of RSET") - } - field(DSET, DBF_NOACCESS) { - extra("struct dset *dset") - prompt("DSET address") - special(SPC_NOMOD) - interest(4) - } - field(DPVT, DBF_NOACCESS) { - prompt("Device Private") - special(SPC_NOMOD) - interest(4) - extra("void *dpvt") - } - field(RDES, DBF_NOACCESS) { - prompt("Address of dbRecordType") - special(SPC_NOMOD) - interest(4) - extra("struct dbRecordType *rdes") - } - field(LSET, DBF_NOACCESS) { - extra("struct lockRecord *lset") - prompt("Lock Set") - interest(4) - special(SPC_NOMOD) - } - field(PRIO, DBF_MENU) { - menu(menuPriority) - special(SPC_SCAN) - interest(1) - promptgroup("20 - Scan") - prompt("Scheduling Priority") - } - field(TPRO, DBF_UCHAR) { - prompt("Trace Processing") - } - field(BKPT, DBF_NOACCESS) { - interest(1) - special(SPC_NOMOD) - prompt("Break Point") - extra("char bkpt") - } - field(UDF, DBF_UCHAR) { - prompt("Undefined") - promptgroup("10 - Common") - interest(1) - initial("1") - pp(TRUE) - } - field(UDFS, DBF_MENU) { - promptgroup("70 - Alarm") - interest(1) - prompt("Undefined Alarm Sevrty") - menu(menuAlarmSevr) - initial("INVALID") + promptgroup("70 - Alarm") + menu(menuAlarmSevr) + interest(1) } field(TIME, DBF_NOACCESS) { extra("epicsTimeStamp time") @@ -23495,423 +23947,390 @@ special(SPC_NOMOD) } field(FLNK, DBF_FWDLINK) { - promptgroup("20 - Scan") - interest(1) prompt("Forward Process Link") - } - field(VAL, DBF_LONG) { - asl(ASL0) - promptgroup("50 - Output") - prompt("Word") - pp(TRUE) - } - field(OMSL, DBF_MENU) { - pp(TRUE) - prompt("Output Mode Select") - special(SPC_RESET) - interest(1) - promptgroup("50 - Output") - menu(menuOmsl) - } - field(NOBT, DBF_SHORT) { - interest(1) - promptgroup("50 - Output") - special(SPC_NOMOD) - prompt("Number of Bits") - } - field(DOL, DBF_INLINK) { - interest(1) - promptgroup("40 - Input") - prompt("Desired Output Loc") - } - field(OUT, DBF_OUTLINK) { - promptgroup("50 - Output") - interest(1) - prompt("Output Specification") - } - field(RVAL, DBF_ULONG) { - pp(TRUE) - special(SPC_NOMOD) - prompt("Raw Value") - } - field(ORAW, DBF_ULONG) { - prompt("Prev Raw Value") - interest(3) - special(SPC_NOMOD) - } - field(RBV, DBF_ULONG) { - special(SPC_NOMOD) - prompt("Readback Value") - } - field(ORBV, DBF_ULONG) { - interest(3) - special(SPC_NOMOD) - prompt("Prev Readback Value") - } - field(MASK, DBF_ULONG) { - prompt("Hardware Mask") - interest(1) - special(SPC_NOMOD) - } - field(MLST, DBF_LONG) { - special(SPC_NOMOD) - interest(3) - prompt("Last Value Monitored") - } - field(SHFT, DBF_USHORT) { - prompt("Shift") - promptgroup("50 - Output") - interest(1) - } - field(SIOL, DBF_OUTLINK) { - prompt("Simulation Output Link") - promptgroup("90 - Simulate") - interest(1) - } - field(SIML, DBF_INLINK) { - prompt("Simulation Mode Link") - promptgroup("90 - Simulate") - interest(1) - } - field(SIMM, DBF_MENU) { - menu(menuYesNo) - interest(1) - special(SPC_MOD) - prompt("Simulation Mode") - } - field(SIMS, DBF_MENU) { - prompt("Simulation Mode Severity") - interest(2) - promptgroup("90 - Simulate") - menu(menuAlarmSevr) - } - field(OLDSIMM, DBF_MENU) { - interest(4) - special(SPC_NOMOD) - prompt("Prev. Simulation Mode") - menu(menuSimm) - } - field(SSCN, DBF_MENU) { - initial("65535") - menu(menuScan) - prompt("Sim. Mode Scan") - promptgroup("90 - Simulate") - interest(1) - } - field(SDLY, DBF_DOUBLE) { - promptgroup("90 - Simulate") - interest(2) - prompt("Sim. Mode Async Delay") - initial("-1.0") - } - field(SIMPVT, DBF_NOACCESS) { - extra("CALLBACK *simpvt") - special(SPC_NOMOD) - interest(4) - prompt("Sim. Mode Private") - } - field(IVOA, DBF_MENU) { - prompt("INVALID outpt action") - interest(2) - promptgroup("50 - Output") - menu(menuIvoa) - } - field(IVOV, DBF_LONG) { - prompt("INVALID output value") - promptgroup("50 - Output") - interest(2) - } - field(B0, DBF_UCHAR) { - pp(TRUE) - promptgroup("51 - Output 0-7") - interest(1) - special(SPC_MOD) - prompt("Bit 0") - } - field(B1, DBF_UCHAR) { - prompt("Bit 1") - special(SPC_MOD) - interest(1) - promptgroup("51 - Output 0-7") - pp(TRUE) - } - field(B2, DBF_UCHAR) { - pp(TRUE) - prompt("Bit 2") - promptgroup("51 - Output 0-7") - interest(1) - special(SPC_MOD) - } - field(B3, DBF_UCHAR) { - pp(TRUE) - prompt("Bit 3") - interest(1) - promptgroup("51 - Output 0-7") - special(SPC_MOD) - } - field(B4, DBF_UCHAR) { - prompt("Bit 4") - interest(1) - special(SPC_MOD) - promptgroup("51 - Output 0-7") - pp(TRUE) - } - field(B5, DBF_UCHAR) { - prompt("Bit 5") - special(SPC_MOD) - interest(1) - promptgroup("51 - Output 0-7") - pp(TRUE) - } - field(B6, DBF_UCHAR) { - pp(TRUE) - interest(1) - promptgroup("51 - Output 0-7") - special(SPC_MOD) - prompt("Bit 6") - } - field(B7, DBF_UCHAR) { - pp(TRUE) - prompt("Bit 7") - promptgroup("51 - Output 0-7") - interest(1) - special(SPC_MOD) - } - field(B8, DBF_UCHAR) { - pp(TRUE) - prompt("Bit 8") - interest(1) - special(SPC_MOD) - promptgroup("52 - Output 8-15") - } - field(B9, DBF_UCHAR) { - interest(1) - promptgroup("52 - Output 8-15") - special(SPC_MOD) - prompt("Bit 9") - pp(TRUE) - } - field(BA, DBF_UCHAR) { - special(SPC_MOD) - interest(1) - promptgroup("52 - Output 8-15") - prompt("Bit 10") - pp(TRUE) - } - field(BB, DBF_UCHAR) { - prompt("Bit 11") - interest(1) - promptgroup("52 - Output 8-15") - special(SPC_MOD) - pp(TRUE) - } - field(BC, DBF_UCHAR) { - pp(TRUE) - special(SPC_MOD) - interest(1) - promptgroup("52 - Output 8-15") - prompt("Bit 12") - } - field(BD, DBF_UCHAR) { - interest(1) - promptgroup("52 - Output 8-15") - special(SPC_MOD) - prompt("Bit 13") - pp(TRUE) - } - field(BE, DBF_UCHAR) { - pp(TRUE) - prompt("Bit 14") - promptgroup("52 - Output 8-15") - interest(1) - special(SPC_MOD) - } - field(BF, DBF_UCHAR) { - pp(TRUE) - prompt("Bit 15") - interest(1) - promptgroup("52 - Output 8-15") - special(SPC_MOD) - } - field(B10, DBF_UCHAR) { - pp(TRUE) - prompt("Bit 16") - special(SPC_MOD) - interest(1) - promptgroup("53 - Output 16-23") - } - field(B11, DBF_UCHAR) { - prompt("Bit 17") - interest(1) - promptgroup("53 - Output 16-23") - special(SPC_MOD) - pp(TRUE) - } - field(B12, DBF_UCHAR) { - interest(1) - special(SPC_MOD) - promptgroup("53 - Output 16-23") - prompt("Bit 18") - pp(TRUE) - } - field(B13, DBF_UCHAR) { - interest(1) - promptgroup("53 - Output 16-23") - special(SPC_MOD) - prompt("Bit 19") - pp(TRUE) - } - field(B14, DBF_UCHAR) { - pp(TRUE) - prompt("Bit 20") - interest(1) - promptgroup("53 - Output 16-23") - special(SPC_MOD) - } - field(B15, DBF_UCHAR) { - promptgroup("53 - Output 16-23") - interest(1) - special(SPC_MOD) - prompt("Bit 21") - pp(TRUE) - } - field(B16, DBF_UCHAR) { - prompt("Bit 22") - special(SPC_MOD) - interest(1) - promptgroup("53 - Output 16-23") - pp(TRUE) - } - field(B17, DBF_UCHAR) { - prompt("Bit 23") - interest(1) - promptgroup("53 - Output 16-23") - special(SPC_MOD) - pp(TRUE) - } - field(B18, DBF_UCHAR) { - pp(TRUE) - prompt("Bit 24") - interest(1) - special(SPC_MOD) - promptgroup("54 - Output 24-31") - } - field(B19, DBF_UCHAR) { - interest(1) - promptgroup("54 - Output 24-31") - special(SPC_MOD) - prompt("Bit 25") - pp(TRUE) - } - field(B1A, DBF_UCHAR) { - interest(1) - special(SPC_MOD) - promptgroup("54 - Output 24-31") - prompt("Bit 26") - pp(TRUE) - } - field(B1B, DBF_UCHAR) { - pp(TRUE) - prompt("Bit 27") - special(SPC_MOD) - interest(1) - promptgroup("54 - Output 24-31") - } - field(B1C, DBF_UCHAR) { - pp(TRUE) - prompt("Bit 28") - special(SPC_MOD) - interest(1) - promptgroup("54 - Output 24-31") - } - field(B1D, DBF_UCHAR) { - pp(TRUE) - prompt("Bit 29") - promptgroup("54 - Output 24-31") - interest(1) - special(SPC_MOD) - } - field(B1E, DBF_UCHAR) { - pp(TRUE) - interest(1) - promptgroup("54 - Output 24-31") - special(SPC_MOD) - prompt("Bit 30") - } - field(B1F, DBF_UCHAR) { - prompt("Bit 31") - interest(1) - promptgroup("54 - Output 24-31") - special(SPC_MOD) - pp(TRUE) - } -} -device(mbboDirect, CONSTANT, devMbboDirectSoft, "Soft Channel") -device(mbboDirect, CONSTANT, devMbboDirectSoftRaw, "Raw Soft Channel") -device(mbboDirect, CONSTANT, devMbboDirectSoftCallback, "Async Soft Channel") -device(mbboDirect, INST_IO, asynMbboDirectUInt32Digital, "asynUInt32Digital") -device(mbboDirect, INST_IO, devmbboDirectStream, "stream") + interest(1) + promptgroup("20 - Scan") + } + field(VAL, DBF_DOUBLE) { + promptgroup("50 - Output") + asl(ASL0) + prompt("Result") + } + field(CALC, DBF_STRING) { + prompt("Calculation") + size(80) + initial("0") + pp(TRUE) + promptgroup("30 - Action") + special(SPC_CALC) + } + field(INPA, DBF_INLINK) { + interest(1) + promptgroup("41 - Input A-F") + prompt("Input A") + } + field(INPB, DBF_INLINK) { + prompt("Input B") + promptgroup("41 - Input A-F") + interest(1) + } + field(INPC, DBF_INLINK) { + prompt("Input C") + promptgroup("41 - Input A-F") + interest(1) + } + field(INPD, DBF_INLINK) { + prompt("Input D") + promptgroup("41 - Input A-F") + interest(1) + } + field(INPE, DBF_INLINK) { + prompt("Input E") + interest(1) + promptgroup("41 - Input A-F") + } + field(INPF, DBF_INLINK) { + prompt("Input F") + interest(1) + promptgroup("41 - Input A-F") + } + field(INPG, DBF_INLINK) { + prompt("Input G") + promptgroup("42 - Input G-L") + interest(1) + } + field(INPH, DBF_INLINK) { + prompt("Input H") + promptgroup("42 - Input G-L") + interest(1) + } + field(INPI, DBF_INLINK) { + interest(1) + promptgroup("42 - Input G-L") + prompt("Input I") + } + field(INPJ, DBF_INLINK) { + prompt("Input J") + promptgroup("42 - Input G-L") + interest(1) + } + field(INPK, DBF_INLINK) { + interest(1) + promptgroup("42 - Input G-L") + prompt("Input K") + } + field(INPL, DBF_INLINK) { + promptgroup("42 - Input G-L") + interest(1) + prompt("Input L") + } + field(EGU, DBF_STRING) { + promptgroup("80 - Display") + prop(YES) + interest(1) + prompt("Engineering Units") + size(16) + } + field(PREC, DBF_SHORT) { + prompt("Display Precision") + interest(1) + prop(YES) + promptgroup("80 - Display") + } + field(HOPR, DBF_DOUBLE) { + prompt("High Operating Rng") + interest(1) + prop(YES) + promptgroup("80 - Display") + } + field(LOPR, DBF_DOUBLE) { + interest(1) + prop(YES) + promptgroup("80 - Display") + prompt("Low Operating Range") + } + field(HIHI, DBF_DOUBLE) { + prompt("Hihi Alarm Limit") + interest(1) + prop(YES) + promptgroup("70 - Alarm") + pp(TRUE) + } + field(LOLO, DBF_DOUBLE) { + prop(YES) + interest(1) + pp(TRUE) + promptgroup("70 - Alarm") + prompt("Lolo Alarm Limit") + } + field(HIGH, DBF_DOUBLE) { + promptgroup("70 - Alarm") + pp(TRUE) + interest(1) + prop(YES) + prompt("High Alarm Limit") + } + field(LOW, DBF_DOUBLE) { + prompt("Low Alarm Limit") + prop(YES) + interest(1) + promptgroup("70 - Alarm") + pp(TRUE) + } + field(HHSV, DBF_MENU) { + prompt("Hihi Severity") + prop(YES) + menu(menuAlarmSevr) + interest(1) + promptgroup("70 - Alarm") + pp(TRUE) + } + field(LLSV, DBF_MENU) { + pp(TRUE) + promptgroup("70 - Alarm") + prop(YES) + menu(menuAlarmSevr) + interest(1) + prompt("Lolo Severity") + } + field(HSV, DBF_MENU) { + prop(YES) + menu(menuAlarmSevr) + interest(1) + pp(TRUE) + promptgroup("70 - Alarm") + prompt("High Severity") + } + field(LSV, DBF_MENU) { + pp(TRUE) + promptgroup("70 - Alarm") + interest(1) + menu(menuAlarmSevr) + prop(YES) + prompt("Low Severity") + } + field(AFTC, DBF_DOUBLE) { + prompt("Alarm Filter Time Constant") + interest(1) + promptgroup("70 - Alarm") + } + field(AFVL, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Alarm Filter Value") + } + field(HYST, DBF_DOUBLE) { + prompt("Alarm Deadband") + promptgroup("70 - Alarm") + interest(1) + } + field(ADEL, DBF_DOUBLE) { + prompt("Archive Deadband") + interest(1) + promptgroup("80 - Display") + } + field(MDEL, DBF_DOUBLE) { + interest(1) + promptgroup("80 - Display") + prompt("Monitor Deadband") + } + field(A, DBF_DOUBLE) { + prompt("Value of Input A") + pp(TRUE) + } + field(B, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input B") + } + field(C, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input C") + } + field(D, DBF_DOUBLE) { + prompt("Value of Input D") + pp(TRUE) + } + field(E, DBF_DOUBLE) { + prompt("Value of Input E") + pp(TRUE) + } + field(F, DBF_DOUBLE) { + prompt("Value of Input F") + pp(TRUE) + } + field(G, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input G") + } + field(H, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input H") + } + field(I, DBF_DOUBLE) { + pp(TRUE) + prompt("Value of Input I") + } + field(J, DBF_DOUBLE) { + prompt("Value of Input J") + pp(TRUE) + } + field(K, DBF_DOUBLE) { + prompt("Value of Input K") + pp(TRUE) + } + field(L, DBF_DOUBLE) { + prompt("Value of Input L") + pp(TRUE) + } + field(LA, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of A") + } + field(LB, DBF_DOUBLE) { + prompt("Prev Value of B") + special(SPC_NOMOD) + interest(3) + } + field(LC, DBF_DOUBLE) { + prompt("Prev Value of C") + special(SPC_NOMOD) + interest(3) + } + field(LD, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Value of D") + } + field(LE, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Value of E") + } + field(LF, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Prev Value of F") + } + field(LG, DBF_DOUBLE) { + prompt("Prev Value of G") + interest(3) + special(SPC_NOMOD) + } + field(LH, DBF_DOUBLE) { + prompt("Prev Value of H") + special(SPC_NOMOD) + interest(3) + } + field(LI, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of I") + } + field(LJ, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of J") + } + field(LK, DBF_DOUBLE) { + prompt("Prev Value of K") + interest(3) + special(SPC_NOMOD) + } + field(LL, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Prev Value of L") + } + field(LALM, DBF_DOUBLE) { + prompt("Last Value Alarmed") + interest(3) + special(SPC_NOMOD) + } + field(ALST, DBF_DOUBLE) { + interest(3) + special(SPC_NOMOD) + prompt("Last Value Archived") + } + field(MLST, DBF_DOUBLE) { + special(SPC_NOMOD) + interest(3) + prompt("Last Val Monitored") + } + field(RPCL, DBF_NOACCESS) { + interest(4) + special(SPC_NOMOD) + extra("char rpcl[INFIX_TO_POSTFIX_SIZE(80)]") + prompt("Reverse Polish Calc") + } +} driver(drvAsyn) driver(stream) link(calc, lnkCalcIf) link(const, lnkConstIf) +registrar(asynRegister) +registrar(reccasterRegistrar) registrar(arrInitialize) +registrar(dbndInitialize) registrar(arrayTestRegister) +registrar(interpRegister) registrar(syncInitialize) +registrar(Keithley2kDMM_mf40Registrar) +registrar(streamRegistrar) +registrar(rsrvRegistrar) +registrar(asynInterposeFlushRegister) registrar(asynInterposeEosRegister) -registrar(asynRegister) -registrar(Keithley65xxEMRegistrar) -registrar(Keithley2kDMM_mf40Registrar) registrar(aCalcMonitorMemRegister) registrar(drvAsynIPPortRegisterCommands) -registrar(subAveRegister) -registrar(rsrvRegistrar) -registrar(tsInitialize) +registrar(editSseqRegistrar) registrar(acalcTotalAllocatedMemoryRegister) -registrar(dbndInitialize) +registrar(drvAsynKeithley648xRegister) registrar(Keithley2kDMMRegistrar) -registrar(editSseqRegistrar) -registrar(asynInterposeFlushRegister) registrar(drvAsynIPServerPortRegisterCommands) +registrar(tsInitialize) +registrar(subAveRegister) registrar(asSub) -registrar(streamRegistrar) -registrar(interpRegister) +registrar(Keithley65xxEMRegistrar) +function(writeFloat) +function(readFloat) +variable(dbRecordsOnceOnly, int) +variable(aCalcMonitorMem_debug, int) +variable(calcoutODLYlimit, double) +variable(dbThreadRealtimeLock, int) +variable(aCalcAsyncThreshold, int) +variable(CASDEBUG, int) +variable(transformRecordDebug, int) +variable(reccastMaxHoldoff, double) +variable(calcoutODLYprecision, int) +variable(dbConvertStrict, int) +variable(boHIGHlimit, double) +variable(reccastTimeout, double) +variable(sCalcStackLW, int) +variable(seqDLYprecision, int) +variable(sCalcoutRecordDebug, int) +variable(arrayTestDebug, int) +variable(debugSubAve, int) +variable(dbBptNotMonotonic, int) +variable(aCalcPostfixDebug, int) +variable(sseqRecDebug, int) +variable(callbackParallelThreadsDefault, int) +variable(devaCalcoutSoftDebug, int) +variable(boHIGHprecision, int) +variable(dbTemplateMaxVars, int) +variable(dbRecordsAbcSorted, int) +variable(aCalcPerformDebug, int) +variable(aCalcLoopMax, int) +variable(swaitRecordDebug, int) +variable(devsCalcoutSoftDebug, int) +variable(seqDLYlimit, double) +variable(asCaDebug, int) variable(sCalcStackHW, int) -variable(dbRecordsOnceOnly, int) -variable(dbQuietMacroWarnings, int) variable(streamDebug, int) -variable(sseqRecDebug, int) -variable(transformRecordDebug, int) -variable(aCalcMonitorMem_debug, int) -variable(dbTemplateMaxVars, int) -variable(callbackParallelThreadsDefault, int) -variable(aCalcoutRecordDebug, int) +variable(interpDebug, int) +variable(sCalcLoopMax, int) +variable(histogramSDELprecision, int) +variable(dbQuietMacroWarnings, int) +variable(sCalcPostfixDebug, int) variable(sCalcPerformDebug, int) variable(atExitDebug, int) -variable(interpDebug, int) -variable(CASDEBUG, int) -variable(dbBptNotMonotonic, int) -variable(sCalcoutRecordDebug, int) -variable(aCalcLoopMax, int) -variable(sCalcPostfixDebug, int) -variable(calcoutODLYprecision, int) -variable(sCalcStackLW, int) -variable(devsCalcoutSoftDebug, int) -variable(aCalcPerformDebug, int) -variable(sCalcLoopMax, int) -variable(calcoutODLYlimit, double) -variable(histogramSDELprecision, int) -variable(seqDLYlimit, double) -variable(arrayTestDebug, int) -variable(aCalcPostfixDebug, int) -variable(debugSubAve, int) -variable(boHIGHprecision, int) -variable(boHIGHlimit, double) -variable(asCaDebug, int) -variable(dbRecordsAbcSorted, int) -variable(dbThreadRealtimeLock, int) -variable(swaitRecordDebug, int) -variable(aCalcAsyncThreshold, int) -variable(seqDLYprecision, int) -variable(dbConvertStrict, int) -variable(devaCalcoutSoftDebug, int) +variable(aCalcoutRecordDebug, int)