How to write from Zenon into array in PLC

How to write from Zenon into array in PLC

Hi All,
I would like to write into arrays in PLC from Zenon.I tried to use the code below but it does not seem to work.Can somebody help me on this?
Sub showplC()
Dim Public_Holiday_Day
Dim Public_Holiday_Month
Public_Holiday_Day = Array("24", "8", "9", "16", "15", "5", "25")
Public_Holiday_Month = Array("5", "8", "8", "9", "10", "11", "5")
thisProject.Variables.Item("Public_Holiday_Day").Value = Public_Holiday_Day(0)
thisProject.Variables.Item("Public_Holiday_Day").Value =Public_Holiday_Day(1)/WRITING INTO ARRAY IN plC
thisProject.Variables.Item("Public_Holiday_Day").Value = Public_Holiday_Day(2)/WRITING INTO ARRAY IN plC
thisProject.Variables.Item("Public_Holiday_Day").Value = Public_Holiday_Day(3)/WRITING INTO ARRAY IN plC
thisProject.Variables.Item("Public_Holiday_Day").Value = Public_Holiday_Day(4)/WRITING INTO ARRAY IN plC
thisProject.Variables.Item("Public_Holiday_Day").Value = Public_Holiday_Day(5)/WRITING INTO ARRAY IN plC
thisProject.Variables.Item("Public_Holiday_Day").Value = Public_Holiday_Day(6)/WRITING INTO ARRAY IN plC
thisProject.Variables.Item("Public_Holiday_Month").Value = Public_Holiday_Day(0)/WRITING INTO ARRAY IN plC
thisProject.Variables.Item("Public_Holiday_Month").Value = Public_Holiday_Day(1)/WRITING INTO ARRAY IN plC
thisProject.Variables.Item("Public_Holiday_Month").Value = Public_Holiday_Day(2)/WRITING INTO ARRAY IN plC
thisProject.Variables.Item("Public_Holiday_Month").Value = Public_Holiday_Day(3)/WRITING INTO ARRAY IN plC
thisProject.Variables.Item("Public_Holiday_Month").Value = Public_Holiday_Day(4)/WRITING INTO ARRAY IN plC
thisProject.Variables.Item("Public_Holiday_Month").Value = Public_Holiday_Day(5)/WRITING INTO ARRAY IN plC

thisProject.Variables.Item("Public_Holiday_Month").Value = Public_Holiday_Day(6)/WRITING INTO ARRAY IN plC

This is a migrated post! Originally posted on 15.05.2013 by user shuraj. Please be aware that information can be outdated.