Rocket® COBOL

Is there any setting that will cause a READ NEXT after an AT END condition to return a status '10' AND execute the AT END condition. so if; READ NEXT AT END MOVE 1 TO WS-VALUE.   <-------- IF THIS IS AN END OF FILE CONDITION READ NEXT AT END MOVE 2 TO WS-VALUE.   <-------- I WANT THIS TO RETURN STATUS '10' AND SET WS-VALUE TO 2 Thanks in advance for any help

My configuration is... Windows 10 Pro 21H2 (OS build 19044.1806) Windows Feature Experience Pack 120.2212.4180.0 Visual Studio Community 2019  Visual Studio Community 2022 AMD Ryzen 5 1600 Six Core Processor with 16GB RAM I have downloaded Visual COBOL for Visual Studio 2019 (file version 7.0.248.0) and cannot install it. When I double-click the Visual Cobol installer the splash screen briefly shows and then closes. The installation does not begin. I have also done right-click "run as administrator", with the same result. I have also tried installing Visual Studio Community 2017 and then Visual COBOL for Visual Studio 2017. I got the same result, Visual Cobol installer the splash screen briefly shows and then closes. Can you please suggest a solution ? Regards Olavo#VisualCOBOL#install#Windows#VisualStudio

Did I miss an announcement ? This youtube video Visual COBOL and .NET 6 on Windows and Linux - YouTube (Uploaded 2022/06/24) refers to Visual COBOL 8.0.  I haven't seen an announcement of Visual COBOL 8.0 

Rob Anderson, Advanced’s VP for Application Modernization Products, discusses how his company partners with Micro Focus to deliver intelligent application modernization solutions to their clients using Micro Focus Visual COBOL and Enterprise Server.  Watch the video#SupportTips/KnowledgeDocs

Jury Systems future-proofs business by seamlessly evolving decades of application value into the cloud with Micro Focus Visual COBOL  Jury operation is one of the most public-facing functions of any court, so Jury Systems Incorporated’s JURY+ solutions strive for a continually improving client user experience. Having based JURY+ on COBOL over 20 years ago, Jury Systems has since leveraged first Micro Focus Net Express and then Visual COBOL to evolve as business needs changed, making a web version of JURY+ possible without major rewrites and paving the way to Amazon Web Services (AWS) cloud hosting. With Micro Focus COBOL solutions, Jury Systems preserves intellectual property acquired over decades in a modern development environment while enabling an agile response to future requirements.   Read more#SupportTips/KnowledgeDocs

Jury Systems future-proofs business by seamlessly evolving decades of application value into the cloud with Micro Focus Visual COBOL  Jury operation is one of the most public-facing functions of any court, so Jury Systems Incorporated’s JURY+ solutions strive for a continually improving client user experience. Having based JURY+ on COBOL over 20 years ago, Jury Systems has since leveraged first Micro Focus Net Express and then Visual COBOL to evolve as business needs changed, making a web version of JURY+ possible without major rewrites and paving the way to Amazon Web Services (AWS) cloud hosting. With Micro Focus COBOL solutions, Jury Systems preserves intellectual property acquired over decades in a modern development environment while enabling an agile response to future requirements.   Read more#SupportTips/KnowledgeDocs

A cataloged DSN (ODBC) does not appear in OpenESQL Assistant when creating an ODBC connection using the 32-bit ODBC Administrator. Full article: https://portal.microfocus.com/s/article/KM000008187#SupportTips/KnowledgeDocs

I have installed Visual cobol recently , I'm getting below error while im compile the code/ -------------------------------BUILD STARTED------------------------------- compileSource: gswcobol_build_config.FileCompile: FileCompile.gswcobol_build_config.cobol: [cobol] [cobol] Compiling GIFPCD50.pco... [cobol] [cobol] * Cobsql Integrated Preprocessor [cobol] * CSQL-I-049: Unable to support the SOURCETABSTOP directive, defaulting to 8 [cobol] * CSQL-I-004: Accepted VERBOSE [cobol] * CSQL-I-005: Passing comp5=yes to Oracle Precompiler [cobol] * CSQL-I-005: Passing hold_cursor=yes to Oracle Precompiler [cobol] * CSQL-I-005: Passing mode=ansi to Oracle Precompiler [cobol] * CSQL-I-005: Passing varchar=yes to Oracle Precompiler [cobol] * CSQL-I-005: Passing sqlcheck=full to Oracle Precompiler [cobol] * CSQL-I-005: Passing userid=whsview/dra!gon0@gmgswsd1 to Oracle Precompiler [cobol] * CSQL-I-008: Invoking cp Preprocessor [cobol] * CSQL-I-018: Invoking Oracle Precompiler/Translator [cobo

Hi I'm getting File status 98, Index file corrupted for my acucobol application. I tried Vutil rebuild option and also Vutil rebuild -k 0 filename option. But no luck. Can you please let me know what could be the problem? Thanks#AcuCobol#indexedfile

Visual COBOL supports a number of constructs that allow you to define and manipulate UTF-8 data directly within COBOL. The PIC U data type was intoduced for this purpose. For more information, please see the product documentation here:#utf-8#PICU#VisualCOBOL#COBOL#VisualCOBOL#HowTo-BestPractice#SupportTips/KnowledgeDocs#SupportTips/SupportTips/KnowledgeDocs

Hi, we are working with Visual cobol in aix and we are starting with the generation of a json file with json statement of visual cobol. We want exclude all the occurrs without value ( spaces in string case). we write de supress condition supress camp1 when spaces but return a compilation error, ¿is this option of supress posible in visual cobol?

Hello,I use dfconv to load 3 vsam files, at a customer they leave 8 in parallel, and it takes several minutes to finish, the filesystem is of type gpfs (ibm). I tried several options with extfh idxfileformat 8, readsema = off, dfconv 32 \\ dfconv64 but it is always very slow,  I have noticed that many processes remain with status D for a long time and I always find "cxiWaitEventWait" withps -eo ppid, pid, user, stat, pcpu, comm, wchan: 32 44957 46189 ssdv2 D + 17.3 dfconv32 down 45123 46193 ssdv2 D + 17.5 dfconv32 cxiWaitEventWait 44963 46198 ssdv2 D + 18.0 dfconv32 cxiWaitEventWait disk is very fast on txt files and all other processes, mfsort is also very fast, both has a speed of 2GB\\s this anomaly on my test system with the same runtime version 5.6 has no problems, but I have a different filesystem (xfs) what could cause this slowdown?  it might depend on the gpfs filesystem? thank youGreetings

Did you know that the install process for Acu/Extend products on UNIX/Linux no longer requires extracting an archive file? Instead, an executable installer is provided for recent releases. You can find instructions for using these installers in the Release Notes document for your product version; see this page for an example.#SupportTips/KnowledgeDocs#extend#AcuCobol#programming#SupportTips/KnowledgeDocss/KnowledgeDocs

PDF documents may be created using XML Extensions in conjunction with the open source Apache FOP product for a cost effective solution. Problem: Modern applications are often required to produce PDF documents, for example as replacements for traditional printed reports or as a standardized mechanism to distribute documents via email. Many of the available existing PDF creation solutions are expensive and/or lack the portability of RM/COBOL applications. Resolution: Apache FOP (Formatting Objects Processor) is a print formatter driven by XSL formatting objects (XSL-FO) and an output independent formatter. Because it is a Java application, its portability is quite comparable to an application implemented in RM/COBOL or Xcentrisity Business Information Server. Apache FOP is an open source project of The Apache Software Foundation licensed under the terms of the Apache License, Version 2.0, which permits redistribution under terms that are quite useful for

hello , i am new to visual studio and cobol an i need to connect to sqlserver to delete and insert in table throw cobol any help?

Hi! I hope you all are well Is there any documentation on the event.log file that Relativity DataServer creates? We see tons of WARN with Query Time Out Exceeded and as there is a problem working with the Data Server since a couple of days ago, I would like to understand the cause of the problem. reldbsrv : WARN: Unix event ID=-2147483574: Event Msg=Query Time Out Exceeded: HostName=PCSC0532, Application=Relativity® Database Designer, IP=10.8.0.66reldbsrv : WARN: Unix event ID=-2147483574: Event Msg=Query Time Out Exceeded: HostName=PCSC0533, Application=Relativity JDBC Client, IP=10.8.0.194 Any ideas? Regards,

An ACUCOBOL-GT application can be executed as-it-is in multiple modes, such as a standalone runtime installation, an AcuConnect Thin Client environment, the newest AcuToWeb mode.The developer can anyway decide that some piece of code can be optimised for each of these environments.Is there a way to identify the mode the program is executed in, so that a different branch of code can be run? Full article: https://portal.microfocus.com/s/article/KM000007775#SupportTips/SupportTips/KnowledgeDocs#SupportTips/KnowledgeDocs

Is it possible to skip lines of COBOL source code at run-time and activate them when necessary, for instance during a debugging session? Full article: https://portal.microfocus.com/s/article/KM000007776#SupportTips/SupportTips/KnowledgeDocs#SupportTips/KnowledgeDocs

When reporting an error or a bad behaviour in an ACUCOBOL-GT application, the Customer Support engineer may request a test case in order to troubleshoot the issue. Should a small stand-alone program not demonstrate the behaviour, the application itself may need to be submitted.   However DO NOT send the entire application, but rather send only the programs and data files that are actually used in demonstrating the issue.  Full article: https://portal.microfocus.com/s/article/KM000007773#SupportTips/KnowledgeDocs#SupportTips/SupportTips/KnowledgeDocs

Each of the following fails with '310-S ACCEPT/DISPLAY syntax incorrect' in Net Express and Visual COBOL: ACCEPT data-item1 FROM DATE-AND-TIME ACCEPT data-item2 FROM DAY-AND-TIME Full article: https://portal.microfocus.com/s/article/KM000008005#SupportTips/KnowledgeDocs

The following error occurs when executing the RUN.EXE command: Load error : file 'MFRUN.gnt' error code: 179, pc=0, call=1, seg=0 179 error message text not found Full article: https://portal.microfocus.com/s/article/KM000008088#SupportTips/KnowledgeDocs

How is AcuXDBC client and server installed and setup on Windows? Full article: https://portal.microfocus.com/s/article/KM000008028#SupportTips/SupportTips/KnowledgeDocs#SupportTips/KnowledgeDocs

For line sequential files how to keep the trailing spaces, when using COBOL-IT. The same functionality supplied by Visual COBOL EXTFH configuration option STRIPSPACE=OFF.https://www.microfocus.com/documentation/visual-cobol/vc70/DevHub/HRFLRHEXFH21.html Full article: https://portal.microfocus.com/s/article/KM000007982#SupportTips/KnowledgeDocs

Beginning with Visual COBOL V6.0 Visual COBOL supports the DECLARE statement in native code. This allows you to declare one or more local variables within the procedure division body. The scope of any inline local variable is from the point of declaration until the end of the innermost containing block, where paragraphs, sections and the whole method are considered to be blocks. This support was already in managed .NET/JVM programs although in managed code the local data items are statically scoped, but (unlike managed COBOL local items) they are not perform-range-local: if you re-enter a paragraph or section, fresh copies of any associated local data items are not created. Example: 01 names pic x(10) typedef. ... declare i1 as binary-long display i1 *> Optionally, the variables can be initialized inline declare c2 as binary-long = 5 display c2 declare name-list as names occurs 3#local

I need a help. In my application I need to get the first row out of the Select query execution through COBOL. I know the SELECT will return many rows but I only want the first row. I can not use Cursors as it can degrade the performance.