Initial call of this OB
Initial call of this OB
Initial call of this OB
=True, if remanent data are available
=True, if remanent data are available
=True, if remanent data are available
Optimized
OB1
1
FBD
ProgramCycle
false
cs-CZ
de-DE
en-US
true
FALSE
Wird in OB121 auf TRUE gesetzt
Änderung um einchecken zu testen
SCL
cs-CZ
de-DE
en-US
cs-CZ
de-DE
Zykluszeit genau ermitteln START
en-US
true
0
"DB_Error".sErrorText.....Reaktion, Meldung etc.
true
Quittieren
true
0
true
0
true
0
true
0
true
0
true
0
true
0
true
0
true
0
true
''
true
FALSE
SCL
cs-CZ
de-DE
OB 121 zeigt bei Programmierfehler in DB_Error die Infos an. Infos können hier gelöscht werden.
en-US
cs-CZ
de-DE
Programmierfehler Handling
en-US
true
true
true
SCL
cs-CZ
de-DE
en-US
cs-CZ
de-DE
Call Sensors
en-US
true
true
true
SCL
cs-CZ
de-DE
en-US
cs-CZ
de-DE
PreMain
en-US
true
true
true
true
SCL
cs-CZ
de-DE
en-US
cs-CZ
de-DE
Main
en-US
true
SCL
cs-CZ
de-DE
en-US
cs-CZ
de-DE
Priority Logic
en-US
true
TRUE
true
true
true
true
true
true
SCL
cs-CZ
de-DE
Schnittstelle Fortna WCS/WES, TCP Logging
en-US
cs-CZ
de-DE
Communications
en-US
Lager füllen
true
1
1
true
1234
true
true
1
1
true
1234
true
true
true
FALSE
Lager leeren
true
1
1
true
0
true
FALSE
1
1
true
0
true
FALSE
FOR #nIdx1 := 1 TO "cNoLines1.1.3" DO
FOR #nIdx2 := 1 TO "cNoPositionsBlock1" DO
"DB_Storage1.1.3".arLine[#nIdx1].arCarrier[#nIdx2].nBarcode := 0;
"DB_Storage1.1.3".arLine[#nIdx1].arCarrier[#nIdx2].bStatus.%X0 := FALSE;
END_FOR;
END_FOR;
FOR #nIdx1 := 1 TO "cNoLines1.1.4" DO
FOR #nIdx2 := 1 TO "cNoPositionsBlock1" DO
"DB_Storage1.1.4".arLine[#nIdx1].arCarrier[#nIdx2].nBarcode := 0;
"DB_Storage1.1.4".arLine[#nIdx1].arCarrier[#nIdx2].bStatus.%X0 := FALSE;
END_FOR;
END_FOR;
FOR #nIdx1 := 1 TO "cNoLines1.2.1" DO
FOR #nIdx2 := 1 TO "cNoPositionsBlock2" DO
"DB_Storage1.2.1".arLine[#nIdx1].arCarrier[#nIdx2].nBarcode := 0;
"DB_Storage1.2.1".arLine[#nIdx1].arCarrier[#nIdx2].bStatus.%X0 := FALSE;
END_FOR;
END_FOR;
FOR #nIdx1 := 1 TO "cNoLines1.2.2" DO
FOR #nIdx2 := 1 TO "cNoPositionsBlock2" DO
"DB_Storage1.2.2".arLine[#nIdx1].arCarrier[#nIdx2].nBarcode := 0;
"DB_Storage1.2.2".arLine[#nIdx1].arCarrier[#nIdx2].bStatus.%X0 := FALSE;
END_FOR;
END_FOR;
FOR #nIdx1 := 1 TO "cNoLines1.2.3" DO
FOR #nIdx2 := 1 TO "cNoPositionsBlock2" DO
"DB_Storage1.2.3".arLine[#nIdx1].arCarrier[#nIdx2].nBarcode := 0;
"DB_Storage1.2.3".arLine[#nIdx1].arCarrier[#nIdx2].bStatus.%X0 := FALSE;
END_FOR;
END_FOR;
FOR #nIdx1 := 1 TO "cNoLines1.2.4" DO
FOR #nIdx2 := 1 TO "cNoPositionsBlock2" DO
"DB_Storage1.2.4".arLine[#nIdx1].arCarrier[#nIdx2].nBarcode := 0;
"DB_Storage1.2.4".arLine[#nIdx1].arCarrier[#nIdx2].bStatus.%X0 := FALSE;
END_FOR;
END_FOR;
FOR #nIdx1 := 1 TO "cNoLines1.3.1" DO
FOR #nIdx2 := 1 TO "cNoPositionsBlock3" DO
"DB_Storage1.3.1".arLine[#nIdx1].arCarrier[#nIdx2].nBarcode := 0;
"DB_Storage1.3.1".arLine[#nIdx1].arCarrier[#nIdx2].bStatus.%X0 := FALSE;
END_FOR;
END_FOR;
FOR #nIdx1 := 1 TO "cNoLines1.3.2" DO
FOR #nIdx2 := 1 TO "cNoPositionsBlock3" DO
"DB_Storage1.3.2".arLine[#nIdx1].arCarrier[#nIdx2].nBarcode := 0;
"DB_Storage1.3.2".arLine[#nIdx1].arCarrier[#nIdx2].bStatus.%X0 := FALSE;
END_FOR;
END_FOR;
FOR #nIdx1 := 1 TO "cNoLines1.3.3" DO
FOR #nIdx2 := 1 TO "cNoPositionsBlock3" DO
"DB_Storage1.3.3".arLine[#nIdx1].arCarrier[#nIdx2].nBarcode := 0;
"DB_Storage1.3.3".arLine[#nIdx1].arCarrier[#nIdx2].bStatus.%X0 := FALSE;
END_FOR;
END_FOR;
FOR #nIdx1 := 1 TO "cNoLines1.3.4" DO
FOR #nIdx2 := 1 TO "cNoPositionsBlock3" DO
"DB_Storage1.3.4".arLine[#nIdx1].arCarrier[#nIdx2].nBarcode := 0;
"DB_Storage1.3.4".arLine[#nIdx1].arCarrier[#nIdx2].bStatus.%X0 := FALSE;
END_FOR;
END_FOR;
true
FALSE
Jam füllen
true
HyperJam
FOR #nIdxHyper := 1 TO "cHyperJam" -1 DO
"DB_HyperJam".stHyperJam.arCarrier[#nIdxHyper].nBarcode := 20000015;
"DB_HyperJam".stHyperJam.arCarrier[#nIdxHyper].bStatus.%X0 := true;
END_FOR;
Conveyor
FOR #nIdx2 := 1 TO "cJamConv1_1" -1 DO
"DB_JamAreaConv1".stJamConv1_1.arCarrier[#nIdx2].nBarcode := 20000015;
"DB_JamAreaConv1".stJamConv1_1.arCarrier[#nIdx2].bStatus.%X0 := true;
END_FOR;
FOR #nIdx2 := 1 TO "cJamConv1_2" -1 DO
"DB_JamAreaConv1".stJamConv1_2.arCarrier[#nIdx2].nBarcode := 20000015;
"DB_JamAreaConv1".stJamConv1_2.arCarrier[#nIdx2].bStatus.%X0 := true;
END_FOR;
FOR #nIdx2 := 1 TO "cJamConv1_3" -1 DO
"DB_JamAreaConv1".stJamConv1_3.arCarrier[#nIdx2].nBarcode := 20000015;
"DB_JamAreaConv1".stJamConv1_3.arCarrier[#nIdx2].bStatus.%X0 := true;
END_FOR;
FOR #nIdx2 := 1 TO "cJamConv1_4" -1 DO
"DB_JamAreaConv1".stJamConv1_4.arCarrier[#nIdx2].nBarcode := 20000015;
"DB_JamAreaConv1".stJamConv1_4.arCarrier[#nIdx2].bStatus.%X0 := true;
END_FOR;
FOR #nIdx2 := 1 TO "cJamConv2" -1 DO
"DB_JamAreaConv2".stJamConv2.arCarrier[#nIdx2].nBarcode := 20000015;
"DB_JamAreaConv2".stJamConv2.arCarrier[#nIdx2].bStatus.%X0 := true;
END_FOR;
Block 1
1
35
true
1015
true
TRUE
FOR #nIdx2 := 1 TO "cJam0100_2" -1 DO
"DB_JamArea0101".stJam0101_2.arCarrier[#nIdx2].nBarcode := 20000015;
"DB_JamArea0101".stJam0101_2.arCarrier[#nIdx2].bStatus.%X0 := true;
END_FOR;
FOR #nIdx2 := 1 TO "cJam0101_1" - 1 DO
"DB_JamArea0101".stJam0101_1.arCarrier[#nIdx2].nBarcode := 20000015;
"DB_JamArea0101".stJam0101_1.arCarrier[#nIdx2].bStatus.%X0 := true;
END_FOR;
FOR #nIdx2 := 1 TO "cJam0101_2" -1 DO
"DB_JamArea0101".stJam0101_2.arCarrier[#nIdx2].nBarcode := 20000015;
"DB_JamArea0101".stJam0101_2.arCarrier[#nIdx2].bStatus.%X0 := true;
END_FOR;
FOR #nIdx2 := 1 TO "cJam0101_3" -1 DO
"DB_JamArea1102".stJam1102_3.arCarrier[#nIdx2].nBarcode := 20000015;
"DB_JamArea1102".stJam1102_3.arCarrier[#nIdx2].bStatus.%X0 := true;
END_FOR;
FOR #nIdx2 := 1 TO "cJam0101_4" -1 DO
"DB_JamArea1102".stJam1102_4.arCarrier[#nIdx2].nBarcode := 20000015;
"DB_JamArea1102".stJam1102_4.arCarrier[#nIdx2].bStatus.%X0 := true;
END_FOR;
1
6
true
1015
true
true
1
7
true
1015
true
true
1
59
true
1015
true
true
FOR #nIdx2 := 1 TO "cJam0103_2" -1 DO
"DB_JamArea0103".stJam0103_2.arCarrier[#nIdx2].nBarcode := 20000015;
"DB_JamArea0103".stJam0103_2.arCarrier[#nIdx2].bStatus.%X0 := true;
END_FOR;
1
true
1015
true
true
FOR #nIdx2 := 1 TO "cJam0104_2" -1 DO
"DB_JamArea0104".stJam0104_2.arCarrier[#nIdx2].nBarcode := 20000015;
"DB_JamArea0104".stJam0104_2.arCarrier[#nIdx2].bStatus.%X0 := true;
END_FOR;
FOR #nIdx2 := 1 TO "cJam0105_1" - 1 DO
"DB_JamArea0105".stJam0105_1.arCarrier[#nIdx2].nBarcode := 20000015;
"DB_JamArea0105".stJam0105_1.arCarrier[#nIdx2].bStatus.%X0 := true;
END_FOR;
FOR #nIdx2 := 1 TO "cJam0106_1" - 1 DO
"DB_JamArea0106".stJam0106_1.arCarrier[#nIdx2].nBarcode := 20000015;
"DB_JamArea0106".stJam0106_1.arCarrier[#nIdx2].bStatus.%X0 := true;
END_FOR;
FOR #nIdx2 := 1 TO "cJam0106_2" -1 DO
"DB_JamArea0106".stJam0106_2.arCarrier[#nIdx2].nBarcode := 20000015;
"DB_JamArea0106".stJam0106_2.arCarrier[#nIdx2].bStatus.%X0 := true;
END_FOR;
1
12
true
1015
true
true
1
true
1015
true
true
1
37
true
1015
true
true
true
FALSE
Jam leeren
true
HyperJam
FOR #nIdxHyper := 1 TO "cHyperJam" DO
"DB_HyperJam".stHyperJam.arCarrier[#nIdxHyper].nBarcode := 0;
"DB_HyperJam".stHyperJam.arCarrier[#nIdxHyper].bStatus.%X0 := false;
END_FOR;
Conveyor
FOR #nIdx2 := 1 TO "cJamConv1_1" DO
"DB_JamAreaConv1".stJamConv1_1.arCarrier[#nIdx2].nBarcode := 0;
"DB_JamAreaConv1".stJamConv1_1.arCarrier[#nIdx2].bStatus.%X0 := false;
END_FOR;
FOR #nIdx2 := 1 TO "cJamConv1_2" DO
"DB_JamAreaConv1".stJamConv1_2.arCarrier[#nIdx2].nBarcode := 0;
"DB_JamAreaConv1".stJamConv1_2.arCarrier[#nIdx2].bStatus.%X0 := false;
END_FOR;
FOR #nIdx2 := 1 TO "cJamConv1_3" DO
"DB_JamAreaConv1".stJamConv1_3.arCarrier[#nIdx2].nBarcode := 0;
"DB_JamAreaConv1".stJamConv1_3.arCarrier[#nIdx2].bStatus.%X0 := false;
END_FOR;
FOR #nIdx2 := 1 TO "cJamConv1_4" DO
"DB_JamAreaConv1".stJamConv1_4.arCarrier[#nIdx2].nBarcode := 0;
"DB_JamAreaConv1".stJamConv1_4.arCarrier[#nIdx2].bStatus.%X0 := false;
END_FOR;
FOR #nIdx2 := 1 TO "cJamConv2" DO
"DB_JamAreaConv2".stJamConv2.arCarrier[#nIdx2].nBarcode := 0;
"DB_JamAreaConv2".stJamConv2.arCarrier[#nIdx2].bStatus.%X0 := false;
END_FOR;
Block 1
FOR #nIdx2 := 1 TO "cJam0100_1" DO
"DB_JamArea0101".stJam0101_1.arCarrier[#nIdx2].nBarcode := 0;
"DB_JamArea0101".stJam0101_1.arCarrier[#nIdx2].bStatus.%X0 := false;
END_FOR;
FOR #nIdx2 := 1 TO "cJam0100_2" DO
"DB_JamArea0101".stJam0101_2.arCarrier[#nIdx2].nBarcode := 0;
"DB_JamArea0101".stJam0101_2.arCarrier[#nIdx2].bStatus.%X0 := false;
END_FOR;
FOR #nIdx2 := 1 TO "cJam0101_1" DO
"DB_JamArea0101".stJam0101_1.arCarrier[#nIdx2].nBarcode := 0;
"DB_JamArea0101".stJam0101_1.arCarrier[#nIdx2].bStatus.%X0 := false;
END_FOR;
FOR #nIdx2 := 1 TO "cJam0101_2" DO
"DB_JamArea0102".stJam0102_2.arCarrier[#nIdx2].nBarcode := 0;
"DB_JamArea0102".stJam0102_2.arCarrier[#nIdx2].bStatus.%X0 := false;
END_FOR;
FOR #nIdx2 := 1 TO "cJam0102_1" DO
"DB_JamArea0102".stJam0102_1.arCarrier[#nIdx2].nBarcode := 0;
"DB_JamArea0102".stJam0102_1.arCarrier[#nIdx2].bStatus.%X0 := false;
END_FOR;
FOR #nIdx2 := 1 TO "cJam0103_1" DO
"DB_JamArea0103".stJam0103_1.arCarrier[#nIdx2].nBarcode := 0;
"DB_JamArea0103".stJam0103_1.arCarrier[#nIdx2].bStatus.%X0 := false;
END_FOR;
FOR #nIdx2 := 1 TO "cJam0103_2" DO
"DB_JamArea0103".stJam0103_2.arCarrier[#nIdx2].nBarcode := 0;
"DB_JamArea0103".stJam0103_2.arCarrier[#nIdx2].bStatus.%X0 := false;
END_FOR;
FOR #nIdx2 := 1 TO "cJam0104_1" DO
"DB_JamArea0104".stJam0104_1.arCarrier[#nIdx2].nBarcode := 0;
"DB_JamArea0104".stJam0104_1.arCarrier[#nIdx2].bStatus.%X0 := false;
END_FOR;
FOR #nIdx2 := 1 TO "cJam0104_2" DO
"DB_JamArea0104".stJam0104_2.arCarrier[#nIdx2].nBarcode := 0;
"DB_JamArea0104".stJam0104_2.arCarrier[#nIdx2].bStatus.%X0 := false;
END_FOR;
FOR #nIdx2 := 1 TO "cJam0105_1" DO
"DB_JamArea0105".stJam0105_1.arCarrier[#nIdx2].nBarcode := 0;
"DB_JamArea0105".stJam0105_1.arCarrier[#nIdx2].bStatus.%X0 := false;
END_FOR;
FOR #nIdx2 := 1 TO "cJam0106_1" DO
"DB_JamArea0106".stJam0106_1.arCarrier[#nIdx2].nBarcode := 0;
"DB_JamArea0106".stJam0106_1.arCarrier[#nIdx2].bStatus.%X0 := false;
END_FOR;
FOR #nIdx2 := 1 TO "cJam0106_2" DO
"DB_JamArea0106".stJam0106_2.arCarrier[#nIdx2].nBarcode := 0;
"DB_JamArea0106".stJam0106_2.arCarrier[#nIdx2].bStatus.%X0 := false;
END_FOR;
FOR #nIdx2 := 1 TO "cJam0107_1" DO
"DB_JamArea0107".stJam0107_1.arCarrier[#nIdx2].nBarcode := 0;
"DB_JamArea0107".stJam0107_1.arCarrier[#nIdx2].bStatus.%X0 := false;
END_FOR;
FOR #nIdx2 := 1 TO "cJam0108_1" DO
"DB_JamArea0108".stJam0108_1.arCarrier[#nIdx2].nBarcode := 0;
"DB_JamArea0108".stJam0108_1.arCarrier[#nIdx2].bStatus.%X0 := false;
END_FOR;
true
FALSE
SCL
cs-CZ
de-DE
en-US
cs-CZ
de-DE
TEST-SCHLEIFEN
en-US
0
true
true
true
0
true
true
true
true
true
true
SCL
cs-CZ
de-DE
en-US
cs-CZ
de-DE
Storage Füllstände
en-US
SCL
cs-CZ
de-DE
en-US
cs-CZ
de-DE
Jam Füllstände
en-US
true
true
SCL
cs-CZ
de-DE
Visu
en-US
cs-CZ
de-DE
Visu
en-US
true
1000.0
in Millisekunden anzeigen
"IBN".TRO112_Ok := "DB_MachineGlobal".stStateMain.xRunning AND "SF0001";
SCL
cs-CZ
de-DE
en-US
cs-CZ
de-DE
Zykluszeit genau ermitteln ENDE
en-US
true
true
UH01 weiterreichen
true
true
an UH02 weitergeben
true
true
an UH03 weitergeben
true
true
an UH04 weitergeben
true
true
an UH05 weitergeben
UH02 empfangen / weiterreichen
true
true
selber verwenden
true
true
an UH02 weitergeben
true
true
an UH03 weitergeben
true
true
an UH04 weitergeben
true
true
an UH05 weitergeben
UH03 empfangen / weiterreichen
true
true
selber verwenden
true
true
an UH02 weitergeben
true
true
an UH03 weitergeben
true
true
an UH04 weitergeben
true
true
an UH05 weitergeben
UH04 empfangen / weiterreichen
true
true
selber verwenden
true
true
an UH02 weitergeben
true
true
an UH03 weitergeben
true
true
an UH04 weitergeben
true
true
an UH05 weitergeben
UH05 empfangen / weiterreichen
true
true
selber verwenden
true
true
an UH02 weitergeben
true
true
an UH03 weitergeben
true
true
an UH04 weitergeben
true
true
an UH05 weitergeben
SCL
cs-CZ
de-DE
en-US
cs-CZ
de-DE
IO Device Datenübergabe
en-US
SCL
cs-CZ
de-DE
en-US
cs-CZ
de-DE
PROFINET DEVICE STATE
en-US
true
' '
"MA0057" := "IBN".MA0057;
"MA0140" := "IBN".MA0140;
"MA0141" := "IBN".MA0141;
"MA0142" := "IBN".MA0142;
"MA0143" := "IBN".MA0143;
"MA0144" := "IBN".MA0144;
"MA0145" := "IBN".MA0145;
"MA0146" := "IBN".MA0146;
"MA0147" := "IBN".MA0147;
"MA0150" := "IBN".MA0150;
"MA0151" := "IBN".MA0151;
"MA0152" := "IBN".MA0152;
"MA0153" := "IBN".MA0153;
"MA0154" := "IBN".MA0154;
"MA0155" := "IBN".MA0155;
Ausgänge
"MB3003" := "IBN".MB3003;
"MB3010" := "IBN".MB3010;
"MB3013" := "IBN".MB3013;
"MB3015" := "IBN".MB3015;
"MB3020" := "IBN".MB3020;
"MB3024" := "IBN".MB3024;
"MB3025" := "IBN".MB3025;
"MB3060" := "IBN".MB3060;
"MB3063" := "IBN".MB3063;
"MB3073" := "IBN".MB3073;
"MB3076" := "IBN".MB3076;
"MB3080" := "IBN".MB3080;
"MB3120" := "IBN".MB3120;
"MB3125" := "IBN".MB3125;
"MB3130" := "IBN".MB3130;
"MB3135" := "IBN".MB3135;
"MB3242" := "IBN".MB3242;
"MB3246" := "IBN".MB3246;
"MB3250" := "IBN".MB3250;
"MB3251" := "IBN".MB3251;
"MB3252" := "IBN".MB3252;
"MB3253" := "IBN".MB3253;
"MB3254" := "IBN".MB3254;
"MB3257" := "IBN".MB3257;
"MB3260" := "IBN".MB3260;
"MB3261" := "IBN".MB3261;
"MB3262" := "IBN".MB3262;
"MB3263" := "IBN".MB3263;
"MB3264" := "IBN".MB3264;
"MB3271" := "IBN".MB3271;
"MB3273" := "IBN".MB3273;
"MB3280" := "IBN".MB3280;
"MB3283" := "IBN".MB3283;
"MB3285" := "IBN".MB3285;
"MB3290" := "IBN".MB3290;
"MB3295" := "IBN".MB3295;
"MB3300" := "IBN".MB3300;
"MB3304" := "IBN".MB3304;
"MB3306" := "IBN".MB3306;
"MB3310" := "IBN".MB3310;
"MB3311" := "IBN".MB3311;
"MB3312" := "IBN".MB3312;
"MB3313" := "IBN".MB3313;
"MB3314" := "IBN".MB3314;
"MB3315" := "IBN".MB3315;
"MB3320" := "IBN".MB3320;
"MB3321" := "IBN".MB3321;
"MB3322" := "IBN".MB3322;
"MB3323" := "IBN".MB3323;
"MB3324" := "IBN".MB3324;
"MB3325" := "IBN".MB3325;
"MB3330" := "IBN".MB3330;
"MB3332" := "IBN".MB3332;
"MB3335" := "IBN".MB3335;
"MB3337" := "IBN".MB3337;
"MB3340" := "IBN".MB3340;
*****************************
FÜR PERFORMANCE MESSUNG:
20.01.
1 - 106.1
2 - 114.1
21.01.
1 - 111.1
true
104
Sep-Nr. für Auflistung der Messungen (TRO104 -> gibt es als Konstante nicht
true
ReleasedEdge des jeweiligen Seps
T#86400s
398
gewünschte zu ermittelnde Anzahl
true
"cSep106.1", //Sep-Nr. für Auflistung der Messungen
true
2500
true
ReleasedEdge des jeweiligen Seps
T#86400s
398
gewünschte zu ermittelnde Anzahl
true
Sep-Nr. für Auflistung der Messungen
true
2500
true
ReleasedEdge des jeweiligen Seps
T#86400s
398
gewünschte zu ermittelnde Anzahl
//////////////////////////////////////////////////////////////////////////////
true
109
Sep-Nr. für Auflistung der Messungen (TRO104 -> gibt es als Konstante nicht
true
ReleasedEdge des jeweiligen Seps
T#86400s
398
true
"cSep106.1", //Sep-Nr. für Auflistung der Messungen
true
2500
true
ReleasedEdge des jeweiligen Seps
T#86400s
398
*****************************
true
Sep-Nr. für Auflistung der Messungen
true
2500
true
ReleasedEdge des jeweiligen Seps
T#86400s
398
gewünschte zu ermittelnde Anzahl
true
Sep-Nr. für Auflistung der Messungen
true
2500
true
ReleasedEdge des jeweiligen Seps
T#86400s
398
gewünschte zu ermittelnde Anzahl
true
Sep-Nr. für Auflistung der Messungen
true
2600
true
ReleasedEdge des jeweiligen Seps
T#86400s
498
SCL
cs-CZ
de-DE
en-US
cs-CZ
de-DE
IBN Test
en-US
cs-CZ
"Main Program Sweep (Cycle)"
de-DE
"Main Program Sweep (Cycle)"
en-US
"Main Program Sweep (Cycle)"