Quantcast
Channel: IBM Mainframe Computers Forums
Viewing all articles
Browse latest Browse all 8500

CLIST & REXX :: Overriding PS data in rexx

$
0
0
Author: Shaheen Shaik
Subject: Overriding PS data in rexx
Posted: Fri Mar 03, 2017 5:08 pm (GMT 5.5)

Hi
Can anyone please help me here. I am a beginner in rexx.
I have used the below code to read data from PS file to prepopulate my panel
Code:
 ADDRESS TSO "ALLOC DD(REFFIL) DA('"PREVIN"') SHR"
 ADDRESS TSO "EXECIO * DISKR REFFIL (FINIS STEM REF."
 ADDRESS TSO "FREE DD(REFFIL)"
 PARSE VAR REF.1 VAR1 VAR2 VAR3 VAR4
 MODULE = VAR1
 NEWDSN = VAR2
 OLDDSN = VAR3
 END

when the user enters the panel this info will be displayed and he can change it to his choice
Now I want to override the data in the PS with what ever he enters here(his choice) so that next time if the same user into panel last entered data has to be populated

Data in the PS file I gave as
xxxxx hsjdhakdh ahdjkahdf


Viewing all articles
Browse latest Browse all 8500

Trending Articles