Table

Subprogram Name Source Name Executable Example Viewable Example

H3-TABLE
H3-TABLE-COLOR

H3TABLE
H3TABLEC

E3TABLE

E3TABLE

Description

Creates a simple table for a given array. With H3-TABLE-COLOR, for headline and table, different background colors can be set. The rows will be colored alternately.

Appearance

<TABLE>
<TR>
<TH>... </TH>
</TR>
...
<TR>
<TD>... </TD>
</TR>
...
</TABLE>

Supported Attributes

ALIGN=left|right|center , BORDER=n, NOWRAP

Parameters
  1. H3-TABLE

    1 H3ROW           (N4)                 /* i /m : Number of rows
    1 H3COLUMN        (N4)                 /* i /m : Number of columns 
    1 H3ARRAY2VALUE   (A/1:V,1:V)dynamic   /* i /mh: Table elements
    1 H3ARRAY2ALIGN   (A1/1:V,1:V)         /* i /M : Alignment of the table cells
    *                                      /*        'L' Left (default)
    *                                      /*        'R' Right
    *                                      /*        'C' Center
    1 H3ARRAY2NOWRAP  (L/1:V,1:V)          /* i /m : No automatic wrapping
    1 H3HEADLINE      (L)                  /* i /M : 1st line as headline 
    1 H3ALIGN         (A1)                 /* i /M : Alignment of the table
    *                                      /*        'L' Left (default)
    *                                      /*        'R' Right
    *                                      /*        'C' Center
    1 H3SUPPRESSEMPTY (L)                  /* i /m : Set to TRUE if cell is
    *                                      /*        to be displayed         
    *                                      /*        despite being empty
    1 H3ISHTML        (L)                  /* i /m : Transform value to
    *                                      /*        HTML
    1 H3BORDER        (N4)                 /* i /M : Set border size
    
  2. H3-TABLE-COLOR

    1 H3ROW         (N4)                /* i /m : Number of rows
    1 H3COLUMN      (N4)                /* i /m : Number of columns
    1 H3TITLECOLOR  (A032)              /* i /M : Color of headline
    1 H3LINECOLOR   (A032)              /* i /M : Color of lines
    1 H3ARRAY2VALUE (A/1:V,1:V) dynamic /* i /mh: Table elements
    1 H3ARRAY2ALIGN (A001/1:V,1:V)      /* i /m : Alignment of the table cells
    *                                   /*        'L' Left (default)
    *                                   /*        'R' Right
    *                                   /*        'C' Center
    1 H3ARRAY2NOWRAP (L/1:V,1:V)        /* i /m : No automatic wrapping
    1 H3HEADLINE     (L)                /* i /m : 1st line as headline
    1 H3ALIGN        (A1)               /* i /M : Alignment of the table
    *                                   /*        'L' Left
    *                                   /*        'R' Right         
    *                                   /*        'C' Center (default)
    1 H3SUPPRESSEMPTY (L)               /* i /m : Set to TRUE if cell is
    *                                   /*        to be displayed
    *                                   /*        despite being empty
    1 H3ISHTML        (L)               /* i /m : Transform value to
    *                                   /*        HTML
    1 H3BORDER        (N4)              /* i /m : Set border size
    
How To Invoke
PERFORM H3-TABLE H3ROW H3COLUMN H3ARRAY2VALUE(*,*)
      H3ARRAY2ALIGN(*,*) H3ARRAY2NOWRAP(*,*)
      H3HEADLINE H3ALIGN H3SUPPRESSEMPTY
      H3ISHTML H3BORDER

PERFORM H3-TABLE-COLOR H3ROW H3COLUMN H3TITLECOLOR H3LINECOLOR
       H3ARRAY2VALUE(*,*) H3ARRAY2ALIGN(*,*) H3ARRAY2NOWRAP(*,*)
       H3HEADLINE H3ALIGN H3SUPPRESSEMPTY
       H3ISHTML H3BORDER