Rocket® COBOL

Hi, I have a trial version of VC 7.0 .Net as we are looking to upgrade from Net Express V5.118 for future development. So I have managed to compile the existing code to .int using MF"12" compiler directive. However if I try to run the .int on an environment with a Net Express runtime I get error code '165: Version number incompatibility'. I have platform target set to 'X86', output type 'INT/GNT' and compile for debugging. So wanted to check if this is possible as I am pretty sure I have run .int files on a older product runtime and a earlier version of VC previously. Any help would be much appreciated. Thanks.

I am using Visual Cobol 2.3 in Linux. My requirement is to keep trailing spaces while writing data in output file. Even after setting FCD-STATUS-TYPE bit 5 to 1 (i.e. STRIPSPACE=OFF) cobol is removing trailing spaces in output file. Here is the code which I am referring:  CALL 'CBL_OR' using X'20' FCD-STATUS-TYPE value by 1 Please help...#VisualCOBOL#COBOL#Linux

My calls all worked perfectly until I needed to pass a user id and password via pointers to the MCSP area which is then passed via a pointer to the MQCNO record area.  I am getting a pointer value but MQ returns a message that I am not passing a user..

Hi, I'm hoping there's someone who can assist. I am a consultant assisting a customer migrate their mainframe Cobol application to AWS/Windows/MF. I have responsibility for a certain C DLL that needs to be called from some of the Cobol programs. The test Cobol program is clean compiled; however, am having trouble getting passed the error: Load error : file 'n3sgau'error code: 173, pc=0, call=1, seg=0173 Called program file not found in drive/directory The file n3sgau.dll has been copied to every possible location that I have seen reference to on the web. It's in a folder in %PATH%; in a folder in %COBPATH%, in the folder that the Cobol program executable is being run from. Have tried with and without using the following (and variations of it): 01  LOAD-DLL-PTR                USAGE PROCEDURE-POINTER.SET LOAD-DLL-PTR TO ENTRY "n3sgau.dll"SET LOAD-DLL-PTR TO ENTRY "n3sgau" Have used DEBUG and breakpoints at the above SET statements (LOAD-DLL-PT

QUESTION:  Visual COBOL includes support for running inside Docker containers. Is there a way a program can determine whether it's running within a container?   HOW TO STEPS: The built-in routine CBL_GET_OS_INFO, can provide information about the COBOL product in use, and the environment in which it's running. As part of the support for working with containers, this routine has been enhanced to return a new bit flag to indicate whether the program is running in a Docker container. When the routine is invoked, it returns a parameter block. One of the items returned is described as "Runtime System Capabilities", and a bit within that item indicates if a container is in use. The attached program is a demonstration of this functionality. It creates a simple report that shows the Product Version, and whether the program is running on a full O/S or within a container. The program uses the new BIT-OF function in Visual COBOL 6.0 to convert this information into an alphanumeric strin

I use Visual Cobol Personal Edition as extension of Visual Studio . Iwrite a simple programm +++++++++++++++++++++++++++++ 0 PROCEDURE DIVISION. 001060 INIZIO. 001070 OPEN I-O DCIT. 001080* 001090 BEG. 001100 DISPLAY "AGGIORNAMENTO LETTURE PRECEDENTI" LINE 1 ERASE. DISPLAY "AZZERO LETTURE QUESTA SCADENZA ?" LINE 2.001110 DISPLAY "DA CODICE A CODICE " LINE 3.001120 DISPLAY "TUTTO = 999999, FINE = 0000 " LINE 4.001130 DISPLAY "VA BENE (SI O NO) = " LINE 8. * ACC-SCAD.001430 ACCEPT PASS-W LINE 2 POSITION 34 PROMPT. 001450 IF PASS-W = "NO" GO TO FINE. 001460 IF PASS-W = "SI" GO TO ACC-MIN. 001470 GO TO ACC-SCAD. +++++++++++++++++++++++++++++++++ before execution of accepy at 001430 the screen look like fig 01 then I typed "SI" and I got but when I pressed "enter" the previous dispalies disappear and I got  how to fix? thanks

I got problem when I run the microfocus cobol module like CBLRTSM.DLL error..this is for dynamic binding error. I am using cobol patch version 5 for compile the module . But when I run module I got the dynamic binding error

Application contains calls to subprograms (dll in my case). Calls to Subprogram/dll work when you start debug from IDE.Calls to Subprogram/dll do not work when you start debug from the Visual Studio command line. When running programs without debug, it works if you put them all in the same folder.You can have a common output folder for all exe and DLL files in settings (for each program). I have not found a output folder setting at debug. Do I have to manually copy dll:s to the output folder of the main program? I use Windows 10, Visual Studio Profession 2017 and Visual Cobol 6.0. /Regards#debug#commandline#VisualCOBOL#173

hi We need a help with an issue. We have a machine that several users access and run the Microfocus Solo and whenever a Solo is instantiated it drops another user's, even creating the instance with another port. Is there a solution for this?

Hello, i use this command on SO linux : CALL "C$SYSTEM" USING "mv -f  /usr/dos/file1.txt  /usr/xxx/file2.txt"  if file1.txt is locked system display "cannot mv file locked ... "  how can i do to not display this message ? 

We're about to switch from PVCS to Git, and to start build our projects in Azure Devops (TFS). Problem now is that we have some 200 - 300 individual VC 7 INT/GNT programs which we would like to build and deploy individually. And that seems to imply that we would need to put each and every program in a separate project, which would be rather inconvenient for all involved. Is there another solution to this?

Hi -  I am working on installing MFED (Micro Focus Enterprise Developer) for Cobol project on RHEL8 for an application currently hosted on mainframes. This application currently has GUI Java based which gives CICS-MQ "EXEC CICS LINK" kind of calls to CICS modules in Mainframes which is CICS-MQ is it possible to have CICS-MQ on RHEL8 on MFED platform? or do I need to change the CICS-MQ calls to ESSERVER, ESHANDLE, ESCONN, etc kind of layer? Ultimate goal is to move it on Cloud. Can someone please take a look at this question and update.

I'm hoping to apply the "Uninitialized Data Items" rule from the Code Analysis menu, but I can't seem to make it work.  What might be wrong?I am using:COBOL for Eclipse Version: 5.0.297.v202001281613For example, the contents of the copybook below are flagged as uninitialized despite the Procedure Division code containing this statement.  010700***************************************************************** 010800* Initialize our output area * 010900***************************************************************** 011000 Initialize CD51O-DATA. 05 CD51-DATA. cbankd51 001500 10 CD51I-DATA. cbankd51 001600 15 CD51I-PID PIC X(5). cbankd51 001700 88 CD51-REQUESTED-ALL VALUE 'ALL '. cbankd51 001800 10 CD51O-DATA. cba

One of our vendors converted their application from NetExpress to Visual COBOL and we have programs that interface with their system so we are having to make the jump to Visual COBOL as well.  I am using the same method of invoking a GNT as previously done under NetExpress using the RUN command but am getting this error message.  Not sure if I need to add a folder to the PATH statement or something else entirely.  Also, the GNT is compiled under 6.0 but trying to run against a 4.0 version of Visual COBOL on another server.  In addition, when on this 4.0 server, merely typing in RUN at a command prompt results in the same error.   Load error : file 'MFRUN.gnt'error code: 179, pc=0, call=1, seg=0179 error message text not found

Anyone aware of documentation for RM Cobol's Registry Configuration (RMCONFIG.exe) tool?#RMCONFIG#RMCOBOL

We have tried to read all 3 comments in start of this xml. We use CXML-GET-COMMENT, but the call returns only with the first comment. The strange thing is that len = 96 which is the correct lenght for all 3 comments. <?xml version="1.0" encoding="UTF-8"?> <!-- Metode: POST /driver/DriverLogin --> <!-- Port: 443 --> <!-- Platform:Android;Version:1.9.5 (1950);Location:NotSet--> -<RequestLogin> What can be the problem?

Hello, Currently, our system is running with RHEL 6 and MicroFocus Server Express 5.1 WS11We're planning to perform new installation of RHEL 8 with Server Express 5.1 WS19 However, I couldn't find any compatibility list for RHEL8. Even RHEL7 is not in the list at all. Ref: https://supportline.microfocus.com/prodavail.aspx Does it actually compatible with RHEL 8?  Thanks.#compatibility#ServerExpress#redhat

Client PCs are win 10 pro Server Win 2019 Runtime 10.3.0 This message just started popping up 2 weeks ago. We have been using Acuconnect for 2 years without any problems. I initially thought this was a Wan problem. However I can get the error on the local side of the network. The program is sitting at a menu waiting for an accept. The is no file i/o going on. No program changes, config changes or windows patches were applied before it started. Any ideas are appreciated. 

Hi    Must move server express on Solaris to Visual Cobol on RHEL 7.9 . how much Visual Cobol is different from Server Express 5.1? Thanks Shraga

Which runtime modules from VC7.0 and VS2019 must be given to be able to run the project on a other computer?     a) with only dialog system screensets (without using dotnet), a project convert from NETX5.x     b) later when using dotnet screensets There are many users wanting this information! With NETX5.x only 33 files (lbr, exe, dll, gnt) must be copied to the compiled programs. cg

Hi,  I have a new challenge for which I ask again for your help. I have to develop an interface via tcp and for that I need to send an information package and receive feedback information. I have documentation from the vendor that I send in this post. community.microfocus.com/.../alicepad_5F00_protocolo_5F00_1.0.0.pdfBest regardsAlberto Ferraz

when i import a project i can see in the new generated lbr, also *.gs and *.cbl, but on netexpress we have separate *.gs and *.cbl files. But this is only for the first lbr, all others are correct! Do you have any "bugs" by importing from netx5.x? Thanks for a good discussion, helping all MF-Customer!!! cg

Hi,  We are currently using HP PCL to print our label and we have generate the barcode as a image file.  May i know how can we print the barcode image file into our label, so that our label can have the barcode as well.  Thank You. 

i have work only with dialog system and have many problems to adapt me on Visual Studio to create professional screensets. Who want exchange his experience and screensets, data must be store in mssql-database, sql is not the problem. I have show the examples from VC7.0, but there is nothing new. Is it possible to buy a separate tool for a easy way to start quickly? Thanks for help or information! cg

Hi, A vendor sent me a DLL to interface with an IOBoard. It turns out that I've "registered" the DLL in the project's References but I can't use its functions because they all say they don't exist. I can't even see the features in the object browser (as I can see the other DLL's). I've been looking at the original C# project that the vendor sent me and they have a class where they have the functionalities defined. I don't know if this will be the solution. I've also tried converting the instructions of this class but it gives me an error. What they have is: [DllImport("C:\\\\Users\\\\utilizador\\\\Downloads\\\\DLL_AcronymV4\\\\DLL\\\\Acronym.dll")] public static extern int CloseTerminal(ref object vTemplate); After conversion give me this: method-id CloseTerminal (reference vTemplate as object) returning return-value as binary-long attribute DllImport("C:\\Users\\utilizador\\Downloads\\DLL_AcronymV4\\DLL\\Acronym.dll") static