Rexx - caractères

Cette fonction renvoie 1 ou le nombre de caractères restant à lire dans le fichier lui-même. Le nom de fichier est mentionné comme paramètre de la fonction.

Syntaxe

chars(filename)

Paramètres

  • filename - C'est le nom du fichier pour lequel la fin du fichier doit être déterminée.

Valeur de retour

Cette fonction renvoie 1 ou le nombre de caractères restant à lire dans le fichier lui-même.

Exemple

/* Main program */ 
str = '' 
do j = 1 while chars(Example.txt) > 0 
   str = ' ' (charin(Example.txt)) 
   call charout ,str 
end

Les choses suivantes doivent être notées à propos du programme ci-dessus -

  • Tout d'abord, une variable chaîne est affectée à une valeur nulle.

  • Ensuite, la 'boucle do' est utilisée pour lire chaque caractère à la fois.

  • Chaque caractère est lu puis envoyé à la console.

Lorsque nous exécutons le programme ci-dessus, nous obtiendrons le résultat suivant.

Production

E x a m p l e 1 
E x a m p l e 2 
E x a m p l e 3