diff --git a/tools/fv_nggps_diag.F90 b/tools/fv_nggps_diag.F90
index 5456cb876..27bd72dfa 100644
--- a/tools/fv_nggps_diag.F90
+++ b/tools/fv_nggps_diag.F90
@@ -584,7 +584,7 @@ subroutine fv_nggps_diag(Atm, zvir, Time)
     endif
 #else
     !--- DELP
-    if(id_delp > 0) call store_data(id_delp, Atm(n)%delp(isco:ieco,jsco:jeco,:), Time, kstt_delp)
+    if(id_delp > 0) call store_data(id_delp, Atm(n)%delp(isco:ieco,jsco:jeco,:), Time, kstt_delp, kend_delp)
 
     !--- Surface Pressure (PS)
     if( id_ps > 0) then