View previous topic :: View next topic
|
Author |
Message |
Mukesh Pandey
Active User
Joined: 11 Nov 2008 Posts: 143 Location: India
|
|
|
|
Hi , can we give pic clause on 88 level variable as shown below.
comment on this code :
01 Month PIC X(03).
88 M1 PIC X(03) value 'JAN'.
88 M2 PIC X(03) value 'FEB'.
---------------------------------------------------------------------
The below code is fine for reference.
01 Month PIC X(03).
88 M1 value 'JAN'.
88 M2 value 'FEB'. |
|
Back to top |
|
|
CICS Guy
Senior Member
Joined: 18 Jul 2007 Posts: 2146 Location: At my coffee table
|
|
|
|
Why would you want to add the PICs? |
|
Back to top |
|
|
Escapa
Senior Member
Joined: 16 Feb 2007 Posts: 1399 Location: IL, USA
|
|
|
|
You need to go through cobol manual to study what 88 LEVEL is.. |
|
Back to top |
|
|
UmeySan
Active Member
Joined: 22 Aug 2006 Posts: 771 Location: Germany
|
|
|
|
@ Mukesh Pandey
Morning Sir !
You only have the Pic-Clause to define the field.
01 MDL90600-SQL-STATUS PIC X(04).
88 MDL90600-SQL-IGNORE VALUE '0000'.
88 MDL90600-SQL-FEHLER VALUE '9999'. |
|
Back to top |
|
|
Mukesh Pandey
Active User
Joined: 11 Nov 2008 Posts: 143 Location: India
|
|
|
|
i just wanted to know what error we get if we use pic clause at 88 level. |
|
Back to top |
|
|
Bill O'Boyle
CICS Moderator
Joined: 14 Jan 2008 Posts: 2501 Location: Atlanta, Georgia, USA
|
|
|
|
Mukesh Pandey wrote: |
i just wanted to know what error we get if we use pic clause at 88 level. |
Trying compiling the program and review the error messages. It's a simple process which YOU can do quite easily. |
|
Back to top |
|
|
mmwife
Super Moderator
Joined: 30 May 2003 Posts: 1592
|
|
|
|
Hi Mukesh,
Perhaps the following might lead you to the answer:
The 88 level is not a variable, it's a condition name. The 01 level is the variable. |
|
Back to top |
|
|
|