NCEPLIBS-w3emc 2.12.0
Loading...
Searching...
No Matches
Functions/Subroutines
w3ai38.f File Reference

EBCDIC to ASCII. More...

Go to the source code of this file.

Functions/Subroutines

subroutine w3ai38 (ie, nc)
 Convert EBCDIC to ASCII by character.
 

Detailed Description

EBCDIC to ASCII.

Author
Armand Desmarais
Date
1982-11-29

Definition in file w3ai38.f.

Function/Subroutine Documentation

◆ w3ai38()

subroutine w3ai38 ( character*1, dimension(*)  ie,
  nc 
)

Convert EBCDIC to ASCII by character.

This subroutine can be replaced by cray utility subroutine uscctc. See manual sr-2079 page 3-15. cray utility tr can also be used for ASCII, EBCDIC conversion. See manual sr-2079 page 9-35.

Program history log:

  • Armand Desmarais 1982-11-29
  • Ralph Jones 1988-03-31 Change logic so it works like a ibm370 translate instruction.
  • Ralph Jones 1988-08-22 Changes for microsoft fortran 4.10.
  • Ralph Jones 1988-09-04 Change tables to 128 character set.
  • Ralph Jones 1990-01-31 Convert to cray cft77 fortran cray does not allow char*1 to be set to hex.
  • Stephen Gilbert 98-12-21 Replaced Function ICHAR with mova2i.
Parameters
[in,out]IE(in) Character*1 array of EBCDIC data (out) ASCII data
[in]NCInteger, contains character count to convert.
Note
Software version of ibm370 translate instruction, by changing the two tables we could do a 64, 96, 128 ASCII character set, change lower case to upper, etc. aea converts data at a rate of 1.5 million characters per sec. cray utility usccti convert ASCII to IBM EBCDIC cray utility uscctc convert IBM EBCDIC to ASCII they convert data at a rate of 2.1 million characters per sec. cray utility tr will also do a ASCII, EBCDIC conversion. tr convert data at a rate of 5.4 million characters per sec. tr is in library /usr/lib/libcos.a add to segldr card.
Author
Armand Desmarais
Date
1982-11-29

Definition at line 36 of file w3ai38.f.