COMP-1 is a short FLOAT (4 bytes) and cannot have PIC qualifier
Anyway your redefinition goes nowhere (want to separate mantissa from
exponent ? - no)
MERANT Micro Focus Net Express V3
Version 3.1.11 Copyright
(C) 1984-2000 MERANT International Ltd.
URN
AXCGG/AA0/00000
7 01 CAF-NUMERO PIC 999 COMP-1.
*
229-S*****************************
**
** Incompatible qualifiers
----- Original Message -----
Sent: Wednesday, July 29, 2009 3:36
AM
Subject: [open-cobol-list] PIC not
allowed
hi !
I've just discovered open cobol , and I'm amazed.
Big THANK YOU to you.
I think I'll ask a lot of questions, trying to
get my old RM COBOL 85 system fully compiled by Open cobol.
The first
of which is : Even if the code below compiles fine in RM COBOL 85 , it gets me
a syntax error , even if I put -std=cobol85 in the cobc command
line:
01 CAF-NUMERO PIC 999
COMP-1.
01 CAF-ALFANUM-1 REDEFINES
CAF-NUMERO.
05
CAF-ALFANUM-2 PIC
X.
05
CAF-ALFANUM PIC X.
The idea there is to split a number.
Is there
a way that I can make the code compile ?
best regards
,
haroldo
------------------------------------------------------------------------------
Let
Crystal Reports handle the reporting - Free Crystal Reports 2008 30-Day
trial. Simplify your report design, integration and deployment - and focus
on
what you do best, core application coding. Discover what's new with
Crystal Reports now. http://p.sf.net/sfu/bobj-july
_______________________________________________
open-cobol-list
mailing
list
address@hidden
https://lists.sourceforge.net/lists/listinfo/open-cobol-list