mainframe

Japanese COBOL code on IBM mainframe in Shift-JIS; represented after transfer to a PC how?

由 笑着哭i 提交于 2019-12-10 17:22:54
问题 We have a Japanese client that has source code in COBOL on an mainframe. He claims the code on the mainframe is represented in Shift-JIS2 (and we think we understand that pretty well). When that code is transferred to an PC, what is the most common encoding used? We've sent him a program to process that COBOL code and it seems to choke. The customer won't give us the code directly, so experiments are hard. His experiments seem to indicate UTF-8; I assume the Japanese characters encodable in

How can I convince z/OS scp to transfer binary files?

由 依然范特西╮ 提交于 2019-12-09 17:54:04
问题 We have SSH-based file transfer scripts currently set up for Linux-to-Linux and we're porting them to z/OS to go z/OS-to-Linux. Note that this is with USS, the UNIX system services within z/OS otherwise known as OMVS, which uses EBCDIC under the covers, not zLinux which uses ASCII. We've set up all the SSH key files and what-not, and the transfer itself is working fine. However z/OS, in it's infinite wisdom, insists on converting the files from EBCDIC to ASCII despite the fact that they're

equivalent of ftp put and append in scp

由 北城以北 提交于 2019-12-09 05:23:14
问题 I have a legacy script which I am not able to understand. The script is to transfer 4 files (2 ebcdic format files and 2 pdf files) in unix to mainframes through ftp. ebcdic format file 1 is abc.xyz ebcdic format file 2 is pqr.xyz pdf file 1 is abc.pdf pdf file 2 is pqr.pdf mainframe file name is AM2P.BJCUN.SALCHG The syntax of the command in the script is as below: quote site recfm=fb put /myfiles/abc.xyz AM2P.BJCUN.SALCHG append /myfiles/abc.pdf AM2P.BJCUN.SALCHG append /myfiles/pqr.xyz

COBOL - Differing answer from mainframe to PC for same COMPUTE

由 a 夏天 提交于 2019-12-08 15:51:56
问题 I have this very simple dummy COBOL program which does a dummy COMPUTE and displays the result. ID DIVISION. PROGRAM-ID. DUMMYPGM. DATA DIVISION. WORKING-STORAGE SECTION. 01 NUM-A PIC 9(3) VALUE 399. 01 NUM-B PIC 9(3) VALUE 211. 01 NUM-C PIC 9(3). * PROCEDURE DIVISION. MAIN. COMPUTE NUM-C = ((NUM-A / 100) - (NUM-B / 100)) * 100 DISPLAY 'NUM-C IS ' NUM-C STOP RUN. When I compile this code on a mainframe (with compiler MVS Enterprise COBOL V4.2) and execute it, I get "NUM-C IS 100", probably

Compare Packed decimal Julian date with (Packed decimal Current Julian date-7days) using JCL- SYNCSORT?

由 陌路散爱 提交于 2019-12-08 11:58:41
问题 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?

由 99封情书 提交于 2019-12-08 11:08:56
问题 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

COBOL program, JCL job, or both?

由 自闭症网瘾萝莉.ら 提交于 2019-12-08 06:37:50
问题 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

Unpacking COMP-3 digit using Java

由 女生的网名这么多〃 提交于 2019-12-08 04:54:47
问题 I have a file with some COMP-3 encoded fields. Can someone please tell me how do I test this code in below thread ? How to unpack COMP-3 digits using Java? Code I tried is BufferedReader br = new BufferedReader(new FileReader(FILENAME))) { String sCurrentLine; int i=0; String bf =null; while ((sCurrentLine = br.readLine()) != null) { i++; System.out.println("FROM BYTES "); System.out.println(unpackData(sCurrentLine.getBytes(), 5)); for (int j = 0; j < sCurrentLine.length(); j++) { char c =

Reading a mainframe EBCDIC File [closed]

由 自古美人都是妖i 提交于 2019-12-08 04:35:27
Closed. This question is off-topic . It is not currently accepting answers. Want to improve this question? Update the question so it's on-topic for Stack Overflow. Closed 5 years ago . I have a EBCDIC coded mainframe file which I need to convert to an ASCII format. Which libraries/tools can I use to do that. I am most familiar with Python. The file I received has a cookbook with it, which can be used to parse the file (part of it is below). What do types: 'C', 'P' and 'B' mean? I'm guessing C = character, B = byte, P = packed number? 1:----------------------------------------------------------

How to fetch creation date and volumes allocated for about 4000 datasets in dasd

由 末鹿安然 提交于 2019-12-08 04:00:39
问题 I want to fetch creation date and volumes allocated for about 4000 datasets in dasd .how can i do it? whether there is any command for it 回答1: You could use the catalog search interface and Rexx. I believe the DSCRDT2 field is what you're looking for. A sample is provided. You could use ISPF in batch, write a clist or Rexx program and use the LMDLIST service. There's also DCOLLECT. 来源： https://stackoverflow.com/questions/6703231/how-to-fetch-creation-date-and-volumes-allocated-for-about-4000
订阅 mainframe