FW: Stripping off CR codes

[Jeff Hoffman]

Anthony

How are you transferring the file, 
if using ftp did you transfer it in binary mode, 
if reflections were there any translation characters set?

Jeff


At 12:53 PM 15-07-03 -0400, you wrote:
>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.
>