Commit b432bcce authored by claes's avatar claes

Obsolete classes removed

parent acf58315
...@@ -662,9 +662,6 @@ int ClassRead::struct_cixstr_to_classid( char *cix_str, pwr_tClassId *cid) ...@@ -662,9 +662,6 @@ int ClassRead::struct_cixstr_to_classid( char *cix_str, pwr_tClassId *cid)
{ "pwr_eCix_System", pwr_eCix_System}, { "pwr_eCix_System", pwr_eCix_System},
{ "pwr_eCix_LibHier", pwr_eCix_LibHier}, { "pwr_eCix_LibHier", pwr_eCix_LibHier},
{ "pwr_eCix_DocHier", pwr_eCix_DocHier}, { "pwr_eCix_DocHier", pwr_eCix_DocHier},
{ "pwr_eCix_SystemVersion", pwr_eCix_SystemVersion},
{ "pwr_eCix_NodeVersion", pwr_eCix_NodeVersion},
{ "pwr_eCix_BootVersion", pwr_eCix_BootVersion},
{ "pwr_eCix_AttrXRef", pwr_eCix_AttrXRef}, { "pwr_eCix_AttrXRef", pwr_eCix_AttrXRef},
{ "pwr_eCix_Menu", pwr_eCix_Menu}, { "pwr_eCix_Menu", pwr_eCix_Menu},
{ "pwr_eCix_MenuSeparator", pwr_eCix_MenuSeparator}, { "pwr_eCix_MenuSeparator", pwr_eCix_MenuSeparator},
......
...@@ -58,12 +58,9 @@ typedef struct pwr_s_GraphPlcConnection pwr_sGraphPlcConnection; ...@@ -58,12 +58,9 @@ typedef struct pwr_s_GraphPlcConnection pwr_sGraphPlcConnection;
typedef struct pwr_s_Buffer pwr_sBuffer; typedef struct pwr_s_Buffer pwr_sBuffer;
typedef struct pwr_s_Param pwr_sParam; typedef struct pwr_s_Param pwr_sParam;
typedef struct pwr_s_PlantHier pwr_sPlantHier; typedef struct pwr_s_PlantHier pwr_sPlantHier;
typedef struct pwr_s_BootVersion pwr_sBootVersion;
typedef struct pwr_s_Node pwr_sNode; typedef struct pwr_s_Node pwr_sNode;
typedef struct pwr_s_NodeVersion pwr_sNodeVersion;
typedef struct pwr_s_Appl pwr_sAppl; typedef struct pwr_s_Appl pwr_sAppl;
typedef struct pwr_s_System pwr_sSystem; typedef struct pwr_s_System pwr_sSystem;
typedef struct pwr_s_SystemVersion pwr_sSystemVersion;
typedef struct pwr_s_MenuCascade pwr_sMenuCascade; typedef struct pwr_s_MenuCascade pwr_sMenuCascade;
typedef struct pwr_s_MenuButton pwr_sMenuButton; typedef struct pwr_s_MenuButton pwr_sMenuButton;
typedef struct pwr_s_Object pwr_sObject; typedef struct pwr_s_Object pwr_sObject;
...@@ -215,9 +212,6 @@ typedef enum { ...@@ -215,9 +212,6 @@ typedef enum {
pwr_eCix_System = 33, pwr_eCix_System = 33,
pwr_eCix_LibHier = 34, pwr_eCix_LibHier = 34,
pwr_eCix_DocHier = 35, pwr_eCix_DocHier = 35,
pwr_eCix_SystemVersion = 36,
pwr_eCix_NodeVersion = 37,
pwr_eCix_BootVersion = 38,
pwr_eCix_AttrXRef = 39, pwr_eCix_AttrXRef = 39,
pwr_eCix_Menu = 40, pwr_eCix_Menu = 40,
pwr_eCix_MenuSeparator = 41, pwr_eCix_MenuSeparator = 41,
...@@ -281,9 +275,6 @@ typedef enum { ...@@ -281,9 +275,6 @@ typedef enum {
pwr_eClass_System = pwr_ClassId(pwr_eCix_System), pwr_eClass_System = pwr_ClassId(pwr_eCix_System),
pwr_eClass_LibHier = pwr_ClassId(pwr_eCix_LibHier), pwr_eClass_LibHier = pwr_ClassId(pwr_eCix_LibHier),
pwr_eClass_DocHier = pwr_ClassId(pwr_eCix_DocHier), pwr_eClass_DocHier = pwr_ClassId(pwr_eCix_DocHier),
pwr_eClass_SystemVersion = pwr_ClassId(pwr_eCix_SystemVersion),
pwr_eClass_NodeVersion = pwr_ClassId(pwr_eCix_NodeVersion),
pwr_eClass_BootVersion = pwr_ClassId(pwr_eCix_BootVersion),
pwr_eClass_AttrXRef = pwr_ClassId(pwr_eCix_AttrXRef), pwr_eClass_AttrXRef = pwr_ClassId(pwr_eCix_AttrXRef),
pwr_eClass_Menu = pwr_ClassId(pwr_eCix_Menu), pwr_eClass_Menu = pwr_ClassId(pwr_eCix_Menu),
pwr_eClass_MenuSeparator = pwr_ClassId(pwr_eCix_MenuSeparator), pwr_eClass_MenuSeparator = pwr_ClassId(pwr_eCix_MenuSeparator),
...@@ -917,53 +908,6 @@ struct pwr_s_System ...@@ -917,53 +908,6 @@ struct pwr_s_System
char SystemGroup[80]; char SystemGroup[80];
}; };
struct pwr_s_SystemVersion
{
pwr_tProjVersion RsmoVersion;
pwr_tTime RsmoCreTime;
pwr_tUInt32 RsmoCardinality;
pwr_tUInt32 RsmoBodySize;
pwr_tProjVersion RpmoVersion;
pwr_tTime RpmoCreTime;
pwr_tUInt32 RpmoCardinality;
pwr_tUInt32 RpmoBodySize;
pwr_tProjVersion RcoVersion;
pwr_tTime RcoCreTime;
pwr_tUInt32 RcoCardinality;
pwr_tUInt32 RcoBodySize;
};
struct pwr_s_BootVersion
{
pwr_tProjVersion BootVersion;
pwr_tTime BootCreTime;
pwr_tObjid Node[256];
pwr_tProjVersion DnoVersion[256];
};
struct pwr_s_NodeVersion
{
pwr_tObjid Node;
pwr_tUInt32 Cardinality;
pwr_tUInt32 BodySize;
pwr_tProjVersion DnoVersion;
pwr_tTime DnoCreTime;
pwr_tUInt32 DnoCardinality;
pwr_tUInt32 DnoBodySize;
pwr_tProjVersion RsmoVersion;
pwr_tTime RsmoCreTime;
pwr_tUInt32 RsmoCardinality;
pwr_tUInt32 RsmoBodySize;
pwr_tProjVersion RpmoVersion;
pwr_tTime RpmoCreTime;
pwr_tUInt32 RpmoCardinality;
pwr_tUInt32 RpmoBodySize;
pwr_tProjVersion RcoVersion;
pwr_tTime RcoCreTime;
pwr_tUInt32 RcoCardinality;
pwr_tUInt32 RcoBodySize;
};
struct pwr_s_Node struct pwr_s_Node
{ {
pwr_tString80 Description; pwr_tString80 Description;
......
...@@ -54,18 +54,6 @@ pwr_dImport pwr_BindIoMethods(Ao_HVAO4); ...@@ -54,18 +54,6 @@ pwr_dImport pwr_BindIoMethods(Ao_HVAO4);
pwr_dImport pwr_BindIoMethods(Ai_HVAI32); pwr_dImport pwr_BindIoMethods(Ai_HVAI32);
pwr_dImport pwr_BindIoMethods(Ai_AI32uP); pwr_dImport pwr_BindIoMethods(Ai_AI32uP);
pwr_dImport pwr_BindIoMethods(Co_PI24BO); pwr_dImport pwr_BindIoMethods(Co_PI24BO);
#if defined(OS_ELN)
pwr_dImport pwr_BindIoMethods(RTP_DIOC);
pwr_dImport pwr_BindIoMethods(Rack_RTP);
pwr_dImport pwr_BindIoMethods(Ai_7436);
pwr_dImport pwr_BindIoMethods(Ao_7455_20);
pwr_dImport pwr_BindIoMethods(Ao_7455_30);
pwr_dImport pwr_BindIoMethods(Pd_7435_26);
pwr_dImport pwr_BindIoMethods(Di_7437_37);
pwr_dImport pwr_BindIoMethods(Do_7437_83);
pwr_dImport pwr_BindIoMethods(Co_7435_33);
pwr_dImport pwr_BindIoMethods(Co_7437_33);
#endif
#if defined(OS_LYNX) #if defined(OS_LYNX)
pwr_dImport pwr_BindIoMethods(Pb_Profiboard); pwr_dImport pwr_BindIoMethods(Pb_Profiboard);
...@@ -88,18 +76,6 @@ pwr_BindIoClasses(Base) = { ...@@ -88,18 +76,6 @@ pwr_BindIoClasses(Base) = {
pwr_BindIoClass(Ai_HVAI32), pwr_BindIoClass(Ai_HVAI32),
pwr_BindIoClass(Ai_AI32uP), pwr_BindIoClass(Ai_AI32uP),
pwr_BindIoClass(Co_PI24BO), pwr_BindIoClass(Co_PI24BO),
#if defined(OS_ELN)
pwr_BindIoClass(RTP_DIOC),
pwr_BindIoClass(Rack_RTP),
pwr_BindIoClass(Ai_7436),
pwr_BindIoClass(Ao_7455_20),
pwr_BindIoClass(Ao_7455_30),
pwr_BindIoClass(Pd_7435_26),
pwr_BindIoClass(Di_7437_37),
pwr_BindIoClass(Do_7437_83),
pwr_BindIoClass(Co_7435_33),
pwr_BindIoClass(Co_7437_33),
#endif
#if defined(OS_LYNX) #if defined(OS_LYNX)
pwr_BindIoClass(Pb_Profiboard), pwr_BindIoClass(Pb_Profiboard),
pwr_BindIoClass(Pb_DP_Slave), pwr_BindIoClass(Pb_DP_Slave),
......
This diff is collapsed.
/* rt_io_convert.g -- <short description>
PROVIEW/R
Copyright (C) 1996 by Comator Process AB.
IO conversion PROVIEW/R. */
pwr_tStatus io_Convert (
void *ChanObjP,
void *ConfigObjP,
pwr_tUInt16 *RawValueP,
pwr_tFloat32 *SigValueP,
pwr_tFloat32 *ActValueP,
pwr_tClassId ChanTypeCode
);
This diff is collapsed.
#ifndef rt_io_utils_h
#define rt_io_utils_h
/* rt_io_utils.h -- <short description>
PROVIEW/R
Copyright (C) 1996 by Comator Process AB.
<Description>. */
/************************************************************************
*
* Name: io_GetParConversionOn(ObjName, ObjType, ValueP)
*
* Type: pwr_tInt32 return value is a standard format condition code.
*
* TYPE PARAMETER IOGF DESCRIPTION
* pwr_tPathName ObjName I NULL terminated object name string.
* ObjName must be the name of signal
* object.
* pwr_tClassId ObjType I Type of object (numeric).
* pwr_cClass_Di,
* pwr_cClass_Ai
* pwr_tAddress ValueP O Pointer to a buffer.
* The buffer is filled with the
* requested information.
* pwr_cClass_Di -> Pointer to a boolean
* value.
* pwr_cClass_Ai -> Pointer to a boolean
* value.
*
* Description: This routine fetches the parameter ConversiOn from
* channel object.
*************************************************************************/
pwr_tInt32 io_GetParConversionOn (
pwr_tPathName ObjName,
pwr_tClassId ObjType,
pwr_tAddress ValueP);
/************************************************************************
*
* Name: io_GetParInvertOn(ObjName, ObjType, ValueP)
*
* Type: pwr_tInt32 return value is a standard format condition code.
*
* TYPE PARAMETER IOGF DESCRIPTION
* pwr_tPathName ObjName I NULL terminated object name string.
* ObjName must be the name of signal
* object.
* pwr_tClassId ObjType I Type of object (numeric).
* pwr_cClass_Di,
* pwr_cClass_Do
* pwr_tAddress ValueP O Pointer to a buffer.
* The buffer is filled with the
* requested information.
* pwr_cClass_Di -> Pointer to a boolean
* value.
* pwr_cClass_Do -> Pointer to a boolean
* value.
*
* Description: This routine fetches the parameter InvertOn from channel object.
*************************************************************************/
pwr_tInt32 io_GetParInvertOn (
pwr_tPathName ObjName,
pwr_tClassId ObjType,
pwr_tAddress ValueP);
/************************************************************************
*
* Name: io_SetParConversionOn(ObjName, ObjType, ValueP)
*
* Type: pwr_tInt32 return value is a standard format condition code.
*
* TYPE PARAMETER IOGF DESCRIPTION
* pwr_tPathName ObjName I NULL terminated object name string.
* ObjName must be the name of signal
* object.
* pwr_tClassId ObjType I Type of object (numeric).
* - pwr_cClass_Di,
* - pwr_cClass_Do
*
* pwr_tAddress ValueP I Pointer to a buffer filled with
* information.
* pwr_cClass_Di -> Pointer to a boolean
* value.
* pwr_cClass_Ai -> Pointer to a boolean
* value.
*
* Description: This routine is used to change parameter ConversionOn in
* channel object and one bit in parameter ConvMask1 or 2 in
* card object.
*************************************************************************/
pwr_tInt32 io_SetParConversionOn (
pwr_tPathName ObjName,
pwr_tClassId ObjType,
pwr_tAddress ValueP);
/************************************************************************
*
* Name: io_SetParInvertOn(ObjName, ObjType, ValueP)
*
* Type: pwr_tInt32 return value is a standard format condition code.
*
* TYPE PARAMETER IOGF DESCRIPTION
* pwr_tPathName ObjName I NULL terminated object name string.
* ObjName must be the name of signal
* object.
* pwr_tClassId ObjType I Type of object (numeric).
* - pwr_cClass_Di,
* - pwr_cClass_Do
*
* pwr_tAddress ValueP I Pointer to a buffer filled with
* information.
* pwr_cClass_Di -> Pointer to a boolean
* value.
* pwr_cClass_Do -> Pointer to a boolean
* value.
*
* Description: This routine is used to change parameter InvertOn in channel
* object and one bit in parameter InvMask1 or 2 in card object.
*************************************************************************/
pwr_tInt32 io_SetParInvertOn (
pwr_tPathName ObjName,
pwr_tClassId ObjType,
pwr_tAddress ValueP);
/************************************************************************
*
* Name: io_SetParTestValue(ObjName, ObjType, ValueP)
*
* Type: pwr_tInt32 return value is a standard format condition code.
*
* TYPE PARAMETER IOGF DESCRIPTION
* pwr_tPathName ObjName I NULL terminated object name string.
* pwr_tClassid ObjType I Type of object (numeric).
* OT_AO, OT_DO (see pinc$:ot_def.h).
* pwr_tAddress ValueP I Pointer to a buffer filled with
* information.
* OT_AO -> Pointer to a float value.
* OT_DO -> Pointer to a boolean value.
*
* Description: This routine is used to change parameter TestValue in channel
* object and parameters TestValue1,2 in card object.
*************************************************************************/
extern pwr_tInt32 io_SetParTestValue (
pwr_tPathName ObjName,
pwr_tClassId ObjType,
pwr_tAddress ValueP);
/************************************************************************
*
* Name: io_GetParTestValue(ObjName, ObjType, ValueP)
*
* Type: pwr_tInt32 return value is a standard format condition code.
*
* TYPE PARAMETER IOGF DESCRIPTION
* pwr_tPathName ObjName I NULL terminated object name string.
* pwr_tClassId ObjType I Type of object (numeric).
* OT_AO, OT_DO (see pinc$:ot_def.h).
* pwr_tAddress ValueP O Pointer to a buffer.
* The buffer is filled with the
* requested information.
* OT_AO -> Pointer to a float value.
* OT_DO -> Pointer to a boolean value.
*
* Description: This routine fetches the parameter TestValue in channel object.
*************************************************************************/
extern pwr_tInt32 io_GetParTestValue (
pwr_tPathName ObjName,
pwr_tClassId ObjType,
pwr_tAddress ValueP);
/************************************************************************
*
* Name: io_SetParTestOn(ObjName, ObjType, ValueP)
*
* Type: pwr_tInt32 return value is a standard format condition code.
*
* TYPE PARAMETER IOGF DESCRIPTION
* pwr_tPathName ObjName I NULL terminated object name string.
* pwr_tClassId ObjType I Type of object (numeric).
* OT_AO, OT_DO (see pinc$:ot_def.h).
* pwr_tAddress ValueP I Pointer to a buffer filled with
* information.
* OT_AO -> Pointer to a boolean value.
* OT_DO -> Pointer to a boolean value.
*
* Description: This routine is used to change parameter TestOn in channel
* object and parameters TestMask1,2 in card object.
*************************************************************************/
extern pwr_tInt32 io_SetParTestOn (
pwr_tPathName ObjName,
pwr_tClassId ObjType,
pwr_tAddress ValueP);
/************************************************************************
*
* Name: io_GetParTestOn(ObjName, ObjType, ValueP)
*
* Type: pwr_tInt32 return value is a standard format condition code.
*
* TYPE PARAMETER IOGF DESCRIPTION
* pwr_tPathName ObjName I NULL terminated object name string.
* pwr_tClassId ObjType I Type of object (numeric).
* OT_AO, OT_DO (see pinc$:ot_def.h).
* pwr_tAddress ValueP O Pointer to a buffer.
* The buffer is filled with the
* requested information.
* OT_AO -> Pointer to a boolean value.
* OT_DO -> Pointer to a boolean value.
*
* Description: This routine fetches the parameter TestOn in channel object.
*************************************************************************/
extern pwr_tInt32 io_GetParTestOn (
pwr_tPathName ObjName,
pwr_tClassId ObjType,
pwr_tAddress ValueP);
/************************************************************************
*
* Name: io_SetParFixedOutValue(ObjName, ObjType, ValueP)
*
* Type: pwr_tInt32 return value is a standard format condition code.
*
* TYPE PARAMETER IOGF DESCRIPTION
* pwr_tPathName ObjName I NULL terminated object name string.
* ObjName must be the name of signal
* object.
* pwr_tClassId ObjType I Type of object (numeric).
* - pwr_cClass_Ao,
* - pwr_cClass_Do
*
* pwr_tAddress ValueP I Pointer to a buffer filled with
* information.
* pwr_cClass_Ao -> Pointer to a float
* value.
* pwr_cClass_Do -> Pointer to a boolean
* value.
*
* Description: This routine is used to change parameter FixedOutValue in
* channel object and one bit in parameter FixedOutValue1 or 2
* in card object.
*************************************************************************/
pwr_tInt32 io_SetParFixedOutValue (
pwr_tPathName ObjName,
pwr_tClassId ObjType,
pwr_tAddress ValueP);
#endif /* if defined */
! pwrb_c_aanalyse.wb_load -- the AAnalyse class.
!
! PROVIEW/R
! Copyright (C) 1996 by Comator Process AB.
!
! Defines the class AAnalyse.
!
! Range ldh_eDId_Base
!
!/**
! @Version 1.0
! @Summary Analyse the value of analog values in trace
! Analyse the value of analog values in trace.
! This object is obsolete since V3.0
!*/
SObject pwrb:Class
Object AAnalyse $ClassDef 1
Body SysBody
Attr Flags |= pwr_mClassDef_DevOnly
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_Standard
EndBody
Object DevBody $ObjBodyDef 2
Object Node $Input 1
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
Attr GraphName = "In"
Attr DebAnnot = 1
EndBody
EndObject
Object PlcNode $Buffer 2
Body SysBody
Attr Class = pwr_eClass_PlcNode
EndBody
EndObject
EndObject
Object GraphPlcNode $GraphPlcNode
Body SysBody
Attr object_type = 13
Attr parameters[0] = 1
Attr parameters[1] = 0
Attr parameters[2] = 0
Attr parameters[3] = 0
Attr subwindows = 0
Attr graphmethod = 12
Attr graphindex = 19
Attr default_mask[0] = 1
Attr default_mask[1] = 0
Attr segname_annotation = 0
Attr compmethod = 2
Attr compindex = 0
Attr tracemethod = 8
Attr traceindex = 2
Attr objname = "AAnalyse"
Attr graphname = "AAnalyse"
Attr debugpar = ""
EndBody
EndObject
EndObject
EndSObject
! pwrb_c_ai_7436.wb_load -- Defines the class Ai_7436.
!
! PROVIEW/R
! Copyright (C) 1996 by Comator Process AB.
!
! RTP Analog Input card 7436
!
! Range ldh_eDId_Base
!
SObject pwrb:Class
Object Ai_7436 $ClassDef 5
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_RtAndDevBodies
Attr Flags |= pwr_mClassDef_IO
EndBody
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "Ai_7436"
EndBody
Object IOSysType $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_CONST
EndBody
EndObject
Object Description $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
Object DevName $Attribute 3
Body SysBody
Attr TypeRef = "pwrs:Type-$String40"
EndBody
EndObject
Object DevNumber $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_STATE
EndBody
EndObject
Object ErrorCount $Attribute 5
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_STATE
EndBody
EndObject
Object ErrorSoftLimit $Attribute 6
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ErrorHardLimit $Attribute 7
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object DevPolyType $Attribute 8
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
Object DevPolyCoef0 $Attribute 9
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
Object DevPolyCoef1 $Attribute 10
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
Object MaxNoOfChannels $Attribute 11
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
EndBody
EndObject
Object CardAddress $Attribute 12
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object DiffInput $Attribute 13
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object VoltageRange $Attribute 14
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
Object Process $Attribute 15
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ThreadObject $Intern 16
Body SysBody
Attr TypeRef = "pwrs:Type-$Objid"
EndBody
EndObject
EndObject
Object DevBody $ObjBodyDef 2
Object ChannelAllocation $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
EndObject
Object Template Ai_7436
Body RtBody
Attr IOSysType = 3
Attr MaxNoOfChannels = 8
Attr DiffInput = 1
Attr DevPolyType = 1
Attr DevPolyCoef1 = 0.0025
Attr Process = 2
EndBody
EndObject
Object AnteAdopt $DbCallBack
Body SysBody
Attr MethodName = "Ai_7436-AnteAdopt"
EndBody
EndObject
Object PostUnadopt $DbCallBack
Body SysBody
Attr MethodName = "Ai_7436-postUnadopt"
EndBody
EndObject
Object PostAdopt $DbCallBack
Body SysBody
Attr MethodName = "Ai_7436-PostAdopt"
EndBody
EndObject
EndObject
EndSObject
! pwrb_c_ai_vmic3113a.wb_load -- Defines the class Ai_vmic3113a.
!
! PROVIEW/R
! Copyright (C) 1997 by Comator Process AB.
!
! VMIC: Ai card VMIVME-3113A
!
!
SObject pwrb:Class
Object Ai_Vmic3113A $ClassDef 262
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_RtAndDevBodies
Attr Flags |= pwr_mClassDef_IO
EndBody
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "Ai_Vmic3113A"
EndBody
Object IOSysType $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_CONST
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
Object Description $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
Object DevName $Attribute 3
Body SysBody
Attr TypeRef = "pwrs:Type-$String40"
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
Object DevNumber $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
Object ErrorCount $Attribute 5
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
Object ErrorSoftLimit $Attribute 6
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ErrorHardLimit $Attribute 7
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object DevPolyType $Attribute 8
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
EndBody
EndObject
Object DevPolyCoef0 $Attribute 9
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
Object DevPolyCoef1 $Attribute 10
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
Object MaxNoOfChannels $Attribute 11
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
Object CardAddress $Attribute 12
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object TwoComplement $Attribute 13
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object Polling $Attribute 14
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object Process $Attribute 15
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ThreadObject $Intern 16
Body SysBody
Attr TypeRef = "pwrs:Type-$Objid"
EndBody
EndObject
EndObject
Object DevBody $ObjBodyDef 2
Object ChannelAllocation $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
EndObject
Object Template Ai_Vmic3113A
Body RtBody
Attr IOSysType = 5
Attr Description = "AI Card VMIVME-3133A from VMIC"
Attr MaxNoOfChannels = 64
Attr DevPolyType = 1
Attr DevPolyCoef1 = 4.8840049e-3
Attr TwoComplement = 1
Attr Process = 2
EndBody
EndObject
EndObject
EndSObject
! pwrb_c_ao_7455_20.wb_load -- Defines the class Ao_7455_20.
!
! PROVIEW/R
! Copyright (C) 1996 by Comator Process AB.
!
! RTP Analog Output card 7455_20.
!
!
SObject pwrb:Class
Object Ao_7455_20 $ClassDef 11
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_RtAndDevBodies
Attr Flags |= pwr_mClassDef_IO
EndBody
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "Ao_7455_20"
EndBody
Object IOSysType $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_CONST
EndBody
EndObject
Object Description $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
Object DevName $Attribute 3
Body SysBody
Attr TypeRef = "pwrs:Type-$String40"
EndBody
EndObject
Object DevNumber $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_STATE
EndBody
EndObject
Object ErrorCount $Attribute 5
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_STATE
EndBody
EndObject
Object ErrorSoftLimit $Attribute 6
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ErrorHardLimit $Attribute 7
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object DevPolyType $Attribute 8
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
Object DevPolyCoef0 $Attribute 9
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
Object DevPolyCoef1 $Attribute 10
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
Object MaxNoOfChannels $Attribute 11
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_CONST
EndBody
EndObject
Object CardAddress $Attribute 12
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object Process $Attribute 13
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ThreadObject $Intern 14
Body SysBody
Attr TypeRef = "pwrs:Type-$Objid"
EndBody
EndObject
EndObject
Object DevBody $ObjBodyDef 2
Object ChannelAllocation $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
EndObject
Object Template Ao_7455_20
Body RtBody
Attr IOSysType = 3
Attr DevPolyType = 1
Attr DevPolyCoef1 = 0.0025
Attr MaxNoOfChannels = 1
Attr Process = 2
EndBody
EndObject
Object AnteAdopt $DbCallBack
Body SysBody
Attr MethodName = "Ao_7455_20-AnteAdopt"
EndBody
EndObject
Object PostUnadopt $DbCallBack
Body SysBody
Attr MethodName = "Ao_7455_20-PostUnadopt"
EndBody
EndObject
Object PostAdopt $DbCallBack
Body SysBody
Attr MethodName = "Ao_7455_20-PostAdopt"
EndBody
EndObject
EndObject
EndSObject
! pwrb_c_ao_7455_30.wb_load -- Defines the class Ao_7455_30.
!
! PROVIEW/R
! Copyright (C) 1996 by Comator Process AB.
!
! RTP Analog Output card 7455_30.
!
! Range ldh_eDId_Base
!
SObject pwrb:Class
Object Ao_7455_30 $ClassDef 12
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_RtAndDevBodies
Attr Flags |= pwr_mClassDef_IO
EndBody
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "Ao_7455_30"
EndBody
Object IOSysType $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_CONST
EndBody
EndObject
Object Description $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
Object DevName $Attribute 3
Body SysBody
Attr TypeRef = "pwrs:Type-$String40"
EndBody
EndObject
Object DevNumber $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_STATE
EndBody
EndObject
Object ErrorCount $Attribute 5
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_STATE
EndBody
EndObject
Object ErrorSoftLimit $Attribute 6
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ErrorHardLimit $Attribute 7
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object DevPolyType $Attribute 8
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
Object DevPolyCoef0 $Attribute 9
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
Object DevPolyCoef1 $Attribute 10
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
Object MaxNoOfChannels $Attribute 11
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_CONST
EndBody
EndObject
Object CardAddress $Attribute 12
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object Process $Attribute 13
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ThreadObject $Intern 14
Body SysBody
Attr TypeRef = "pwrs:Type-$Objid"
EndBody
EndObject
EndObject
Object DevBody $ObjBodyDef 2
Object ChannelAllocation $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
EndObject
Object Template Ao_7455_30
Body RtBody
Attr IOSysType = 3
Attr DevPolyType = 1
Attr DevPolyCoef1 = 0.0025
Attr MaxNoOfChannels = 4
Attr Process = 2
EndBody
EndObject
Object AnteAdopt $DbCallBack
Body SysBody
Attr MethodName = "Ao_7455_30-AnteAdopt"
EndBody
EndObject
Object PostUnadopt $DbCallBack
Body SysBody
Attr MethodName = "Ao_7455_30-PostUnadopt"
EndBody
EndObject
Object PostAdopt $DbCallBack
Body SysBody
Attr MethodName = "Ao_7455_30-PostAdopt"
EndBody
EndObject
EndObject
EndSObject
! pwrb_c_ao_vmic4800.wb_load -- Defines the class Ao_Vmic4800.
!
! PROVIEW/R
! Copyright (C) 199699 by Mandator AB.
!
! VMIC Analog Output card VMIVME-4800.
!
!
SObject pwrb:Class
Object Ao_Vmic4800 $ClassDef 263
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_RtAndDevBodies
Attr Flags |= pwr_mClassDef_IO
EndBody
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "Ao_Vmic4800"
EndBody
Object IOSysType $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_CONST
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
Object Description $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
Object DevName $Attribute 3
Body SysBody
Attr TypeRef = "pwrs:Type-$String40"
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
Object DevNumber $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
Object ErrorCount $Attribute 5
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
Object ErrorSoftLimit $Attribute 6
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ErrorHardLimit $Attribute 7
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object DevPolyType $Attribute 8
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
EndBody
EndObject
Object DevPolyCoef0 $Attribute 9
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
Object DevPolyCoef1 $Attribute 10
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
Object MaxNoOfChannels $Attribute 11
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_CONST
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
Object CardAddress $Attribute 12
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object TwoComplement $Attribute 13
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object Process $Attribute 14
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ThreadObject $Intern 15
Body SysBody
Attr TypeRef = "pwrs:Type-$Objid"
EndBody
EndObject
EndObject
Object DevBody $ObjBodyDef 2
Object ChannelAllocation $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
EndObject
Object Template Ao_Vmic4800
Body RtBody
Attr IOSysType = 5
Attr Description = "AO Card VMIVME-4800 from VMIC"
Attr DevPolyType = 1
Attr DevPolyCoef1 = 0.0025
Attr MaxNoOfChannels = 8
Attr Process = 2
EndBody
EndObject
EndObject
EndSObject
! pwrb_c_co_7435_33.wb_load -- Defines the class Co_7435_33.
!
! PROVIEW/R
! Copyright (C) 1996,99 by Mandator AB.
!
! RTP 12/16 Bit counter card.
!
! Range ldh_eDId_Base
!
SObject pwrb:Class
Object Co_7435_33 $ClassDef 70
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_RtAndDevBodies
Attr Flags |= pwr_mClassDef_IO
EndBody
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "Co_7435_33"
EndBody
Object IOSysType $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_CONST
EndBody
EndObject
Object Description $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
Object DevName $Attribute 3
Body SysBody
Attr TypeRef = "pwrs:Type-$String40"
EndBody
EndObject
Object DevNumber $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_STATE
EndBody
EndObject
Object ErrorCount $Attribute 5
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ErrorSoftLimit $Attribute 6
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ErrorHardLimit $Attribute 7
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ConvMask $Attribute 8
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object MaxNoOfCounters $Attribute 9
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_CONST
EndBody
EndObject
Object COAbsFlag $Attribute 10
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object NoOfBits $Attribute 11
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
EndBody
EndObject
Object CardAddress $Attribute 12
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object Process $Attribute 13
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ThreadObject $Intern 14
Body SysBody
Attr TypeRef = "pwrs:Type-$Objid"
EndBody
EndObject
EndObject
Object DevBody $ObjBodyDef 2
Object ChannelAllocation $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
EndObject
Object Template Co_7435_33
Body RtBody
Attr IOSysType = 4
Attr ErrorSoftLimit = 20
Attr ErrorHardLimit = 100
Attr COAbsFlag = 1
Attr NoOfBits = 16
Attr MaxNoOfCounters = 1
Attr ConvMask = 1
Attr Process = 1
EndBody
EndObject
Object AnteAdopt $DbCallBack
Body SysBody
Attr MethodName = "Co_7435_33-AnteAdopt"
EndBody
EndObject
Object PostUnadopt $DbCallBack
Body SysBody
Attr MethodName = "Co_7435_33-PostUnadopt"
EndBody
EndObject
Object PostAdopt $DbCallBack
Body SysBody
Attr MethodName = "Co_7435_33-PostAdopt"
EndBody
EndObject
EndObject
EndSObject
! pwrb_c_co_7437_33.wb_load -- Defines the class Co_7437_33.
!
! PROVIEW/R
! Copyright (C) 1996,99 by Mandator AB.
!
! RTP 4 x 16 Bit counter card.
!
SObject pwrb:Class
Object Co_7437_33 $ClassDef 71
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_RtAndDevBodies
Attr Flags |= pwr_mClassDef_IO
EndBody
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "Co_7437_33"
EndBody
Object IOSysType $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_CONST
EndBody
EndObject
Object Description $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
Object DevName $Attribute 3
Body SysBody
Attr TypeRef = "pwrs:Type-$String40"
EndBody
EndObject
Object DevNumber $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_STATE
EndBody
EndObject
Object ErrorCount $Attribute 5
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ErrorSoftLimit $Attribute 6
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ErrorHardLimit $Attribute 7
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ConvMask $Attribute 8
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object MaxNoOfCounters $Attribute 9
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_CONST
EndBody
EndObject
Object COAbsFlag $Attribute 10
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
Attr Flags |= PWR_MASK_ARRAY
Attr Elements = 4
EndBody
EndObject
Object NoOfBits $Attribute 11
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_CONST
EndBody
EndObject
Object CardAddress $Attribute 12
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object Process $Attribute 13
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ThreadObject $Intern 14
Body SysBody
Attr TypeRef = "pwrs:Type-$Objid"
EndBody
EndObject
EndObject
Object DevBody $ObjBodyDef 2
Object ChannelAllocation $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
EndObject
Object Template Co_7437_33
Body RtBody
Attr IOSysType = 4
Attr ErrorSoftLimit = 20
Attr ErrorHardLimit = 100
Attr COAbsFlag = 1
Attr NoOfBits = 16
Attr MaxNoOfCounters = 4
Attr ConvMask = 15
Attr Process = 1
EndBody
EndObject
Object AnteAdopt $DbCallBack
Body SysBody
Attr MethodName = "Co_7437_33-AnteAdopt"
EndBody
EndObject
Object PostUnadopt $DbCallBack
Body SysBody
Attr MethodName = "Co_7437_33-PostUnadopt"
EndBody
EndObject
Object PostAdopt $DbCallBack
Body SysBody
Attr MethodName = "Co_7437_33-PostAdopt"
EndBody
EndObject
EndObject
EndSObject
! pwrb_c_co_ipquadrature.wb_load -- Defines the class Co_IpQuadrature.
!
! PROVIEW/R
! Copyright (C) 1996,99 by Mandator AB.
!
! Greenspring IP-Quadrature counter.
!
!
SObject pwrb:Class
Object Co_IpQuadrature $ClassDef 264
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_RtAndDevBodies
Attr Flags |= pwr_mClassDef_IO
EndBody
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "Co_IpQuadrature"
EndBody
Object Description $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
Object Slot $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$Char"
EndBody
EndObject
Object ConvMask $Attribute 6
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object CoAbsFlag $Attribute 7
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
Attr Flags |= PWR_MASK_ARRAY
Attr Elements = 4
EndBody
EndObject
Object EnableTermination1_2 $Attribute 8
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object EnableTermination3_4 $Attribute 9
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
!
! Counter 1
!
Object QuadMultFact1 $Attribute 10
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object YDeterminesDirection1 $Attribute 11
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object InvertX1 $Attribute 12
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object InvertY1 $Attribute 13
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object InvertZ1 $Attribute 14
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object ClearOnZ1 $Attribute 15
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object HoldOnZ1 $Attribute 16
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
!
! Counter 2
!
Object QuadMultFact2 $Attribute 17
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object YDeterminesDirection2 $Attribute 18
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object InvertX2 $Attribute 19
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object InvertY2 $Attribute 20
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object InvertZ2 $Attribute 21
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object ClearOnZ2 $Attribute 22
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object HoldOnZ2 $Attribute 23
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
!
! Counter 3
!
Object QuadMultFact3 $Attribute 24
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object YDeterminesDirection3 $Attribute 25
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object InvertX3 $Attribute 26
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object InvertY3 $Attribute 27
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object InvertZ3 $Attribute 28
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object ClearOnZ3 $Attribute 29
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object HoldOnZ3 $Attribute 30
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
!
! Counter 4
!
Object QuadMultFact4 $Attribute 31
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object YDeterminesDirection4 $Attribute 32
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object InvertX4 $Attribute 33
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object InvertY4 $Attribute 34
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object InvertZ4 $Attribute 35
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object ClearOnZ4 $Attribute 36
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object HoldOnZ4 $Attribute 37
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
!
!
!
Object ErrorCount $Attribute 3
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
Object ErrorSoftLimit $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ErrorHardLimit $Attribute 5
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object MaxNoOfChannels $Attribute 38
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_CONST
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
Object Process $Attribute 39
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ThreadObject $Intern 40
Body SysBody
Attr TypeRef = "pwrs:Type-$Objid"
EndBody
EndObject
EndObject
Object DevBody $ObjBodyDef 2
Object ChannelAllocation $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
EndObject
Object Template Co_IpQuadrature
Body RtBody
Attr Description = "IP-Quadrature counter from Greenspring"
Attr ConvMask = 15
Attr QuadMultFact1 = 4
Attr QuadMultFact2 = 4
Attr QuadMultFact3 = 4
Attr QuadMultFact4 = 4
Attr MaxNoOfChannels = 4
Attr Process = 1
EndBody
EndObject
EndObject
EndSObject
! pwrb_c_danalyse.wb_load -- Defines the class DAnalyse.
!
! PROVIEW/R
! Copyright (C) 1996 by Comator Process AB.
!
! <Description>.
!
! Range ldh_eDId_Base
!
SObject pwrb:Class
Object DAnalyse $ClassDef 81
Body SysBody
Attr Flags |= pwr_mClassDef_DevOnly
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_Standard
EndBody
Object DevBody $ObjBodyDef 2
Object Node $Input 1
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
Attr GraphName = "In"
Attr DebAnnot = 1
EndBody
EndObject
Object PlcNode $Buffer 2
Body SysBody
Attr Class = pwr_eClass_PlcNode
EndBody
EndObject
EndObject
Object GraphPlcNode $GraphPlcNode
Body SysBody
Attr object_type = 14
Attr parameters[0] = 1
Attr parameters[1] = 0
Attr parameters[2] = 0
Attr parameters[3] = 0
Attr subwindows = 0
Attr graphmethod = 12
Attr graphindex = 20
Attr default_mask[0] = 1
Attr default_mask[1] = 0
Attr segname_annotation = 0
Attr compmethod = 2
Attr compindex = 0
Attr tracemethod = 8
Attr traceindex = 1
Attr objname = "DAnalyse"
Attr graphname = "DAnalyse"
Attr debugpar = ""
EndBody
EndObject
EndObject
EndSObject
! pwrb_c_dbdistribute.wb_load -- Defines the class DbDistribute.
!
! PROVIEW/R
! Copyright (C) 1996 by Comator Process AB.
!
! <Description>.
!
!/**
! Obsolete from V3.3.
!*/
!
SObject pwrb:Class
Object DbDistribute $ClassDef 84
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_RtAndDevBodies
EndBody
Object DevBody $ObjBodyDef 2
Object TargetNode $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$String40"
EndBody
EndObject
Object TargetProject $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$String40"
EndBody
EndObject
EndObject
EndObject
EndSObject
! pwrb_c_di_7437_37.wb_load -- Defines the class Di_7437_37.
!
! PROVIEW/R
! Copyright (C) 1996,99 by Mandator AB.
!
! RTP Digital Input card 7437_37.
!
SObject pwrb:Class
Object Di_7437_37 $ClassDef 89
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_RtAndDevBodies
Attr Flags |= pwr_mClassDef_IO
EndBody
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "Di_7437_37"
EndBody
Object IOSysType $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_CONST
EndBody
EndObject
Object Description $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
Object DevName $Attribute 3
Body SysBody
Attr TypeRef = "pwrs:Type-$String40"
EndBody
EndObject
Object DevNumber $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_STATE
EndBody
EndObject
Object ErrorCount $Attribute 5
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_STATE
EndBody
EndObject
Object ErrorSoftLimit $Attribute 6
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ErrorHardLimit $Attribute 7
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ConvMask1 $Attribute 8
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
EndBody
EndObject
Object ConvMask2 $Attribute 9
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
EndBody
EndObject
Object InvMask1 $Attribute 10
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
EndBody
EndObject
Object InvMask2 $Attribute 11
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
EndBody
EndObject
Object MaxNoOfChannels $Attribute 12
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_CONST
EndBody
EndObject
Object CardAddress $Attribute 13
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object Process $Attribute 14
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ThreadObject $Intern 15
Body SysBody
Attr TypeRef = "pwrs:Type-$Objid"
EndBody
EndObject
EndObject
Object DevBody $ObjBodyDef 2
Object ChannelAllocation $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
EndObject
Object Template Di_7437_37
Body RtBody
Attr IOSysType = 3
Attr MaxNoOfChannels = 16
Attr Process = 1
EndBody
EndObject
Object AnteAdopt $DbCallBack
Body SysBody
Attr MethodName = "Di_7437_37-AnteAdopt"
EndBody
EndObject
Object PostUnadopt $DbCallBack
Body SysBody
Attr MethodName = "Di_7437_37-PostUnadopt"
EndBody
EndObject
Object PostAdopt $DbCallBack
Body SysBody
Attr MethodName = "Di_7437_37-PostAdopt"
EndBody
EndObject
EndObject
EndSObject
! pwrb_c_directorydbconfig.wb_load -- Defines the class DirectoryDbConfig.
!
! PROVIEW/R
! Copyright (C) 1996 by Comator Process AB.
!
! <Description>.
!
!/**
! Obsolete from V3.3.
!*/
!
SObject pwrb:Class
Object DirectoryDbConfig $ClassDef 88
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_Standard
Attr Flags |= pwr_mClassDef_TopObject
EndBody
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "DirectoryDbConfig"
EndBody
Object Description $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
EndObject
EndObject
EndSObject
! pwrb_c_do_7437_83.wb_load -- Defines the class Do_7437_83.
!
! PROVIEW/R
! Copyright (C) 1996,99 by Mandator AB.
!
! RTP Digital Output card 7437_83.
!
SObject pwrb:Class
Object Do_7437_83 $ClassDef 98
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_RtAndDevBodies
Attr Flags |= pwr_mClassDef_IO
EndBody
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "Do_7437_83"
EndBody
Object IOSysType $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_CONST
EndBody
EndObject
Object Description $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
Object DevName $Attribute 3
Body SysBody
Attr TypeRef = "pwrs:Type-$String40"
EndBody
EndObject
Object DevNumber $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_STATE
EndBody
EndObject
Object ErrorCount $Attribute 5
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_STATE
EndBody
EndObject
Object ErrorSoftLimit $Attribute 6
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ErrorHardLimit $Attribute 7
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object InvMask1 $Attribute 8
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
EndBody
EndObject
Object InvMask2 $Attribute 9
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
EndBody
EndObject
Object TestMask1 $Attribute 10
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_STATE
EndBody
EndObject
Object TestMask2 $Attribute 11
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_STATE
EndBody
EndObject
Object TestValue1 $Attribute 12
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_STATE
EndBody
EndObject
Object TestValue2 $Attribute 13
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_STATE
EndBody
EndObject
Object FixedOutValue1 $Attribute 14
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
EndBody
EndObject
Object FixedOutValue2 $Attribute 15
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
EndBody
EndObject
Object MaxNoOfChannels $Attribute 16
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_CONST
EndBody
EndObject
Object CardAddress $Attribute 17
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object Process $Attribute 18
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ThreadObject $Intern 19
Body SysBody
Attr TypeRef = "pwrs:Type-$Objid"
EndBody
EndObject
EndObject
Object DevBody $ObjBodyDef 2
Object ChannelAllocation $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
EndObject
Object Template Do_7437_83
Body RtBody
Attr IOSysType = 3
Attr MaxNoOfChannels = 16
Attr Process = 1
EndBody
EndObject
Object AnteAdopt $DbCallBack
Body SysBody
Attr MethodName = "Do_7437_83-AnteAdopt"
EndBody
EndObject
Object PostUnadopt $DbCallBack
Body SysBody
Attr MethodName = "Do_7437_83-PostUnadopt"
EndBody
EndObject
Object PostAdopt $DbCallBack
Body SysBody
Attr MethodName = "Do_7437_83-PostAdopt"
EndBody
EndObject
EndObject
EndSObject
! pwrb_c_ipmux.wb_load -- Defines the class IpMux.
!
! PROVIEW/R
! Copyright (C) 1997,99 by Mandator AB.
!
! Interay IP-MUX.
!
SObject pwrb:Class
Object IpMux $ClassDef 265
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_RtAndDevBodies
Attr Flags |= pwr_mClassDef_IO
EndBody
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "IpMux"
EndBody
Object Description $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
Object Slot $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$Char"
EndBody
EndObject
Object Process $Attribute 3
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ThreadObject $Intern 4
Body SysBody
Attr TypeRef = "pwrs:Type-$Objid"
EndBody
EndObject
EndObject
Object Template IpMux
Body RtBody
Attr Description = "IpMux from Interay"
EndBody
EndObject
EndObject
EndSObject
! pwrb_c_line_lat.wb_load -- Defines the class Line_LAT.
!
! PROVIEW/R
! Copyright (C) 1996,99 by Mandator AB.
!
! <Description>.
!
SObject pwrb:Class
Object Line_LAT $ClassDef 142
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_Standard
Attr Flags |= pwr_mClassDef_IO
EndBody
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "Line_LAT"
EndBody
Object Description $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
Object LatDevName $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$String16"
EndBody
EndObject
Object ServerName $Attribute 3
Body SysBody
Attr TypeRef = "pwrs:Type-$String40"
EndBody
EndObject
Object ServerPortName $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$String40"
EndBody
EndObject
Object DisplayIsScope $Attribute 5
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object EscapeRec $Attribute 6
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object Echo $Attribute 7
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object PassAllBits $Attribute 8
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
Object EightBit $Attribute 9
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
EndObject
Object Template Line_LAT
Body RtBody
Attr DisplayIsScope = 0
Attr EscapeRec = 0
Attr Echo = 0
Attr PassAllBits = 1
Attr EightBit = 1
EndBody
EndObject
EndObject
EndSObject
! pwrb_c_muxmod.wb_load -- Defines the class MuxMod.
!
! PROVIEW/R
! Copyright (C) 1997,99 by Mandator AB.
!
! Greenspring MuxMod card, handles DI and DO.
!
SObject pwrb:Class
Object MuxMod $ClassDef 266
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_RtAndDevBodies
Attr Flags |= pwr_mClassDef_IO
EndBody
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "MuxMod"
EndBody
Object Description $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
Object NodeNumber $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8"
EndBody
EndObject
Object GroupIsOutput $Attribute 3
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
Attr Flags |= PWR_MASK_ARRAY
Attr Elements = 5
EndBody
EndObject
Object ConvMask $Attribute 7
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8"
Attr Flags |= PWR_MASK_ARRAY
Attr Elements = 5
EndBody
EndObject
Object InvMask $Attribute 8
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8"
Attr Flags |= PWR_MASK_ARRAY
Attr Elements = 5
EndBody
EndObject
Object TestMask $Attribute 9
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8"
Attr Flags |= PWR_MASK_ARRAY
Attr Elements = 5
EndBody
EndObject
Object TestValue $Attribute 10
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8"
Attr Flags |= PWR_MASK_ARRAY
Attr Elements = 5
EndBody
EndObject
Object FixedOutValue $Attribute 11
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8"
Attr Flags |= PWR_MASK_ARRAY
Attr Elements = 5
EndBody
EndObject
Object ErrorCount $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
Object ErrorSoftLimit $Attribute 5
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ErrorHardLimit $Attribute 6
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object MaxNoOfChannels $Attribute 12
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_CONST
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
Object Process $Attribute 13
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ThreadObject $Intern 14
Body SysBody
Attr TypeRef = "pwrs:Type-$Objid"
EndBody
EndObject
EndObject
Object DevBody $ObjBodyDef 2
Object ChannelAllocation $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
EndObject
Object Template MuxMod
Body RtBody
Attr Description = "MUXMOD from Interay"
Attr ConvMask[0] = 255
Attr ConvMask[1] = 255
Attr ConvMask[2] = 255
Attr ConvMask[3] = 255
Attr ConvMask[4] = 255
Attr MaxNoOfChannels = 40
EndBody
EndObject
EndObject
EndSObject
! pwrb_c_rack_rtp.wb_load -- Defines the class Rack_RTP.
!
! PROVIEW/R
! Copyright (C) 1996 by Comator Process AB.
!
! <Description>.
!
! Range ldh_eDId_Base
!
SObject pwrb:Class
Object Rack_RTP $ClassDef 187
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_Standard
Attr Flags |= pwr_mClassDef_IO
EndBody
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "Rack_RTP"
EndBody
Object IOSysType $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_CONST
EndBody
EndObject
Object Description $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
Object MaxNoOfCards $Attribute 3
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_CONST
EndBody
EndObject
Object RackAddress $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
EndBody
EndObject
EndObject
Object Template Rack_RTP
Body RtBody
Attr IOSysType = 3
Attr MaxNoOfCards = 16
EndBody
EndObject
EndObject
EndSObject
! pwrb_c_rtp_dioc.wb_load -- Defines the class RTP_DIOC.
!
! PROVIEW/R
! Copyright (C) 1996 by Comator Process AB.
!
! RTP Distibuted IO Controller object.
!
! Range ldh_eDId_Base
!
SObject pwrb:Class
Object RTP_DIOC $ClassDef 197
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_Standard
EndBody
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "RTP_DIOC"
EndBody
Object Description $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
Object Address $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8"
EndBody
EndObject
Object ScanInterval $Attribute 3
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
Object TimeOutTime $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
EndBody
EndObject
Object NoOfReXmissions $Attribute 5
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8"
EndBody
EndObject
Object CommOk $Attribute 6
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
EndObject
Object Template RTP_DIOC
Body RtBody
Attr Address = 0
Attr ScanInterval = 5.0
Attr TimeOutTime = 2000
Attr NoOfReXmissions = 3
Attr CommOk = 1
EndBody
EndObject
EndObject
EndSObject
! pwrb_c_security.wb_load -- Defines the class Security.
!
! PROVIEW/R
! Copyright (C) 1996 by Comator Process AB.
!
! <Description>.
!
!/**
! Obsolete from V3.4
!*/
!
SObject pwrb:Class
Object Security $ClassDef 198
Body SysBody
Attr Flags |= pwr_mClassDef_DevOnly
Attr Flags |= pwr_mClassDef_TopObject
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_DevBodyOnly
EndBody
Object DevBody $ObjBodyDef 2
Object SystemGroup $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$String16"
EndBody
EndObject
EndObject
EndObject
EndSObject
! pwrb_c_systemdistribute.wb_load -- Defines the class SystemDistribute.
!
! PROVIEW/R
! Copyright (C) 1996 by Comator Process AB.
!
! <Description>.
!
!/**
! @Version 1.0
! @Summary Obsolete from V4.0.
! @b Obsolete from V4.0
! The SystemDistribute object configures distribution of ELN
! system files generated by EBUILD.
!
! One SystemDistribute object causes one system file to be copied from
! the development project environment to a process or operator station.
!
! The object reside in the project volume beneath a NodeConfig object.
! The specified file will be copied to the boot node of the NodeConfig
! object, which is specified in the BootNode attribute.
!
! The distribution is carried out by the distribution window in the
! navigator, or by pwr_cmd with the command 'copy system' or 'copy all'.
!
! @b See also
! @classlink NodeConfig pwrb_NodeConfig.html
! @classlink ApplDistribute pwrb_ApplDistribute.html
! @classlink GraphDistribute pwrb_GraphDistribute.html
!*/
!
SObject pwrb:Class
Object SystemDistribute $ClassDef 235
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_RtAndDevBodies
EndBody
Object DevBody $ObjBodyDef 2
!/**
! @Summary Source file specification.
! Source file specification.
!
! Example
! $pwrp_load/vxeln1.sys
!*/
Object Source $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
!/**
! @Summary Target file specification.
! Target file specification.
! Should only be supplied if the target path or filename differs
! from the source.
! If the ELN node is booting from a local disk, the target filename
! should be '[sys0.sysexe]sysboot.exe'
!*/
Object Target $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
EndObject
EndObject
EndSObject
! pwrb_c_tracedbconfig.wb_load -- Defines the class TraceDbConfig.
!
! PROVIEW/R
! Copyright (C) 1996 by Comator Process AB.
!
! <Description>.
!
!/**
! Obsolete from V3.4
!*/
!
SObject pwrb:Class
Object TraceDbConfig $ClassDef 85
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_Standard
Attr Flags |= pwr_mClassDef_TopObject
EndBody
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "TraceDbConfig"
EndBody
Object Description $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
Object Id $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$String32"
EndBody
EndObject
EndObject
Object NavigatorPosnn $Menu
Object Pointed $Menu
Object OpenDb $MenuButton
Body SysBody
Attr ButtonName = "Open Db..."
Attr MethodName = "DbConfig-OpenDb"
EndBody
EndObject
EndObject
EndObject
Object NavigatorPoson $Menu
Object Pointed $Menu
Object OpenDb $MenuButton
Body SysBody
Attr ButtonName = "Open Db..."
Attr MethodName = "DbConfig-OpenDb"
EndBody
EndObject
EndObject
EndObject
Object NavigatorPosos $Menu
Object Pointed $Menu
Object OpenDb $MenuButton
Body SysBody
Attr ButtonName = "Open Db..."
Attr MethodName = "DbConfig-OpenDb"
EndBody
EndObject
EndObject
EndObject
Object NavigatorPosms $Menu
Object Pointed $Menu
Object OpenDb $MenuButton
Body SysBody
Attr ButtonName = "Open Db..."
Attr MethodName = "DbConfig-OpenDb"
EndBody
EndObject
EndObject
EndObject
Object NavigatorPosmn $Menu
Object Pointed $Menu
Object OpenDb $MenuButton
Body SysBody
Attr ButtonName = "Open Db..."
Attr MethodName = "DbConfig-OpenDb"
EndBody
EndObject
EndObject
EndObject
EndObject
EndSObject
! pwrb_c_vipc616.wb_load -- Defines the class VIPC616.
!
! PROVIEW/R
! Copyright (C) 1997,99 by Mandator AB.
!
! Greenspring IP Carrier VIPC616.
!
SObject pwrb:Class
Object VIPC616 $ClassDef 267
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_RtAndDevBodies
Attr Flags |= pwr_mClassDef_IO
EndBody
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "VIPC616"
EndBody
Object Description $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
Object IoAddress $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
EndBody
EndObject
Object MemoryAddress $Attribute 3
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object MemoryBase $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object MemorySlotSize $Attribute 5
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object MaxNoOfSlots $Attribute 6
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
Object Process $Attribute 7
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
Object ThreadObject $Intern 8
Body SysBody
Attr TypeRef = "pwrs:Type-$Objid"
EndBody
EndObject
EndObject
Object DevBody $ObjBodyDef 2
Object SlotAllocation $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
EndObject
Object Template VIPC616
Body RtBody
Attr Description = "IP Carrier card VIPC616 from Greenspring"
Attr MemoryBase = 24
Attr MemorySlotSize = 128
Attr MaxNoOfSlots = 4
EndBody
EndObject
EndObject
EndSObject
This diff is collapsed.
! pwrb_l_simul.wb_load -- Defines layouts for simulation objects.
!
! PROVIEW/R
! Copyright (C) 1996 by Comator Process AB.
!
! <Description>.
!
!
SObject wb:layout-PlcEditor-w1
Object Simulate $Group
Object CStoAi $Group
EndObject
Object StoAi $Group
EndObject
Object ResDi $Group
EndObject
Object SetDi $Group
EndObject
Object StoDi $Group
EndObject
Object StoPi $Group
EndObject
EndObject
EndSObject
...@@ -74,7 +74,6 @@ static Widget mainwindow; ...@@ -74,7 +74,6 @@ static Widget mainwindow;
static ldh_tWBContext wbctx; static ldh_tWBContext wbctx;
static int announce = 0; static int announce = 0;
static int appl_count = 0; static int appl_count = 0;
static char wb_db_id[40] = "";
/* ????? Ska vara volymsid */ /* ????? Ska vara volymsid */
int pwr_vsel_success( void *vselctx, int pwr_vsel_success( void *vselctx,
...@@ -150,14 +149,6 @@ int psts(unsigned long int sts, FILE *logfile) ...@@ -150,14 +149,6 @@ int psts(unsigned long int sts, FILE *logfile)
return sts & 1; return sts & 1;
} }
int wb_get_db_id( void)
{
int sts;
sts = utl_get_database_id( wb_db_id);
return sts;
}
static void wb_find_wnav_cb( void *ctx, pwr_tOid oid) static void wb_find_wnav_cb( void *ctx, pwr_tOid oid)
{ {
char title[80]; char title[80];
...@@ -567,9 +558,6 @@ int main( int argc, char *argv[]) ...@@ -567,9 +558,6 @@ int main( int argc, char *argv[])
XtSetValues( toplevel, args, 1); XtSetValues( toplevel, args, 1);
} }
sts = wb_get_db_id();
psts(sts, NULL);
if ( sw_projectvolume) { if ( sw_projectvolume) {
Wtt *wtt; Wtt *wtt;
......
...@@ -23,10 +23,10 @@ static pwr_tStatus SyntaxCheck ( ...@@ -23,10 +23,10 @@ static pwr_tStatus SyntaxCheck (
int *ErrorCount, /* accumulated error count */ int *ErrorCount, /* accumulated error count */
int *WarningCount /* accumulated waring count */ int *WarningCount /* accumulated waring count */
) { ) {
pwr_tStatus sts; // pwr_tStatus sts;
sts = wsx_CheckSigChanCon( Session, Object, ErrorCount, WarningCount); // sts = wsx_CheckSigChanCon( Session, Object, ErrorCount, WarningCount);
if (EVEN(sts)) return sts; // if (EVEN(sts)) return sts;
return PWRB__SUCCESS; return PWRB__SUCCESS;
} }
......
...@@ -23,10 +23,10 @@ static pwr_tStatus SyntaxCheck ( ...@@ -23,10 +23,10 @@ static pwr_tStatus SyntaxCheck (
int *ErrorCount, /* accumulated error count */ int *ErrorCount, /* accumulated error count */
int *WarningCount /* accumulated waring count */ int *WarningCount /* accumulated waring count */
) { ) {
pwr_tStatus sts; // pwr_tStatus sts;
sts = wsx_CheckSigChanCon( Session, Object, ErrorCount, WarningCount); // sts = wsx_CheckSigChanCon( Session, Object, ErrorCount, WarningCount);
if (EVEN(sts)) return sts; // if (EVEN(sts)) return sts;
return PWRB__SUCCESS; return PWRB__SUCCESS;
} }
......
...@@ -23,10 +23,10 @@ static pwr_tStatus SyntaxCheck ( ...@@ -23,10 +23,10 @@ static pwr_tStatus SyntaxCheck (
int *ErrorCount, /* accumulated error count */ int *ErrorCount, /* accumulated error count */
int *WarningCount /* accumulated waring count */ int *WarningCount /* accumulated waring count */
) { ) {
pwr_tStatus sts; // pwr_tStatus sts;
sts = wsx_CheckSigChanCon( Session, Object, ErrorCount, WarningCount); // sts = wsx_CheckSigChanCon( Session, Object, ErrorCount, WarningCount);
if (EVEN(sts)) return sts; // if (EVEN(sts)) return sts;
return PWRB__SUCCESS; return PWRB__SUCCESS;
} }
......
...@@ -23,10 +23,10 @@ static pwr_tStatus SyntaxCheck ( ...@@ -23,10 +23,10 @@ static pwr_tStatus SyntaxCheck (
int *ErrorCount, /* accumulated error count */ int *ErrorCount, /* accumulated error count */
int *WarningCount /* accumulated waring count */ int *WarningCount /* accumulated waring count */
) { ) {
pwr_tStatus sts; // pwr_tStatus sts;
sts = wsx_CheckSigChanCon( Session, Object, ErrorCount, WarningCount); // sts = wsx_CheckSigChanCon( Session, Object, ErrorCount, WarningCount);
if (EVEN(sts)) return sts; // if (EVEN(sts)) return sts;
return PWRB__SUCCESS; return PWRB__SUCCESS;
} }
......
...@@ -28,8 +28,6 @@ typedef enum { ...@@ -28,8 +28,6 @@ typedef enum {
goen_eGraphIndex_SSBegin = 12, goen_eGraphIndex_SSBegin = 12,
goen_eGraphIndex_SSEnd = 13, goen_eGraphIndex_SSEnd = 13,
goen_eGraphIndex_ShowPlcAttr = 15, goen_eGraphIndex_ShowPlcAttr = 15,
goen_eGraphIndex_AAnalyse = 19,
goen_eGraphIndex_DAnalyse = 20,
goen_eGraphIndex_MpsIn = 25, goen_eGraphIndex_MpsIn = 25,
goen_eGraphIndex_MpsQueue = 26, goen_eGraphIndex_MpsQueue = 26,
goen_eGraphIndex_MpsStack = 27, goen_eGraphIndex_MpsStack = 27,
......
...@@ -6,19 +6,14 @@ ...@@ -6,19 +6,14 @@
#include "wb_pwrs.h" #include "wb_pwrs.h"
pwr_dImport pwr_BindMethods(ASup); pwr_dImport pwr_BindMethods(ASup);
pwr_dImport pwr_BindMethods(Ai_7436);
pwr_dImport pwr_BindMethods(Ai_HVAI32); pwr_dImport pwr_BindMethods(Ai_HVAI32);
pwr_dImport pwr_BindMethods(Ai_AI32uP); pwr_dImport pwr_BindMethods(Ai_AI32uP);
pwr_dImport pwr_BindMethods(Ao_7455_20);
pwr_dImport pwr_BindMethods(Ao_7455_30);
pwr_dImport pwr_BindMethods(Ao_HVAO4); pwr_dImport pwr_BindMethods(Ao_HVAO4);
pwr_dImport pwr_BindMethods(Ao_AO8uP);
pwr_dImport pwr_BindMethods(Backup); pwr_dImport pwr_BindMethods(Backup);
pwr_dImport pwr_BindMethods(Co_7435_33);
pwr_dImport pwr_BindMethods(Co_7437_33);
pwr_dImport pwr_BindMethods(Co_PI24BO); pwr_dImport pwr_BindMethods(Co_PI24BO);
pwr_dImport pwr_BindMethods(Di_7437_37); pwr_dImport pwr_BindMethods(Co_CO4uP);
pwr_dImport pwr_BindMethods(Di_DIX2); pwr_dImport pwr_BindMethods(Di_DIX2);
pwr_dImport pwr_BindMethods(Do_7437_83);
pwr_dImport pwr_BindMethods(Do_HVDO32); pwr_dImport pwr_BindMethods(Do_HVDO32);
pwr_dImport pwr_BindMethods(DsFast); pwr_dImport pwr_BindMethods(DsFast);
pwr_dImport pwr_BindMethods(DsHist); pwr_dImport pwr_BindMethods(DsHist);
...@@ -36,12 +31,16 @@ pwr_dImport pwr_BindMethods(ChanAi); ...@@ -36,12 +31,16 @@ pwr_dImport pwr_BindMethods(ChanAi);
pwr_dImport pwr_BindMethods(ChanAit); pwr_dImport pwr_BindMethods(ChanAit);
pwr_dImport pwr_BindMethods(ChanAo); pwr_dImport pwr_BindMethods(ChanAo);
pwr_dImport pwr_BindMethods(ChanCo); pwr_dImport pwr_BindMethods(ChanCo);
pwr_dImport pwr_BindMethods(ChanIi);
pwr_dImport pwr_BindMethods(ChanIo);
pwr_dImport pwr_BindMethods(Di); pwr_dImport pwr_BindMethods(Di);
pwr_dImport pwr_BindMethods(Do); pwr_dImport pwr_BindMethods(Do);
pwr_dImport pwr_BindMethods(Ai); pwr_dImport pwr_BindMethods(Ai);
pwr_dImport pwr_BindMethods(Ao); pwr_dImport pwr_BindMethods(Ao);
pwr_dImport pwr_BindMethods(Co); pwr_dImport pwr_BindMethods(Co);
pwr_dImport pwr_BindMethods(Po); pwr_dImport pwr_BindMethods(Po);
pwr_dImport pwr_BindMethods(Ii);
pwr_dImport pwr_BindMethods(Io);
pwr_dImport pwr_BindMethods(XttGraph); pwr_dImport pwr_BindMethods(XttGraph);
pwr_dImport pwr_BindMethods(WebGraph); pwr_dImport pwr_BindMethods(WebGraph);
pwr_dImport pwr_BindMethods(OpPlace); pwr_dImport pwr_BindMethods(OpPlace);
...@@ -53,19 +52,14 @@ pwr_dImport pwr_BindMethods(NodeConfig); ...@@ -53,19 +52,14 @@ pwr_dImport pwr_BindMethods(NodeConfig);
pwr_dExport pwr_BindClasses(Base) = { pwr_dExport pwr_BindClasses(Base) = {
pwr_BindClass(ASup), pwr_BindClass(ASup),
pwr_BindClass(Ai_7436),
pwr_BindClass(Ai_HVAI32), pwr_BindClass(Ai_HVAI32),
pwr_BindClass(Ai_AI32uP), pwr_BindClass(Ai_AI32uP),
pwr_BindClass(Ao_7455_20),
pwr_BindClass(Ao_7455_30),
pwr_BindClass(Ao_HVAO4), pwr_BindClass(Ao_HVAO4),
pwr_BindClass(Ao_AO8uP),
pwr_BindClass(Backup), pwr_BindClass(Backup),
pwr_BindClass(Co_7435_33),
pwr_BindClass(Co_7437_33),
pwr_BindClass(Co_PI24BO), pwr_BindClass(Co_PI24BO),
pwr_BindClass(Di_7437_37), pwr_BindClass(Co_CO4uP),
pwr_BindClass(Di_DIX2), pwr_BindClass(Di_DIX2),
pwr_BindClass(Do_7437_83),
pwr_BindClass(Do_HVDO32), pwr_BindClass(Do_HVDO32),
pwr_BindClass(DsFast), pwr_BindClass(DsFast),
pwr_BindClass(DsHist), pwr_BindClass(DsHist),
...@@ -83,12 +77,16 @@ pwr_dExport pwr_BindClasses(Base) = { ...@@ -83,12 +77,16 @@ pwr_dExport pwr_BindClasses(Base) = {
pwr_BindClass(ChanAit), pwr_BindClass(ChanAit),
pwr_BindClass(ChanAo), pwr_BindClass(ChanAo),
pwr_BindClass(ChanCo), pwr_BindClass(ChanCo),
pwr_BindClass(ChanIi),
pwr_BindClass(ChanIo),
pwr_BindClass(Di), pwr_BindClass(Di),
pwr_BindClass(Do), pwr_BindClass(Do),
pwr_BindClass(Ai), pwr_BindClass(Ai),
pwr_BindClass(Ao), pwr_BindClass(Ao),
pwr_BindClass(Co), pwr_BindClass(Co),
pwr_BindClass(Po), pwr_BindClass(Po),
pwr_BindClass(Ii),
pwr_BindClass(Io),
pwr_BindClass(XttGraph), pwr_BindClass(XttGraph),
pwr_BindClass(WebGraph), pwr_BindClass(WebGraph),
pwr_BindClass(OpPlace), pwr_BindClass(OpPlace),
......
...@@ -9366,277 +9366,6 @@ int utl_get_systemobject( ...@@ -9366,277 +9366,6 @@ int utl_get_systemobject(
return FOE__SUCCESS; return FOE__SUCCESS;
} }
/*************************************************************************
*
* Name: utl_get_securityobject()
*
* Type void
*
* Type Parameter IOGF Description
* ldh_tWBContext ldhwb I ldh worcbench.
* ldh_tSesContext ldhses I ldh session.
* pwr_tObjid * Objdid O system objdid.
*
* Description:
* Get the system object objid and the systemname attribute.
* If no session is open yet, the workbench should be supplied.
*
**************************************************************************/
int utl_get_securityobject(
ldh_tWBContext wbctx,
ldh_tSesContext ldhses,
pwr_tObjid *security_objid,
char *group
)
{
static pwr_tObjid stored_objid = {0,0};
int sts, size, found;
pwr_tClassId class;
ldh_tVolContext volctx;
ldh_tSesContext l_ldhses;
char *group_ptr;
pwr_tObjid objid;
if ( group != NULL)
*group = 0;
l_ldhses = ldhses;
if ( ldhses != NULL && cdh_ObjidIsNotNull( stored_objid))
{
/* Check that the stored systemobject still exist */
sts = ldh_GetObjectClass( ldhses, stored_objid, &class);
if ( ODD(sts))
{
*security_objid = stored_objid;
if ( group != NULL)
{
sts = ldh_GetObjectPar( ldhses, objid, "DevBody",
"SystemGroup", (char **)&group_ptr, &size);
if ( EVEN(sts)) return sts;
strcpy( group, group_ptr);
free((char *) group_ptr);
}
return FOE__SUCCESS;
}
}
/* System object not stored, or stored object not found */
if ( ldhses != NULL)
{
sts = ldh_GetVolumeRootList( l_ldhses, ldh_cWBVol, &objid);
}
else
{
/* Session is not supplied. Attach the workbench volume */
sts = ldh_AttachVolume( wbctx, ldh_cWBVol, &volctx);
if ( EVEN(sts)) return sts;
sts = ldh_OpenSession(&l_ldhses, volctx,ldh_eAccess_ReadOnly,
ldh_eUtility_Login);
if ( EVEN(sts)) return sts;
sts = ldh_GetRootList( l_ldhses, &objid);
}
found = 0;
while ( ODD(sts) )
{
sts = ldh_GetObjectClass( l_ldhses, objid, &class);
if ( EVEN(sts)) return sts;
if ( class == pwr_cClass_Security)
{
found = 1;
break;
}
sts = ldh_GetNextSibling( l_ldhses, objid, &objid);
}
if ( found)
{
if ( group != NULL)
{
sts = ldh_GetObjectPar( l_ldhses, objid, "DevBody",
"SystemGroup", (char **)&group_ptr, &size);
if ( EVEN(sts)) return sts;
strcpy( group, group_ptr);
free((char *) group_ptr);
}
}
if ( ldhses == NULL)
{
sts = ldh_CloseSession( l_ldhses);
if (EVEN(sts)) return sts;
sts = ldh_DetachVolume( wbctx, volctx);
if (EVEN(sts)) return sts;
}
if ( !found )
return FOE__OBJECT;
*security_objid = objid;
return FOE__SUCCESS;
}
/*************************************************************************
*
* Name: utl_set_database_id()
*
* Type int
*
* Type Parameter IOGF Description
*
* Description: Set wb database.
*
**************************************************************************/
int utl_set_database_id( char *dbid)
{
#if defined OS_VMS
pwr_tStatus sts;
char lnm_value[80];
char dbfile[100];
char found_file[256];
sprintf( lnm_value, "PWRP_ROOT:[COMMON.DB.%s]", dbid);
// Check if db exist
strcpy( dbfile, lnm_value);
strcat( dbfile, "WB.RDB");
sts = dcli_search_file( dbfile, found_file, DCLI_DIR_SEARCH_INIT);
dcli_search_file( dbfile, found_file, DCLI_DIR_SEARCH_END);
if ( EVEN(sts)) return sts;
sts = dir_DefineLogical( "PWRP_DB", lnm_value, "LNM$PROCESS");
if ( EVEN(sts)) return sts;
#else
pwr_tStatus sts;
char dbname[80];
char cmd[256];
char systemname[80];
char systemgroup[80];
char *server;
char filename[120];
char id[80];
cdh_ToLower( id, dbid);
// Check if db exist
dcli_translate_filename( filename, "$pwr_exe/pwrp_env.sh");
sprintf( cmd, "%s show db %s", filename, id);
sts = system( cmd);
if ( sts >> 8 == 1)
sts = 0;
else
sts = 1;
if ( EVEN(sts))
return FOE__NODB;
utl_get_systemname( systemname, systemgroup);
cdh_ToLower( systemname, systemname);
server = getenv( "pwrp_mysql_server");
if ( server)
sprintf( dbname, "%s:%s_%s_%s", server, systemname, id, pwrv_cWbdbVersionShortStr);
else
sprintf( dbname, ":%s_%s_%s", systemname, id, pwrv_cWbdbVersionShortStr);
sts = setenv( "PWRP_DB", dbname, 1);
if ( sts != 0)
return FOE__SH;
#endif
return FOE__SUCCESS;
}
/*************************************************************************
*
* Name: utl_get_database_id()
*
* Type void
*
* Type Parameter IOGF Description
*
* Description:
* Get current database id.
*
**************************************************************************/
int utl_get_database_id( char *id)
{
#if defined OS_VMS
char found_file[80];
char dev[80];
char dir[80];
char file[80];
char type[80];
int version;
char *s;
pwr_tStatus sts;
char db_str[80];
sts = dcli_search_file( "pwrp_db:wb.rdb", found_file, DCLI_DIR_SEARCH_INIT);
dcli_search_file( "pwrp_db:wb.rdb", found_file, DCLI_DIR_SEARCH_END);
if ( EVEN(sts)) return sts;
sts = dcli_parse_filename( found_file, dev, dir, file, type, &version);
if ( EVEN(sts)) return sts;
s = strrchr( dir, '.');
if ( s)
strcpy( db_str, ++s);
else
strcpy( db_str, dir);
db_str[ strlen(db_str)-1] = 0;
strcpy( id, db_str);
#else
int sts;
char *s1, *s2;
char projectname[80];
char envstr[80];
char version_str[10];
sts = utl_get_projectname( projectname);
if ( EVEN(sts)) return sts;
cdh_ToLower( projectname, projectname);
s1 = getenv( "PWRP_DB");
if ( s1 == 0)
return 0;
cdh_ToLower( envstr, s1);
cdh_ToLower( version_str, pwrv_cWbdbVersionShortStr);
s2 = strchr( envstr, ':');
if ( s2 == NULL)
return 0;
s2++;
if ( strncmp( s2, projectname, strlen(projectname)) != 0)
return 0;
s1 = strrchr( envstr, '_');
if ( s1 == NULL)
return 0;
if ( strcmp( s1+1, version_str) != 0)
return 0;
*s1 = 0;
if ( strcmp( s2, projectname) == 0)
/* DbDirectory */
strcpy( id, "");
else if ( strlen(projectname) + 1 >= strlen( s2))
return 0;
else
strcpy( id, s2 + strlen(projectname) + 1);
#endif
return FOE__SUCCESS;
}
/************************************************************************* /*************************************************************************
* *
* Name: utl_get_listconfig_object() * Name: utl_get_listconfig_object()
......
...@@ -322,13 +322,6 @@ int utl_get_systemobject( ...@@ -322,13 +322,6 @@ int utl_get_systemobject(
char *systemgroup char *systemgroup
); );
int utl_get_securityobject(
ldh_tWBContext wbctx,
ldh_tSesContext ldhses,
pwr_tObjid *security_objid,
char *group
);
int utl_sortchildren ( int utl_sortchildren (
ldh_tSesContext ldhses, ldh_tSesContext ldhses,
char *parent_name, char *parent_name,
...@@ -491,7 +484,4 @@ int utl_revert ( ...@@ -491,7 +484,4 @@ int utl_revert (
int confirm int confirm
); );
int utl_get_database_id( char *id);
int utl_set_database_id( char *dbid);
#endif #endif
...@@ -149,12 +149,6 @@ static wbl_sSym classes[] = ...@@ -149,12 +149,6 @@ static wbl_sSym classes[] =
,{ "pwr_eCix_LibHier", pwr_eCix_LibHier } ,{ "pwr_eCix_LibHier", pwr_eCix_LibHier }
,{ "pwr_eClass_DocHier", pwr_eClass_DocHier } ,{ "pwr_eClass_DocHier", pwr_eClass_DocHier }
,{ "pwr_eCix_DocHier", pwr_eCix_DocHier } ,{ "pwr_eCix_DocHier", pwr_eCix_DocHier }
,{ "pwr_eClass_SystemVersion", pwr_eClass_SystemVersion }
,{ "pwr_eCix_SystemVersion", pwr_eCix_SystemVersion }
,{ "pwr_eClass_NodeVersion", pwr_eClass_NodeVersion }
,{ "pwr_eCix_NodeVersion", pwr_eCix_NodeVersion }
,{ "pwr_eClass_BootVersion", pwr_eClass_BootVersion }
,{ "pwr_eCix_BootVersion", pwr_eCix_BootVersion }
,{ "pwr_eClass_AttrXRef", pwr_eClass_AttrXRef } ,{ "pwr_eClass_AttrXRef", pwr_eClass_AttrXRef }
,{ "pwr_eCix_AttrXRef", pwr_eCix_AttrXRef } ,{ "pwr_eCix_AttrXRef", pwr_eCix_AttrXRef }
,{ "pwr_eClass_Menu", pwr_eClass_Menu } ,{ "pwr_eClass_Menu", pwr_eClass_Menu }
......
This diff is collapsed.
...@@ -39,8 +39,6 @@ extern "C" { ...@@ -39,8 +39,6 @@ extern "C" {
#include "wb_lfu.h" #include "wb_lfu.h"
#include "wb_login.h" #include "wb_login.h"
#include "wb_distr.h"
#include "wb_distr_wind.h"
#if defined OS_VMS #if defined OS_VMS
#include "wb_ate.h" #include "wb_ate.h"
#include "wb_sped.h" #include "wb_sped.h"
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment