EOD



: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