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 Sorting of hex values Saurabh_mi DFSORT/ICETOOL 11 Thu May 25, 2017 3:49 pm
No new posts Replace values in the input data Vikas Maharnawar DFSORT/ICETOOL 10 Thu May 11, 2017 2:18 pm
No new posts Issue with NDM process to transmit ES... chetanambi All Other Mainframe Topics 6 Wed May 03, 2017 10:52 am
No new posts Group Data based on a key Arun Raj DFSORT/ICETOOL 7 Thu Apr 27, 2017 11:29 pm
No new posts unload data from table with lob columns farhad_evan DB2 0 Sat Apr 22, 2017 1:32 pm


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