COBOL - Funções intrínsecas - BYTE-LENGTH



Desenvolvido por DORNELLES Carlos Alberto - Analista de Sistemas - Brasília DF. - cad_cobol@hotmail.com

COBOL - Funções intrínsecas - BYTE-LENGTH
Intrinsic functions - Enterprise COBOL for z/OS 6.3.0

A função BYTE-LENGTH retorna um número inteiro igual ao comprimento do argumento em bytes.

O tipo de função é inteiro.

argument-1
Can be:
  • Um literal alfanumérico, nacional, UTF-8 ou DBCS
  • Um item de grupo (incluindo grupos ilimitados) ou um item de dados elementar de qualquer classe, incluindo DBCS
  • Um item de dados descrito com USAGE POINTER, PROCEDURE-POINTER, FUNCTION-POINTER ou OBJECT REFERENCE
  • O registro especial ADDRESS OF
  • O registro especial LENGTH OF
  • O registro especial XML-NTEXT
  • O registro especial XML-TEXT

O valor retornado é um número inteiro de nove dígitos determinado da seguinte maneira:

  • O valor retornado é um número inteiro com o comprimento do argument-1 em número de bytes.
  • Se o argument-1 for um item de grupo alfanumérico, nacional ou UTF-8, o valor retornado será igual ao comprimento do argument-1 em bytes.
    Se qualquer item de dados subordinado ao argument-1 for descrito com a frase DEPENDING da cláusula OCCURS, o comprimento do argument-1 será determinado usando o conteúdo do item de dados especificado na frase DEPENDING.
    Essa avaliação é realizada de acordo com as regras da cláusula OCCURS para um item de dados de envio.
    Para mais informações, consulte as discussões da cláusula OCCURS e da cláusula USAGE.

    O valor retornado inclui posições FILLER implícitas, se houver.

A única diferença entre as funções BYTE-LENGTH e LENGTH é que BYTE-LENGTH sempre retorna o comprimento de bytes do argument-1, mesmo quando o argument-1 é da classe nacional ou UTF-8.
A função BYTE-LENGTH também aceita argumentos DBCS.

A função BYTE-LENGTH é semelhante ao registro especial LENGTH OF, que também sempre retorna o tamanho do byte de seu argumento, mas o registro especial LENGTH OF pode ser usado em mais contextos.

Para obter mais informações, consulte Finding the length of data items



© Copyright IBM Corp.