uscctc(3F)

NAME
     USCCTC, USCCTI - Converts EBCDIC character data to ASCII character
     data, and vice versa

SYNOPSIS
     CALL USCCTC (src, isb, dest, num, npw [,val])

     CALL USCCTI (src, dest, isb, num, npw [,val])

IMPLEMENTATION
     UNICOS, UNICOS/mk, and IRIX systems

DESCRIPTION
     On IRIX systems, this routine is in libffio.so which is linked by
     default when compiling programs with the MIPSpro 7 Fortran 90 compiler
     or when compiling programs with the -craylibs option to the MIPSpro
     F77 compiler.

     USCCTC converts EBCDIC character data to ASCII character data.  USCCTI
     converts ASCII character data to EBCDIC character data.  All
     non-printing characters are converted to blanks.

     When using the CF90 compiler or MIPSpro 7 Fortran 90 compiler on
     UNICOS, UNICOS/mk, or IRIX, the arguments must be of type integer with
     KIND=8.

     The following is a list of valid arguments for this routine.

     src       Variable or array of any type (except CHARACTER) containing
               the character data to be converted.

     isb       An integer variable or constant containing the starting byte
               offset to begin the data conversion.  Bytes are numbered
               from left to right, with the leftmost byte as byte 1.  The
               isb argument applies to the src (USCCTC) or dest (USCCTI)
               argument.

     dest      Variable or array of any type (except CHARACTER) to receive
               the character data to be converted.

     num       An integer variable or constant containing the number of
               characters to be converted.

     npw       An integer variable or constant containing the number of
               characters to be placed in each word of dest (USCCTC) or
               obtained from each word of src (USCCTI).  A positive value
               for npw (1 to 8) indicates left-justification.  A negative
               value (-1 to -8) indicates right-justification.  For USCCTC,
               left-justified output is also blank-filled.  Note that npw
               values of 8 and -8 are equivalent.

     val       An optional integer or logical variable or constant which,
               if specified and nonzero (.TRUE.), indicates that all lower
               case input is to be folded to upper case output.  The
               default, if the argument is not specified, is no case
               folding.

NOTES
     The following conditions must be met for any character data to be
     converted:
          num >= 0
          isb > 0
          0 < |npw| < 9

     If num is not an even multiple of 8, the USCCTI routine will place the
     remaining converted characters in the final word of dest while
     preserving the rest of the original contents of the word.

CAUTIONS
     The same variable or array can be specified for src (input) and dest
     (output) if and only if isb is 1 and npw is 8 (or -8).  The results of
     overlapping conversions using any other values for isb and npw are
     undefined.

EXAMPLES
     The following Fortran code converts 800 characters from EBCDIC to
     ASCII.  The ASCII characters are placed one per word, right-justified.

          INTEGER EBCDIC(100)
          INTEGER ASCII (800)

          CALL USCCTC(EBCDIC, 1, ASCII, 800, -1, .FALSE.)

SEE ALSO
     Application Programmer's Library Reference Manual for the printed
     version of this man page.