Re: VARYING & Debug bug

["David Morris" <dmorris@xxxxxxxxxxxxx>]

John,

What did you get when you ran eval field = x'0000'?  In my experience it always 
set the 
length to zero, clearing the field.  Using eval fie = ' ', I would have 
expected the 
field to contain x'000040' followed by an undefined information, or x'4000...' 
which, based 
on your experience, is the most probable.

David Morris

>>> jpcarr@TREDEGAR.COM 07/24/00 01:40PM >>>

David

No,  I don't think so.   The FIELD in question is a 100 byte alpha
standalone field with the VARYING keyword.
I want to blank it out.     In RPGIV    I could say   CLEAR       FIELD  or
I could say  RESET     FIELD both of which
would change the %SIZE back to zero, (%LEN would still be 2).

How do you do a CLEAR   FIELD   of a VARYING field in debug??

John




                                                                                
            
                    "David                                                      
            
                    Morris"              To:     <RPG400-L@midrange.com>,       
            
                    <dmorris@plum        <jpcarr@TREDEGAR.COM>                  
            
                    creek.com>           cc:                                    
            
                                         Subject:     Re: VARYING & Debug bug   
            
                    07/24/2000                                                  
            
                    03:09 PM                                                    
            
                                                                                
            
                                                                                
            




John,

eval field = x'0000' should work.

David Morris

>>> jpcarr@TREDEGAR.COM 07/23/00 05:43PM >>>

I think I found a bug in the debugger when using the VARYING dspec keyword.
I was in Debug and said,   EVAL  FIELDX = ' '  wanting to clear the field,
then I got a " Length of varying length variable is out of range."  see
below for message text.

How do you clear a VARYING field in debug (ie in a way that will reset the
2byte binary number back to zero) ??


+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---