× 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.



Do you need *ADD or *REPLACE ??
Madison Daily
Weldon, Williams & Lick, Inc.
(479) 783-4113 (ext. 431)
mdaily@xxxxxxxxxx 




Arturo_Duarte@xxxxxxxxxxxxxxx
Sent by: code400-l-bounces@xxxxxxxxxxxx
02/19/2003 12:33 PM
Please respond to CODE/400 Discussion & Support

 
        To:     code400-l@xxxxxxxxxxxx
        cc: 
        Subject:        Debugger and CPYF command


Hello all. 

I am having problems debugging a CL program through the IBM Distributed 
Debugger. I get a CPF2817 message on line 14 below. It just doesn't want 
to execute the copy command. What am I doing wrong?

         1   >  PGM
         2 
         3   >               CLRPFM     FILE(SRSH1HDPF)
         4   >               CLRPFM     FILE(SRSERRLOG)
         5   >               CLRPFM     FILE(SRSFLATF)
         6   >               CLRPFM     FILE(SRSHUD1XML)
         7   >               CLRPFM     FILE(SRSDTARCVD)
         8   >               CLRPFM     FILE(SRSH1RDPF)
         9   >               CLRPFM     FILE(SRSH1RAPF)
        10   >               CLRPFM     FILE(SRSH1PAPF)
        11   >               CLRPFM     FILE(SRSH1OCPF)
        12                   CRTDDMF    FILE(UADUARTE/ART) 
RMTFILE(MTGLIBP1/SRSH1HDPF) +
        13 * >                            RMTLOCNAME(ddmdevls)
        14                   CPYF       FROMFILE(UADUARTE/ART) +
        15  ->                            TOFILE(UADUARTE/SRSH1HDPF) 
MBROPT(*ADD)
        16   >               DLTF       FILE(UADUARTE/ART)
        17                   CRTDDMF    FILE(UADUARTE/ART) 
RMTFILE(MTGLIBP1/SRSDTARCVD) +
        18   >                            RMTLOCNAME(ddmdevls)
        19                   CPYF       FROMFILE(UADUARTE/ART) +
        20   >                            TOFILE(UADUARTE/SRSDTARCVD) 
MBROPT(*ADD)
        21   >               DLTF       FILE(UADUARTE/ART)
        22                /*   SBMJOB     CMD(CALL PGM(SRS0040R02)) 
JOB($SRS0040R2) +
        23                                JOBD(CFC@xxxxx) 
JOBQ(QGPL/QS36EVOKE) */
        24   >               CALL       PGM(UADUARTE/SRS0040R02)
        25   >  ENDPGM

Thanks,

Art D

_______________________________________________
This is the CODE/400 Discussion & Support (CODE400-L) mailing list
To post a message email: CODE400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/code400-l
or email: CODE400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/code400-l.

NOTE: WDSc for iSeries disucssion has it's own mailing list.
Information can be found at http://lists.midrange.com/cgi-bin/listinfo/wdsc-l




########################################################################
Note:
This message is for the named person's use only.  It may contain
confidential, proprietary or legally privileged information.  No 
confidentiality or privilege is waived or lost by any mistransmission.
If you receive this message in error, please immediately delete it and
all copies of it from your system, destroy any hard copies of it and 
notify the sender.  You must not, directly or indirectly, use, disclose,
distribute, print, or copy any part of this message if you are not
the intended recipient. Weldon, Williams & Lick, Inc. and any of its
subsidiaries each reserve the right to monitor all e-mail communications
through its networks.

Thank You.
########################################################################

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.