Skip to content

Commit f038b0a

Browse files
authored
Merge pull request #12 from simatic-ax/changesfor012
Changesfor012
2 parents f14c691 + 710fc82 commit f038b0a

12 files changed

Lines changed: 797 additions & 461 deletions

‎README.md‎

Lines changed: 22 additions & 20 deletions
Original file line numberDiff line numberDiff line change
@@ -30,6 +30,8 @@ Simatic.Ax.LAcycCom;
3030
## Example
3131

3232
```cli
33+
USING Simatic.Ax.LAcycCom;
34+
3335
PROGRAM MyProgram
3436
VAR
3537
Resourcemanager : OOPLAcycCom_ResourceManager;
@@ -62,10 +64,10 @@ PROGRAM MyProgram
6264
end_IF;
6365
6466
CASE ReadParameter.Status() OF
65-
LAcycComstate_def#BUSY :
67+
LAcycComstateDef#BUSY :
6668
;
6769
68-
LAcycComstate_def#IDLE :
70+
LAcycComstateDef#IDLE :
6971
datasetitemread.parameterNumber := uint#304;
7072
elements := ReadParameter.AddatasetItem(datasetItem := datasetitemread,
7173
element_no := -1);
@@ -77,74 +79,74 @@ PROGRAM MyProgram
7779
ReadParameter.Start(driveObjectId := uint#5,
7880
hardwareId := word#269);
7981
80-
LAcycComstate_def#DONE :
82+
LAcycComstateDef#DONE :
8183
datasetitemread := ReadParameter.ReaddatasetItem(element_no := 0);
82-
RVALUEp304 := datasetitemread.value;
84+
RVALUEp304 := datasetitemread.Rvalue;
8385
datasetitemread := ReadParameter.ReaddatasetItem(element_no := 1);
84-
RVALUEp305 := datasetitemread.value;
86+
RVALUEp305 := datasetitemread.Rvalue;
8587
86-
LAcycComstate_def#ERROR :
88+
LAcycComstateDef#ERROR :
8789
diagnostic := ReadParameter.errordiagnostics();
8890
END_CASE;
8991
9092
CASE ReadParameterSingle.Status() OF
91-
LAcycComstate_def#BUSY :
93+
LAcycComstateDef#BUSY :
9294
;
9395
94-
LAcycComstate_def#IDLE :
96+
LAcycComstateDef#IDLE :
9597
ReadParameterSingle.Start( driveObjectId := uint#5,
9698
hardwareId := word#269,
9799
parameterNumber := uint#310,
98100
index := uint#0);
99101
100-
LAcycComstate_def#DONE :
102+
LAcycComstateDef#DONE :
101103
RVALUEp310 := ReadParameterSingle.GetValueREAL();
102104
103-
LAcycComstate_def#ERROR :
105+
LAcycComstateDef#ERROR :
104106
diagnostic := ReadParameterSingle.errordiagnostics();
105107
END_CASE;
106108
107109
CASE WriteParameter.Status() OF
108-
LAcycComstate_def#BUSY :
110+
LAcycComstateDef#BUSY :
109111
;
110112
111-
LAcycComstate_def#IDLE :
113+
LAcycComstateDef#IDLE :
112114
113115
datasetitemwrite.parameterNumber := uint#2900;
114-
datasetitemwrite.value := real#12.3;
116+
datasetitemwrite.Rvalue := real#12.3;
115117
elements := WriteParameter.AddatasetItem(datasetItem := datasetitemwrite,
116118
element_no := -1);
117119
118120
datasetitemwrite.parameterNumber := uint#2901;
119-
datasetitemwrite.value := real#45.6;
121+
datasetitemwrite.Rvalue := real#45.6;
120122
elements := WriteParameter.AddatasetItem(datasetItem := datasetitemwrite,
121123
element_no := -1);
122124
123125
WriteParameter.Start(driveObjectId := uint#5,
124126
hardwareId := word#269);
125127
126-
LAcycComstate_def#DONE :
128+
LAcycComstateDef#DONE :
127129
;
128130
129-
LAcycComstate_def#ERROR :
131+
LAcycComstateDef#ERROR :
130132
diagnostic := WriteParameter.errordiagnostics();
131133
END_CASE;
132134
133135
CASE WriteParameterSingle.Status() OF
134-
LAcycComstate_def#BUSY :
136+
LAcycComstateDef#BUSY :
135137
;
136138
137-
LAcycComstate_def#IDLE :
139+
LAcycComstateDef#IDLE :
138140
WriteParameterSingle.Start( driveObjectId := uint#5,
139141
hardwareId := word#269,
140142
parameterNumber := uint#2930,
141143
value := REAL#78.9,
142144
index := uint#0);
143145
144-
LAcycComstate_def#DONE :
146+
LAcycComstateDef#DONE :
145147
;
146148
147-
LAcycComstate_def#ERROR :
149+
LAcycComstateDef#ERROR :
148150
diagnostic := WriteParameterSingle.errordiagnostics();
149151
END_CASE;
150152

0 commit comments

Comments
 (0)