[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

RE: your mail



Sender: "Larry Ducie" <Larry_Ducie@xxxxxxxxxxx>

It would appear that Tammy wants to declare the DS as the last parameter for
the PEP procedure. That's why it exists immediately below the last prototype
(PR) and the procedure interface (PI) parameter.

Tammy, you can't do this. By declaring your parameter as a data structure
(using data type definition of "DS") you are declaring it as a standalone
variable - as a result it is not considered by the compiler to be part of
the PI or PR. The key here is pos 24-25 (?). It should be blank for DS
sub-fields, or PR & PI parameters. You are trying to declare a standalone DS
as a parameter, but the compiler is ignoring it as a parameter (pos 24-25 is
"DS" and not blank) and thinks you're trying to declare a standard
standalone DS variable twice.

You need to declare the DS once and create your parameter variable "Like"
the DS. That way, you can include the parameter in the PR and PI -
remembering to blank pos 24-25 on your parameter variable definition. :-)

HTH

Cheers

Larry

-----Original Message-----
From: owner-ftpapi@xxxxxxxxxxxxx [mailto:owner-ftpapi@xxxxxxxxxxxxx] On
Behalf Of Scott Klement
Sent: 03 May 2005 23:47
To: ftpapi@xxxxxxxxxxxxx
Subject: Re: your mail


Sender: Scott Klement <sk@xxxxxxxxxxxxxxxx>


You have two things named "StopInfo". Maybe one of them is a file, or 
another variable, or something like that?

You can't define two things with the same name.

---
Scott Klement  http://www.scottklement.com

On Tue, 3 May 2005 nellestj@xxxxxxx wrote:

> Sender: <nellestj@xxxxxxx>
>
> Could someone please tell me what I'm doing wrong here?  I have a list of
parameters that contains single fields as well as a data structure. I keep
getting the following errors:
>   1322 DStopInfo         DS                  DIM(18) QUALIFIED
> ======> aaaaaaaaaaaaaaa                      bbb     ccccccccc
> *RNF3315 20 a      010272  The Name entry is already defined on a
Definition
>                            Specification; defaults to blanks.
> *RNF3531 30 b      010272  Keyword is not allowed with
blank-data-structure name.
> *RNF3531 30 c      010272  Keyword is not allowed with
blank-data-structure name.
>
> If I don't define them in the 2nd place, I get errors that say the 
> fields are not defined.  What am I doing wrong?
>
> Here's my code:
>
>
> *ENTRY PLIST:
> WBROME          PR                  extpgm('WBROME')
> peOrderNo                      7A   const
> peCustCdBck                    6A
> peLoadAtCdBck                  6A
> peConsigCdBck                  6A
> peBillToCdBck                  6A
> peDivisionBck                  3A
> pePreLdTrlrBck                 6A
> peOrgCtyCdBck                  4A
> peOrgStCdBck                   2A
> peOrgAreaCdBck                 2A
> peOrgRegCdBck                  3A
> peConCtyCdBck                  4A
> peConStCdBck                   2A
> peConAreaCdBck                 2A
> peOrgRegCdBck                  3A
> peConCtyCdBck                  4A
> peConStCdBck                   2A
> peConAreaCdBck                 2A
> peConRegCdBck                  3A
> peICCComCd                     6A
> peIsJit                        1A
> peIsHazmat                     1A
> peIsEDI                        1A
> peBlindBill                    1A
> StopInfo         DS                  DIM(18) QUALIFIED
> peStopNum               1      2A
> peStopTyp               2      3A
> peIsCallR               4      4A
> peIsBill                5      5A
> peIsApptR               6      6A
> peIsApptM               7      7A
> peApptMB                8     17A
> peApptMJ               18     22A
> peIsSealR              23     23A
> peIsPODR               24     24A
> peIsJITstp             25     25A
> peIsLive               26     26A
> peETAJul               27     31A
> peCustCdStp            32     37A
> peRegion               38     40A
> peErlyWnd              41     45A
> peLateWnd              46     50A
>
>
> WBROME          PI
> peOrderNo                      7A   const
> peCustCdBck                    6A
> peLoadAtCdBck                  6A
> peConsigCdBck                  6A
> peBillToCdBck                  6A
> peDivisionBck                  3A
> pePreLdTrlrBck                 6A
> peOrgCtyCdBck                  4A
> peOrgStCdBck                   2A
> peOrgAreaCdBck                 2A
> peOrgRegCdBck                  3A
> peConCtyCdBck                  4A
> peConStCdBck                   2A
> peConAreaCdBck                 2A
> peConRegCdBck                  3A
> peICCComCd                     6A
> peIsJit                        1A
> peIsHazmat                     1A
> peIsEDI                        1A
> peBlindBill                    1A
> StopInfo         DS                  DIM(18) QUALIFIED
> peStopNum               1      2A
> peStopTyp               2      3A
> peIsCallR               4      4A
> peIsBill                5      5A
> peIsApptR               6      6A
> peIsApptM               7      7A
> peApptMB                8     17A
> peApptMJ               18     22A
> peIsSealR              23     23A
> peIsPODR               24     24A
> peIsJITstp             25     25A
> peIsLive               26     26A
> peETAJul               27     31A
> peCustCdStp            32     37A
> peRegion               38     40A
> peErlyWnd              41     45A
> peLateWnd              46     50A
>
>
> Any suggestions are greatly appreciated!
>
> Thanks,
>
> Tammy
>
> ----------------------------------------------------------------------
> -
> This is the FTPAPI mailing list.  To unsubsribe from the list send mail
> to majordomo@xxxxxxxxxxxxx with the body: unsubscribe ftpapi mymailaddr
> -----------------------------------------------------------------------
>
-----------------------------------------------------------------------
This is the FTPAPI mailing list.  To unsubsribe from the list send mail to
majordomo@xxxxxxxxxxxxx with the body: unsubscribe ftpapi mymailaddr
-----------------------------------------------------------------------

-----------------------------------------------------------------------
This is the FTPAPI mailing list.  To unsubsribe from the list send mail
to majordomo@xxxxxxxxxxxxx with the body: unsubscribe ftpapi mymailaddr
-----------------------------------------------------------------------