Stripping off CR codes

[Terry Curran]

This is a multi-part message in MIME format.

------=_NextPart_000_000A_01C34B0C.77BE8050
Content-Type: text/plain;
	charset="US-ASCII"
Content-Transfer-Encoding: 7bit


You could use awk as follows

 awk 'printf "%s",$1}' infile > outfile

------------------------------------------------------------------------
----------------

This email is brought to you courtesy of 1 & 1, for more details please
visit the 
link below

               http://oneandone.co.uk/xml/init?k_id=5753616

------------------------------------------------------------------------
----------------


-----Original Message-----
From: powerh-l-admin@cube.swau.edu [mailto:powerh-l-admin@cube.swau.edu]
On Behalf Of Arnone, Anthony
Sent: Tuesday, July 15, 2003 5:54 PM
To: 'Powerhouse List (E-mail)'
Subject: FW: Stripping off CR codes


I tried to create a subfile, and a subfile with format 0 but when I
transfered both files and open them in a hexEditor it still contains the
CR codes. Does anyone know of a tool outside of Powerhouse that can
strip off the CR codes or something in quiz that will suppress the
codes.

Anthony

>  -----Original Message-----
> From: 	Arnone, Anthony  
> Sent:	Monday, July 14, 2003 4:17 PM
> To:	Powerhouse List (E-mail)
> Subject:	Stripping off CR codes
> 
> I am creating a file using the disc option in quiz that needs to be 
> uploaded to an SAP system. The problem is that the SAP system is 
> rejecting the file because of the carriage return codes at the end of 
> each line. Is there a way that I can strip these off either in Quiz or

> with some other tool. I am running ver 8.19 on MPE/iX. Below is the 
> code that I am using:
> 
> DEF T-DELIM CHA*1 = "|"
> DEF N-INV-D CHA*8 = ASC(INVOICE-DATE,8)[7:2] + &
>     ASC(INVOICE-DATE,8)[5:2] + ASC(INVOICE-DATE,8)[1:4]
> DEF N-TOT-AMT CHA*12 = &
>     PACK(ASC(TOT-INV-AMT/100) + "." + ASC(TOT-INV-AMT,12)[11:2]) DEF 
> N-LINE-AMT CHA*12 = &
>     PACK(ASC(LINE-ITEM-AMT/100) + "." + ASC(LINE-ITEM-AMT,12)[11:2])
> 
> DEF HFILE CHA*132 = PACK(TRU(HTYPE) + T-DELIM + TRU(N-INV-D)
&
>  + T-DELIM + TRU(LEGAL-ENTITY) + T-DELIM + "USD" + T-DELIM + T-DELIM
&
>  + "20517562" + T-DELIM + T-DELIM + TRU(INVOICE-NUMBER) + T-DELIM
&
>  + TRU(HTEXT) + T-DELIM + TRU(N-TOT-AMT) + T-DELIM
&
>  + TRU(PYMT-TYPE) + T-DELIM + TRU(ASC(TOT-LINE-ITEMS)))
> DEF DFILE CHA*132 = PACK(TRU(DTYPE) + T-DELIM
&
>  + TRU(ASC(LINE-NUMBER)) + T-DELIM + TRU(ACCT-NUMBER) + T-DELIM
&
>  + TRU(DTEXT) + T-DELIM + T-DELIM + TRU(N-LINE-AMT) + T-DELIM
&
>  + "1Z" + T-DELIM + T-DELIM + T-DELIM + TRU(INTER-ORD-NUM)
&
>  + T-DELIM + TRU(PO-NUMBER) + T-DELIM + TRU(ASC(PO-LINE-ITEM)))
> 
> HEA AT INVOICE-NUMBER TAB 1 HFILE
> REP TAB 1 DFILE
> 
> SET NOHEAD
> SET NOFORMFEED
> SET PAG WID 240
> SET PAG LEN 1
> SET REP DEV DISC NAME BILLING
> SET REP LIM 10000
> GO
> 
> R/S
> Anthony Arnone 
> Programmer/Analyst 
> Grey Global Group 
> (212) 886-7812 
> aarnone@grey.com 
> 
> 
= = = = = = = = = = = = = = = = = = = = = = = = = = = =
Mailing list: powerh-l@lists.swau.edu
Subscribe: "subscribe" in message body to
powerh-l-request@lists.swau.edu
Unsubscribe: "unsubscribe <password>" in message body to
powerh-l-request@lists.swau.edu
http://lists.swau.edu/mailman/listinfo/powerh-l
This list is closed, thus to post to the list you must be a subscriber.

------=_NextPart_000_000A_01C34B0C.77BE8050
Content-Type: text/x-vcard;
	name="Terence Phillip Curran (terry.curran@towermarsh.co.uk).vcf"
Content-Transfer-Encoding: quoted-printable
Content-Disposition: attachment;
	filename="Terence Phillip Curran (terry.curran@towermarsh.co.uk).vcf"

BEGIN:VCARD
VERSION:2.1
N:Curran;Terence;Phillip
FN:Terence Phillip Curran (terry.curran@towermarsh.co.uk)
ORG:TowerMarsh Ltd
TITLE:Managing Director
TEL;WORK;VOICE:+44 (2392) 503893
TEL;HOME;VOICE:+44 (2392) 503893
TEL;CELL;VOICE:+44 (7720) 562048
ADR;WORK:;;130 Parham Road;Gosport;Hants;PO12 4UE;United Kingdom
LABEL;WORK;ENCODING=3DQUOTED-PRINTABLE:130 Parham Road=3D0D=3D0AGosport, =
Hants PO12 4UE=3D0D=3D0AUnited Kingdom
URL;WORK:http://www.towermarsh.co.uk
EMAIL;PREF;INTERNET:terry.curran@towermarsh.co.uk
REV:20030301T095201Z
END:VCARD

------=_NextPart_000_000A_01C34B0C.77BE8050--