```pascal
// Block Type: FC
// Block Number: 1824
// Original Network Languages: STL, LAD

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

VAR_INOUT
  mStep : Int;
  mTime : Int;
  mTransition : Bool;
END_VAR

VAR_TEMP
  __PlcmigTempFillBits_0B0 : Array[0..7] of Bool;
END_VAR

BEGIN

  // Network 1: STEP CONTROL (Original Language: STL)

  // --- BEGIN STL Network 1 ---
   
     	L	"mStep"
     	JL	LEND
     	JU	ST00
     	JU	ST01
     LEND:   		JU	FULL
     FULL:   		L	0
     	T	"mStep"
     	JU	END
   
  // --- END STL Network 1 ---

  // Network 2: STEP 00 (Original Language: LAD)

  IF "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" THEN
    "gSP_AVM369" := TRUE;
  END_IF;

  IF "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" THEN
    "gSP_AVM353" := TRUE;
  END_IF;

  // Network 3: MIX - Procedure auxiliary variable (Original Language: LAD)

  IF "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" THEN
    "gSP_AVM315" := TRUE;
  END_IF;

  // Network 4: STEP 00 (Original Language: STL)

  // --- BEGIN STL Network 4 ---
   
     	A	"AUX TRUE"
     	=	"__PlcmigTempFillBits_0B0"[0]
     	BLD	103
     	A	"AUX TRUE"
     	=	"__PlcmigTempFillBits_0B0"[1]
     	BLD	103
     	A	"System_RunOut_Variables".ProdPipe_Drain.Wait
     	=	"__PlcmigTempFillBits_0B0"[2]
     	BLD	103
     	A	CLK_0.5S
     	=	"__PlcmigTempFillBits_0B0"[3]
     	BLD	103
     	CALL	"_StepMove"
     	A	_Statusword_?
     	JC	END
   
  // --- END STL Network 4 ---

  // Network 5: STEP 01 (Original Language: LAD)

  IF "AUX FALSE" THEN
    "System_RunOut_Variables"."ProdPipe_Drain"."Done" := TRUE;
  END_IF;

  // Network 6:  (Original Language: STL)

  // --- BEGIN STL Network 6 ---
   
     END:    		NOP_0
   
  // --- END STL Network 6 ---

END_FUNCTION

```