TEXTSEG (Text Segment)

The TEXTSEG tag creates a text segment to be accumulated for the replacement text line created by the TEXTLINE tag.

Syntax


>>-<TEXTSEG--+--------------------+--+--------------+----------->
             '-EXPAND=-+-AFTER--+-'  '-WIDTH=---n---'   
                       +-BEFORE-+                       
                       '-BOTH---'                       

>-->--text--+------------+-------------------------------------><
            '-</TEXTSEG>-'

Parameters

EXPAND=ABOVE | BEFORE | BOTH: This attribute specifies whether expand control is added to the provided text. Expand characters are obtained from the HELP or PANEL tag definition, if available. If no expand character(s) have been specified on those tags, the conversion utility generates the necessary character. You may place the expand control before, after, or both before and after the text.
WIDTH=n: This attribute specifies the number of bytes to reserve for the text. The default is to not allow space beyond the actual text length.
Text: This is the text of the segment.

Comments

The TEXTSEG tag defines a part or segment of a replacement text line. When multiple TEXTSEG tags are present within the TEXTLINE definition, the replacement text line is created from left to right in the order the TEXTSEG tags are coded.

Restrictions

You must code the TEXTSEG tag within a TEXTLINE tag definition.
If the EXPAND attribute is not specified and the resulting replacement text is less than the panel width, the text is centered as the panel title.

Processing

Table 1. Tags you can code within a TEXTSEG definition
Tag	Reference	Usage	Required
HP	HP (Highlighted Phrase)	Multiple	No

Examples

Here is an example that uses the TEXTLINE and TEXTSEG tags to create a special panel title that includes the system time and date. Because the EXPAND attribute is specified in the second TEXTSEG tag, the resulting title replacement text has the time and date fields placed at the left and right panel border.

<!doctype dm system ()>
<!--   Sample selection menu -->

<varclass name=vc1 type='char 80'>
   <xlatl format=upper>
   </xlatl>

<varlist>
  <vardcl name=zcmd varclass=vc1>
</varlist>

<panel name=textseg1 menu keylist=keylxmp>

   <textline>
     <textseg>&ztime
     <textseg expand=both>
           Sample Selection Panel with TEXTLINE tag
     <textseg>&zdate(8)
   </textline>

  <topinst>This is a selection panel.
  <selfld type=menu   pmtloc=before fchoice=0 trail=nextsel
          selwidth=40 pmtwidth=10>Select an option
    <choice checkvar=xtest1 match=a>
                Selection #0 (Command Selch0)
      <action run=Selch0>
    <choice checkvar=xtext1 match=b>
                Selection #1 (Command Selch1)
      <action run=Selch1 parm='1 2 3 4'>
       passlib newpool suspend
    <choice checkvar=xtest1 match=c>
                Selection #2 (Command Selch2)
      <action run=Selch2 parm=1234>
    <choice checkvar=xtest1 match=d>
                Selection #3 (Command Selch3)
      <action run=Selch3 parm=abcd>
    <choice checkvar=xtest1 match=e>
                Selection #4 (Command Selch4)
      <action run=Selch4 parm='a b c d'>
    <chdiv>
    <choice selchar=x>
            Exit
      <action run=exit type=exit>
  </selfld>
  <cmdarea>
</panel>

 07:30           Sample Selection Panel with TEXTLINE tag           99/12/15
 Option ===> _
 
 This is a selection panel.
 
 Select an
 option . . 0  Selection #0 (Command Selch0)
            1  Selection #1 (Command Selch1)
            2  Selection #2 (Command Selch2)
            3  Selection #3 (Command Selch3)
            4  Selection #4 (Command Selch4)
 
            X  Exit