aea.f File Reference

This subroutine converts ascii to ebcdic, or ebcdic to ascii. More...

Go to the source code of this file.

Functions/Subroutines
subroutine	aea (ia, ie, nc)
	Program history log:

Detailed Description

This subroutine converts ascii to ebcdic, or ebcdic to ascii.

Author

desmarais

Date

11-29-1982

Definition in file aea.f.

Function/Subroutine Documentation

aea()

subroutine aea	(	character*1, dimension(*)	ia,
		character*1, dimension(*)	ie,
			nc
	)

Program history log:

• 11-29-1982 Desmarais
• 03-31-1988 R. E. Jones
  • change logic so it works like a ibm370 translate instruction.
• 08-22-1988 R. E. Jones
  • changes for microsoft fortran 4.10
• 09-04-1988 R. E. Jones
  • change tables to 128 character set
• 01-31-1990 R. E. Jones
  • convert to cray cft77 fortran cray does not allow char*1 to be set to hex
• 12-21-1998 Stephen Gilbert
  • replaced function ichar with mova2i.

Parameters

[in,out]	IA	character*1 array of ascii data if nc < 0
[in,out]	IE	character*1 array of ebcdic data if nc > 0
[in]	NC	integer, contains character count to convert. if nc .lt. 0, convert ascii to ebcdic if nc .gt. 0, convert ebcdic to ascii

Note

This subroutine can be replaced by cray utility subroutines uscctc and uscctt. 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.

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 ibm ebcdic to ascii
• cray utility uscctc convert ascii to ibm ebcdic
• 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

desmarais

Date

11-29-1982

Definition at line 40 of file aea.f.