Obsidean_VM/04-SIDEL/00 - MASTER/Source/source/mPDS_PA_Ctrl_Parameters.md

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

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

VAR_TEMP
  mAuxCalc : Real;
  mAuxCalc1 : Real;
END_VAR

  #_17 : Bool; // Auto-generated temporary
  #_21 : Bool; // Auto-generated temporary
BEGIN

  // Network 1: Brix Gain (Original Language: LAD)

  "mAuxCalc1" := "HMI_Blender_Parameters"."Actual_Recipe_Parameters"."_ProductBrix" + "HMI_Blender_Parameters"."Actual_Recipe_Parameters"."_ProdMeter_ZeroBrix";

  SEL_R(G := Ne("HMI_Blender_Parameters"."Actual_Recipe_Parameters"."_ProductBrix", 0.0), IN0 := 1.0, IN1 := "HMI_Blender_Parameters"."Actual_Recipe_Parameters"."_ProductBrix");

  "mAuxCalc1" := "mAuxCalc1" / "mAuxCalc";

  SEL_R(G := "Blender_Variables_Pers"."gSugarBeverage", IN0 := "mAuxCalc1", IN1 := 1.0);

  // Network 2: Parameter's Index tranferred to parameter 1 (Original Language: LAD)

  IF "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_PAmPDSType" THEN
    "mPDS_PA_Data"."Output_To_mPDS"."OUT_Block01" := INT#17;
  END_IF;

  // Network 3: Value transferred to Parameter 1 (Original Language: LAD)

  // ERROR: MOVE 25 sin destino claro.

  // Network 4: Co2 Gain (Original Language: LAD)

  SEL_R(G := Ne("HMI_Blender_Parameters"."Actual_Recipe_Parameters"."_CO2Vols", 0.0), IN0 := 1.0, IN1 := "HMI_Blender_Parameters"."Actual_Recipe_Parameters"."_CO2Vols");

  "mAuxCalc1" := "HMI_Blender_Parameters"."Actual_Recipe_Parameters"."_CO2Vols" + "HMI_Blender_Parameters"."Actual_Recipe_Parameters"."_ProdMeter_ZeroCO2";

  "mAuxCalc1" := "mAuxCalc1" / "mAuxCalc";

  SEL_R(G := "Blender_Variables_Pers"."gCarboStillProduct", IN0 := "mAuxCalc1", IN1 := 1.0);

  // Network 5: Parameter's Index transferred to Parameter 2 (Original Language: LAD)

  "mPDS_PA_Data"."Output_To_mPDS"."OUT_Block01" := INT#21;

  // Network 6: Value transferred to Parameter 2 (Original Language: LAD)

  // ERROR: MOVE 23 sin destino claro.

END_FUNCTION