 |
MVSFORUMS.com A Community of and for MVS Professionals
|
FAQ
Search
Quick Manuals
Register
Profile
Log in to check your private messages
Log in
| Search found 131 matches |
| Author | Message |
|---|---|
 Topic: Composite field sort |
|
| deepa12 Replies: 11 Views: 17078 |
 Forum: Utilities Posted: Sun Jan 21, 2024 11:06 pm Subject: Composite field sort |
| Thank you. Since this is for a specific shop floor i will think thru these aspects & discuss with my team | |
| Topic: Composite field sort |
|
| deepa12 Replies: 11 Views: 17078 |
Forum: Utilities Posted: Sun Jan 21, 2024 12:14 am Subject: Composite field sort |
| Here i have provided the partial code snippet. i have not provided the data structures for binary and packed decimal since they are not yet tested but it is similar to zoned decimal i initially copy t ... | |
| Topic: Composite field sort |
|
| deepa12 Replies: 11 Views: 17078 |
Forum: Utilities Posted: Sat Jan 20, 2024 4:10 am Subject: Composite field sort |
| need to develop a generic sort algorithm in Cobol to sort records based on any field for say maximum of 100 records
so am using SORT verb of Cobol in the sort module So i wanted to check if individua ... |
|
| Topic: Composite field sort |
|
| deepa12 Replies: 11 Views: 17078 |
Forum: Utilities Posted: Fri Jan 19, 2024 12:07 am Subject: Composite field sort |
| Thank you for the explanation
Yes the SORT CARD IN SORT1 STEP should have been SORT FIELDS=(361,4,BI,A,114,8,ZD,A) It is my mistake In the STEP0100 since the composite sort is as below ... |
|
| Topic: Composite field sort |
|
| deepa12 Replies: 11 Views: 17078 |
Forum: Utilities Posted: Wed Jan 17, 2024 11:28 pm Subject: Composite field sort |
| Apologies i will surely avoid RE. in the title. It was honestly not intentional.
Kindly reply |
|
| Topic: Composite field sort |
|
| deepa12 Replies: 11 Views: 17078 |
Forum: Utilities Posted: Wed Jan 17, 2024 10:12 am Subject: Composite field sort |
| Consider the following code
//BBBBSPR1 JOB 6,'CICS COBOL',NOTIFY=BBBB,CLASS=2,MSGCLASS=Y //* 114,8 SUPPLIER ID //* BOH-SELECTION-PR S9 ... |
|
| Topic: Messages from IDCAMS- REPRO in REXX |
|
| deepa12 Replies: 12 Views: 13872 |
Forum: Application Programming Posted: Mon Oct 01, 2018 5:04 am Subject: Messages from IDCAMS- REPRO in REXX |
| I have allocated RECFM=FBA ;LRECL=121
The following appear on screen 0 0 NUMBER OF RECORDS PROCESSED WAS 0 LASTCC=12 ... |
|
| Topic: Messages from IDCAMS- REPRO in REXX |
|
| deepa12 Replies: 12 Views: 13872 |
Forum: Application Programming Posted: Sun Sep 30, 2018 11:48 pm Subject: Messages from IDCAMS- REPRO in REXX |
| I already allocated SYSPRINT, SYSTSPRT and tried. They were empty.
And i have presented the same once again The SYSPRINT, SYSTSPRT datasets have been allocated as FB 133 . They are empty. It s ... |
|
| Topic: EXCLUSIVE LOCK for ISPF Table |
|
| deepa12 Replies: 3 Views: 4521 |
Forum: Application Programming Posted: Fri Sep 28, 2018 6:33 am Subject: EXCLUSIVE LOCK for ISPF Table |
| By googling in the same manner i tried the following code:
a. DUMMY = OUTTRAP(LINE.) ... |
|
| Topic: Messages from IDCAMS- REPRO in REXX |
|
| deepa12 Replies: 12 Views: 13872 |
Forum: Application Programming Posted: Fri Sep 28, 2018 4:00 am Subject: Messages from IDCAMS- REPRO in REXX |
| I just specified the test scenario and wanted to understand how to trap this specific message in REXX so that in the REXX program i would specifically check for this message (IDC3006I FUNCTION TERMINA ... | |
| Topic: Messages from IDCAMS- REPRO in REXX |
|
| deepa12 Replies: 12 Views: 13872 |
Forum: Application Programming Posted: Fri Sep 28, 2018 2:17 am Subject: Messages from IDCAMS- REPRO in REXX |
| Am testing for the condition that the key does not exist and also that it is beyond the last key in the file.
If i provide a key that does not exist and is a key in between 2 keys which are already ... |
|
| Topic: EXCLUSIVE LOCK for ISPF Table |
|
| deepa12 Replies: 3 Views: 4521 |
Forum: Application Programming Posted: Fri Sep 28, 2018 1:34 am Subject: EXCLUSIVE LOCK for ISPF Table |
| Please consider the following code in REXX
/**REXX**/ STAT=MSG('OFF') ... |
|
| Topic: Messages from IDCAMS- REPRO in REXX |
|
| deepa12 Replies: 12 Views: 13872 |
Forum: Application Programming Posted: Fri Sep 28, 2018 1:03 am Subject: Messages from IDCAMS- REPRO in REXX |
| Kindly refer to the JCL code for IDCAMS REPRO. When i provide search condition as a key beyond the last record in file, IDCAMS prints the following message in SYSPRINT
REPRO IFILE(DD1IN) OFILE(DD ... |
|
| Topic: prevent simultaneous access to an online ISPF application |
|
| deepa12 Replies: 5 Views: 4317 |
Forum: Application Programming Posted: Wed Sep 19, 2018 1:31 am Subject: prevent simultaneous access to an online ISPF application |
| I have an online application using ISPF, REXX, VSAM. It has to be restricted in such a way that only 1 user can access at the same time
So I need to build a logic to detect this Is it possible ... |
|
| Topic: VSAM record delete using insync from REXX |
|
| deepa12 Replies: 8 Views: 6489 |
Forum: Utilities Posted: Fri Sep 07, 2018 2:30 am Subject: VSAM record delete using insync from REXX |
| 1. Thanks a lot. Its working now.
I made some changes & hence reproducing the code. It is throwing STATS,LOG,PRINT DATASET contents on screen since it is allocated as DA(*) I tried changing ... |
|
All times are GMT - 5 Hours |