FW: Stripping off CR codes

[Peter Bateman]

hi:

I would hex dump the file with FCOPY.
I don't think Quiz in general tags the output lines on MPE/iX with a 
carriage return.
Slave printing and perhaps writing to the terminal might generate a carriage 
return.
I think maybe you should look at how you are getting the data to SAP.
Perhaps a binary FTP transfer instead of ascii.

Regards,
Peter Bateman


>From: "Arnone, Anthony" <aarnone@grey.com>
>To: "'Powerhouse List (E-mail)'" <powerh-l@lists.swau.edu>
>Subject: FW: Stripping off CR codes
>Date: Tue, 15 Jul 2003 12:53:38 -0400
>
>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.

_________________________________________________________________
Protect your PC - get McAfee.com VirusScan Online  
http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963