Convert COBOL to Oracle PL/SQL

Delivering you an intelligent and high quality result in due time!

Automated Application Conversion

Do you need to convert your COBOL application to Oracle PL/SQL? In this case, Ispirer products will be the perfect solution for your project!
Human-written code in each project has its own specifics. It may seem difficult to obtain a high level of automated conversion. With Ispirer it will be a smooth transition. The main advantage of Ispirer Toolkit is the personalization for your conversion project. As a result, you will replace the old technology with all its downsides. The outcome will be a new application without any middleware used afterwards.

How it Works

Ispirer Toolkit

Automated conversion of COBOL to Oracle PL/SQL with the help of our tool makes it possible to significantly reduce the time and expenses as compared to manual rewriting of the application. The following approach allows to ensure high quality of automated conversion:

1. Preliminary Stage

The stage is carried out to determine the current conversion level of Ispirer Toolkit. The level of conversion depends on the complexity of the source code and the requirements for the target application. You can independently perform the analysis of the source code of your COBOL application, as well as try to convert it to Oracle PL/SQL using the demo license. Besides, our experts can perform the source code analysis and provide you with examples of its conversion.
If your application is quite specific and large, we recommend to perform PoC to determine the maximum level of automated conversion of your project.
As a result, we will find out whether the customization is required or you can directly proceed to the conversion.

2. Ispirer Toolkit Customization Stage

If this stage is necessary, we will perform the customization to thoroughly prepare the toolkit for the conversion according to your project requirements. We will take a part of a representative code that amounts ussually to ~100,000 lines. The Ispirer technical team will add all the required conversion rules into the tool to achieve the highest possible level of automation or even to get a compilable result. As a delivery, we will provide conversion results of the scope of this customization. The customer will get a tailored and updated tool according to his specific project needs.

3. Use of Ispirer Toolkit

At this stage, you perform the conversion yourself. As to pricing, we apply project-based licensing. Prices depend on its scope and duration. The license includes support as well. If necessary, the conversion may be further improved even at this stage. As a result, customization requests, each of which is processed within 1-3 business days, are added to the license. Our experts will recommend the optimal number of requests considering the complexity and requirements of your project.

Ispirer Toolkit 10 Icon

Ispirer Toolkit 10
COBOL to Oracle PL/SQL
Free Demo License

Try Now

Ispirer Migration and Modernization Service (Ispirer Service)

Our experienced team can provide you with a turnkey migration service and convert your entire COBOL application to Oracle PL/SQL, delivering you a ready-to-use application in due time. Our responsibilities include not only professional analysis, assessment, performance and testing of your migration, but also services such as adding new or changing existing functionality of the application.

If you want to get an intermediate result of the converted COBOL code in the Oracle PL/SQL language, the Ispirer team will be glad to provide you with a basic migration service. As a result, you will get code that is optimized to the compilable level. Further, you will have to independently bring the application to a fully functional state in accordance with your requirements.

You are free to choose a preferred option. Nevertheless, we can provide an estimate of both the Tool and the Service, and give professional advice.

Conversion of Various COBOL Dialects

  • Micro Focus COBOL
  • Realia COBOL
  • ACUCOBOL-GT
  • COBOL-IT
  • IBM COBOL
  • Fujitsu COBOL
  • Enterprise COBOL
  • HP COBOL
  • GnuCOBOL
  • Microsoft COBOL
  • COBOL/II
  • OS/VS COBOL
  • isCOBOL
  • COBOL/400
  • ANSI COBOL
  • Hitachi COBOL

Conversion Samples of COBOL to Oracle PL/SQL

Ispirer Toolkit analyzes all object dependencies during the conversion process and provides not only line-by-line conversion, but resolves type conversions as well. In addition, the software understands and transforms the necessary inheritance dependencies. It parses the entire source code, builds an internal tree with all the information about the objects, and uses it in the migration process.

To convert structures, we have implemented additional type conversion classes to store variable sizes to convert redefines and arrays so that they work similar to COBOL logic. For more information review the code samples below.

Common variables declaration structure conversion:

COBOLOracle PL/SQL
  1.  
  2. 01 varlnk.
  3. 05 varlnk-1 PIC 999.
  4. 05 varlnk-2 PIC X(10).
  5. 05 varlnk-3 PIC 9(7).
  6.  
  1.  
  2. CREATE OR REPLACE TYPE performformat1_varlnk_TP UNDER GROUP_ITEM
  3. ( varlnk_1 PIC_NUMBER,
  4. varlnk_2 PIC_STRING,
  5. varlnk_3 PIC_NUMBER
  6. ,CONSTRUCTOR FUNCTION performformat1_varlnk_TP RETURN SELF AS RESULT,
  7. OVERRIDING MEMBER FUNCTION to_string RETURN VARCHAR2,
  8. OVERRIDING MEMBER PROCEDURE set_data(data STRING_ARRAY),
  9. OVERRIDING MEMBER PROCEDURE set_data(data DEFAULT_VALUE),
  10. MEMBER PROCEDURE set_data(data performformat1_varlnk_TP),
  11. OVERRIDING MEMBER FUNCTION is_numeric RETURN BOOLEAN,
  12. OVERRIDING MEMBER PROCEDURE initialize
  13. );
  14. /
  15. CREATE OR REPLACE TYPE BODY performformat1_varlnk_TP AS
  16. CONSTRUCTOR FUNCTION performformat1_varlnk_TP RETURN SELF AS RESULT
  17. varlnk_1 := NEW PIC_NUMBER('999');
  18. varlnk_2 := NEW PIC_STRING('X(10)');
  19. varlnk_3 := NEW PIC_NUMBER('9(7)');
  20. sizes := NUMBER_ARRAY(varlnk_1.get_size, varlnk_2.get_size, varlnk_3.get_size);
  21. END;
  22. OVERRIDING MEMBER FUNCTION to_string RETURN VARCHAR2
  23. RETURN varlnk_1.to_file || varlnk_2.to_file || varlnk_3.to_file;
  24. END;
  25. OVERRIDING MEMBER PROCEDURE set_data(data STRING_ARRAY)
  26. varlnk_1.set_from_item(data(1));
  27. varlnk_2.set_from_item(data(2));
  28. varlnk_3.set_from_item(data(3));
  29. END;
  30. OVERRIDING MEMBER PROCEDURE set_data(data DEFAULT_VALUE)
  31. varlnk_1.set_from_item(data);
  32. varlnk_2.set_from_item(data);
  33. varlnk_3.set_from_item(data);
  34. END;
  35. MEMBER PROCEDURE set_data(data performformat1_varlnk_TP)
  36. varlnk_1.set_data(data.varlnk_1.o_formatted_value);
  37. varlnk_2.set_data(data.varlnk_2.o_formatted_value);
  38. varlnk_3.set_data(data.varlnk_3.o_formatted_value);
  39. END;
  40. OVERRIDING MEMBER FUNCTION is_numeric RETURN BOOLEAN
  41.  
  42. IF varlnk_1.is_numeric() AND varlnk_2.is_numeric() AND varlnk_3.is_numeric() THEN
  43. END;
  44. OVERRIDING MEMBER PROCEDURE initialize
  45. varlnk_1.initialize;
  46. varlnk_2.initialize;
  47. varlnk_3.initialize;
  48. END;
  49.  
  50. /
  51. varlnk performformat1_varlnk_TP;
  52.  
  53. varlnk := performformat1_varlnk_TP;
  54.  

Common REDEFINES conversion:

COBOLOracle PL/SQL
  1.  
  2. 01 var1 PIC XXX VALUE '111'.
  3. 01 var2 REDEFINES var1.
  4. 05 vvv1 PIC 9.
  5. 05 vvv2 PIC 99.
  6.  
  1.  
  2. var1 PIC_STRING;
  3. var2 PIC_STRING;
  4.  
  5. var1 := PIC_STRING('XXX','111');
  6. var2 := PIC_STRING('XXX');
  7. var2.set_data(var1);
  8.  

Common array conversion:

COBOLOracle PL/SQL
  1.  
  2. 01 var5.
  3. 05 var5-occurs OCCURS 2 TIMES.
  4. 10 var5-occurs-txt PIC X(6) VALUE ' TEXT1'.
  5.  
  1.  
  2. var5 PIC_STRING_ARRAY ;
  3.  
  4. var5 := PIC_STRING_ARRAY();
  5. var5.EXTEND(2);
  6. FOR i IN 1 .. var5.COUNT LOOP
  7. var5(i) := PIC_STRING('X(6)' ,' TEXT1');
  8.  

COBOL call chain with PERFORMs conversion:

COBOLOracle PL/SQL
  1.  
  2. TopLevel.
  3. DISPLAY "In TopLevel. Starting to run program"
  4. PERFORM OneLevelDown
  5. DISPLAY "Back in TopLevel.".
  6. STOP RUN.
  7.  
  8. OneLevelDown.
  9. DISPLAY ">>>> Now in OneLevelDown"
  10.  
  11. TwoLevelsDown.
  12. DISPLAY ">>>>>>>> Now in TwoLevelsDown."
  13. PERFORM ThreeLevelsDown.
  14. DISPLAY ">>>>>>>> Back in TwoLevelsDown.".
  15.  
  16. PERFORM TwoLevelsDown
  17. DISPLAY ">>>> Back in OneLevelDown".
  18.  
  19. ThreeLevelsDown.
  20. DISPLAY ">>>>>>>>>>>> Now in ThreeLevelsDown".
  21.  
  1.  
  2. PROCEDURE PerformFormat1;
  3. PROCEDURE TopLevel;
  4. PROCEDURE OneLevelDown;
  5. PROCEDURE TwoLevelsDown;
  6. PROCEDURE ThreeLevelsDown;
  7. PROCEDURE SWP_stop_run;
  8.  
  9. SWE_stop_run EXCEPTION;
  10.  
  11. PROCEDURE PerformFormat1
  12. TopLevel;
  13. OneLevelDown;
  14. TwoLevelsDown;
  15. ThreeLevelsDown;
  16. END;
  17. PROCEDURE TopLevel
  18. DBMS_OUTPUT.PUT_LINE('In TopLevel. Starting to run program');
  19. OneLevelDown;
  20. DBMS_OUTPUT.PUT_LINE('Back in TopLevel.');
  21. SWP_stop_run;
  22. END;
  23. PROCEDURE OneLevelDown
  24. DBMS_OUTPUT.PUT_LINE('>>>> Now in OneLevelDown ');
  25. END;
  26. PROCEDURE TwoLevelsDown
  27. DBMS_OUTPUT.PUT_LINE('>>>>>>>> Now in TwoLevelsDown.');
  28. ThreeLevelsDown;
  29. DBMS_OUTPUT.PUT_LINE('>>>>>>>> Back in TwoLevelsDown.');
  30. END;
  31. PROCEDURE ThreeLevelsDown
  32. DBMS_OUTPUT.PUT_LINE('>>>>>>>>>>>> Now in ThreeLevelsDown '); END;
  33. PROCEDURE SWP_stop_run
  34. RAISE SWE_stop_run;
  35. END;
  36.  

Copy statement conversion:

During the conversion stage, the code from the copy files is included in the program and replaced with the appropriate copy statements, thereafter the program converts the entire code.

If statement conversion:

COBOLOracle PL/SQL
  1.  
  2. if var3 = var4
  3. move "D" to var3
  4. else
  5. move " " to var3.
  6.  
  1.  
  2. IF var3.compare_to(var4) = 0 THEN
  3. var3.set_data('D');
  4. var3.set_data(' ');
  5.  

PERFORM UNTIL statement conversion:

COBOLOracle PL/SQL
  1.  
  2. PERFORM UNTIL IterCount = 5
  3. ADD 1 TO IterCount
  4. END-PERFORM
  5.  
  1.  
  2. WHILE (NOT(IterCount = 5)) LOOP
  3. IterCount.set_data(IterCount.get_value()+1);
  4.  

Download Sample Code

You have just examined only a piece of the COBOL to Oracle PL/SQL conversion sample. You can download the entire application migration sample for free by filling out the form. Once you get the code sample, you will be able to:

  • Explore how well Ispirer Toolkit migrates the source code to the target technology without downloading it.
  • Analyze and compare the source sample with your code to understand which components of your application can be automatically converted using Ispirer Toolkit.
  • Run, play with and test an application containing nearly 500 lines of code.

See for yourself that Ispirer Toolkit can automatically convert not only a single piece of code, but an entire application. Most likely, complex code will require customization of the toolkit, but our experts can add new conversion rules within 3-5 business days. As a result, using Ispirer Toolkit you will get readable and maintainable code of manual conversion quality in the shortest time possible.

Snatch a totally free opportunity to see the high efficiency of Ispirer Toolkit!

Get your sample code
Enter your name.

Enter a valid e-mail address.

Select your country.

Invalid input.

Get a Project Estimate

Ispirer Toolkit

Reach the maximum level of automation and quality of your conversion with the help of Ispirer Toolkit! Based on your requirements, the Ispirer team will process all extension requests for your COBOL to Oracle PL/SQL conversion project. We offer several types of Ispirer Toolkit licenses, among which you will find the one that is suitable for you. Each conversion project is considered and discussed separately, prices depend on its scope, duration and complexity.

Ispirer Toolkit 10 Icon

Ispirer Toolkit 10
COBOL to Oracle PL/SQL

Get an Estimate

Ispirer Service

If you don't want to involve your own resources to move the COBOL application to Oracle PL/SQL, get Ispirer Migration and Modernization Service and we will deliver you an operational and high-quality end-result on time and at a reasonable price. Apart from professional Analysis, Evaluation, Performance and Testing of your migration, we also provide such services as Code Refactoring, Changing Functionality, and Adding Extra Functionality. Each conversion project is reviewed and discussed separately and the final price is a subject to negotiation.

Ispirer Migration Service

Ispirer Migration Service
COBOL to Oracle PL/SQL

Get an Estimate

Benefits You Get

100% Automation

Conversion Automation

Automation will definitely facilitate the conversion, the manual work after the process will be significantly reduced.

Flexible Pricing

Flexible Pricing

You pay for only what you need: pricing depends on the scope, complexity and duration of your conversion project.

Optimized Migration

Use of Modern Technology

You get an intelligent and maintainable code, and immediately start enjoying the benefits of new technologies.

What Our Customers Say

"Beckman Coulter provided as much of the information as we could but there was a lot of functionality that we did not know. This is where Ispirer talents became apparent as they forensically reengineered functionality."

"We are now successfully running live on the new system, with the updated PB apps. I want to express my thanks to Ispirer team. You made this project a success!!! I was happy to work with you and would highly recommend Ispirer!"

"Because of Ispirer and MnMTK, our team was able to devote its time to build the infrastructure for new Java programs instead of spending time on converting code. The produced Java code met all our maintainability, readability and performance requirements."

"This approach was very successful avoiding any confusion at the first stage, and achieved high conversion rate in the end. The project was completed successfully, they say they couldn't make it without MnMTK 2017 and excellent extension support from lspirer."

"At the onset of the engagement the Ispirer MnMTK was expanded to meet the specific requirements of our migration prior to being delivered for our use. Once this phase of the project was complete we were provided with the expanded toolkit."

"We have found the Ispirer team to be knowledgeable and responsive and we have found the tooling to be flexible enough to be easily adapted to our coding conventions."

previous arrow
next arrow
Slider

Get in touch with us!

Have questions about migration from COBOL to Oracle PL/SQL?

Contact us