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
 
Reference Modification in COBOL

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

New User


Joined: 04 Nov 2006
Posts: 1

PostPosted: Sat Dec 30, 2006 12:56 pm    Post subject: Reference Modification in COBOL
Reply with quote

what is Reference Modification?
Back to top
View user's profile Send private message

William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3158
Location: Tucson AZ

PostPosted: Sat Dec 30, 2006 1:56 pm    Post subject: Re: Reference Modification
Reply with quote

abhijit.kapse wrote:
wh is refrance odification?
Well, you are in the correct forum, why didn't you save yourself time and look at the FM: COBOL Language Reference
which says:
Quote:
Reference modification defines a data item by specifying a leftmost character and
optional length for the data item.
Back to top
View user's profile Send private message
PeD

Active User


Joined: 26 Nov 2005
Posts: 456
Location: Belgium

PostPosted: Sat Dec 30, 2006 2:03 pm    Post subject:
Reply with quote

Quote:
wh is refrance odification?


i.e. http://publib.boulder.ibm.com/infocenter/pdthelp/v1r1/index.jsp?topic=/com.ibm.entcobol3.doc/rlrefmod.htm

http://www.fluffycat.com/COBOL/Reference-Modification/
etc etc etc

PS : it is a question of respect to try to write correctly ( and is not typo affair ).

Note for me : and I though new generation was more able to use new technology !!
Back to top
View user's profile Send private message
Selvamani

New User


Joined: 19 Dec 2006
Posts: 21
Location: California

PostPosted: Sun Dec 31, 2006 1:41 pm    Post subject:
Reply with quote

Code:

01 EMP-NAME PIC X(10)
01 L-EMP-NAME  PIC X(4)

 MOVE "ABCDEFGHIJ" TO EMP-NAME
 MOVE EMP-NAME(6:4) TO L-EMP-NAME
 
 DISPLAY L-EMP-NAME

Result:
FGHI
 


This is an example of how reference modification is used in COBOL.
Back to top
View user's profile Send private message
BalakrishnaTekula

New User


Joined: 28 Dec 2006
Posts: 1
Location: Chennai

PostPosted: Mon Jan 01, 2007 4:18 pm    Post subject:
Reply with quote

Hi,
Pls read Roy & Dastidhar book ,
u wilget full info about Ref Modifi.

by using this we can get retriv some part of string
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3158
Location: Tucson AZ

PostPosted: Mon Jan 01, 2007 4:36 pm    Post subject:
Reply with quote

BalakrishnaTekula wrote:
How can we identified whether a perticular step is abbend, that is if the job has multipls spets and how can we analyse to solve that problem
First off, is this a question or a signature?
Second off, read Forum Rules, i.e., if it is a question, next time start a new thread.
Thirdly, when an abend occurs, the log tells you in what job and which jobstep the abend occured.
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 IEW2456E error when link-editing a C ... Senthilraj JCL & VSAM 0 Fri Oct 13, 2017 3:12 pm
No new posts Assembler Macro Copybook converted to... Ziquilix PL/I & Assembler 4 Tue Sep 26, 2017 3:07 am
This topic is locked: you cannot edit posts or make replies. Extract all "IF" Statements... Adarsh Damodaran CLIST & REXX 1 Wed Sep 06, 2017 9:28 am
No new posts ALPHABETIC check in COBOL vidyaa COBOL Programming 8 Thu Aug 17, 2017 7:13 pm
No new posts XML Parse for COBOL 5.2 Bhanu Praveen COBOL Programming 1 Sat Jul 08, 2017 8:58 pm

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