cobol

Adding two integers giving unwanted result in cobol

北城以北 提交于 2021-02-19 07:40:28
问题 I'm reading a file into a table, note the first line is not part of the table. 1000 MS 1 - Join Grps Group Project 5 5 Four Programs Programming 15 9 Quiz 1 Quizzes 10 7 FORTRAN Programming 25 18 Quiz 2 Quizzes 10 9 HW 1 - Looplang Homework 20 15 In the code, the table is represented as follows: 01 GRADES. 05 GRADE OCCURS 1 TO 100 TIMES DEPENDING ON RECORD-COUNT INDEXED BY J. 10 ASSIGNMENT-NAME PIC X(20). 10 CATEGORY PIC X(20). 10 POINTS-POSSIBLE PIC 9(14). 10 POINTS-EARNED PIC 9(14). I have

十年后将要消失的五种编程语言

本小妞迷上赌 提交于 2021-02-10 19:01:09
点击上方“ Python进击者 ”,选择“ 星标 ”公众号 超级无敌干货每日18:00推送给你!!! 作者 | Program Ace 译者 | 王坤祥 策划 | 小智 本文作者从自己的观点出发,介绍了未来 20 年内可能消失的 5 个编程语言,并给出了具体的原因。最后对想要学习编程的初学者给出了学习建议。 随着时间的流逝,程序员们发现了更新、更简单的工作方式,新的编程语言如雨后春笋般出现,但只有少数编程语言能成为社区的新宠。这种进步的一个副作用是一些古老的编程语言必然会跟历史一样被人们遗忘。如果一个编程语言无法随着时间的推移提升其价值,那么它的用户群终将会流失,并逐渐淡出人们的视线,或者成为更新一代编程语言的基础。 最近,古老的 COBOL 编程语言上了热搜。在 1960 年代和 1970 年代,它曾经是许多美国银行和政府机构的首选的编程语言,但最终被更加简单有效的编程语言所取代。但是,使用 COBOL 构建的系统仍然存在,当一些政府机构发现他们需要通过更新代码来全面改革失业系统时,才发现业内没有几个开发人员可以熟练使用该编程语言。 沧海桑田,COBOL 早已物是人非。我们当前的许多编程语言也注定会有相似的下场。本文中,我们将分析未来 20 内最终会消失的 5 种编程语言。我知道这可能会伤害到那些正在使用这几个编程语言的程序员的内心

Is this possible to convert EBCDIC Comp-3 file to ASCII file values using java?

穿精又带淫゛_ 提交于 2021-02-09 09:21:57
问题 I am trying to convert the EBCDIC COMP-3 fields to ASCII values but which is not working.But Binary COMP-3 fields could be converted to ASCII values.Please help me to understand is this possible or not? Even using any other java library is ok for me.I tried and searched may but no concrete answer I could see. Update: In my previous one binary should be the one which will work.This what I received as answer but there was no clarity about EBCDIC COMP-3. COPYBOOK: 001700 01 EMP-RECORD. 001900 10

Is this possible to convert EBCDIC Comp-3 file to ASCII file values using java?

做~自己de王妃 提交于 2021-02-09 09:20:14
问题 I am trying to convert the EBCDIC COMP-3 fields to ASCII values but which is not working.But Binary COMP-3 fields could be converted to ASCII values.Please help me to understand is this possible or not? Even using any other java library is ok for me.I tried and searched may but no concrete answer I could see. Update: In my previous one binary should be the one which will work.This what I received as answer but there was no clarity about EBCDIC COMP-3. COPYBOOK: 001700 01 EMP-RECORD. 001900 10

How do you convert from Hex to Ascii using different inputs in COBOL

时光毁灭记忆、已成空白 提交于 2021-01-29 07:41:48
问题 My intention is to be able to print ascii from HEX-NUM, but I want to be able to change the input Hex values, sort of like this: WORKING-STORAGE SECTION. 01 HEX-INPUT PIC X(2) VALUE "3C". 01 HEX-NUM PIC X VALUE X"HEX-INPUT". However this leads to an error because the X"..." is trying to read HEX-INPUT as Hex values whereas I want to access the value I have defined as 3C. Any ideas what I need to do to achieve this flexibility I desire? I need to change HEX-INPUT often in my program hence the

How do you convert from Hex to Ascii using different inputs in COBOL

情到浓时终转凉″ 提交于 2021-01-29 07:37:39
问题 My intention is to be able to print ascii from HEX-NUM, but I want to be able to change the input Hex values, sort of like this: WORKING-STORAGE SECTION. 01 HEX-INPUT PIC X(2) VALUE "3C". 01 HEX-NUM PIC X VALUE X"HEX-INPUT". However this leads to an error because the X"..." is trying to read HEX-INPUT as Hex values whereas I want to access the value I have defined as 3C. Any ideas what I need to do to achieve this flexibility I desire? I need to change HEX-INPUT often in my program hence the

Cobol-Restart from the program

女生的网名这么多〃 提交于 2021-01-28 23:22:18
问题 I have a little question I wrote a calculator in cobol, and I'm not so expert I give you here the code: DISPLAY "CALCOLATRICE". DISPLAY "ATTENZIONE, IL RISULTATO NON HA SEGNI!". DISPLAY "CHE VUOI FARE?". DISPLAY "1 ADDIZIONE". DISPLAY "2 SOTTRAZIONE". DISPLAY "3 MOLTIPLICAZIONE". DISPLAY "4 DIVISIONE". DISPLAY "5 ESCI" ACCEPT INPUT1 IF INPUT1 = 5 DISPLAY "OK, BUON LAVORO :)" STOP RUN END-IF. IF INPUT1 = 1 DISPLAY "PRIMO NUMERO" ACCEPT A DISPLAY "SECONDO NUMERO" ACCEPT B COMPUTE C= A + B

Why does COBOL have to be indented? [closed]

无人久伴 提交于 2021-01-26 20:53:06
问题 Closed . This question is opinion-based. It is not currently accepting answers. Want to improve this question? Update the question so it can be answered with facts and citations by editing this post. Closed 4 years ago . Improve this question Why does COBOL have to be indented, as in, have additional spacing in each sourcefile? Consider this code (note the additional whitespace): IDENTIFICATION DIVISION. PROGRAM-ID. HELLO-WORLD. PROCEDURE DIVISION. DISPLAY 'Hello, world'. STOP RUN. A similar

Why does COBOL have to be indented? [closed]

只谈情不闲聊 提交于 2021-01-26 20:49:56
问题 Closed . This question is opinion-based. It is not currently accepting answers. Want to improve this question? Update the question so it can be answered with facts and citations by editing this post. Closed 4 years ago . Improve this question Why does COBOL have to be indented, as in, have additional spacing in each sourcefile? Consider this code (note the additional whitespace): IDENTIFICATION DIVISION. PROGRAM-ID. HELLO-WORLD. PROCEDURE DIVISION. DISPLAY 'Hello, world'. STOP RUN. A similar

Is there actually COBOL in .NET?

可紊 提交于 2021-01-20 15:53:26
问题 I was checking Microsoft's Visual Studio page just now and in the advertisements sidebar I suddenly saw an incredible advertisement: "Net Express is a COBOL development environment for extending core business processes to the .NET Framework and other distributed platforms." Of course I followed the link and found a company that does this, but are there places still using COBOL? Does anyone actually use COBOL in .NET frameworks? 回答1: Micro Focus make a COBOL development suite that is