mainframe

问题 How do you Edit a (binary EBCDIC) Mainframe file in the RecordEditor with out a Cobol Copybook. How do you generate Java code to read the file using the RecordEditor. Note: This is an attempt to split a question that is far to broad to give meaningful answer to into a series of simpler Question and Answer's. 回答1: Try and avoid editing a binary file with a Cobol Copybook if at all possible. This should only be attempted as a last resort !!!. Try and get that Cobol copybook (or some field

问题 I have two db2 tables on the mainframe 'old' and 'new'. These tables have 1 billion records each as of now with 70-80 columns. These tables are getting populated from two different systems, so the table structure is not identical, i.e. there are some differences in the columns with both tables sharing some common columns which have to be compared for different data values. for example : OLD id A B C 1 x y z 1 x y z 3 m n o 4 e f g NEW id B C D E 1 y a a b 1 y a a b 2 n o c d 4 g g l m So in

问题 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,

问题 I have an EBCDIC flat file to be processed from a mainframe into a C module. What can be a good process in converting the COMP and COMP-3 values into readable values? Do I have to convert the ebcdic characters to ascii then hex for COMP-3? What about for COMP? Thanks 回答1: Bill Woodger has given you some very good advice through his comments to your question, actually he answered the question and should have posted his comments as an answer. I would like to reiterate a few of his points and

问题 SORT: JOINKEYS FILES=F1,FIELDS=(5,4,A,10,20,A) JOINKEYS FILES=F2,FIELDS=(1,4,A,6,20,A) REFORMAT FIELDS=(F1:10,20,9,1,5,4,30,1,31,10,F2:27,10) JOIN UNPAIRED,F1 INREC BUILD=(1,36,C',',37,10,C',',27,10,SFF,SUB,37,10,SFF, EDIT=(TTTTTT)) OUTPUT IS: *2nd row 4th column is spaces as unpaired from 2nd file, needs to be 0s automatically. 22680372 ,5102, 1, 1,000000 22222222 ,5105, 2, ,000002 OUTPUT shud be: *2nd row 4th column is 0 or 0000s as unpaired from 2nd file, needs to be 0s automatically.

问题 Right now i'm kinda confused. When I want to exchange data between a PC and the Mainframe host via sftp, what are necessary steps to realise this. as far as I know I can't connect directly to the host. People told me that there is something like an OMVS environment and I have to send the files first to this environment to get the data from the server via sftp.(z/os is used and running) Is this right? And what is OMVS? and what steps are necessary to exchange files between host and OMVS? Or

问题 I'm trying to convert mainframe fixed length file from EBCDIC format to ASCII format. Currently I'm reading file using JZOS api (ZFile) and converting field by field. is it possible to convert without knowing the layout of file (aka COPYBOOK) by just reading entire bytes of a record or line? If so how do handle packed decimals and binary values? 回答1: is it possible to convert without knowing the layout of file (aka COPYBOOK) by just reading entire bytes of a record or line? No. Text fields

问题 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'm uploading an ebcdic file(converted from ascii) from Windows OS to Mainframe. My problem is that when I checked the file after uploading it, I see alot of new lines. When I tried to check it with its hex dump I discovered that when mainframe sees a x'15' it translates it into a newline. In the file there are packed decimals so the hex could contain let say a x'001500001c' but when I upload it, mainframe mistook it as a new line. Can anyone help me with this problem? 回答1: You should put

问题 There are several messages from DFSORT, which is internally used by the COBOL program that has several sort operations. I would like to remove those DFSORT messages and retain only those from the COBOL program. 回答1: You have three options. Use the OUTDD(ddname) Enterprise COBOL compiler option to change the DDName used for DISPLAY output. Use the DFSPARM as you have discovered, to change the DDName SORT uses for its messages when it is invoked (called) from a program (as when using the SORT