| Lueko Willms 2005-02-20, 8:55 am |
| .. On 19.02.05
wrote riplin@Azonic.co.nz (Richard)
on /COMP/LANG/COBOL
in 1108877884.885222.23270@g14g2000cwa.googlegroups.com
about Re: moving data from one place to another in a text file
[color=darkred]
I have no clues if that is true, but regarding this one:
r> As I may have mentioned before: Fujitsu don't have that usage
r> documented, it isn't in their syntax definition, it isn't supported.
May I quote from the "Language Reference Manual" for Fujitsu COBOL
3.0, the free student edition, which one can be download (the
documentation independently from the compiler)
from http://www.adtools.com/student/index.htm#3
--------- schnipp -----------------------------------------
106 Chapter 2. COBOL Modules
Pointer Handling
Use pointers for referencing the address area.
The address of an area can be found using the ADDR function
and set in the pointer data item. A pointer data item defines the
data description entry written in the USAGE IS POINTER clause.
You define the structure attributes of the area to be referenced
using a pointer in the BASED-STORAGE SECTION of the DATA
DIVISION. The data item area defined in the BASED-STORAGE
SECTION cannot be reserved.
Clauses can be described both in the data description entry of the
WORKING-STORAGE SECTION and also the BASED ON clause
written in the data description entry of the BASED-STORAGE
SECTION. Write the BASED ON clause to specify an implicit
pointer.
When referencing a data item defined in the BASED-STORAGE
SECTION, a pointer qualifier or an implicit pointer must be
added to the data-name.
------------------ schnapp --------------------------------
[color=darkred]
r> Please provide the data that shows this to be the case. Or did you
r> just pull these figures out your arse and you seem to prefer to do.
Fujitsu is 100% of the COBOL compilers which I do use...
Yours,
Lüko Willms http://www.willms-edv.de
/--------- L.WILLMS@jpberlin.de -- Alle Rechte vorbehalten --
Diese ganze Lehre taugt zu nichts als darüber zu disputieren. -G.C.Lichtenberg
|