Obsidean_VM/04-SIDEL/06 - E5.007363 - Modifica O.../Source/source/Maselli_PA_Control.md

1.5 KiB

// Block Type: FC
// Block Number: 1890
// Original Network Languages: LAD

FUNCTION "Maselli_PA_Control" : Void
{ S7_Optimized_Access := 'TRUE' }
VERSION : 0.1

VAR_TEMP
  mPAReset : Bool;
  mPASel : Bool;
END_VAR

BEGIN

  // Network 1: Enabled (Original Language: LAD)

  "Maselli_PA_Data"."Input_From_Maselli"."gPAMaselli_Enabled" := Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_MeterType", 6);

  "mPASel" := Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_MeterType", 6);

  // Network 2: Reset (Original Language: LAD)

  // Network 2 did not produce printable SCL code.

  // Network 3: Recipe Trasnsfer (Original Language: LAD)

  IF "mPAReset" THEN
    Maselli_PA_Ctrl_Transfer();
  END_IF;

  // Network 4: Read / Write (Original Language: LAD)

  IF "mPASel" THEN
    Maselli_PA_Ctrl_Read();
    Maselli_PA_Ctrl_Write();
  END_IF;

  // Network 5: No Freeze Product Meter (Original Language: LAD)

  // Network 5 did not produce printable SCL code.

  // Network 6: Run (Original Language: LAD)

  IF "gNoFreezeProductMeter" AND "HMI_Variables_Status"."Meters"."QTM3012_PRD_Fault" AND "Maselli_PA_Data"."Input_From_Maselli"."gPAMaselli_CommActive" AND "mPASel" THEN
    "HMI_Variables_Status"."Meters"."QTM3012_PRD_Run" := TRUE;
  END_IF;

  // Network 7: ProductMeterOK (Original Language: LAD)

  "gProductMeterOK" := "Maselli_PA_Data"."Input_From_Maselli"."gPAMaselli_CommActive" AND "mPASel" AND "Maselli_PA_Data"."Input_From_Maselli"."gPAMaselli_Error";

END_FUNCTION