CLIST & REXX :: RE: REXX to view the PGM or PROC

June 19, 2017, 1:13 pm

≫ Next: CLIST & REXX :: RE: REXX to view the PGM or PROC

≪ Previous: CLIST & REXX :: RE: REXX to view the PGM or PROC

$

0

0

Author: enrico-sorichetti
Subject: Reply to: REXX to view the PGM or PROC
Posted: Tue Jun 20, 2017 1:43 am (GMT 5.5)

and what do You expect to see/understand when browsing a load module?

while it is easy to extract whatever token You might want using an edit macro

finding the target of an exec it will not be easy ...
a program might reside in a steplib/joblib dsname or anywhere in the lnklist concatenation

and a proc will be somewhere in the proclib concatention of the JES procedure
or in a PROCxxx referred dsname
_________________
cheers
enrico
When I tell somebody to RTFM or STFW I usually have the page open in another tab/window of my browser,
so that I am sure that the information requested can be reached with a very small effort

---

CLIST & REXX :: RE: REXX to view the PGM or PROC

June 19, 2017, 2:57 pm

≫ Next: COBOL Programming :: RE: Validate if a Value from the file is numeric

≪ Previous: CLIST & REXX :: RE: REXX to view the PGM or PROC

$

0

0

Author: Robert Sample
Subject: Reply to: REXX to view the PGM or PROC
Posted: Tue Jun 20, 2017 3:27 am (GMT 5.5)

When you view a PGM you are looking at the load module. And a load module looks like:

Code:

BROWSE    RLS.PROGRAM.LOAD(MF0016)                   Line 00000001 Col 001 080  Command ===>                                                  Scroll ===> CSR  IEWPLMH ...Ì......µ............Ì...........ð...........m...h................... CCEDDDC40007000000A0000000000007000100000008000000000009000800000001000200000004 9567348000083000000000080100000800040200000C00080300000400080400001C000405000010  ------------------------------------------------------------------------------ Ã¥00..CEE.......Çå00.°Ö}. .0.qÕ0................Ö...µ...*...^................ì0C. 4FF10CCC000300064FF09ED041F29EF30F0000000003000E000A0005000B00020000000100005FC1 70041355002000C870010C0C10048F047F000000001800DC00C0000C0000000400E400880000803C  ------------------------------------------------------------------------------ åø°æì00.ì\B½ß0ÕÐåØk>n.BÞåØj© .µ.ì.}.ì.}.ì.B4ì...ì.. ..åØj.j...åøj.j ..åØjømÙ{.ì\ 47995FF15ECB5FEA489690CA489B42A150D151D153CF5331533413489090304790943048979FC05E 700C8000802890FC702E552E701410088004800880248008800023701418097014100970104D0280  ------------------------------------------------------------------------------ C_WSA           ............14343511...*... .................................... C6EEC44444444444000000000000FFFFFFFF00050004000000000000000000000000000000000000 3D6210000000000000000000000014343511000C0090000640000000000000000000000000000000  ------------------------------------------------------------------------------ Ø...Ø...............................................SDSD................Ø...Ø... 8000800000000000000000000000000000000000000000000000ECEC000000000000000080008000 000D000D00000000000000000000000000000000010100000000242400000000030400000006000D

So, as you were asked, precisely what do you think you will gain by looking at this?
_________________
TANSTAAFL

The first rule of code reuse is that the code needs to be worth re-using.

"We should forget about small efficiencies, say about 97% of the time: premature optimization is the root of all evil." -- Donald Knuth

COBOL Programming :: RE: Validate if a Value from the file is numeric

June 19, 2017, 9:18 pm

≫ Next: COBOL Programming :: RE: Validate if a Value from the file is numeric

≪ Previous: CLIST & REXX :: RE: REXX to view the PGM or PROC

$

0

0

Author: balacsv2
Posted: Tue Jun 20, 2017 9:48 am (GMT 5.5)

Thanks a lot for the response ! Yes ,I tried using FUNCTION NUMVAL for converting but there are chances that it may cause an abend incase of an invalid data.
Looking at the options would you think using a special names to be better?

CLASS VALID-NUM IS "0" THRU "9"
"."
_________________
Bala V

COBOL Programming :: RE: Validate if a Value from the file is numeric

June 19, 2017, 10:14 pm

≫ Next: COBOL Programming :: RE: Validate if a Value from the file is numeric

≪ Previous: COBOL Programming :: RE: Validate if a Value from the file is numeric

$

0

0

Author: Robert Sample
Posted: Tue Jun 20, 2017 10:44 am (GMT 5.5)

If the value can have a sign, you would need to add '+' and '-' to the user-defined class. Properly defined, that is one way to validate your data.
_________________
TANSTAAFL

The first rule of code reuse is that the code needs to be worth re-using.

"We should forget about small efficiencies, say about 97% of the time: premature optimization is the root of all evil." -- Donald Knuth

COBOL Programming :: RE: Validate if a Value from the file is numeric

June 20, 2017, 1:03 am

≫ Next: CLIST & REXX :: RE: REXX to view the PGM or PROC

≪ Previous: COBOL Programming :: RE: Validate if a Value from the file is numeric

$

0

0

Author: balacsv2
Posted: Tue Jun 20, 2017 1:33 pm (GMT 5.5)

Since the Value we receive is a Percentage field there are no chances of us getting signed values .We could get spaces but I am REPLACING LEADING SPACES BY ZEROES and only then am checking for VALID-NUM .I tried testing it and it seems to be fine..

Thanks a lot for helping me out !
_________________
Bala V

CLIST & REXX :: RE: REXX to view the PGM or PROC

June 20, 2017, 6:00 am

≫ Next: TSO/ISPF :: FTP xls file from Mainfrmae

≪ Previous: COBOL Programming :: RE: Validate if a Value from the file is numeric

$

0

0

Author: jackzhang75
Posted: Tue Jun 20, 2017 6:30 pm (GMT 5.5)

Thank you for the answer!

Yes, this is the program is somebody wrote in our place but he is retired and currently this feature is not working so i am looking at this rexx couldnt find the actually logic to load the PROC or PGM. I think the developer would like to see the load module or PROC.

TSO/ISPF :: FTP xls file from Mainfrmae

June 20, 2017, 6:26 am

≫ Next: CLIST & REXX :: RE: REXX to view the PGM or PROC

≪ Previous: CLIST & REXX :: RE: REXX to view the PGM or PROC

$

0

0

Author: kumarsatheeshc1
Subject: FTP xls file from Mainfrmae
Posted: Tue Jun 20, 2017 6:56 pm (GMT 5.5)

Hi!

When I tried to ftp mainframe file to remote as xls file, the xls file name and sheet name(Tabs in excel) are having the same name.


I want the sheet name is different from xls file name. Is there a way in mainframe to send the xls file with different sheet name.
_________________
Kumar

CLIST & REXX :: RE: REXX to view the PGM or PROC

June 20, 2017, 6:35 am

≫ Next: TSO/ISPF :: RE: FTP xls file from Mainfrmae

≪ Previous: TSO/ISPF :: FTP xls file from Mainfrmae

$

0

0

Author: enrico-sorichetti
Subject: Reply to: REXX to view the PGM or PROC
Posted: Tue Jun 20, 2017 7:05 pm (GMT 5.5)

Quote:

he is retired and currently this feature is not working

why not try to find the source ???
_________________
cheers
enrico
When I tell somebody to RTFM or STFW I usually have the page open in another tab/window of my browser,
so that I am sure that the information requested can be reached with a very small effort

---

TSO/ISPF :: RE: FTP xls file from Mainfrmae

June 20, 2017, 6:38 am

≫ Next: TSO/ISPF :: RE: FTP xls file from Mainfrmae

≪ Previous: CLIST & REXX :: RE: REXX to view the PGM or PROC

$

0

0

Author: Robert Sample
Subject: Reply to: FTP xls file from Mainfrmae
Posted: Tue Jun 20, 2017 7:08 pm (GMT 5.5)

Are you using a product on the mainframe to generate the .xls? If so, contact the vendor of that product and work with them. If not, you'll have to explain a LOT more about your process -- such as how you generate the .xls on the mainframe and what transfer method you are using to get it to the remote system (for starters).
_________________
TANSTAAFL

The first rule of code reuse is that the code needs to be worth re-using.

"We should forget about small efficiencies, say about 97% of the time: premature optimization is the root of all evil." -- Donald Knuth

TSO/ISPF :: RE: FTP xls file from Mainfrmae

June 20, 2017, 6:44 am

≫ Next: TSO/ISPF :: RE: FTP xls file from Mainfrmae

≪ Previous: TSO/ISPF :: RE: FTP xls file from Mainfrmae

$

0

0

Author: kumarsatheeshc1
Subject: Reply to: FTP xls file from Mainfrmae
Posted: Tue Jun 20, 2017 7:14 pm (GMT 5.5)

I am using the JCL utility FTP(PGM=FTP) to transfer the file to remote. The mainframe file is tab delimited file and the data is transferred successfully and only the issue excel assign sheet name as xls file name.
_________________
Kumar

TSO/ISPF :: RE: FTP xls file from Mainfrmae

June 20, 2017, 6:57 am

≫ Next: TSO/ISPF :: RE: FTP xls file from Mainfrmae

≪ Previous: TSO/ISPF :: RE: FTP xls file from Mainfrmae

$

0

0

Author: Robert Sample
Posted: Tue Jun 20, 2017 7:27 pm (GMT 5.5)

This is NOT a mainframe question. You need to find an Excel forum and ask your question there. We focus only on mainframe issues.
_________________
TANSTAAFL

The first rule of code reuse is that the code needs to be worth re-using.

"We should forget about small efficiencies, say about 97% of the time: premature optimization is the root of all evil." -- Donald Knuth

TSO/ISPF :: RE: FTP xls file from Mainfrmae

June 20, 2017, 7:01 am

≫ Next: COBOL Programming :: RE: Validate if a Value from the file is numeric

≪ Previous: TSO/ISPF :: RE: FTP xls file from Mainfrmae

$

0

0

Author: kumarsatheeshc1
Subject: Reply to: FTP xls file from Mainfrmae
Posted: Tue Jun 20, 2017 7:31 pm (GMT 5.5)

My question is that is there a way on mainframe to specify excel sheet name(tab name) while transfer file from mainframe to remote.
_________________
Kumar

COBOL Programming :: RE: Validate if a Value from the file is numeric

June 20, 2017, 7:35 am

≫ Next: TSO/ISPF :: RE: FTP xls file from Mainfrmae

≪ Previous: TSO/ISPF :: RE: FTP xls file from Mainfrmae

$

0

0

Author: prino
Posted: Tue Jun 20, 2017 8:05 pm (GMT 5.5)

Much better solution: Tell the other vendor that sending invalid data will incur huge processing surcharges! It's totally ridiculous that you have to cater for their incompetence!
_________________
Robert AH Prins
robert.ah.prins @ the.17+Gb.Google thingy
At last, a tiny bit of programming here...

TSO/ISPF :: RE: FTP xls file from Mainfrmae

June 20, 2017, 7:40 am

≫ Next: COBOL Programming :: RE: Validate if a Value from the file is numeric

≪ Previous: COBOL Programming :: RE: Validate if a Value from the file is numeric

$

0

0

Author: Marso
Subject: Re: Reply to: FTP xls file from Mainfrmae
Posted: Tue Jun 20, 2017 8:10 pm (GMT 5.5)

kumarsatheeshc1 wrote:

...The mainframe file is tab delimited file...

In that case, it is NOT an "xls" file, it is a simple text file, built in such a way that Excel can understand it.
There is no way to give a name to the worksheet because there is no worksheet in the text file.

COBOL Programming :: RE: Validate if a Value from the file is numeric

June 20, 2017, 8:07 am

≫ Next: CLIST & REXX :: RE: REXX to view the PGM or PROC

≪ Previous: TSO/ISPF :: RE: FTP xls file from Mainfrmae

$

0

0

Author: Marso
Posted: Tue Jun 20, 2017 8:37 pm (GMT 5.5)

I Use

balacsv2 wrote:

CLASS VALID-NUM IS "0" THRU "9""."

and it works 99.9% of the time (that is, until I receive a number like "9.9.9").

I would not bother doing more than this basic validation.

---

CLIST & REXX :: RE: REXX to view the PGM or PROC

June 20, 2017, 8:37 am

≫ Next: COBOL Programming :: RE: Validate if a Value from the file is numeric

≪ Previous: COBOL Programming :: RE: Validate if a Value from the file is numeric

$

0

0

Author: Pedro
Subject: Reply to: REXX to view the PGM or PROC
Posted: Tue Jun 20, 2017 9:07 pm (GMT 5.5)

Quote:

so i am looking at this rexx couldnt find the actually logic to load the PROC or PGM

You need to turn on a rexx trace... find where the BROWSE service is invoked and work your way backwards to where the name of data set being browsed was set.
_________________
Pedro Vera

COBOL Programming :: RE: Validate if a Value from the file is numeric

June 20, 2017, 8:54 am

≫ Next: CLIST & REXX :: RE: REXX to view the PGM or PROC

≪ Previous: CLIST & REXX :: RE: REXX to view the PGM or PROC

$

0

0

Author: Rohit Umarjikar
Posted: Tue Jun 20, 2017 9:24 pm (GMT 5.5)

Quote:

but the IF WS-PERCENT IS NUMERIC check is failing

Unstring them into two variables delimited by '.' and perform NUMERIC check individually.
_________________
Regards,
Rohit Umarjikar
"Knowledge is knowing that a tomato is a fruit, but Wisdom is knowing not to put it in a fruit salad."

CLIST & REXX :: RE: REXX to view the PGM or PROC

June 20, 2017, 5:46 pm

≫ Next: COBOL Programming :: RE: Validate if a Value from the file is numeric

≪ Previous: COBOL Programming :: RE: Validate if a Value from the file is numeric

$

0

0

Author: steve-myers
Posted: Wed Jun 21, 2017 6:16 am (GMT 5.5)

The "logic" to load and run a load module or program object is part of the operating system. No part of it is in a load module or program object.

A tiny part of the logic to transition between phases of a planned overlay load module is included in the root phase of a planned overlay load module. A trained programmer might recognize this fragment.

COBOL Programming :: RE: Validate if a Value from the file is numeric

June 20, 2017, 10:58 pm

≫ Next: CA Products :: RE: Easytrive Redefine

≪ Previous: CLIST & REXX :: RE: REXX to view the PGM or PROC

$

0

0

Author: balacsv2
Posted: Wed Jun 21, 2017 11:28 am (GMT 5.5)

Thanks a lot everyone..I handled it using one of the options as mentioned above using SPECIAL NAMES and it's working fine
_________________
Bala V

CA Products :: RE: Easytrive Redefine

June 20, 2017, 11:21 pm

≫ Next: CICS :: CICS Transaction attach count of supplied transaction.

≪ Previous: COBOL Programming :: RE: Validate if a Value from the file is numeric

$

0

0

Author: vidyaa
Posted: Wed Jun 21, 2017 11:51 am (GMT 5.5)

How to concatenate two fields in esytrive
_________________
Thanks & Regards,
Vidya