× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  • Subject: Re: QNTC
  • From: rob@xxxxxxxxx
  • Date: Fri, 1 Jun 2001 15:18:01 -0500


Ok I ran
CPYTOIMPF FROMFILE(ROB/SPOOL) TOSTMF('/rob/spool2.txt') STMFCODPAG(37)
RCDDLM(*CRLF)

and
CPY OBJ('/rob/spool2.txt')
    TOOBJ('/qntc/rob/qtemp/duh2.txt')
    TOCCSID(*PCASCII)
    DTAFMT(*TEXT)
I get
CPFA0D4-File system error occurred.
It builds the file into the directory on the PC, but leaves it empty.


                              Display Attributes

Object . . . . . . :   /rob/spool2.txt

Type . . . . . . . . . . . . . . . . . :   STMF

Owner  . . . . . . . . . . . . . . . . :   ROB
System object is on  . . . . . . . . . :   Local
Auxiliary storage pool . . . . . . . . :   1
  Object overflowed  . . . . . . . . . :   No

Coded character set ID . . . . . . . . :   37
Hidden file  . . . . . . . . . . . . . :   No
PC system file . . . . . . . . . . . . :   No
Read only  . . . . . . . . . . . . . . :   No

Need to archive (PC) . . . . . . . . . :   Yes
Need to archive (AS/400) . . . . . . . :   Yes

Last access date/time  . . . . . . . . :   06/01/01  15:08:52
Data change date/time  . . . . . . . . :   06/01/01  15:08:52
Attribute change date/time . . . . . . :   06/01/01  15:08:52

Size of object data in bytes . . . . . :   2926
Allocated size of object . . . . . . . :   8192
File format  . . . . . . . . . . . . . :   *TYPE2
Size of extended attributes  . . . . . :   0
Storage freed  . . . . . . . . . . . . :   No

Auditing value . . . . . . . . . . . . :   *NONE

Object domain  . . . . . . . . . . . . :   *SYSTEM

Number of hard links . . . . . . . . . :   1
Last used date . . . . . . . . . . . . :   06/01/01
Days used count  . . . . . . . . . . . :   1
  Reset date . . . . . . . . . . . . . :
Allow write during save  . . . . . . . :   No
Digitally signed . . . . . . . . . . . :   No
File ID  . . . . . . . . . . . . . . . :
X'0000000000000001796FA7D400038541'



Rob Berendt

==================
A smart person learns from their mistakes,
but a wise person learns from OTHER peoples mistakes.


                                                                                
                                         
                    "Mark Phippard"                                             
                                         
                    <MarkP@softlanding.        To:     MIDRANGE-L@midrange.com  
                                         
                    com>                       cc:                              
                                         
                    Sent by:                   Subject:     Re: QNTC            
                                         
                    owner-midrange-l@mi                                         
                                         
                    drange.com                                                  
                                         
                                                                                
                                         
                                                                                
                                         
                    06/01/01 02:25 PM                                           
                                         
                    Please respond to                                           
                                         
                    MIDRANGE-L                                                  
                                         
                                                                                
                                         
                                                                                
                                         





I don't know.

When I do the CPYTOIMPF command I get a file with a code page of 37 in the
IFS.

When I do the CPY command and specify *PCASCII, I get a readable file as
long as I specify *TEXT for the DTAFMT parameter.  I have to do this
because the IFS file is in EBCDIC.  If the IFS file was in ASCII, then I
would not need this.  Either way, the file copies, just with the *BINARY I
get a garbage file on the PC.

Mark






                    rob@dekko.com

                    Sent by:                   To:
MIDRANGE-L@midrange.com
                    owner-midrange-l@mi        cc:

                    drange.com                 Subject:     Re: QNTC



                    06/01/01 02:52 PM

                    Please respond to

                    MIDRANGE-L








What am I doing wrong?
<snip>
When copying files just specify *PCASCII in the TOCODEPAGE parameter when
copying to a /QNTC system.
<endsnip>

CPYTOIMPF FROMFILE(ROB/SPOOL) TOSTMF('/rob/spool.txt') RCDDLM(*CRLF)
CPY OBJ('/rob/spool.txt') TODIR('/qntc/rob/qtemp') TOCCSID(*PCASCII)
CPDA1CB Message . . . . :   An equivalent encoding scheme could not be
found.
Cause . . . . . :   There is not an equivalent *PCASCII encoding scheme
  defined for the coded character set identifier (CCSID) 819.


Rob Berendt

==================
A smart person learns from their mistakes,
but a wise person learns from OTHER peoples mistakes.







+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to
MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator:
david@midrange.com
+---



+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to
MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator:
david@midrange.com
+---




+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---

As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.