Kbase P6974: How to search for the second space in a statment using 4GL
Autor |
  Progress Software Corporation - Progress |
Acesso |
  Público |
Publicação |
  29/01/2003 |
|
Status: Unverified
GOAL:
How to search for the second space in a statment using 4GL
FIX:
DEFINE VARIABLE cLinea AS CHARACTER INITIAL "This is a test" NO-UNDO.
DEFINE VARIABLE i AS INTEGER NO-UNDO.
REPEAT i = 1 TO NUM-ENTRIES(cLinea, " "):
MESSAGE ENTRY(i, cLinea, " ")
VIEW-AS ALERT-BOX INFO BUTTONS OK.
END.