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
 

 

Moving data to Group level item

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

Active User


Joined: 27 May 2008
Posts: 121
Location: India

PostPosted: Thu Apr 15, 2010 6:52 am    Post subject: Moving data to Group level item
Reply with quote

Hi All,

I am just trying to recall some concepts, may be i am not a bit clear but please help on the below--

Eg-There is data type Student_Details--
Code:
01  Student_Details.
     05 Student_id    pic 9(5).
     05 Student_ph   pic  9(10).

So in this case, can group level item Student_Details receive alphanumeric value?
Eg2.There is data type Employee_Data-
Code:
01  Employee_Data.
     05 Employee_id         pic 9(5).
     05 Employee_name   pic  x(7).

So in this case, can group level item Employee_Data receive alphanumeric value?

Please help!

Thanks.
Back to top
View user's profile Send private message

Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7931
Location: Bellevue, IA

PostPosted: Thu Apr 15, 2010 7:00 am    Post subject:
Reply with quote

Click on the Manuals button at the top of the page, find the COBOL Language Reference manual, and you can discover:
Quote:
6.2.24.3 Group moves

A group move is any move in which an alphanumeric group item is a sending item or a receiving item, or both. The following are group moves:

* A move to an alphanumeric group item from one of the following:

o any elementary data item that is valid as a sending item in the MOVE statement

o a national group item

o a literal

o a figurative constant

* A move from an alphanumeric group item to the following:

o any elementary data item that is valid as a receiving item in the MOVE statement

o a national group item

o an alphanumeric group item

A group move is treated as though it were an alphanumeric-to-alphanumeric elementary move, except that there is no conversion of data from one form of internal representation to another. In a group move, the receiving area is filled without consideration for the individual elementary items contained within either the sending area or the receiving area, except as noted in the OCCURS clause.
which completely and totally answers your questions. So why did you not consult the manual yourself?
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Thu Apr 15, 2010 8:46 am    Post subject:
Reply with quote

Hello,

Something to keep in mind is that a group move from one group item to another group item will always move "alphanumeric" data. This does not imply that the receiving fields will all be usable. . .

From the quote that Robert provided:
Quote:
In a group move, the receiving area is filled without consideration for the individual elementary items contained within either the sending area or the receiving area
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 Storing huge volume of data, compare ... Pradeep K M All Other Mainframe Topics 3 Mon Jan 16, 2017 5:08 pm
No new posts how to recover an uncataloged VSAM da... archanamuthukrishnan All Other Mainframe Topics 3 Wed Jan 11, 2017 6:18 pm
No new posts HALDB data refresh/copy from producti... vineetanand2007 IMS DB/DC 0 Mon Jan 02, 2017 11:16 am
No new posts Syncsort Help to group fields sudhakarraju SYNCSORT 6 Thu Dec 29, 2016 1:38 am
No new posts JES2 JEC: Use UNIX Pipes to Pass Data... Virendra Shambharkar JCL & VSAM 21 Tue Dec 20, 2016 6:55 pm


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