Procedure with varying parm

Oh great and wise people of the list.  I can tell it is Monday.  My brain is 
just not functioning properly.

I have two procedures.  Procedure 1 returns a variable length field and 
procedure 2 receives a variable length field.  Procedure 2 is getting memory 
garbage in its input parm.  Any ideas?

Snippet:

DProcedure1       PR          1024    Varying                                   
  
 *                                                                              
  
DProcedure2       PR                N                                           
    
D InParm1                         1024    Const Varying Options(*VarSize)       
      
 *                                                                              
  
D @Ok               S                  N                                        
       
 *                                                                              
  
C                   Eval      @Ok = Procedure2(Procedure1)                      
  


Procedure1 is returning a 51 byte variable length field.  Procedure2's input 
parm has the 2 bytes (probably from the variable length field description) 
followed by the 51 bytes of data followed by 971 bytes of memory garbage.


Thank you,
Schadd