Skip to content

Commit

Permalink
v6.3.0
Browse files Browse the repository at this point in the history 
------
Version 6.3.0  Nov 26, 2023
   - Panel changes
     PDSEGHHW - update for Orphan command
     PDSEGHN  - update for Orphan command
     PDSEGHOR - update for Orphan command
     PDSEGHPS - update for Orphan command
     PDSEGH0  - update for Orphan command
     PDSEGOPT - update for Orphan command
  • Loading branch information
@lbdyck
lbdyck committed Nov 26, 2023
1 parent 0d70a4f commit 3aac5bf
Show file tree
Hide file tree
Showing 15 changed files with 153 additions and 85 deletions.
4 changes: 2 additions & 2 deletions .zigi/PDSEGEN.EXEC
View file
Original file line number Diff line number Diff line change
Expand Up @@ -6,11 +6,11 @@ PDSEGDSL 20/07/25 22/06/03 1 66 11:18:55 502 492 0 PDSE
PDSEGEN 21/02/23 23/11/25 1 94 13:10:54 7056 6668 0 PDSE
PDSEGENC 16/07/18 22/11/10 1 99 10:16:32 869 867 0 PDSE
PDSEGENM 16/06/02 23/03/08 1 99 14:30:19 303 288 0 PDSE
PDSEGENS 16/06/27 23/11/25 1 65 13:11:09 185 63 0 PDSE
PDSEGENS 16/06/27 23/11/26 1 65 14:19:58 185 63 0 PDSE
PDSEGENX 16/06/20 21/11/25 1 19 12:24:00 41 41 0 PDSE
PDSEGFND 16/08/02 22/10/26 1 24 13:15:40 178 174 0 PDSE
PDSEGRST 17/09/22 21/02/23 1 23 02:07:00 391 391 0 PDSE
PDSEGVAL 16/08/01 17/11/06 1 9 10:01:00 133 133 0 PDSE
PDSEGVER 21/02/23 23/11/25 1 47 10:48:39 28 26 0 PDSE
PDSEGVER 21/02/23 23/11/26 1 48 13:57:08 29 26 0 PDSE
PG 16/06/24 17/06/14 1 1 12:01:00 3 3 0 PDSE
TRYIT 17/06/20 23/07/09 1 53 12:57:37 1079 1054 0 PDSE
15 changes: 8 additions & 7 deletions .zigi/PDSEGEN.PANELS
View file
Original file line number Diff line number Diff line change
Expand Up @@ -37,30 +37,31 @@ PDSEGFND 17/04/04 19/02/28 1 11 10:47:29 24 22 0 PDSE
PDSEGFP 19/08/13 19/08/13 1 0 08:07:01 19 19 0 PDSE
PDSEGHAG 01/12/12 19/12/11 1 61 09:30:18 24 55 0 PDSE
PDSEGHAT 17/01/18 17/12/27 1 26 12:59:00 32 23 0 PDSE
PDSEGHAU 21/02/24 23/11/25 1 44 10:50:35 44 42 0 PDSE
PDSEGHAU 21/02/24 23/11/26 1 45 14:13:33 44 42 0 PDSE
PDSEGHBE 17/08/18 18/04/25 1 23 12:59:00 42 33 0 PDSE
PDSEGHBJ 01/12/12 17/12/27 1 77 13:21:18 78 55 0 PDSE
PDSEGHBR 01/12/12 17/12/27 1 69 12:59:04 50 55 0 PDSE
PDSEGHC 01/12/12 19/08/13 1 72 08:36:36 92 55 0 PDSE
PDSEGHCG 21/02/24 23/11/25 1 58 10:51:14 356 846 0 PDSE
PDSEGHCG 21/02/24 23/11/26 1 59 14:14:40 365 846 0 PDSE
PDSEGHD 01/12/12 17/12/27 1 64 12:59:04 30 55 0 PDSE
PDSEGHDT 20/07/26 22/06/03 1 3 11:21:41 49 45 0 PDSE
PDSEGHEC 01/12/12 17/12/27 1 68 12:59:04 38 55 0 PDSE
PDSEGHF 01/12/12 19/08/19 1 67 08:40:40 53 55 0 PDSE
PDSEGHFS 01/12/12 19/08/06 1 71 08:40:29 42 55 0 PDSE
PDSEGHHW 17/10/11 18/04/25 1 19 12:59:20 38 25 0 PDSE
PDSEGHHW 17/10/11 23/11/26 1 20 13:58:49 38 25 0 PDSE
PDSEGHID 18/10/22 18/10/22 1 2 10:37:23 36 32 0 PDSE
PDSEGHLH 17/08/18 17/12/27 1 16 12:59:05 28 26 0 PDSE
PDSEGHLM 22/10/12 22/10/12 1 0 09:10:14 28 28 0 PDSE
PDSEGHLR 01/12/12 18/04/24 1 70 07:06:43 31 55 0 PDSE
PDSEGHM 01/12/12 17/12/27 1 66 12:59:05 29 55 0 PDSE
PDSEGHMD 17/11/27 21/11/24 1 20 14:11:53 42 33 0 PDSE
PDSEGHN 01/12/12 21/11/24 1 82 14:04:34 118 55 0 PDSE
PDSEGHN 01/12/12 23/11/26 1 84 13:41:25 120 55 0 PDSE
PDSEGHOP 17/12/26 17/12/27 1 15 12:59:06 35 31 0 PDSE
PDSEGHOR 23/11/26 23/11/26 1 0 13:56:29 37 37 0 PDSE
PDSEGHOU 17/06/14 18/04/10 1 17 11:33:20 37 29 0 PDSE
PDSEGHOV 18/03/23 18/03/30 1 10 10:00:43 100 42 0 PDSE
PDSEGHPD 16/08/19 17/12/27 1 24 12:59:06 40 54 0 PDSE
PDSEGHPS 17/11/22 23/03/14 1 31 16:31:43 109 78 0 PDSE
PDSEGHPS 17/11/22 23/11/26 1 32 13:42:17 110 78 0 PDSE
PDSEGHR 01/12/12 17/12/27 1 73 12:59:06 73 55 0 PDSE
PDSEGHRN 01/12/12 18/04/25 1 73 12:59:25 33 55 0 PDSE
PDSEGHRS 17/09/25 17/12/27 1 17 12:59:07 55 41 0 PDSE
Expand All @@ -71,7 +72,7 @@ PDSEGHTR 19/04/24 19/08/13 1 1 08:49:16 38 37 0 PDSE
PDSEGHU 01/12/12 19/08/13 1 83 11:39:05 39 55 0 PDSE
PDSEGHV 16/08/25 19/08/13 1 21 11:39:18 46 43 0 PDSE
PDSEGHX 01/12/12 17/12/27 1 63 12:59:07 30 55 0 PDSE
PDSEGH0 01/12/12 23/03/14 1 99 14:13:58 244 55 0 PDSE
PDSEGH0 01/12/12 23/11/26 1 99 13:56:31 249 55 0 PDSE
PDSEGH1 01/12/12 17/12/27 1 63 12:59:08 27 55 0 PDSE
PDSEGH10 01/12/12 17/12/27 1 60 12:59:08 25 55 0 PDSE
PDSEGH11 16/08/01 20/07/26 1 42 03:55:41 50 25 0 PDSE
Expand Down Expand Up @@ -100,7 +101,7 @@ PDSEGIMC 20/01/29 20/02/01 1 15 14:07:48 34 26 0 PDSE
PDSEGIMU 20/01/29 20/01/31 1 8 11:54:56 29 26 0 PDSE
PDSEGINF 17/01/24 18/04/25 1 53 12:59:59 26 31 0 PDSE
PDSEGMDL 17/11/27 21/12/22 1 19 10:13:00 50 33 0 PDSE
PDSEGOPT 17/12/26 22/10/12 1 52 09:02:49 162 48 0 PDSE
PDSEGOPT 17/12/26 23/11/26 1 53 13:38:48 165 48 0 PDSE
PDSEGPH 16/05/26 22/04/07 1 49 14:14:39 37 21 0 PDSE
PDSEGPR 16/07/20 19/02/28 1 19 10:47:55 19 17 0 PDSE
PDSEGPRC 16/05/27 19/02/28 1 37 10:48:09 17 16 0 PDSE
Expand Down
2 changes: 1 addition & 1 deletion .zigi/PDSEGEN.PDS
View file
Original file line number Diff line number Diff line change
@@ -1,5 +1,5 @@
$$$DOC 16/06/10 22/04/12 1 28 09:42:03 430 177 0 PDSE
$CHANGES 21/02/24 23/11/25 1 44 10:52:01 1957 1729 0 PDSE
$CHANGES 21/02/24 23/11/26 1 45 14:21:30 1966 1729 0 LBDYCK
$INSTALL 16/08/04 20/02/02 1 12 11:02:00 76 21 0 PDSE
$MODULES 16/08/05 18/03/19 1 4 10:52:00 63 48 0 PDSE
$MONITOR 19/11/01 19/11/01 1 0 06:35:00 11 11 0 PDSE
Expand Down
6 changes: 3 additions & 3 deletions .zigi/PDSEGEN.SAMPLE.BACKUP
View file
Original file line number Diff line number Diff line change
@@ -1,6 +1,6 @@
$ALLOC 23/11/25 23/11/25 1 0 13:11:12 1 1 0 PDSE
$BACKUP 23/11/25 23/11/25 1 0 13:11:12 40 40 0 PDSE
$INDEX 23/11/25 23/11/25 1 0 13:11:12 28 28 0 PDSE
$ALLOC 23/11/26 23/11/26 1 0 14:20:01 1 1 0 PDSE
$BACKUP 23/11/26 23/11/26 1 0 14:20:01 40 40 0 PDSE
$INDEX 23/11/26 23/11/26 1 0 14:20:01 28 28 0 PDSE
@0000001 16/08/15 16/08/15 1 3 08:22:00 18 11 0 PDSE
@0000002 16/08/15 18/03/20 1 5 06:20:00 18 11 0 PDSE
@0000003 16/08/15 18/03/20 1 5 06:26:00 18 11 0 PDSE
Expand Down
5 changes: 3 additions & 2 deletions PDSEGEN.EXEC/PDSEGVER
View file
Original file line number Diff line number Diff line change
@@ -1,5 +1,5 @@
/* -------------------- rexx procedure -------------------- */
ver = '6.2.9'
ver = '6.3.0'
return ver
/* Name: PDSEGVER |
| |
Expand All @@ -12,7 +12,8 @@
| Author: Lionel B. Dyck |
| |
| History: (most recent on top) |
| 11/25/23 - 6.2.9 - Reflect updates to package |
| 11/26/23 - 6.3.0 - Reflect updates to package |
| 11/26/23 - 6.3.0 - Reflect updates to package |
| 11/21/23 - 6.2.8 - Reflect updates to package |
| 07/09/23 - 6.2.7 - Reflect updates to package |
| 06/20/23 - 6.2.6 - Reflect updates to package |
Expand Down
51 changes: 28 additions & 23 deletions PDSEGEN.PANELS/PDSEGH0
View file
Original file line number Diff line number Diff line change
Expand Up @@ -39,17 +39,18 @@ _ type( input) intens(low ) just(left ) hilite(uscore) color(&clrw )
` ]C14+Locate %Summaries (optional) +
` Any line command can ]C15+Model ]LS+Line Summary%* +
` be a block command: ]C16+Options ]PS+Primary Summary%* +
` XX/XX or X99999 ]C17+Output
` ]C18+Prune
` With the Expanded ]C19+Reflist
` Member display any ]C20+Refresh
` valid TSO command ]C21+Restore
` can be entered.` ]C22+Select and Edit
` ]C23+Set command
` ]C24+SETMacro
` ]C25+Sort
` ]C26+SUBmit
` ]C27+Validate (IEBPDSE)
` XX/XX or X99999 ]C17+Orphan
` ]C18+Output
` With the Expanded ]C19+Prune
` Member display any ]C20+Reflist
` valid TSO command ]C21+Refresh
` can be entered.` ]C22+Restore
` ]C23+Select and Edit
` ]C24+Set command
` ]C25+SETMacro
` ]C26+Sort
` ]C27+SUBmit
` ]C28+Validate (IEBPDSE)
`
` %*+are only displayed if requested+ +
)Init
Expand Down Expand Up @@ -95,6 +96,7 @@ _ type( input) intens(low ) just(left ) hilite(uscore) color(&clrw )
&C25= 'C25'
&C26= 'C26'
&C27= 'C27'
&C28= 'C28'
&BR = 'BR'
&BC = 'BC'
&EC = 'EC'
Expand Down Expand Up @@ -159,17 +161,18 @@ _ type( input) intens(low ) just(left ) hilite(uscore) color(&clrw )
C14,pdsegh4
C15,pdseghmd
C16,pdseghop
C17,pdseghou
C18,pdsegh12
C19,pdsegh20
C20,pdsegh19
C21,pdseghrs
C22,pdsegh13
C23,pdsegh8
C24,pdsegh21
C25,pdsegh5
C26,pdseghss
C27,pdsegh9
C17,pdseghor
C18,pdseghou
C19,pdsegh12
C20,pdsegh20
C21,pdsegh19
C22,pdseghrs
C23,pdsegh13
C24,pdsegh8
C25,pdsegh21
C26,pdsegh5
C27,pdseghss
C28,pdsegh9
BR,pdseghbj
BC,pdseghc
EC,pdseghec
Expand Down Expand Up @@ -227,6 +230,8 @@ FIELD(C23 ) VAR(ZCMD) VAL(C23)
FIELD(C24 ) VAR(ZCMD) VAL(C24)
FIELD(C25 ) VAR(ZCMD) VAL(C25)
FIELD(C26 ) VAR(ZCMD) VAL(C26)
FIELD(C27 ) VAR(ZCMD) VAL(C27)
FIELD(C28 ) VAR(ZCMD) VAL(C28)
FIELD(BR ) VAR(ZCMD) VAL(BR )
FIELD(BC ) VAR(ZCMD) VAL(BC )
FIELD(EC ) VAR(ZCMD) VAL(EC )
Expand All @@ -240,5 +245,5 @@ FIELD(T ) VAR(ZCMD) VAL(T )
FIELD(C ) VAR(ZCMD) VAL(C )
FIELD(A ) VAR(ZCMD) VAL(A )
)END
/* Copyright (c) 2018-2022 by Lionel B. Dyck */
/* Copyright (c) 2018-2023 by Lionel B. Dyck */
/* GNU GENERAL PUBLIC LICENSE V3 */
4 changes: 2 additions & 2 deletions PDSEGEN.PANELS/PDSEGHAU
View file
Original file line number Diff line number Diff line change
Expand Up @@ -23,8 +23,8 @@
| Contributors: John Kalinich Greg Price Bill Smith |
| Bruce Koss Thomas Conley Salvador Carrasco |
|----------------------------------------------------------------------|
| Version number: 6.2.9 |
| Date : Nov 25, 2023 |
| Version number: 6.3.0 |
| Date : Nov 26, 2023 |
|----------------------------------------------------------------------|
| |
| Support of PDSEGEN is as time allows. |
Expand Down
9 changes: 9 additions & 0 deletions PDSEGEN.PANELS/PDSEGHCG
View file
Original file line number Diff line number Diff line change
Expand Up @@ -17,6 +17,15 @@
+The following is a list of the changes and enhancements that have been
+made to the~PDSEGEN+package.+
+
+~Version 6.3.0 Nov 26, 2023
+ - Panel changes
+ PDSEGHHW - update for Orphan command
+ PDSEGHN - update for Orphan command
+ PDSEGHOR - update for Orphan command
+ PDSEGHPS - update for Orphan command
+ PDSEGH0 - update for Orphan command
+ PDSEGOPT - update for Orphan command
+
+~Version 6.2.9 Nov 25, 2023
+ - Exec changes
+ PDSEGEN - Only display (toggle) orphan members with Orphan commands
Expand Down
4 changes: 2 additions & 2 deletions PDSEGEN.PANELS/PDSEGHHW
View file
Original file line number Diff line number Diff line change
Expand Up @@ -27,12 +27,12 @@
`
` HIGEN ? will display this tutorial panel.
`
` Fun aliases: Achmed, Casper, Zombie
` Also check out the%Orhpan+command.
`
)Init
.cursor = zcmd
)Proc
&ZUP = PDSEGH0
)END
/* Copyright (c) 2018 by Lionel B. Dyck */
/* Copyright (c) 2018-2023 by Lionel B. Dyck */
/* GNU GENERAL PUBLIC LICENSE V3 */
6 changes: 4 additions & 2 deletions PDSEGEN.PANELS/PDSEGHN
View file
Original file line number Diff line number Diff line change
Expand Up @@ -109,10 +109,12 @@
` generation counter when generations are once again created for that
` member name.
`
)INIT
` 24. The Orphan command will limit the display to only the orphan, or
` dummy elements.
`
.cursor = &zcmd
)PROC
&ZUP = PDSEGH0
)END
/* Copyright (c) 2018 by Lionel B. Dyck */
/* Copyright (c) 2018-2023 by Lionel B. Dyck */
/* GNU GENERAL PUBLIC LICENSE V3 */
37 changes: 37 additions & 0 deletions PDSEGEN.PANELS/PDSEGHOR
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,37 @@
)attr default(%+@)
% type(text) intens(high) color(&clrw)
+ type(text) intens(low ) color(&clrb)
~ type(text) intens(high) caps(off) just(asis ) color(&clrh)
hilite(&clrhr)
@ type( input) intens(low ) just(left ) hilite(uscore) color(&clrw )
` type(text) intens(low ) caps(off) just(asis ) color(&clrt)
# type(text) intens(high) caps(off) just(asis ) color(&clrt)
)Body Expand(\\)
%Tutorial -\-\(~PDSE V2 Member Generations%)\-\- Tutorial
%Command ===>@ZCMD +
%
% ORPHAN
`
` ORPHAN will limit the display to only the orphan (aka dummy/ghost)
` members.
`
` These are members that have no absolute generation 0 member which is
` what happens when the member is deleted using a utility, or command,
` that does not understand PDSE member generations.
`
` These members are also%not`accessible using Dynamic Alloction, JCL, or
` many other services that do not understand PDSE member generations.
`
`
`
`
`
`
`
)Init
.cursor = zcmd
)PROC
&ZUP = PDSEGH0
)END
/* Copyright (c) 2023 by Lionel B. Dyck */
/* GNU GENERAL PUBLIC LICENSE V3 */
3 changes: 2 additions & 1 deletion PDSEGEN.PANELS/PDSEGHPS
View file
Original file line number Diff line number Diff line change
Expand Up @@ -64,6 +64,7 @@
` @MODel `to allocate a new dataset based on the
` attributes of the current dataset
` @Options `Display a Primary Command prompting panel
` @Orphan `display only orphan/dummy elements
` @Output `to create a report of the active member list
` @Prune # `to delete obsolete generations
` @REFList `to list last 30 data sets used in ISPF to
Expand Down Expand Up @@ -105,5 +106,5 @@
)PROC
&ZUP = PDSEGH0
)END
/* Copyright (c) 2018-2020 by Lionel B. Dyck */
/* Copyright (c) 2018-2023 by Lionel B. Dyck */
/* GNU GENERAL PUBLIC LICENSE V3 */
Loading

0 comments on commit 3aac5bf

Please sign in to comment.