The tag examples in Tag reference use entity definitions to create the sample panels. The entities used are called SAMPABC (to define the action bar); SAMPVAR1, SAMPVAR2, and SAMPVAR3 (to provide VARCLASS and VARLIST definitions); and SAMPBODY (to provide a panel body section).

The DTL definitions follow:

SAMPABC:

<ABC>File
  <PDC>Add Entry
    <ACTION RUN=add>
  <PDC>Delete Entry
    <ACTION RUN=delete>
  <PDC>Update Entry
    <ACTION RUN=update>
  <PDC>Exit
    <ACTION RUN=exit>
<ABC>Search
  <PDC CHECKVAR=whchsrch MATCH=1>Search on name
    <ACTION SETVAR=whchsrch VALUE=1>
    <ACTION RUN=search>
  <PDC CHECKVAR=whchsrch MATCH=2>Search on card number
    <ACTION SETVAR=whchsrch VALUE=2>
    <ACTION RUN=search>
<ABC>Help
  <PDC>Extended Help...
    <ACTION RUN=exhelp>
  <PDC>Keys Help...
    <ACTION RUN=keyshelp>

SAMPVAR1:

<VARCLASS NAME=date    TYPE='char 8'>
<VARCLASS NAME=numcls  TYPE='numeric 7'>
<VARCLASS NAME=namecls TYPE='char 25'>
<VARCLASS NAME=char1cls TYPE='char 1'>
<VARCLASS NAME=char7cls TYPE='char 7'>

<VARLIST>
  <VARDCL NAME=whchsrch VARCLASS=char1cls>
  <VARDCL NAME=curdate VARCLASS=date>
  <VARDCL NAME=cardno  VARCLASS=numcls>
  <VARDCL NAME=name    VARCLASS=namecls>
  <VARDCL NAME=address VARCLASS=namecls>
  <VARDCL NAME=cardsel VARCLASS=char1cls>
  <VARDCL NAME=card  VARCLASS=char7cls>
  <VARDCL NAME=north VARCLASS=char1cls>
  <VARDCL NAME=south VARCLASS=char1cls>
  <VARDCL NAME=east  VARCLASS=char1cls>
  <VARDCL NAME=west  VARCLASS=char1cls>
  <VARDCL NAME=nth VARCLASS=char1cls>
  <VARDCL NAME=sth VARCLASS=char1cls>
  <VARDCL NAME=est VARCLASS=char1cls>
  <VARDCL NAME=wst VARCLASS=char1cls>
</VARLIST>

SAMPVAR2:

<VARCLASS NAME=casecls TYPE='char 7'>
<VARCLASS NAME=namecls TYPE='char 25'>
<VARCLASS NAME=addrcls TYPE='char 25'>
<VARCLASS NAME=char1cls TYPE='char 1'>
<VARCLASS NAME=char2cls TYPE='char 2'>

<VARLIST>
  <VARDCL NAME=caseno  VARCLASS=casecls>
  <VARDCL NAME=name    VARCLASS=namecls>
  <VARDCL NAME=address VARCLASS=addrcls>
  <VARDCL NAME=casesel VARCLASS=char2cls>
  <VARDCL NAME=patin   VARCLASS=char1cls>
  <VARDCL NAME=defa    VARCLASS=char1cls>
  <VARDCL NAME=cont    VARCLASS=char1cls>
  <VARDCL NAME=priv    VARCLASS=char1cls>
  <VARDCL NAME=incr    VARCLASS=char1cls>
  <VARDCL NAME=disp    VARCLASS=char1cls>
  <VARDCL NAME=fraud   VARCLASS=char1cls>
</VARLIST>

SAMPVAR3:

<VARCLASS NAME=namecls  TYPE='char 7'>
<VARCLASS NAME=char1cls TYPE='char 1'>
<VARCLASS NAME=char2cls TYPE='char 2'>

<VARLIST>
  <VARDCL NAME=file  VARCLASS=namecls>
  <VARDCL NAME=type  VARCLASS=char2cls>
  <VARDCL NAME=marg  VARCLASS=char2cls>
  <VARDCL NAME=copy  VARCLASS=char2cls>
  <VARDCL NAME=duplx VARCLASS=char1cls>
</VARLIST>

SAMPBODY:

<TOPINST>Type in patron's name and card number (if applicable).
<TOPINST>Then select an action bar choice.
<AREA>
  <DTAFLD DATAVAR=curdate PMTWIDTH=12 ENTWIDTH=8 USAGE=out>Date
  <DTAFLD DATAVAR=cardno PMTWIDTH=12 ENTWIDTH=7 DESWIDTH=25>Card No
    <DTAFLDD>(A 7-digit number)
  <DTAFLD DATAVAR=name PMTWIDTH=12 ENTWIDTH=25 DESWIDTH=25>Name
    <DTAFLDD>(Last, First, M.I.)
  <DTAFLD DATAVAR=address PMTWIDTH=12 ENTWIDTH=25>Address
  <DIVIDER>
  <REGION DIR=horiz>
  <SELFLD NAME=cardsel PMTWIDTH=30 SELWIDTH=38>Choose
  one of the following
    <CHOICE CHECKVAR=CARD MATCH=NEW>New
    <CHOICE CHECKVAR=CARD MATCH=RENEW>Renewal
    <CHOICE CHECKVAR=CARD MATCH=REPLACE>Replacement
  </SELFLD>
  <SELFLD TYPE=multi PMTWIDTH=30 SELWIDTH=25>Check valid branches
    <CHOICE NAME=NORTH HELP=NTHHLP CHECKVAR=NTH>North Branch
    <CHOICE NAME=SOUTH HELP=STHHLP CHECKVAR=STH>South Branch
    <CHOICE NAME=EAST HELP=ESTHLP CHECKVAR=EST>East Branch
    <CHOICE NAME=WEST HELP=WSTHLP CHECKVAR=WST>West Branch
  </SELFLD>
  </REGION>
</AREA>
<CMDAREA>Enter a command