IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

varchar data item


IBM Mainframe Forums -> DB2
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Ambili S

Active User


Joined: 06 Sep 2007
Posts: 112
Location: India

PostPosted: Mon Sep 20, 2010 8:52 pm
Reply with quote

For a varchar data item , the following declaration is used.

01 A.
49 ws-len pic s9(4) comp.
49 ws-text pic x(3).

my query is how does ws-len get the value ? is it passed via parm in jcl , or do we pass it in cobol pgm ?

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

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Mon Sep 20, 2010 9:03 pm
Reply with quote

when the var char column is to be updated or inserted via sql,
the length must be populated prior to execution of the sql.

DB2 will populate the length during a Select operation.
Back to top
View user's profile Send private message
Ambili S

Active User


Joined: 06 Sep 2007
Posts: 112
Location: India

PostPosted: Mon Sep 20, 2010 10:41 pm
Reply with quote

Yes for DB2 it's as you said . But in simple COBOL pgm for a varchar declaration , how would the length be populated ?
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


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

PostPosted: Mon Sep 20, 2010 10:46 pm
Reply with quote

Hello,

If level 49 is used, it is a db2 item (unless some mistake has been made).

The way a working-storage field of varying length is defined is usually with an OCCURS DEPENDING ON.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> DB2

 


Similar Topics
Topic Forum Replies
No new posts How to save SYSLOG as text data via P... All Other Mainframe Topics 4
No new posts Store the data for fixed length COBOL Programming 1
No new posts Data set Rec-Cnt and Byte-Cnt Testing & Performance 2
No new posts SCOPE PENDING option -check data DB2 2
No new posts Check data with Exception Table DB2 0
Search our Forums:

Back to Top