Obsidean_VM/04-InLavoro/HENKEL/93040 - HENKEL - BowlingGreen/TL23-L20/9.3674 - HENKEL - TL23-L20 .../9.3674 - New Line - Changes...

167 lines
4.6 KiB
Markdown
Raw Permalink Normal View History

2025-02-18 05:37:27 -03:00
# L23 - Quadro 4
#### Motors by each PLC
Q1. M31-M38 - M153/M154
Q2. M43-M58
Q3. M63-M75
Q4. M80-M97 - M155/156
## 1: Testare logica / scalamento encoder ingreso labeler
FC315 - Network 8
![[Pasted image 20230919172554.png]]
Este es un ejemplo de otro proyecto desde el que se tomo el codigo.
### **Colocar en Increments per unit la cantidad de pulsos contados en un metro de cadena.**
### 2: Fare il homming dello M155 da panello
### 3: M85 - M86 how it is connected with the another infeed M97 flow. It will be temporary. - Explanined by Mateo - Int 294
![[Pasted image 20230921112125.png]]
# L23 - Quadro 1
### 1: Update the DB6 to accomodate 50 family formats
DB6 - DB_BOTTLE_DATA
Array di 30
![[Pasted image 20230920165022.png]]
Controllare che non sia bisogno cambiarlo a 50
### 2: Update the DB6 and Can be replaced the logic for Bottle_Lenght for the Crash check
![[Pasted image 20230920170022.png]]
Que e usata nella FC5 - Network 1
### Controllare in tutti Q1
Nella FC5 Network 1 penso che e meglio fare cosi:
![[Pasted image 20230921102036.png]]
### 3: May be is need to define the select CASE
Check that this CASE is not used at FC60 (FC HMI ChangeOver) Network 7: we couldnt find any reference where this data is used.
![[Pasted image 20230920175619.png]]
### 4: missing this nework on the OB1
OB1 - Network 2
```
REGION ScanTime
"DB ScanTime_OB1".AUX_DINT := RT_INFO(MODE := 25, OB := "OB_CYCL_EXC", INFO := "DB ScanTime_OB1".AUX_SCAN_TIME);
"DB ScanTime_OB1".SCAN_FROM_LINT := LTIME_TO_DINT("DB ScanTime_OB1".AUX_SCAN_TIME);
"DB ScanTime_OB1".AUX_SCAN_ms := "DB ScanTime_OB1".AUX_SCAN_ms + "DB ScanTime_OB1".SCAN_FROM_LINT;
"DB ScanTime_OB1".SCAN_TIME_ms := "DB ScanTime_OB1".AUX_SCAN_ms / 1000000;
"DB ScanTime_OB1".AUX_SCAN_ms := "DB ScanTime_OB1".AUX_SCAN_ms - ("DB ScanTime_OB1".SCAN_TIME_ms * 1000000);
END_REGION
```
### 5: missign this call on the OB1
Network 5:
CALL "FC PRIORITY SCAN EXECUTION"
### 6: On the L21 was using "ComHenkel_D".ToHenkel instead of "ComSV".TL23_WriteToSv.ToHenkel;
```
FC7 - Seg. 13:
.....
#ToHenkel := "ComHenkel_D".ToHenkel;
....
```
So in the program all the references to "ComSV".TL23_WriteToSv.ToHenkel must be changed to "ComHenkel_D".ToHenkel;
### 7: Remote Selector #changeover
```
IF "FormatManagementQE1_D".RemoteSelector THEN
// This disable the RemoteSelector. All this IF must be deleted to enable RemoteSlector
"FormatManagementQE1_D".RemoteSelector := False;
"FormatManagementQE1_D".FormatChangeCycle := #FormatChange_Disabled;
END_IF;
```
On the FC800 FormatManagementQE1_G - Network 2: This IF prevents the RemoteSelector option to be enabled
### 8: Check that the DB_HMI.DBW_10..16 are overwritten by this at FC1100
```
(************************ ORDINE CONTROLLO - Update ************************)
"DB HMI".DBW_10 := "DB Collegamento HMI".OrderControl."Order number";
"DB HMI".DBW_12 := "DB Collegamento HMI".OrderControl.OC_Parameter_1;
"DB HMI".DBW_14 := "DB Collegamento HMI".OrderControl.OC_Parameter_2;
"DB HMI".DBW_16 := "DB Collegamento HMI".OrderControl.OC_Parameter_3;
```
So this must be changed:
```
"Rt_PopUp_RemoteFormatChange"(CLK := "FormatManagementQE1_D".HMI_PopUp.ShowPopUp);
IF "Rt_PopUp_RemoteFormatChange".Q THEN
"DB HMI".DBW_12 := "FormatManagementQE1_D".HMI_PopUp.PageNumber;
"DB HMI".DBW_14 := 0;
"DB HMI".DBW_16 := 0;
"DB HMI".DBW_10 := 51;
"FormatManagementQE1_D".HMI_PopUp.PageNumber := 0;
"FormatManagementQE1_D".HMI_PopUp.ShowPopUp := FALSE;
"FormatManagementQE1_D".HMI_PopUp.Yes := FALSE;
"FormatManagementQE1_D".HMI_PopUp.No := FALSE;
END_IF;
IF ("DB HMI".DBW_2 = "FormatManagementQE1_D".HMI_PopUp.PageNumber) AND
("DB HMI".DBW_10 = 51) THEN
"DB HMI".DBW_10 := 0;
"DB HMI".DBW_12 := 0;
"DB HMI".DBW_14 := 0;
"DB HMI".DBW_16 := 0;
END_IF;
```
to:
```
"Rt_LoadRemoteRecipe"(CLK := "FormatManagementQE1_D".IN_EndFormatManagement);
IF "Rt_LoadRemoteRecipe".Q THEN
"DB HMI".DBW_36 := 0;
"DB Collegamento HMI".OrderControl.OC_Parameter_1 := 2;
"DB Collegamento HMI".OrderControl.OC_Parameter_2 := DINT_TO_INT("FormatManagementQE1_D".NextSku.ProdFamily);
"DB Collegamento HMI".OrderControl.OC_Parameter_3 := 0;
"DB Collegamento HMI".OrderControl."Order number" := 70;
END_IF;
IF ("DB HMI".DBW_36 = 4) OR ("DB HMI".DBW_36 = 12) AND
("DB HMI".DBW_10 = 70) THEN
"DB Collegamento HMI".OrderControl."Order number" := 0;
"DB Collegamento HMI".OrderControl.OC_Parameter_1 := 0;
"DB Collegamento HMI".OrderControl.OC_Parameter_2 := 0;
"DB Collegamento HMI".OrderControl.OC_Parameter_3 := 0;
END_IF;
```