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
 

 

how to transmit values from sysin in get data

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler
View previous topic :: :: View next topic  
Author Message
shivsingla
Warnings : 1

New User


Joined: 14 Jul 2006
Posts: 15
Location: New Delhi

PostPosted: Wed May 23, 2007 8:01 pm    Post subject: how to transmit values from sysin in get data
Reply with quote

hi all,

i have write,

GET DATA(A,B,C);

how to pass values in these varibales through sysin dd *


thanx in advance
Back to top
View user's profile Send private message

Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Tue May 29, 2007 2:54 pm    Post subject:
Reply with quote

Declare sysin as a file; open it input; read into a record which has a structure based at it; finally close it.[/code]
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Tue May 29, 2007 2:57 pm    Post subject:
Reply with quote

or.........read the fine manual and find all about GET like this
Back to top
View user's profile Send private message
Phrzby Phil

Active Member


Joined: 31 Oct 2006
Posts: 962
Location: Richmond, Virginia

PostPosted: Tue May 29, 2007 5:20 pm    Post subject:
Reply with quote

I think GET DATA reads input like a stream, not records with structure.
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Tue May 29, 2007 11:59 pm    Post subject:
Reply with quote

Phrzby Phil wrote:
I think GET DATA reads input like a stream, not records with structure.


Still......based(addr)
Back to top
View user's profile Send private message
Phrzby Phil

Active Member


Joined: 31 Oct 2006
Posts: 962
Location: Richmond, Virginia

PostPosted: Wed May 30, 2007 12:38 am    Post subject:
Reply with quote

Less cryptically please? I've done over 16 years' PL/I, but not since 1995, so my gaps are widening.
Back to top
View user's profile Send private message
k_vikram07

New User


Joined: 23 Nov 2005
Posts: 35

PostPosted: Wed May 30, 2007 6:15 pm    Post subject:
Reply with quote

Hi.
Assign the values in SYSIN as a PL/1 assignment statements
eg: In SYSIN...

A='adbcd';
B=9;
C=23.21;

Hope u recollect!!

Bye
Vik.
Back to top
View user's profile Send private message
Phrzby Phil

Active Member


Joined: 31 Oct 2006
Posts: 962
Location: Richmond, Virginia

PostPosted: Wed May 30, 2007 8:02 pm    Post subject:
Reply with quote

Oh, I do remember this part - that's the beauty of the GET DATA.

What I don't understand is Bitneuker's comment: "Still......based(addr)"
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Thu May 31, 2007 1:48 am    Post subject:
Reply with quote

Compared to COBOL somthing like REDEFINE. Overlay a structure based at the address of the string.
Back to top
View user's profile Send private message
Phrzby Phil

Active Member


Joined: 31 Oct 2006
Posts: 962
Location: Richmond, Virginia

PostPosted: Thu May 31, 2007 1:50 am    Post subject:
Reply with quote

I don't know why one would want to do this with GET DATA input.
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Thu May 31, 2007 2:03 am    Post subject:
Reply with quote

The issue is that the stringstament GET is supposed to be stored in three different items. GET = streaming............
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 -> PL/I & Assembler 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 JES2 JEC: Use UNIX Pipes to Pass Data... Virendra Shambharkar JCL & VSAM 21 Tue Dec 20, 2016 6:55 pm
No new posts SQL query to run through list of valu... Ni3-db2 DB2 14 Wed Dec 14, 2016 9:52 am


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