Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

A question on 88 level variable.

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
Mukesh Pandey

Active User


Joined: 11 Nov 2008
Posts: 143
Location: India

PostPosted: Thu Feb 18, 2010 12:23 pm    Post subject: A question on 88 level variable.
Reply with quote

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
View user's profile Send private message

CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Thu Feb 18, 2010 12:39 pm    Post subject:
Reply with quote

Why would you want to add the PICs?
Back to top
View user's profile Send private message
Escapa

Senior Member


Joined: 16 Feb 2007
Posts: 1399
Location: IL, USA

PostPosted: Thu Feb 18, 2010 1:05 pm    Post subject:
Reply with quote

You need to go through cobol manual to study what 88 LEVEL is..
Back to top
View user's profile Send private message
UmeySan

Active Member


Joined: 22 Aug 2006
Posts: 755
Location: Germany

PostPosted: Thu Feb 18, 2010 1:49 pm    Post subject:
Reply with quote

@ 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
View user's profile Send private message
Mukesh Pandey

Active User


Joined: 11 Nov 2008
Posts: 143
Location: India

PostPosted: Thu Feb 18, 2010 5:02 pm    Post subject:
Reply with quote

i just wanted to know what error we get if we use pic clause at 88 level.
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


Joined: 14 Jan 2008
Posts: 2502
Location: Atlanta, Georgia, USA

PostPosted: Thu Feb 18, 2010 5:31 pm    Post subject:
Reply with quote

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
View user's profile Send private message
mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1592

PostPosted: Sat Feb 20, 2010 7:41 pm    Post subject:
Reply with quote

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
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Asynchronous CICS Processing Question moezbud CICS 0 Mon Mar 06, 2017 6:13 pm
No new posts CICS Question RE: Browse, Readnext an... moezbud CICS 7 Sun Mar 05, 2017 5:45 am
No new posts Writing on to GSAM variable length rohanthengal JCL & VSAM 6 Fri Mar 03, 2017 7:46 pm
No new posts Count Trailing Spaces in variable str... Virendra Shambharkar SYNCSORT 10 Thu Feb 02, 2017 12:23 pm
No new posts Format to pipe delimited with variabl... pshongal SYNCSORT 6 Wed Sep 14, 2016 2:48 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us