Confirmation pop-up window

Hello guys,

I am working on a project in Wincc Scada. Let me explain my situation to you. I have a button in HMI for starting a pump. I have assigned a boolean  tag to button. But I want to provide a confirmation window that pop ups when button is clicked to ask for permission to really start a pump. I tried a lot but all end in smoke.

I hope my situation is cleared to you all. Waiting for any help from you all experts. Thanks

Regards

Jack

Hi Jack,

I think this is what you are looking for:

https://support.industry.siemens.com/tf/ww/en/posts/popup-window/123071/?page=0&pageSize=10

Thanks,

HarrY

HarrY ji

Hi Jack,

I think this is what you are looking for:

https://support.industry.siemens.com/tf/ww/en/posts/popup-window/123071/?page=0&pageSize=10

 

Thanks,

HarrY

Several ways to achieve this, try this one:

Create your own small pdl with 2 buttons: 'Yes' / 'No'.
Replace the action on your button to show your confirmation box in a picture window.
Put your action for starting the pump on the Yes-button.
Clicking on the No-button, you do nothing except closing the picture window.

Thanks to both of you for your response.

I have now found the answer of my problem.. but i have a new query to ask. I want to give some delay between two lines in VBScript. I tried on internet but got no workable code. I also read the manual of VBScript but stands on same position..

Can you guys help me how to generate a delay in VBScript? Following is the VBS code I am using.(The commented delay function is just a false try)

I will appreciate any help. Thanks

Regards:

Jack

CODE:

Sub OnClick(Byval Item)                   

Dim XX, Tag, obj
Set obj = HMIRuntime.Tags("B00L")
Tag = obj.Read

XX=MsgBox ("Do you really want to start pump?",vbOKCancel,"Confirmation")
If XX=1 Then

 obj.Value = 1
 obj.Write
 
 'obj.TimeStamp 5000        
 'ccSleep(5000)
 'crt.Sleep 1000
 'crt.Sleep 5000
 
 obj.Value = 0
 obj.Write
 
Else
 obj.Value = 0
 obj.Write

End If
End Sub

Hi,

Please check

https://support.industry.siemens.com/cs/document/26120986/how-do-you-implement-a-wait-function-delay-in-a-visual-basic-script-in-wincc-flexible?lc=en-WW