ConvertingArraysToScalarData < Main

Tags: view all tags
---+ Converting Arrays to Scalar Data

At present, only the 'CNV TEXT' stmt addresses an Alpha array as if it were a single scalar variable. (Unfortunately, it also adjusts for periods, insuring no more than one space after a period.)

<pre>       *         initialize an Alpha Array:
       *
       SET      --- TEMP 1                     =
       CNV TEXT OPT WORK TEST ARRAY        000 =  --- TEMP 1</pre>

You can also accomplish the "Array to Scalar" assignment, by setting up a Working Storage type file, with a GROUP construction like the following:
<blockquote dir="ltr" style="margin-right: 0px;"> <pre>100     WS GROUP1              GROUP HEADER   1
200     WS A50                 ALPHA          1   X(50)
300     WS GROUP1 END          GROUP TRAILER  1
400     WS GROUP2              GROUP HEADER   1
500     WS A1 50               ALPHA          1   X(1) Oc 50
600     WS GROUP2 END          GROUP TRAILER  1</pre> </blockquote>

... then perform the assignment as follows:

<pre>      SET      PAT WS A50                     =      XYZ
      SET      PAT WS GROUP2                  =  PAT WS GROUP1</pre>

... resulting in:
<blockquote dir="ltr" style="margin-right: 0px;"> <pre><span style='text-decoration: underline;'>Appl Field Name             Occ  Field Value</span>
PAT  WS A1 50               001  X
PAT  WS A1 50               002  Y
PAT  WS A1 50               003  Z</pre> </blockquote>

---

Don't forget the ability to search for individual characters _(ex: commas or quotes)_ in ILF code, by means of the IF INCLUDES _('IF' verb with 'IN' operator) or Regular Expresssions ('IF' verb with 'RS' or 'RI' operator)._

---++ Comments:

_Read what other users have said about this page or add your own comments._
---

<br />%COMMENT%
Topic revision: r2 - 2016-02-17 - JeanNeron