EZESCCWS concatena uma cadeia para outra com uma cadeia separadora entre elas.
Se o comprimento inicial da cadeia de destino for zero, não contando os espaços em branco finais e nulos, o separador será omitido e somente a cadeia de origem será movida para a cadeia de destino.
>>-resultado--=--EZESCCWS---------------------------------------> >----(--destino--,--fonte--,--separador--)--;------------------><
Atributo | Descrição |
---|---|
resultado | Um item de dados numéricos que irá conter o valor do resultado devolvido
pela função. É um item binário de quatro bytes. Os seguintes
valores são devolvidos:
|
destino | Item da cadeia de destino. |
fonte | Item ou literal da cadeia de origem. |
separador | A cadeia separadora. |
Os espaços em branco finais e nulos são truncados pela cadeia de destino. As cadeias e origem e separadoras são anexadas ao valor truncado. O resultado está truncado para o comprimento da cadeia de destino (se o resultado for maior que o valor de destino) ou preenchido com espaços (se o resultado for menor que o valor de destino).
Suportado em todos os ambientes sem considerações de compatibilidade.
MOVE 'CLIENT NAME =' TO PRINT_LINE; RESULT = EZESCCWS(PRINT_LINE,CLIENT_NAME,' '); IF RESULT = -1; CALL PRINT_LINE_OVERFLOW; END;