Expand %XFOOT functionality to include subfields in DS array

I have the following DS / Arrays

dcl-ds Order_Info_t qualified template;
Order like(s1_order);
Order_Pack_Qty like(s1_packqty);
Order_Case_Qty like(s1_packqty);
Order_Weight like(s1_weight);
end-ds;

dcl-ds Order_Summary qualified inz;
Orders like(s1_box);
Order_Info likeds(Order_Info_t) dim(500);
end-ds;

I'm trying to do the following statement to get the total Order_Case_Qty contained within the following array.

SomeVar = %xfoot(Order_Summary.Order_Info.Order_Case_Qty);

I also tried
SomeVar = %xfoot(Order_Summary.Order_Info(*).Order_Case_Qty);

But it appears that %xfoot doesn't allow subfields to be used.

In this case, I'm trying to get the total of all Order_Case_Qty.

This can be accomplished via a FOR or DO loop, but since %xfoot would work if Order_Case_Qty was defined as a stand-alone array, I logically thought it would make sense for it to work as a subfiled within an array data structure.

I believe that if the data structures above were defined as followed, it would work

dcl-ds Order_Info_t qualified template;
Order like(s1_order) dim(500);
Order_Pack_Qty like(s1_packqty) dim(500);
Order_Case_Qty like(s1_packqty) dim(500);
Order_Weight like(s1_weight) dim(500);
end-ds;

dcl-ds Order_Summary qualified inz;
Orders like(s1_box);
Order_Info likeds(Order_Info_t);
end-ds;

But since I didn't think it made sense for me to define my DS / arrays in this fashion, I was hoping that %xfoot would work properly with subfileds in a DS array.