Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations derfloh on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
-
Interpret with "IF THEN DO END"
HI Again "partly" right :-) , but.. I need to save these CNT_values so I can check them again incase this error situation happens again. This save is done in an AFO-pool (in a Coupling Facility Structure), and 1. it is not possible to use STEM-Vars there. ( the instr. used is a... -
Interpret with "IF THEN DO END"
Morning Frank, Agree, it is a bit shorter, but its only to check the name . What I need is, to have a counter for each member within the group specified. Like Cnt_P2WA Cnt_WD6S etc etc Your solution does not handle this problem. The Interpret I use sets up a variable "CNT_Name" for each... -
Interpret with "IF THEN DO END"
Hi Frank The Storage-pool-Names (in the first IF) is quite long. Doing it this way, I need to code everything in the first DO-END only once. Othewise I needed to do multiple IFs or "SELECT" + multiple WHENs. Beside that, it is also a lot easier to add an additional pool-name. Of course... -
Interpret with "IF THEN DO END"
Hi Frank, the supplied REXX was just a sample. The real rexx is an AF/OPERATOR rexx that Traps the MSG : IGD17272I VOLUME SELECTION HAS FAILED FOR INSUFFICIENT SPACE FOR DATA SET PDB2DBS.PDB2KAT3.SYSCOPYI JOBNAME (PMDBKAT3) STEPNAME (STEP02 )... -
Interpret with "IF THEN DO END"
HI Thanks for the answer. [medal] Adding the ";" did the job StgGrp = 'P2WA' Cnt_P2WA = 11 Interpret "IF Cnt_"StgGrp" > 10 THEN" , "DO ;" , "SAY Cnt_"StgGrp ";" , "SAY Cnt_"StgGrp ";" ... -
Interpret with "IF THEN DO END"
Hello I am trying the following Rexx : TRACE R STGGrp = 'P2WA' CNT_P2WA = 11 Interpret "IF CNT_"StgGrp" > 10 THEN" ...
