Re: Problem with "Write-name-ds"

[Hans Boldt <boldt@xxxxxxxxxx>]

Scott Klement wrote:
...
> The following is a trivial example program:
>
> FITMMAST   IF A E           K DISK
>
> D BEFORE          DS                  LIKEREC(ITMMASTF:*INPUT)  INZ
> D AFTER           DS                  LIKEREC(ITMMASTF:*OUTPUT) INZ
>
>  /free
>
>      // copy an item, changing only the item number and description:
>
>      chain myItem ITMMASTF before;
>      after = before;
>      after.Item = myNewItem;
>      after.Desc = myNewDescription;
>      write ITMMASTF after;
>
>      *inlr = *on;
>
>  /end-free

In addition to what Scott explained, be sure to be fully up to date on 
RPG PTF's when using these particular V5R2 I/O enhancements.

BTW, watch for some additional improvements in this area in V5R3. The 
result data structure on externally described I/O can also be an 
externally described data structure in V5R3, provided it matches the 
record. Also, under the right circumstances, a result data structure can 
 be coded on an I/O operation to an externally described file name. 
(For externally described files, V5R2 only allows I/O by record name 
with a result data structure.)

Cheers! Hans