CDS279
This program can be called to display each of the fields of one or two templated string variables.
When passed a single string, CDS279 can also be used to modify the fields. Test
CALL "CDS279", REC1$ {, REC2$, PAR$ }
REC1$
|
Templated variable - required |
REC2$
|
Optional Templated variable with same template as REC1$. If
provided then each field in REC2$ will appear to the right of the same
field in REC1$ and if the contents differ, an asterisk will be displayed
in the rightmost column. |
PAR$(1,1)
|
Mode - optional. Determines whether the user can Maintain or
modify any template field, and whether to display field names or
template field titles.| | Display/Maintain | Field Names/Titles |
|---|
| M (default) | Maintain | Field Names | | T | Maintain | Titles | | D | Display | Field Names | | d | Display | Titles |
|
PAR$(2)
|
Optional. Displayed in window title if passed. |
Limitations
If both REC1$ and REC2$ are provided, their templates must be the same.
You may not be able to see all fields if the size of the field names plus the data exceed the display width.
However, CDS279 will convert to 132 column mode when field sizes require it.
| Example: Single record |
|
| Example: Comparing two records The * indicates the field
differs between the two records |
|
| Example using display only using field names |
>CALL "CDS095",IM01,"DSIM01","",IM01$
>READRECORD (IM01)IM01$
>CALL "CDS279",IM01$,"","dItem Record"
|
|
| Example using display only using field titles |
>CALL "CDS095",IM01,"DSIM01","",IM01$
>READRECORD (IM01)IM01$
>CALL "CDS279",IM01$,"","DItem Record"
|
|
