Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - kenjacoby

Pages: [1]
1
Open Discussion / Re: Slc500 Indirect addressing
« on: March 10, 2017, 01:32:11 PM »
Thanks, this is what I ended up coming up with after posting this thread. 

read
            tag(0) = Label2.Text & ":" & BasicLabel1.Text
            Label3.Text = EthernetIPforSLCMicroCom1.Read(tag(0))

write
               Dim tag = Label2.Text & ":" & BasicLabel1.Text
                EthernetIPforSLCMicroCom1.Write(tag, TextBox1.Text)

The labels are the integer file I want to read, N63 for instance.  Then the basic label reads the current part number for the recipe file, so in this example it gives me N63:34.   Then I have a text box with the value I wish to set the tag to.

Thanks,
Kenneth

2
Open Discussion / Slc500 Indirect addressing
« on: March 10, 2017, 10:37:37 AM »
Good morning.  Is there a way to access a tag indirectly?  I am trying to access N63:[N7:0].  This is using the SLC ethernet IP driver.

Thanks,
Kenneth

3
Support Questions / Reading a large amount of tags
« on: December 16, 2016, 10:01:18 AM »
Good morning, I am logging fault alarms from 350 different tags.  they are located in an array(3) of 150 INT tags. 

PROGRAM:ProductionData.FaultSummary[0]
PROGRAM:ProductionData.FaultSummary[1]
PROGRAM:ProductionData.FaultSummary[2]


I currently create 3 arrays(150 long in VB) and record the status of each tag.  on the local network this takes 15 seconds to go through all 350 tags.  From home, with a DSL connection, it takes over 10 minutes. 

        ARRAY(0) = EthernetIPforCLXCom1.Read("PROGRAM:ProductionData.FaultSummary[0].GycolTankRunning")
        ARRAY(1) = EthernetIPforCLXCom1.Read("PROGRAM:ProductionData.FaultSummary[0].PreheatOvenDNS")
        ARRAY(2) = EthernetIPforCLXCom1.Read("PROGRAM:ProductionData.FaultSummary[0].PreheatBlowerDNS")
        ARRAY(3) = EthernetIPforCLXCom1.Read("PROGRAM:ProductionData.FaultSummary[0].DryOvenDNS")
        ARRAY(4) = EthernetIPforCLXCom1.Read("PROGRAM:ProductionData.FaultSummary[0].DryOvenBlowerDNS")
        ARRAY(5) = EthernetIPforCLXCom1.Read("PROGRAM:ProductionData.FaultSummary[0].PreheatBlowerTripped")
        ARRAY(6) = EthernetIPforCLXCom1.Read("PROGRAM:ProductionData.FaultSummary[0].PreheatExhaustTripped")

after recording all the data in the array files, I write all the data to a text file to import into excel.

Every thing works fine.  I am just trying to speed up the transfer, especially over my VPN.

thanks,
Kenneth

Pages: [1]