diff --git a/Source/read.f90 b/Source/read.f90
index 78b71ccfb2d..d2966e96edc 100644
--- a/Source/read.f90
+++ b/Source/read.f90
@@ -6304,6 +6304,10 @@ SUBROUTINE PROC_PART
       RETURN
    ENDIF
 
+   ! Allocate necessary boundary information if BLOWING heat transfer correction is applied
+
+   IF (SF%BLOWING) LPC%INCLUDE_BOUNDARY_PROP2_TYPE = .TRUE.
+   
    ! If COLOR is not assigned to the PART class, use the SURF color if it has been specified
 
    IF (ALL(LPC%RGB==0) .AND. .NOT.ALL(SF%RGB==SURFACE(INERT_SURF_INDEX)%RGB)) LPC%RGB=SF%RGB
diff --git a/Source/wall.f90 b/Source/wall.f90
index 8e998393329..9f6881e740a 100644
--- a/Source/wall.f90
+++ b/Source/wall.f90
@@ -3522,6 +3522,8 @@ REAL(EB) FUNCTION HEAT_TRANSFER_COEFFICIENT(NMX,DELTA_N_TMP,H_FIXED,SFX,WALL_IND
 IF (PRESENT(PARTICLE_INDEX_IN)) THEN
    LPX => LAGRANGIAN_PARTICLE(PARTICLE_INDEX_IN)
    P1X => BOUNDARY_PROP1(LPX%B1_INDEX)
+   IF (LAGRANGIAN_PARTICLE_CLASS(LPX%CLASS_INDEX)%INCLUDE_BOUNDARY_PROP2_TYPE) &
+      P2X => BOUNDARY_PROP2(LPX%B2_INDEX)
    BCX => BOUNDARY_COORD(LPX%BC_INDEX)
    DN = SFX%CONV_LENGTH
    R_DROP = LPX%RADIUS