Re: [Tiny-cobol-users] Extra stuff in assembler

[Rildo P. <ri...@pr...>]

Hi Chris,

On 30 Aug 2002, Chris Borgn=E6s wrote:

> Here is an excerpt.  If this is inadequate I can provide the entire
> thing, but it's essentially multiple iterations of the same logic for
> both files.
>
>        IDENTIFICATION DIVISION.
>        PROGRAM-ID. BuildWAtkTab.
>        ENVIRONMENT DIVISION.
>        INPUT-OUTPUT SECTION.
>        FILE-CONTROL.
>            SELECT WAtkTabFile ASSIGN TO WAtkTabFile
>                               ORGANIZATION INDEXED
>                               ACCESS RANDOM
>                               RECORD KEY WAtkTabKey.

Because the way our compiler works, if you want to assign the filename
to a literal name, you must enclose it in double-quotes, like:

SELECT WAtkTabFile ASSIGN TO "WAtkTabFile"


In other situation, you may want to have the file name into
another variable, like this:

SELECT WAtkTabFile ASSIGN TO WAtkTabFile
=2E..
=0977 WAtkTabFile=09PIC X(80) VALUE "my_file_name".

Both are acceptable, but the compiler only assumes you give a explicit
filename if you enclose it inside double-quotes ("...").

What happened, is that your variable (WAtkTabFile) was not defined later,
so it had no storage class. Sorry if our compiler didn't show a better
error detection.

best regards,
Rildo
 ------------------------------------------------------------------
 Rildo Pragana                   FPGA/uControllers * Linux * tcl/tk
 R.Joaquim Nabuco,92/302 Derby   http://www.pragana.net
 Recife, PE - Brazil 52011-000   +55-81-3223-5694