Re: Dates Problem

[Scott Klement <rpg400-l@xxxxxxxxxxxxxxxx>]

Use something like this:

    SETLL StartDate MYFILE;
    READ MYFILE;

    dow FileDate>=StartDate and FileDate<=EndDate;

        // At this point, the currently loaded record
        //  is one of the ones in the date range.

        READ MYFILE;
    enddo;



Srinivas Boggula wrote:
> Hi every one,
>
>  
>
> How do I Select from Date To - To Date in RPGLE
>
>  
>
> Say suppose I have 20 records in a Physical File and I have 8 fields in
> it.
>
> Now I want to retrieve from Dates To - To Date. 
>
>  
>
> I tried with the following way created a logical file of eight fields
> all of them are keyed
>
>  
>
> In RPGLE program I have created KLIST ( KEY AND KEY1)
>
>  
>
>  C     KEY           KLIST                           
>
>  C                   KFLD                    FDD     
>
>  C                   KFLD                    FMM     
>
>  C                   KFLD                    FCC     
>
>  C                   KFLD                    FYY     
>
>  C*                                                  
>
> C     KEY1          KLIST                        
>
>  C                   KFLD                    TDD  
>
>  C                   KFLD                    TMM  
>
>  C                   KFLD                    TCC  
>
>  C                   KFLD                    TYY  
>
>  
>
> With the help of KEY & Chain I can able to set pointer to from date and
> read the record.
>
> But how do I stop at To-Date.
>
>  
>
> 0004.43      C     KEY           CHAIN     DSPREC            90
>
>  
>
>  
>
> Please Can any one guide me on this issue.
>
>  
>
> Thanks in Advance
>
>  
>
> Regards,
>
> Srinivas
>
>  
>
>  
>
>  
>
>  
>
>  
>
>  
>
> I want to retrieve records from 10 to 15, I can able to set pointer and
> read 10th
>
>  record using SETLL and READE but how do I Stop at 15th record.
>
>  
>
> Thanks in Advance
>
>  
>
> Regards,
>
> Srinivas
>
>  
>
>  
>
>  
>
>  
>
>  
>
>  
>
>  
>
>  
>
>  
>
>  
>
>  
>
>  
>
>  
>
>  
>
> iGATE is ranked as 3rd best IT employer in India as per DQ-IDC Best Employer Survey-2007
> ----------------------------------------------------------------DISCLAIMER---------------------------------------------------------
> Information transmitted by this EMAIL is proprietary to iGATE Group of Companies and is intended for use only by the individual 
> or entity to whom it is addressed and may contain information that is privileged, confidential, or exempt from disclosure under 
> applicable law. If you are not the intended recipient of this EMAIL immediately notify the sender at iGATE or mailadmin@xxxxxxxxx 
> and delete this EMAIL including any attachments