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: 964
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: 964
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: 964
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: 964
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 copying data without knowing location arunsoods DFSORT/ICETOOL 6 Thu Jul 20, 2017 1:03 pm
This topic is locked: you cannot edit posts or make replies. Fetching data from BAI File arunsoods JCL & VSAM 1 Wed Jul 19, 2017 4:28 pm
No new posts Loading data to table gives wrong for... Raghu navaikulam DB2 18 Thu Jul 13, 2017 2:11 pm
No new posts SQL - select data available in index Nileshkul DB2 3 Mon Jun 26, 2017 1:30 am
No new posts NDM syntax checking without actually ... GAPX1 All Other Mainframe Topics 0 Wed Jun 07, 2017 2:36 am


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