Generated from C.70.00 /SYS/PUB/CICAT last modified on Mon Feb 16 17:55:04 2004
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.
:EOD
None.
The "&" symbol has no meaning to the input spooler when it reads records because the CI is not involved at that point.
: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.
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
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
Commands: DATA