DEFINE BROWSE BW_SC20SDAN
&ANALYZE-SUSPEND _UIB-CODE-BLOCK _DISPLAY-FIELDS BW_SC20SDAN C-Win _FREEFORM
  QUERY BW_SC20SDAN NO-LOCK DISPLAY
      ZTYACC.prime    COLUMN-LABEL "" FORMAT "X(35)"
     ZUNACT.sec        COLUMN-LABEL "  " FORMAT "X(30)"
     INFDON.sep  COLUMN-LABEL "" FORMAT "99/99/9999"
     IF INFDON.top THEN  "S" ELSE (IF INFDON.REPORT  THEN "R" ELSE (IF INFDON.prime <> "" THEN INFDON.prime ELSE ""))  COLUMN-LABEL "R" FORMAT "X(1)"
/* _UIB-CODE-BLOCK-END */
&ANALYZE-RESUME
    WITH SEPARATORS SIZE 83.57 BY 5.08
         BGCOLOR 15 FGCOLOR 1 FONT 6 FIT-LAST-COLUMN.

(?:DEFINE|DEF)s([ws]*)BROWSEs+([w-]+)s+([^.]*).

DEFINE BROWSE BW_SC20SDAN
&ANALYZE-SUSPEND _UIB-CODE-BLOCK _DISPLAY-FIELDS BW_SC20SDAN C-Win _FREEFORM
  QUERY BW_SC20SDAN NO-LOCK DISPLAY
      ZTYACC.

DEF(INE)?s([ws]*)BROWSEs+([w-]+)s+(([^.]|.(?!$))*).