Re: Null terminated string question

[Brian Johnson <brian.johnson.mn@xxxxxxxxx>]

Why not let the compiler handle the temporary null-terminated string?

    rmdir(%trimr(p_path) ;




On Wed, May 10, 2017 at 4:28 AM, PAPWORTH Paul <Paul.PAPWORTH@xxxxxxxx>
wrote:

> Hello
> Can anybody explain why with the following code which works well , if I
> have the two  fields l_path-1 and l_path_2 declared as char(70)  the
> results from the %str function do not have the null  terminator added to
> the end of the string.  We are at RELEASE = V7R1M0
> Thank you in advance
>
>       *******************************************************
>       * Fonction  EX_DELETE_DIR                             *
>       * ==> PPW Mai 2017                                    *
>       *******************************************************
>      p EX_DELETE_DIR...
>      P                 b                   export
>      d EX_DELETE_DIR...
>      D                 Pi             2a
>      d p_path                        70a
>      d l_path_1        s             60a
>      d l_path_2        s             60a
>      d rmdir           pr            10i 0 Extproc('rmdir')
>      d  path                           *   value options(*string)
>       /free
>              l_path_2 = p_path ;
>              %Str(%Addr(l_path_1) :
>                    %Size(l_path_1)) = %trimr(l_path_2) ;
>
>              if rmdir(l_path_1) < 0 ;
>                 return 'KO' ;
>              else ;
>                 return 'OK' ;
>              endif ;
>
>       /end-free
>      P EX_DELETE_DIR...
>      P                 e
> --
> This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
> mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
> Please contact support@xxxxxxxxxxxx for any subscription related
> questions.
>
> Help support midrange.com by shopping at amazon.com with our affiliate
> link: http://amzn.to/2dEadiD