Start of change

Examples of the DATA keyword

For the following examples, assume the following fields in the file
Assume the following data structures.
   DCL-DS custExactIn LIKEREC(custRec:*INPUT) CCSID(*EXACT);
   DCL-DS custNoexactIn LIKEREC(custRec:*INPUT) CCSID(*NOEXACT);

DATA(*CVT) is specified for the file and the job CCSID is 937

The DBCS CCSID related to CCSID 937 is 835.

   DCL-F custFile USAGE(*UPDATE) DATA(*CVT);

   READ custFile custExactIn;
   READ custFile custNoexactIn;

DATA(*CVT) is specified for the file and the job CCSID is 65535

Assume that the default job CCSID is 937. This is the CCSID that is assumed for alphanumeric program fields with CCSID(*JOBRUN).

   DCL-F custFile USAGE(*UPDATE) DATA(*CVT);

   READ custFile custExactIn;
   READ custFile custNoexactIn;

DATA(*NOCVT) is specified for the file

Assume that the job CCSID or default job CCSID is 937. This is the CCSID that is assumed for alphanumeric program fields with CCSID(*JOBRUN).

The READ operations are identical to those of the previous scenario where the job CCSID is 65535.

End of change