Messages

1

Open Discussion / ChartWithLogging tag issue

« on: October 19, 2022, 01:17:49 PM »

I have a tag that I am wanting to trend.
I have this tag N59[39] assigned to a AnalogValueDisplay and it works with no issues.
If I add the same address to the PLCAddress section for the chart I get nothing. The chart doesn't not even start
at all. If I remove the [39] the chart will start but obviously not displaying the data that I want. I feel sure that I must
beover looking something but I just can't seem to figure this out.

2

Support Questions / Re: Access advanced HMI from multiple locations

« on: December 03, 2020, 11:28:59 AM »

Sorry I should have made it clear that the compressor system that I maintain for them is not part of their ignition SCADA. Ignition is used throughout their production process so they are versed with ignition. Looks like I may have to learn ignition.

3

Support Questions / Access advanced HMI from multiple locations

« on: December 03, 2020, 11:01:55 AM »

I am looking for some guidance as to the best solution to view Advanced HMI from multiple locations. I know that I can place a local copy of HMI program on each workstation (which works just fine) but this limits knowing who made changes. If I try to use remote desktop then the local HMI is not viewable while remote connection is active. Customer is currently using ignition and likes the ability to access using IP address from any workstation he so choses. just curious as to what others have used to accomplish this.

Thanks,
Gene

4

Open Discussion / Re: change language on labels and buttons

« on: July 15, 2020, 10:43:13 PM »

I have a need for this as well. I created a user defined Data type(I called Language) with 72 different string variables. I then created three tags(Language as type)... Display_Text, English_Text, Spanish_Text. Then I assigned the string values to each tag ie English_Text.SystemPressure is assigned System Pressure. The Spanish_Text.SystemPressure is assigned the translated text for System Pressure. Then anywhere I want to use System Pressure as my label text I set the plcaddressvalue to Display_Text.SystemPressure. Also created a boolean tag called Alternate_Text. A few lines of code in the PLC....
IF Not Alternate_Text Then
    Display_Text := English_Text;
Else
    Display_Text := Spanish_Text;
End_If;

I am not sure if this is a valid solution or not as I am still testing to see if any problems arise. The one problem I found that seems to be the deal breaker for me, is if the need for Chinese, Korean, or any similar language is needed.
Maybe someone has done been here so feel free to stop me if I am on the wrong path.

5

Support Questions / Re: Replace all ComComponents

« on: July 07, 2020, 07:41:01 PM »

I believe if you select all of the items you can set the comcomponent for all of the items that are selected.

6

Open Discussion / Re: Hardware Spec

« on: June 16, 2020, 04:33:34 PM »

Triple LOL on "Due West" for me.  I had to google it.

I first lol'd with an eyeroll at the person seeming to be vague on the "I live in Due West".
Then I lol'd at Gene saying "I live 12 miles from Due West" (thinking Gene was making a funny at the vague person)
Final lol, I googled Due West.

Whom ever named the town was a simpleton or a comedic genius, trolling everyone that would ever live in that town.

LOL..... It is actually located 4 miles "Due West" of another small town called Donalds. I am guessing that is where the name came from. Erskine college is located in Due West and the town is really built around the college.

7

Open Discussion / Re: Hardware Spec

« on: June 16, 2020, 02:18:03 PM »

LOL that's funny. I actually live about 12 miles from Due West.
I thought that I had read in another post somewhere that you were actually in Central SC
I must be mistaken. Oh well as you stated Orangeburg is a little to far to "drop by" so I will
place order online. Thanks!

8

Open Discussion / Re: Hardware Spec

« on: June 16, 2020, 11:14:10 AM »

Archie, I live in Anderson is this screen something that I could pick up in Central?

9

Open Discussion / Re: Hardware Spec

« on: May 07, 2020, 10:14:58 AM »

Thanks Archie!

10

Open Discussion / Hardware Spec

« on: May 07, 2020, 09:39:03 AM »

I was looking at the hardware specs in the product section
and see that the 8" screen has 1024 X 768 resolution while
the 10" screen has 800 X 600 resolution. I just wanted
to double check and make sure this is correct. I have my project
almost ready to go and need to make sure I don't have a resolution
issue.

Thanks,
Gene

11

Support Questions / Re: Loops

« on: March 31, 2019, 10:27:02 PM »

Well I kept plugging until I finally figured out a way to do a loop that worked for me.
@ Archie and James, I know that I could copy and paste the code you posted and saved a lot of
time but I had to figure out what I was missing in my attempts. Here is what I came up with...

Code: [Select]

        Dim y
        Dim counter = 0
        For index = 0 To Alarm_Data.PLCAddressValueItems.Count - 1
            Dim i = Alarm_Data.PLCAddressValueItems(index).LastValue
            If index <= 15 Then
                y = "40300." + Convert.ToString(counter)
            ElseIf index <= 31 Then
                y = "40301." + Convert.ToString(counter)
            ElseIf index <= 47 Then
                y = "40302." + Convert.ToString(counter)
            ElseIf index <= 63 Then
                y = "40303." + Convert.ToString(counter)
            ElseIf index <= 79 Then
                y = "40304." + Convert.ToString(counter)
            ElseIf index <= 95 Then
                y = "40305." + Convert.ToString(counter)
            ElseIf index <= 111 Then
                y = "40306." + Convert.ToString(counter)
            ElseIf index <= 127 Then
                y = "40307." + Convert.ToString(counter)
            ElseIf index <= 143 Then
                y = "40308." + Convert.ToString(counter)
            ElseIf index <= 159 Then
                y = "40309." + Convert.ToString(counter)
            End If
            If i = "True" Then
                    ModbusTCPCom1.Write(y, 1)
                Else
                    ModbusTCPCom1.Write(y, 0)
                End If

            If counter = 15 Then
                counter = 0
            Else
                counter = counter + 1
            End If
        NextI then moved on to the code that James posted and implemented it and as expected works as advertised.
I haven't had time to get to the code Archie posted yet. I have noticed that when this code is used "both" what is posted and the code from James, the application slows to a crawl on loading the application and changing to the form that has the datasubscriber on it. Am I still missing something in this loop that could/would cause this problem?

12

Support Questions / Re: Loops

« on: March 27, 2019, 07:12:41 PM »

Yes Archie I would like to force myself to learn this method to reduce the amount of code.My project has many places this would be very helpful and a lot cleaner.
Needles to say not one of my 15 attempts look anything like the examples you gentleman posted. Thanks for the guidance. You help is very much appreciated.

Gene

13

Support Questions / Loops

« on: March 26, 2019, 11:27:14 PM »

I have been reading up on how to construct loops.
I have made numerous attempts but not making much progress.
Here is what I have done....
Added a datasubsriber.
Added this code to form.....

Code: [Select]

        If Alarm_Data.PLCAddressValueItems(0).LastValue = True Then
            ModbusTCPCom1.Write(40300.0, 1)
        Else
            ModbusTCPCom1.Write(40300.0, 0)
        End If
        If Alarm_Data.PLCAddressValueItems(1).LastValue = True Then
            ModbusTCPCom1.Write(40300.1, 1)
        Else
            ModbusTCPCom1.Write(40300.1, 0)
        End If
etc.....
etc.....

        If Alarm_Data.PLCAddressValueItems(15).LastValue = True Then
            ModbusTCPCom1.Write(40300.15, 1)
        Else
            ModbusTCPCom1.Write(40300.15, 0)
        End If
etc.....
etc.....
        If Alarm_Data.PLCAddressValueItems(31).LastValue = True Then
            ModbusTCPCom1.Write(40301.15, 1)
        Else
            ModbusTCPCom1.Write(40301.15, 0)
        End IfThis code works as expected.
Can This be converted to loops, or am I just spinning my wheels?

Thanks,
Gene

14

Open Discussion / Re: Trending Chart

« on: March 06, 2019, 10:43:32 PM »

I copied the text into a .txt file below. Also wanted to let you know if I click continue on the error screen the chart will open and eventually will start working again but if I leave and return the error pops up again.

Gene

15

Open Discussion / Re: Trending Chart

« on: March 06, 2019, 05:20:32 PM »

I keep having a problem with the chart stopping. I get this error when I try to navigate to the chart. I can select continue and when the chart opens it is not showing real time data even though I checked the log and I see entries in the CSV file.
The error is attached.

Also wanted to say that this error only occurs while running the application by starting with the advancedHMI.exe. If I run inside of visual studio starting the application in debug the chart will stop but I don't get any error that I am aware of.

Gene