Re: [SYSTEM21] HELP!!!!

[Greg Staton <statongreg@xxxxxxxxxxxxx>]

Mona,

Is the key sequence for ORDN03 descending?  If so, the SETLL will behave the 
opposite of what you would think.  In other words, your setll could be setting 
the DB pointer past the desired ORDN03 instead of before. 

Hope this helps,
Greg 

-----Original Message-----
From: Mona Ferriols <mon.ferriols@xxxxxxxxxxxxxx>
Sent: Nov 19, 2003 4:35 AM
To: "Jbausers-L (E-mail)" <jbausers-l@xxxxxxxxxxxx>
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.