jcl

问题 I have a program that generates random pin codes. These pins are generated in Java, then stored in the mainframe, via a NATURAL program. From there, they are eventually physically printed by a batch JCL job that calls an MVS SCRIPT to print the form, with the pin code on it. I've come across some issues with special characters before such as: |{}![]^~<>; that for one reason or another do not print properly. I've also removed 0OQ1l for OCR reasons. Recently, an error came to my attention with

问题 Can someone tell me the best way to run a piece of JCL on IBM zOS from a Java web app on a different server (Windows). I also need get a response code back from the job. The 2 options at the moment are: 1) Using JES - But its hard to get the response back 2) Make a call through a DB2 procedure. Is there another (better) way 回答1: I"m not sure if this will help, but while I was looking for information about how to use FTP on z/OS to transfer files I saw the following article from IBM. http:/

问题 JOB Description: JVMLDM76 library is in the dataset WLM.ABC.DEF.LINKLIB.PDSE. JVMLDM76(load module) comes with jzos batch launcher tool kit installation. Here is my job: //JHELLO JOB MSGLEVEL=(1,1),REGION=0M,CLASS=Q,MSGCLASS=A /* NOTIFY=&SYSUID */ //JOMVS EXEC PGM=JVMLDM76,REGION=0M,TIME=NOLIMIT //STEPLIB DD DSN=WLM.ABC.DEF.LINKLIB.PDSE,DISP=SHR //SYSIN DD * /* program starts here */ public class JHelloWorld { public static void main(String args[]) { System.out.println("Hello :)"); } } //* /

问题 In JCL, How do I add "0" padding to a string so that my string length is always 10? I am using TSSUtil v3 tool for jcl. If input "10541", 5 padding is added = 0000010541 回答1: Here's how you would do it with your SORT product, if you can't get a solution with TSSUTIL: //STEP001 EXEC PGM=SORT //SORTIN DD * 24567 1456 47865 24875 1 //SORTOUT DD SYSOUT=* //SYSIN DD * OPTION COPY INREC BUILD=(1,10,UFF,M11,LENGTH=10) //SYSOUT DD SYSOUT=* Output 0000024567 0000001456 0000047865 0000024875 0000000001

问题 I am trying to sort a data set and writing into a new data set, Every time i am executing the job, its abending (ABEND=U0016). message form SYSOUT. WER276B SYSDIAG= 24646562, 29667262, 29667262, 27500165 WER164B 307,288K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED, WER164B 0 BYTES RESERVE REQUESTED, 307,272K BYTES USED WER036B G=5174,B=1,BIAS=99 WER162B 75 PREALLOCATED SORTWORK TRACKS, 3,750,000 DYNAMICALLY ALLOCATED, WER162B 26,721,480 ACQUIRED IN 2,230 SECONDARY EXTENTS, 0 RELEASED,

问题 This question already has answers here : XML handling in REXX or JCL (3 answers) Closed 5 years ago . I have XML data in my PS dataset as below , It is in the same format as below in my PS ,here is the example: (**<?xml version="1.0" encoding="UTF-8"?> <web-app xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns="http://java.sun.com/xml/ns/javaee" xmlns:web="http://java.sun.com/xml/ns/javaee/web-app_2_5.xsd" xsi:schemaLocation="http://java.sun.com/xml/ns/javaee http://java.sun.com/xml

问题 I need a help to create a JCL to search the current year member (I.e. RPxxxx Where xxxx denote the year 2018) in a PDS file. A new member created on every year by the yearly job which used the PDS file. Hence the member name is not fixed in PDS file I.e. suffix has been changed in every year. We need to create a JCL which check if the current year member present or not in the PDS file. So the successor job will run successfully. If the current year member present in the PDS file then the new

问题 I have a requirement as below. In my Input file, I have Packed decimal Julian date[YYYYDDD format] in 23rd position (position 23, length 4). If my the input Julian date is less than (Current Julian date - 7 days) then write the records into Out File1. Else Write the records into Out file2. Can anybody let me know how to Compare Packed decimal Julian date with (Packed decimal Current Julian date-7days) using JCL- SYNCSORT? 回答1: You can use this... SYSIN DD * SORT FIELDS=COPY, OUTFIL FNAMES=01,

问题 How do we get the current date in a PS file name qualifier using JCL? Example out put file name: Z000417.BCV.TEST.D120713 (YYMMDD format). 回答1: This can be done, but not necessarily in a straightforward manner. The straightforward manner would be to use a system symbol in your JCL. Unfortunately this only works for batch jobs if it has been enabled for the job class on more recent versions of z/OS. Prior to z/OS v2, IBM's stated reason this didn't work is that your job could be submitted on a

问题 I have to preform 3 tasks: an insert, a delete, and a write I'm not sure what the best way to do this is. My mainframe program design skills aren't too tight, so I was looking for advice. Could I avoid doing a COBOL program for this? The way I see it, I just need JCL that executes SQL statements. If I design my statements correctly, then they should be able to preform tasks 1 and 2 this way. But I'm thinking I may need to have a COBOL program to write to a file? I'll overview my thought