COBOL - Funções intrínsecas


Volta a página anterior

Volta ao Menu Principal


Desenvolvido por DORNELLES Carlos Alberto - Analista de Sistemas - Brasília DF.

 FUNCTION LOWER-CASE

   
  A função "FUNCTION LOWER-CASE" retorna uma STRING de caracteres cujo o tamanho é igual ao do argumento fornecido, só substituindo todos os caracteres em caixa alta (maiúsculas) para caixa baixa (minúsculas).  
   
   Formato geral: FUNCTION LOWER-CASE (string)
                             string é um argumento alfabético ou alfanumérco com pelo menos um caracter informado
 
   Regras:  
                               1. O tipo desta função é um alfanumérico - PIC X(XXX)  
                               2. O valor retornado é o mesmo número de caracteres que o argumento fornecido.  
   
   

 Exemplo

 
       
      *-----------------------------------------------------------------
       WORKING-STORAGE SECIOTN.
      *-----------------------------------------------------------------

       01  WS-AUXILIARES.  
           05  WS-ENTRADA                PIC X(006) VALUE 'CARLOS'. 
           05  WS-RESULTADO              PIC X(006) VALUE spaces.   
       
		 
      *-----------------------------------------------------------------
       PROCEDURE DIVISION. 
      *-----------------------------------------------------------------
* sintaxe do comando MOVE FUNCTION LOWER-CASE (WS-ENTRADA) TO WS-RESULTADO DISPLAY 'FUNCTION LOWER-CASE - ' WSS-RESULTADO 1. Se a STRING WS-ENTRADA (um item de dados alfanumérico com seis caracteres de comprimento) conter o valor 'CARLOS' o seu retorno e armazenamento em WS-RESULTADO (tambem um item de dados alfanumérico com seis caracteres de comprimento) será 'carlos'. * Resultado: FUNCTION LOWER-CASE - carlos 2. Se a STRING WS-ENTRADA conter o valor 'carlos' o retorno em WS-RESULTADO não será alterado.