Re: HELP!!!!

Mona

Mona.

from what you say I would investigate the value in the key field ORDN03

If you trying to read for a given order number,
    then ORDN03 must have a valid order number

If you are trying to read all orders greater than a given order number
    then having set the file pointer with the SETLL,
    you should be using L#CONO on the READE statements
         MainKey       SetLl     PMP03L09
         L#Cono       ReadE     PMP03L09


Hope this helps

Derek Hunt
EDI Consultant
www.derekhunt.co.uk

----- Original Message ----- 
From: "Mona Ferriols" <mon.ferriols@xxxxxxxxxxxxxx>
To: "Jbausers-L (E-mail)" <jbausers-l@xxxxxxxxxxxx>
Sent: Wednesday, November 19, 2003 9:35 AM
Subject: [SYSTEM21] HELP!!!!


> Guys,
>
> I've been knocking my head over this all day and i cant figure out what's
> wrong. Basically, the logical file here wont open when i use the key list
> (but it opens the file if i use L#CONO, but that's not what i need). On
> debug, the thing goes through the SetLL and ReadE then DOW then skips
> everything and EndDos.
>
> Factor1+++++++Opcode&ExtFactor2+++++++Result++++++++Len++D+HiLoEq....C
> MainKey       KLIST
>               KFLD                    L#CONO
>               KFLD                    ORDN03
>
>    GetOrders     BegSr
>
> MainKey       SetLl     PMP03L09
> MainKey       ReadE     PMP03L09
>
>               DoW       not %Eof
>
>               If        DUED03 >= L#FROMDATE and DUED03<=L#TODATE
>
>               MoveL     CONO03        CONO14
>               MoveL     ITEM03        ITEM14
>               MoveL     DUED03        DUED14
>               Z-Add     OQTY03        OQTY14
>               MoveL     ORDN03        ORDN14
>               MoveL     PDES35        DESC14
>               MoveL     SNAM05        VNDR14
>
>               ExSr      GetPlanner
>
>               Else
>
>               EndIf
>
> MainKey       ReadE     PMP03L09
>
>               EndDo
>
>               EndSr
> Mon Ferriols
> Data Management & Control
> Ionics EMS, Inc. - Plant7
> * (49) 545-9751
> * mon.ferriols@xxxxxxxxxxxxxx
> * www.ionicsgroup.com
>
> "ERP is not just computers and software, but PEOPLE, PROCESSES and
> FUNCTIONS."
>
> ###########################################
>
> This message has been scanned by F-Secure Anti-Virus for Microsoft
Exchange.
> For more information, connect to http://www.F-Secure.com/
> _______________________________________________
> This is the System 21 Users (SYSTEM21) mailing list
> To post a message email: SYSTEM21@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/system21
> or email: SYSTEM21-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/system21.
>
>