Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
DATA MOVEMENT

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> ABENDS & Debugging
View previous topic :: :: View next topic  
Author Message
sarat_911

New User


Joined: 19 Sep 2005
Posts: 2

PostPosted: Mon Sep 19, 2005 11:29 am    Post subject: DATA MOVEMENT
Reply with quote

Hi,
01 emp-rec.
02 emp-id pic 9(6).
02 emp-name pic x(4).

Now,,,

move "12345alfaa" to emp-rec.

What Shall happen?
MY interviewer said that it won't throw any SOC-7 error, and it works just fine. But how I'm now sure.. Please try it..
p.s assume everything in lower case is in upper case..
Kindly Look into this issue..
Back to top
View user's profile Send private message

Rupesh.Kothari

Member of the Month


Joined: 27 Apr 2005
Posts: 464

PostPosted: Mon Sep 19, 2005 11:41 am    Post subject: Re: DATA MOVEMENT
Reply with quote

Hi,


Quote:
What Shall happen?


This will not give any abend.

In emp-id values =12345a

and in emp-name= lfaa


Hope this helps you.

Regards

Rupesh
Back to top
View user's profile Send private message
nitin4.a

New User


Joined: 16 Aug 2005
Posts: 26

PostPosted: Mon Sep 19, 2005 2:19 pm    Post subject: Complete Solution
Reply with quote

Hi
rupesh you are write ,but if you declare emp-id as pic9(6) without group variable then the error will come while moving "12345a" to it,This is working because of the rules of group variable which is

"""group item is always assumed to be PIC X because a group item may have several different data items and types subordinate to it and an X picture is the only one which could support such collections""""
Back to top
View user's profile Send private message
Rupesh.Kothari

Member of the Month


Joined: 27 Apr 2005
Posts: 464

PostPosted: Mon Sep 19, 2005 2:35 pm    Post subject: Re: DATA MOVEMENT
Reply with quote

Hi Nitin,

Thanks a lot for your clarification. Yes you are Right as it is group variable it will not give any error but if we define it as single variable it will give error as alphanumeric value can not move in Numeric value.

Thanks again for your clarification


Regards

Rupesh
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 -> ABENDS & Debugging All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Copy 4 byte of data from the last rec... arunsoods DFSORT/ICETOOL 9 Fri Oct 06, 2017 12:15 pm
No new posts opening a dataset after reading it fr... arunsoods DFSORT/ICETOOL 5 Wed Oct 04, 2017 3:54 pm
This topic is locked: you cannot edit posts or make replies. PS file data should be passed as symb... d_sarlie JCL & VSAM 15 Tue Oct 03, 2017 5:18 am
No new posts File Aid tool to compare numeric data balaji81_k Compuware & Other Tools 2 Tue Sep 26, 2017 3:35 am
No new posts Question related to Data dictionary f... rexx77 SYNCSORT 3 Thu Aug 31, 2017 7:23 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us