Re: Read and Start Statements

["Gary Morrison" <gmorrison@xxxxxxxxxxxxxxx>]

Set up the select with a logical file

SELECT File    ASSIGN TO DATABASE-NameOf Logical
                           ORGANIZATION    IS INDEXED
                           ACCESS MODE     IS DYNAMIC
                           RECORD KEY      IS EXTERNALLY-DESCRIBED-KEY
                                                           WITH DUPLICATES
                           FILE STATUS     IS FILE-STATUS.


 Move SchoolYear to LogicalKeyYear.

 START File KEY NOT LESS THAN  EXTERNALLY-DESCRIBED-KEY.

READ File NEXT RECORD.




|--------+----------------------------->
|        |          Diane Nott         |
|        |          <dnott@lorainccc.ed|
|        |          u>                 |
|        |          Sent by:           |
|        |          cobol400-l-admin@mi|
|        |          drange.com         |
|        |                             |
|        |                             |
|        |          04/11/2002 10:52 AM|
|        |          Please respond to  |
|        |          cobol400-l         |
|        |                             |
|--------+----------------------------->
  >----------------------------------------------------------------------------|
  |                                                                            |
  |      To:     cobol400-l@midrange.com                                       |
  |      cc:                                                                   |
  |      Subject:     Read and Start Statements                                |
  >----------------------------------------------------------------------------|




This is a multi-part message in MIME format.
--
Hi! I haven't work much with the Start statment with the Read. Can
someone explain it to me with an example.

In the program I am writing, I need to point to the first record
containing the school Year and Term that I input and then summarize
counts by date.

Thanks for any help.

Diane
--