Probleme mit dynamischen Variablennamen im Script

Hallo zusammen,

Ich benötige ca 100 mal dieselbe Funktion, deshalb will ich einen Bildbaustein verwenden. Über Nummer welche ich dem Bildbaustein als Variable übergebe soll der Name von diversen externen Variablen bestimmt werden. Die externen Variablen sind alles Worte in denen verschiedene Bits gesetzt oder rückgesetzt werden sollen.

Die Erfassungsart der externen Variablen soll aber auf "zyklisch bei Verwendung" bleiben. Ich denke dass es keine gute Idee ist ca. 800 Variablen auf "zyklische Erfassung" zu setzen, wegen der Busbelastung und Reaktionszeit.

1. Gibt es einen Befehl oder eine Möglichkeit Variablen deren Name erst zur Laufzeit feststeht gezielt zu aktualisieren (Wert aus SPSlesen oder schreiben)ohne "zyklische Erfassung" einzustellen ?

2. Der Befehl SetBitInTag. Kann man diesem Befehl den Variablennamen als Variable übergeben? Irgendwie will das bei mir nicht funktionieren.

Die externe Var heißt 130_Bedienung
nummer = 130
tag = nummer & "_Bedienung"

SetBitInTag SmartTags(tag),0
So akzeptiert WCF den Syntax nicht. Läßt man SmartTags weg und schreibt
SetBitInTag tag,0 ist zwar die Syntax ok aber im Debugger kommt "Typen unverträglich".
Was mache ich falsch ?

Bin dankbar für die richtige Idee!!

Gruß

Logistix

Hallo,

es ist zwar schon ein alter Threat, aber ich habe ein ähnliches Problem.

 Wenn ich den Programmcode übersetze und das WinCC flexible starte,

dann führt das Programm die Befehle korrekt aus (Siehe Programmcode).

Das Pop-up Fenster öffnet sich und die E/A-Felder enthalten die korrekten Werte.

Wenn ich aber die Zuordung der Variable "Ctrl_Pop_2" von "Regler_1.GW_MaxMax" auf

"Regler_1.GW_Max" ändere dann bricht das Script bei der Ausführung mit der Fehlermeldung

"Fehler 'no tag'Regler_1.GW_MaxMax" in Skrip..." ab.

Dim aktRegel
Dim aktTagName
Dim aktivesItem

Set aktivesItem =  HmiRuntime.ActiveScreen.ActiveScreenItem

Set aktRegel = aktivesItem.Parent

aktTagName=aktRegel.ObjectName
aktTagName=aktTagName & ".GW_MaxMax"

'aktTagName hat den Wert Regler_1.GW_MaxMax
SmartTags("Ctrl_Pop_20")=aktTagName
'SmartTags("Ctrl_Pop_1")=SmartTags(aktTagName)
SmartTags("Ctrl_Pop_2")=SmartTags("Regler_1.GW_MaxMax")
ShowPopupScreen "Ctrl_POP",100,100,hmiToggle,hmiAnimationOff,hmiFast

 Hat jemand eine Idee was das Problem ist und wie man das wieder zum Laufen bekommt.

Es sind nachher bis zu 20 Variablen die Kopiert werden sollen.

Software TIA V13 SP1 Update 5

Nachtrag:

'aktTagname hat den Wert Regler_1
SmartTags("Ctrl_Pop_20")=aktTagName & ".GW_MaxMax"
SmartTags("Ctrl_Pop_1")=SmartTags(aktTagName & ".GW_MaxMax")
SmartTags("Ctrl_Pop_2")=SmartTags(aktTagName & ".GW_Max")
SmartTags("Ctrl_Pop_3")=SmartTags(aktTagName & ".GW_Min")
SmartTags("Ctrl_Pop_4")=SmartTags(aktTagName & ".GW_MinMin")
SmartTags("Ctrl_Pop_5")=SmartTags("Regler_1.GW_MaxMax")
SmartTags("Ctrl_Pop_6")=SmartTags("Regler_2.GW_Max")
SmartTags("Ctrl_Pop_7")=SmartTags("Regler_1.GW_Min")
SmartTags("Ctrl_Pop_8")=SmartTags("Regler_2.GW_MinMin")
ShowPopupScreen "Ctrl_POP",100,100,hmiToggle,hmiAnimationOff,hmiFast

 Im gezeigten Skript werden die E/A-Felder des Pop-Up-Fensters der Variablen "Ctrl_Pop_1" und "Ctrl_Pop_3" mit dem korrekten Wert dargestellt, die Felder der Variablen "Ctrl_Pop_2" und "Ctrl_Pop_4" enthalten den Wert "0". Es gibt keine Fehlermeldung.

Habe diese unzuverlässige Funktion jetzt durch multiplexen der Variablen gelöst. Das klappt wenigstens.