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

TSO/ISPF :: RE: Historical/statistical details for members in a PDS?

August 30, 2017, 8:59 am
$
0
0
Author: Pedro
Subject: Reply to: Historical/statistical details for members in a PDS?
Posted: Wed Aug 30, 2017 9:29 pm (GMT 5.5)

From the help:

Code:
Number of lines in the current member that have
been added or changed (have a non-zero mod level)


FYI. you need to experiment some, but the line number is changed for any lines that are edited. the line number will have a suffix that corresponds to the 'mod' level.
_________________
Pedro Vera
↧
Search

TSO/ISPF :: RE: Historical/statistical details for members in a PDS?

August 30, 2017, 9:07 am
$
0
0
Author: elixir1986
Posted: Wed Aug 30, 2017 9:37 pm (GMT 5.5)

I tried to EDIT the member(change existing and add a new line). I am not sure about what is non-zero mod level.

After saving the change, I do not see any change in the Mod parameter, i.e. it is still "0" whereas the MM got incremented by 1 & no change in VV either.
↧
↧

TSO/ISPF :: RE: Historical/statistical details for members in a PDS?

August 30, 2017, 9:15 am
$
0
0
Author: steve-myers
Posted: Wed Aug 30, 2017 9:45 pm (GMT 5.5)

This is ISPF stats. Been around since the 1970s and SPF version 1. Version (VV) is sort of arbitrary. Starts at 1 and can be changed via 3.5. Mod (MM) updates with each use of the member; basically means nothing useful. MOD as in lines modified (or something like that) also seems - to me -- to be meaningless and useless. Several years ago I wrote a line mode command to list PDS members.
Code:
-MEMBER- --TTRC-- VV MM -IDATE- -IRECS- -MDATE- -MTIME--  -RECS- -USER-
ADDSTATS 0001010F 01.00 01SEP13     299 01SEP13 11:33:41     299 XXXXXX
ASTATS   0003010F 01.02 16MAY13     504 12JUL13 14:29:26     524 XXXXXX
Notice I didn't format MOD, mostly because I wanted this to fit on a line and the extra 8 bytes (a blank and 7 digits to support extended stats) was too much. Partly it's related to my style. I don't use PDS for development because of the data management issues. Lots of saves, and all of us know what that means for data management. If I'm going to fiddle with ADDSTATS, for example, I copy it to sequential and update the sequential data set. When I'm done I delete the PDS member and start a new member by copying the sequential data set to the PDS.
↧

DFSORT/ICETOOL :: Updating the Trailer count in variable Record Format dataset

August 30, 2017, 9:19 am
$
0
0
Author: satheshbabur
Subject: Updating the Trailer count in variable Record Format dataset
Posted: Wed Aug 30, 2017 9:49 pm (GMT 5.5)

Hello,
I need solution for the below requirement in the DFSORT or ICEMAN.

The dataset is VB format of LRECL=3000

The record is in below format of hexadecimal values.
Code:

00000
0F00F
- Header Record
Code:

ABCD12345
WEWR1234
ABCD12345
JJHHD1234
...........
- data record
Code:

99999004
9F99F00C
- Trailer Record - With record count as 4 in packed decimal format at position 6

My Requirement is to remove both duplicate records 'ABCD12345' from the dataset and update the trailer record With record count as '2'.

Kindly provide sort JCL to solve.

Coded
_________________
Sathesh
↧

DFSORT/ICETOOL :: RE: Updating the Trailer count in variable Record Format dataset

August 30, 2017, 9:26 am
$
0
0
Author: Akatsukami
Posted: Wed Aug 30, 2017 9:56 pm (GMT 5.5)

Kindly provide standard billing rates to write JCL and control cards.
_________________
Data is not information.
Information is not knowledge.
Knowledge is not wisdom.
↧
↧

CICS :: Julian Date to CICS ABSTTIME

August 30, 2017, 10:45 am
$
0
0
Author: blayek
Subject: Julian Date to CICS ABSTTIME
Posted: Wed Aug 30, 2017 11:15 pm (GMT 5.5)

Hi,

Is there any way I can convert a Julian Date(in YYYYDDD format) to CICS Abstime format? Let's assume Julian date hours to be taken as 00:00:00.

I know we can do the opposite like getting Julian Date from ABSTTIME using FORMATTIME functions.

Please help.

Thanks,
_________________
Bhola
↧

CICS :: RE: Julian Date to CICS ABSTTIME

August 30, 2017, 11:14 am
↧

CICS :: RE: Julian Date to CICS ABSTTIME

August 30, 2017, 11:55 am
$
0
0
Author: Robert Sample
Subject: Reply to: Julian Date to CICS ABSTTIME
Posted: Thu Aug 31, 2017 12:25 am (GMT 5.5)

I would find the ABSTIME for a fixed date (say 2017001) and then you can add (or subtract) the appropriate number of milliseconds for each day offset from your reference date. Depending upon how sophisticated you want to get, you may adjust for daylight savings time appropriately.
_________________
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
↧
Search

CICS :: RE: Julian Date to CICS ABSTTIME

August 30, 2017, 11:59 am
$
0
0
Author: Akatsukami
Posted: Thu Aug 31, 2017 12:29 am (GMT 5.5)

Bhola, you ought to be able to convert your date to an acceptable format by using the LE functions CEEDAYS and CEEDATE.
_________________
Data is not information.
Information is not knowledge.
Knowledge is not wisdom.
↧
↧

DFSORT/ICETOOL :: RE: Updating the Trailer count in variable Record Format dataset

August 30, 2017, 12:26 pm
$
0
0
Author: sergeyken
Posted: Thu Aug 31, 2017 12:56 am (GMT 5.5)

Recommended activity:

1. RTFM
2. Create "Sort JCL" as you understand it
3. Try to run it
4. Analyze error messages (if any)
5. Fix the problems discovered
6. Present your code, and results to the forum, and ask for help
_________________
Tyrannosaurus-REXX
↧

TSO/ISPF :: RE: Historical/statistical details for members in a PDS?

August 30, 2017, 12:29 pm
$
0
0
Author: elixir1986
Posted: Thu Aug 31, 2017 12:59 am (GMT 5.5)

I came to know that the MOD is related to version control tool at my shop.
Ex: Say I modified 500 lines and moved the element into PDS thru version control tool, MOD shall reflect 500.

My question still is - how does VERSION level number (VV) change?
↧

TSO/ISPF :: RE: Historical/statistical details for members in a PDS?

August 30, 2017, 12:36 pm
$
0
0
Author: Akatsukami
Posted: Thu Aug 31, 2017 1:06 am (GMT 5.5)

In my experience it must be changed manually.
_________________
Data is not information.
Information is not knowledge.
Knowledge is not wisdom.
↧

TSO/ISPF :: RE: Historical/statistical details for members in a PDS?

August 30, 2017, 12:37 pm
$
0
0
Author: sergeyken
Posted: Thu Aug 31, 2017 1:07 am (GMT 5.5)

AFAIR the field MOD is maintained by ISPF only when member lines are numbered in standard manner?

First RENUM command fills all positions 73-80 with 'NNNN0001' where '0001' stands for "change counter", and increased by 1 after any change of every single line. Looks like MOD value is produced as sum of all 4-digit change counters of all lines. So, after some lines are deleted, the MOD value decreases in accordance with this sum!

I'm lazy to verify this. Agree that nowadays it is meaningless, and useless.
_________________
Tyrannosaurus-REXX
↧
↧

TSO/ISPF :: RE: Historical/statistical details for members in a PDS?

August 30, 2017, 12:41 pm
$
0
0
Author: Robert Sample
Posted: Thu Aug 31, 2017 1:11 am (GMT 5.5)

From the ISPF User's Guide Volume 1 :
Quote:
VV.MM
Version number and modification level. The version number is set to 1 and
the modification level is set to 0 when the member is created. The
modification level is the number of times this version has been modified.
For example, 02.15 means version 2, modification 15.
If a member name is just an alternate name for another member, ALIAS
appears in this field.
The VV changes when you (or someone working at your site) goes into the appropriate ISPF screen and manually updates the VV. It otherwise stays at 01 as the quote indicates.
_________________
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: Historical/statistical details for members in a PDS?

August 30, 2017, 1:57 pm
$
0
0
Author: steve-myers
Posted: Thu Aug 31, 2017 2:27 am (GMT 5.5)

sergeyken wrote:
AFAIR the field MOD is maintained by ISPF only when member lines are numbered in standard manner?

First RENUM command fills all positions 73-80 with 'NNNN0001' where '0001' stands for "change counter", and increased by 1 after any change of every single line. Looks like MOD value is produced as sum of all 4-digit change counters of all lines. So, after some lines are deleted, the MOD value decreases in accordance with this sum!

I'm lazy to verify this. Agree that nowadays it is meaningless, and useless.

No. mm increases by 1 each time the member is edited. ISPF never reduces mm on its own.
↧
Search

DFSORT/ICETOOL :: RE: Updating the Trailer count in variable Record Format dataset

August 30, 2017, 3:30 pm
$
0
0
Author: Nic Clouston
Posted: Thu Aug 31, 2017 4:00 am (GMT 5.5)

Note that sort JCL is specified in the manual and is pretty clear:
Code:
jobcard
//STEP   EXEC PGM=DFSORT
//SYSOUT


etc, etc
But why should I repeat what is in the manual?
Presumably you know the sort control statements that you need as you did not ask about them (they are not JCL).
_________________
Regards
Nic
↧

Mainframe Interview Questions :: Confusion b/w index and subscript

August 30, 2017, 6:20 pm
$
0
0
Author: Deepak kumar25
Subject: Confusion b/w index and subscript
Posted: Thu Aug 31, 2017 6:50 am (GMT 5.5)

Hi Everyone,

Recently, I faced a interview in which panel they asked me why we use subscript and index to access table. Then i answered index is faster than subscript and she said if index is faster than subscript then why we use subscript. I answered when we use subscript in our program to access table then it internally converted to index to access data that is why indexing is more preferred than subscript.

Folks,Please give your views on this topic.

Thanks
↧
↧

SYNCSORT :: Question related to Data dictionary feature

August 30, 2017, 6:53 pm
$
0
0
Author: rexx77
Subject: Question related to Data dictionary feature
Posted: Thu Aug 31, 2017 7:23 am (GMT 5.5)

Hi Folks,

I am trying to use SYNCSORT Data dictionary feature , as my upstream files are created with meta attributes information . I am trying to extract the required fields using the column names available in SYMNAMES DD.

SYMNAMES Definition:
Code:

Asset_name,1,50,CH
Field1,51,32,ZD
Field2,*,5000,CH
Field3,*,10,CH


Sort statement is like below:
Code:

SORT FIELDS =(Asset name, A)
OUTREC FIELDS=(Asset_Name, 10X, Field1,10X,Field2,Field3)


1. Field 1 in input file is 32 length and ZD format, i want to convert that to 14 Packed decimal in the output. Do you know how to specify the conversion while mentioning the outrec fields
2. Field2 is around 5000 length and CHAR field. I want to extract first 100 characters from this field. How to do this?

Appreciate your inputs.
↧

Mainframe Interview Questions :: RE: Confusion b/w index and subscript

August 30, 2017, 7:32 pm
$
0
0
Author: Robert Sample
Subject: Reply to: Confusion b/w index and subscript
Posted: Thu Aug 31, 2017 8:02 am (GMT 5.5)

A subscript is declared in WORKING-STORAGE whereas an index exists outside of WORKING-STORAGE. A subscript can be in a DISPLAY statement while an index cannot. Normal arithmetic verbs such as ADD, SUBTRACT, COMPUTE can be used with subscripts whereas an index can only be modified through SET, PERFORM, SEARCH. Yes, subscripts are slower but if you need to debug your program being able to DISPLAY the value is handy.
_________________
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
↧

Mainframe Interview Questions :: RE: Confusion b/w index and subscript

August 30, 2017, 8:41 pm
$
0
0
Author: Deepak kumar25
Subject: Reply to: Confusion b/w index and subscript
Posted: Thu Aug 31, 2017 9:11 am (GMT 5.5)

Thanks Robert for your quick response.
But she was asking that when we have subscript in cobol then what is need of index.
Yes, I do agree that subscript is occurrence and index is displacement from begning.
But why we have both in cobol to access table.
Folks, Please give me suggestions on it.

Thanks
↧
Viewing all 8500 articles
Browse latest View live
Search