Stripping off CR codes

[Nancy Tietz]

We have had this problem before with funny codes at the end of each line
that other vendors have sent us.  I've read in the text file in MS Word and
used the Find-Replace function.  There is a special functions button that
allows you to take ^p and change it to manual return ^m.  So maybe you need
to do the opposite?
We've tried UltraEdit (a very good product) but it still showed the CR's
when they really weren't there.
Not sure if this was helpful or not.  Best wishes.
Nancy

-----Original Message-----
From: Arnone, Anthony [mailto:aarnone@grey.com]
Sent: Tuesday, July 15, 2003 12: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.