4.6 KiB

Raw Permalink Blame History

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

! 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

L23 - Quadro 1

1: Update the DB6 to accomodate 50 family formats

DB6 - DB_BOTTLE_DATA Array di 30

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

! Que e usata nella FC5 - Network 1

Controllare in tutti Q1

Nella FC5 Network 1 penso che e meglio fare cosi:

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.

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;

4.6 KiB Raw Permalink Blame History