System Manual: Siemens SIMATIC HMI (WinCCv7.0: Scripting VBS, ANSI-C, VBA)
Подождите немного. Документ загружается.
syntax
Expression.CommitTag()
Expression
Necessary. An expression which returns a "HMIGO" type object.
Parameters
--
Example:
Sub CommitTag()
' HMIGO_002
' procedure to change a property of a variable
' tag need to be created before
' declarations
Dim objHMIGO As HMIGO
Dim strVariableName As String
Set objHMIGO = New HMIGO
strVariableName = "NewVariable"
'current status is "EMPTY"
MsgBox objHMIGO.ObjectStateTag, vbOKOnly, "Status Variable"
'open a tag
objHMIGO.GetTag strVariableName
'current status is "OPENED"
MsgBox objHMIGO.ObjectStateTag, vbOKOnly, "Status Variable"
'change a property
objHMIGO.TagStart = 10
'current status is "MODIFIED"
MsgBox objHMIGO.ObjectStateTag, vbOKOnly, "Status Variable"
'commit a tag
objHMIGO.CommitTag
'current status is "OPENED"
MsgBox objHMIGO.ObjectStateTag, vbOKOnly, "Status Variable"
Set objHMIGO = Nothing
End Sub
VBA for Automated Configuration
4.6 VBA in Other WinCC Editors
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
2431
See also
ListTag function (Page 2436)
GetTag Function (Page 2435)
DeleteTag Function (Page 2434)
CreateTag Function (Page 2432)
CloseTag Function (Page 2429)
VBA in Tag Management (Page 2426)
4.6.2.4 CreateTag Function
Description
Creates a new tag.
syntax
Expression.CreateTag(TagName,TagType,[Connection],[S7S5Address],
[GroupName])
Expression
Necessary. An expression which returns a "HMIGO" type object.
Parameters
Parameter (Data Type) Description
TagName (string) Name of the tag to be created.
TagType (HMIGO_TAG_TYPE) Data type of the tag. The possible types are:
TAG_BINARY_TAG
TAG_SIGNED_8BIT_VALUE
TAG_UNSIGNED_8BIT_VALUE
TAG_SIGNED_16BIT_VALUE
TAG_UNSIGNED_16BIT_VALUE
TAG_SIGNED_32BIT_VALUE
TAG_UNSIGNED_32BIT_VALUE
TAG_FLOATINGPOINT_NUMBER_32BIT_IEEE_
754
TAG_FLOATINGPOINT_NUMBER_64BIT_IEEE_
754
TAG_TEXT_TAG_8BIT_CHARACTER_SET
TAG_TEXT_TAG_16BIT_CHARACTER_SET
TAG_RAW_DATA_TYPE
TAG_TEXT_REFERENCE
VBA for Automated Configuration
4.6 VBA in Other WinCC Editors
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
2432
System Manual, 11/2008,
Parameter (Data Type) Description
Connection (String, optional)
Name of a connection in which the tag and/or
group is to be created. The connection must
already
be in existence, otherwise a tag cannot be
created.
If the name is omitted, an internal tag and/or group
is recreated.
S7S5Address (String, optional) Address of the S7 or S5 PLC to which the tag is
connected. Without an address indication, an
empty entry will be handed over.
The parameter "S7S5Address" must be
supplemented by the string ",QC"for the
configuration of the Quality Code, for example:
"DB1,DD0,QC".
If the Quality Code of the tag is no longer to be
monitored, the string ",QC" must be deleted.
GroupName (String, optional) Name of a group in which the tag is inserted. If the
group does not exist, it will be newly
created.
If the group name is not indicated, the tag will be
created outside all groups.
Example:
Sub CreateTag()
' HMIGO_003
' procedure to create a variable
' tag must not be created before
' declarations
Dim objHMIGO As HMIGO
Dim strVariableName As String
Set objHMIGO = New HMIGO
strVariableName = "NewVariable"
'current status is "EMPTY"
MsgBox objHMIGO.ObjectStateTag, vbOKOnly, "Status Variable"
'create a tag
objHMIGO.CreateTag strVariableName, TAG_SIGNED_32BIT_VALUE
'current status is "OPENED"
MsgBox objHMIGO.ObjectStateTag, vbOKOnly, "Status Variable"
Set objHMIGO = Nothing
End Sub
VBA for Automated Configuration
4.6 VBA in Other WinCC Editors
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
2433
See also
ListTag function (Page 2436)
GetTag Function (Page 2435)
DeleteTag Function (Page 2434)
CommitTag Function (Page 2430)
CloseTag Function (Page 2429)
VBA in Tag Management (Page 2426)
4.6.2.5 DeleteTag Function
Description
Deletes the specified tag.
syntax
Expression.DeleteTag(TagName)
Expression
Necessary. An expression which returns a "HMIGO" type object.
Parameters
Parameter (Data Type) Description
TagName (string) Name of the tag to be deleted.
Example:
Sub DeleteTag()
' HMIGO_004
' procedure to delete a variable
' tag need to be created before
' declarations
Dim objHMIGO As HMIGO
Dim strVariableName As String
Set objHMIGO = New HMIGO
strVariableName = "NewVariable"
'current status is "EMPTY"
MsgBox objHMIGO.ObjectStateTag, vbOKOnly, "Status Variable"
'delete a tag
objHMIGO.DeleteTag strVariableName
VBA for Automated Configuration
4.6 VBA in Other WinCC Editors
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
2434
System Manual, 11/2008,
Set objHMIGO = Nothing
End Sub
See also
ListTag function (Page 2436)
GetTag Function (Page 2435)
CreateTag Function (Page 2432)
CommitTag Function (Page 2430)
CloseTag Function (Page 2429)
VBA in Tag Management (Page 2426)
4.6.2.6 GetTag Function
Description
Reads in the parameters of the specified tag.
You can change or read the parameters by means of the object properties. You will find a list
of the available object properties in this documentation under "VBA in Tag Management".
syntax
Expression.GetTag(TagName)
Expression
Necessary. An expression which returns a "HMIGO" type object.
Parameters
Parameter (Data Type) Description
TagName (string) Name of the tag whose values are to be read in.
Example:
Sub GetTag()
' HMIGO_005
' procedure to open a variable
' tag need to be created before
' declarations
Dim objHMIGO As HMIGO
VBA for Automated Configuration
4.6 VBA in Other WinCC Editors
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
2435
Dim strVariableName As String
Set objHMIGO = New HMIGO
strVariableName = "NewVariable"
'current status is "EMPTY"
MsgBox objHMIGO.ObjectStateTag, vbOKOnly, "Status Variable"
'open/ get a tag
objHMIGO.GetTag strVariableName
'current status is "OPENED"
MsgBox objHMIGO.ObjectStateTag, vbOKOnly, "Status Variable"
Set objHMIGO = Nothing
End Sub
See also
ListTag function (Page 2436)
DeleteTag Function (Page 2434)
CreateTag Function (Page 2432)
CommitTag Function (Page 2430)
CloseTag Function (Page 2429)
VBA in Tag Management (Page 2426)
4.6.2.7 ListTag function
Description
Alternatively, the ListTag function returns the following contents of the Tag Management as a
list:
● All the channel units created
● All the channels created
● All the connections created
● All the tag groups created
● All the tags created
syntax
Expression.ListTag(ListType,pListArray,[Filter])
Expression
Necessary. An expression which returns a "HMIGO" type object.
VBA for Automated Configuration
4.6 VBA in Other WinCC Editors
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
2436
System Manual, 11/2008,
Parameters
Parameter (Data Type) Description
ListType (HMIGO_TAG_LIST_TYPE) Defines which content should be returned as a list.
Possibilities are:
● TAG_CHANNEL_UNITS (0) all channel units
created
● TAG_CHANNELS (2) all channels created
● TAG_CONNECTIONS (3) all connections
created
● TAG_GROUPS (4) all tag groups created
● TAG_NAMES (5) all tags created
pListArray (Variant) List with the requested content.
Filter (String) Filters can be set optionally. Wildcards "*" and "?"
are also possible.
Example:
In the following example, a check is made whether the list with the connections created is
empty because no connections have been set up:
Sub ReadTagByConnection()
'HMIGO_027
'read content in data manager by connections
'no conections are implemented
Dim objHMIGO As New HMIGO
Dim varRange As Variant
'read all connections
objHMIGO.ListTag TAG_CONNECTIONS, arrContent
'check result
If (UBound(arrContent) - LBound(arrContent) + 1) <= 0 Then
MsgBox "no entries because no connections are implemented"
End If
End Sub
See also
GetTag Function (Page 2435)
DeleteTag Function (Page 2434)
CreateTag Function (Page 2432)
CommitTag Function (Page 2430)
CloseTag Function (Page 2429)
VBA in Tag Management (Page 2426)
VBA for Automated Configuration
4.6 VBA in Other WinCC Editors
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
2437
4.6.3 VBA im Tag Logging
4.6.3.1 VBA in Tag Logging
Introduction
VBA allows you to create process value archives and archive tags directly from the program
code, modify them, and delete them.
Principle
When you have created the instance of the HMIGO class, the following functions are available
to you to access Tag Logging:
● CloseTlgArchive
● CloseTlgTag
● CommitTlgArchive
● CommitTlgTag
● CreateTlgArchive
● CreateTlgTag
● DeleteTlgArchive
● DeleteTlgTag
● GetTlgArchive
● GetTlgTag
● ListTlgArchive
● ListTlgTag
Note
Tag Logging must not be open or be opened when editing with VBA.
Before you use the trigger of the tag logging in VBA with a newly created WinCC project,
you must first start the Editor "Tag Logging", create an archive and then again close the
Editor. The triggers are created by the Editor.
Direct Access to the Object Properties
You can also access the parameters of the above-mentioned functions directly in VBA by
means
of the following object properties: The column "is used in" will display whether you will
VBA for Automated Configuration
4.6 VBA in Other WinCC Editors
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
2438
System Manual, 11/2008,
be able to access the object property in the process value archive (P) and/or in the compressed
archive (V).
Object property Description Read/Write is used in
ObjectStateTlgArchive Returns the object state via the enumeration
HMIGO_OBJECT_STATE. Further
information on this enumeration can be
found in this documentation under "VBA in
other WinCC Editors".
Yes/no P, V
TlgArchiveName Name of the process value archive or
compressed archive.
Yes/no P, V
TlgArchiveType Specifies whether the archive is a process
value archive or a compressed archive.
Yes/no P, V
TlgArchiveAccessLevel
Read
The authorization level for reading. Yes/no P, V
TlgArchiveAccessLevel
Write
The authorization level for writing. Yes/no P, V
TlgArchiveArchiveState Specifies whether archiving is disabled or
enabled at system startup. Possible values
of Enum HMIGO_TLG_ARCHIVE_STATE:
● TLG_ARCHIVE_STATE_LOCKED (1)
● TLG_ARCHIVE_STATE_ACTIVATED
(0)
Yes/yes P, V
TlgArchiveBufferSize Specifies the number of records for a short-
term archive.
Yes/yes P
TlgArchiveBufferType Specifies the tag storage location. The
possible types of Enum
HMIGO_TLG_ARCHIVE_BUFFER_TYPE:
● TLG_ARCHIVE_BUFFER_TYPE_DISK
(2)
● TLG_ARCHIVE_BUFFER_TYPE_RAM
(1)
Yes/yes P
TlgArchiveCompressRa
nge
Specifies the compression time period.
Name of the timer, greater than or equal to
1,
defined under "Times" in the Tag Logging
editor. Since the format is a string, it is
language dependent.
Can be determined via the function
ListTlgArchive(TLG_ARCHIVE_TRIGGER_
NAMES, arrTrigger)
Yes/yes V
TlgArchiveCompressTy
pe
Specifies the algorithm for compressing the
values. The possible types of Enum
HMIGO_TLG_ARCHIVE_COMPRESS_TY
PE:
● TLG_COMPRESS_TYPE_CALC (1)
● TLG_COMPRESS_TYPE_CALC_COPY
(2)
● TLG_COMPRESS_TYPE_CALC_DEL
(3)
● TLG_COMPRESS_TYPE_CALC_COPY
_DEL (4)
Yes/yes V
VBA for Automated Configuration
4.6 VBA in Other WinCC Editors
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
2439
Object property Description Read/Write is used in
ObjectStateTlgTag Returns the object state via the enumeration
HMIGO_OBJECT_STATE. Further
information on this enumeration can be
found in this documentation under "VBA in
other WinCC Editors".
Yes/no P, V
TlgTagArchiveName Name of the archive tag. Yes/no P, V
TlgTagName Name of the archive. Yes/no P, V
TlgTagType Specifies the tag type. The possible types
are in Enum HMIGO_TLG_TAG_TYPE.
● TLG_TAG_TYP_ANALOG (65537)
● TLG_TAG_TYP_BINARY (65538)
● TLG_TAG_TYP_PROCESS (65544)
● TLG_TAG_TYP_COMPRESS (65540)
Yes/yes P, V
TlgTagArchiving Specifies the acquisition type. Possible
values of Enum
HMIGO_TLG_TAG_ARCHIVING:
● TLG_TAG_ACYCLIC (8388609)
● TLG_TAG_CYCLIC_CONTINUOUS
(8388610)
● TLG_TAG_CYCLIC_SELECTIVE
(8388612)
● TLG_TAG_ON_EVERY_CHANGE
(8388616)
Yes/yes P
TlgTagArchivingState Specifies whether archiving is enabled or
disabled at system startup. Possible values
of Enum
HMIGO_TLG_TAG_ARCHIVING_STATE:
● TLG_TAG_LOCKED (1)
● TLG_TAG_ACTIVATED (0)
Yes/yes P, V
TlgTagOnError Specifies whether, in the event of a problem,
the most recently acquired value or the
substitute
value is saved. Possible values of
Enum HMIGO_TLG_TAG_ON_ERROR:
● TLG_TAG_LAST_VALUE (1)
● TLG_TAG_SUBSTITUTE (2)
Yes/yes P
TlgTagTriggerType Specifies how archiving is carried out at a
signal change. Possible values of Enum
HMIGO_TLG_TAG_TRIGGER_TYPE:
● TLG_TAG_FROM_0_TO_1 (2)
● TLG_TAG_FROM_1_TO_0 (3)
● TLG_TAG_ALWAYS (4)
● TLG_TAG_EVERY_CHANGE (1)
Yes/yes P
VBA for Automated Configuration
4.6 VBA in Other WinCC Editors
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
2440
System Manual, 11/2008,