EOD

Generated from C.60.01 /SYS/PUB/CICAT last modified on Thu Jan 11 09:18:52 2001

Back to Main Index

:EOD

     Denotes end-of-data on input stream from a jobfile (from an
     input other than $STDIN).  It also terminates data
     initialized by the DATA command. The colon (:) is required
     part of this command.

SYNTAX

     :EOD

PARAMETERS

     None.

NOTE

The "&" symbol has no meaning to the input spooler when it reads
records because the CI is not involved at that point.

OPERATION

     :EOD is used to signify the end of data whose beginning was
     signified by a DATA command.  It is also used to signify
     the end of a data set that was read from the standard input
     device.

     :EOD is currently available only in a job or a session that
     is submitted with the STREAM command.  It cannot be used
     directly from $STDIN or from a program.

     Although in most cases programmers use :EOD for delimiting
     data, any record beginning with a colon may delimit the
     data.  Using a record other than :EOD for this purpose,
     however, depends upon whether the standard input file is
     opened with the filename $STDIN or $STDINX.  Refer to the
     table on the following page.

     When using a compiler language that does not provide a
     convention for terminating compilation (such as END. in
     SPL), you must enter :EOD after the last record of your
     source program to ensure proper delimiting of your input.
     (:EOD is not required when using the BASIC interpreter since
     the subsystem provides different conventions for delimiting
     data.)

     :EOD causes the read of the FREAD intrinsic to return the
     CCG condition code to the calling program.  This condition
     code indicates the end-of-file condition on the terminal.

TYPE OF FILE INDICATORS

-----------------------

DATA file from Standard Input Device (for jobs and sessions)

                     :EOD - Terminates $STDIN and $STDINX.

                     : followed by any other character - Terminates
                       $STDIN.

DATA files

                     :EOD
                     :JOB
                     :DATA

EXAMPLE(S)

     To terminate a data file entered by using the STREAM
     command for a session identified as SESS1,BLACK.ACCTSP, your
     data file would contain :EOD as its last record.  Enter:

     :DATA SESS1,BLACK.ACCTSP
          .
          data
          .
     :EOD

     The following FTNXL program is an example of how :EOD is
     used to terminate a set of data entered through a standard
     input device:

     :FORTRAN

     PAGE 0001   HP32102B.01.04   (C)  HEWLETT-PACKARD CO. 1985

     >$CONTROL USLINIT
     >   PROGRAM MONEY
     >   INTEGER QUARTERS,DIMES,NICKELS,PENNIES
     >   DISPLAY "INPUT MONEY AMOUNT IN DECIMAL FORM "
     >   ACCEPT DECIMALFORM
     >   CALL CHANGER(DECIMALFORM,QUARTERS,DIMES,NICKELS,PENNIES)
     >   DISPLAY QUARTERS," QUARTERS"
     >   DISPLAY DIMES," DIMES"
     >   DISPLAY NICKELS," NICKELS"
     >   DISPLAY PENNIES," PENNIES"
     >   STOP
     >   END

     PROGRAM UNIT MONEY COMPILED
     >   SUBROUTINE CHANGER(DECIMALFORM,QUARTERS,DIMES,NICKELS,PENNIES)
     >   INTEGER QUARTERS,DIMES,NICKELS,PENNIES
     >   DECIMALFORM = DECIMALFORM*100
     >   QUARTERS = DECIMALFORM/25
     >   REMAINDER = DECIMALFORM-(QUARTERS*25)
     >   DIMES=REMAINDER/10
     >   REMAINDER=REMAINDER-(DIMES*10)
     >   NICKELS=REMAINDER/5
     >   PENNIES=REMAINDER-(NICKELS*5)
     >   RETURN
     >   END

     PROGRAM UNIT CHANGER COMPILED
     >   :EOD

     ****      GLOBAL STATISTICS       ****
     ****   NO ERRORS,   NO WARNINGS   ****
     TOTAL COMPILATION TIME  0:00:01
     TOTAL ELAPSED TIME      0:01:29

     END OF COMPILE

ADDITIONAL INFORMATION

Commands:   DATA

Back to Main Index