Rocket® COBOL

Files that are not indexed in our shop are usually LINE SEQUENTIAL and it is never necessary to look for x'0a' or x'0d'.  When reading files without these characters from other sources, we have read them as SEQUENTIAL when we were sure of the record length. My question concerns a file with fixed length records except there is a short header in front of the first record.  Is there a way to specify how many characters to read outside of the record layout?  I got past this problem by defining a one character file so I could get past the header separately from the records where I performed a read in a loop to create the record in working storage.  It worked, but is there a better way to tackle this? Thanks in advance.

Hi, how to convert this code C# to Visual Cobol?string FromNumber = "9999999999999"; string password = "xxxxx";string nickName = "xxxxx";WhatsApp wap = new WhatsApp(FromNumber, password, nickName, false, false); wap.OnConnectSuccess = () => {   MessageBox.Show("Connected to whatsapp SuccessFully...");    wap.OnLoginSuccess = (PhoneNumber, data) =>   {     MessageBox.Show("Enterned");     wap.SendMessage(Phnumber, message);     MessageBox.Show("Message Sent Successfully...");    };   wap.OnLoginFailed = (data) =>  {    MessageBox.Show(data);   MessageBox.Show("Yes Failed login : {0}", data);   };   wap.Login();}; wap.OnConnectFailed = (ex) => { MessageBox.Show("Conncetion Failure"); }; wap.Connect();   Visual Cobol 2.3Visual Stúdio Community 2015

Hello, wir are using RM-Cobol with wow designer and have purchased FlexGrid by ComponentOne and have the following problem with it: while moving mouse over the rows, the rows roll up or down. Who has encountered this problem and can help me? Thanks in advance Suzana#RMCOBOL

Hello,I develop some programs that could be used either under Windows (in graphical mode) or under Linux (in character screen mode or graphical mode depending on how the user is connected to the server). I use the following setting  KEYSTROKE Edit=Down kdKEYSTROKE Edit=Up ku to configure a different behavior for arrow keys Up and Down (compare to TAB and SHIFT-TAB) This works fine with Graphical mode (Windows or Linux) but doesn't work in Character screen mode.  I have reproduced this issue with the sample program  custrpt.cbl. If you execute it with wrun32.exe and the configuration above, it is Ok. But if you execute it with crun32.exe (to be in character screen), arrow keys Up and Down are no more working. Do you have any idea ? Thanks by advance for your help.  Jean-Luc      

Greeetings. When I try to execute the .exe files, I've just downloaded, following the instructions from the email MF sent me, they  say that I do not have the MF installed, I am running windows 10. Please, any suggestion? PS, next is the log I tried to unload, it appears to be an image, or photo though. Micro_5F00_Focus_5F00_Visual_5F00_COBOL_5F00_for_5F00_Visual_5F00_Studio_5F00_2017_5F00_20181128150317.logs?

I have my development machine (Windows Server 2012, Net Express 5.1) and second machine (also Windows Server 2012) with product which I am developing installed. Please is there any possibility to setup remote debug between these two servers? Thanks for any help.#debugging#cobolnetexpress

Please help with the following file read that runs when using our old compiler but falls over opening the file with the Visual COBOL error -> MicroFocus.COBOL.Program.COBOLFileHandlingException: ''c:\\data\\MCDFCTL' : 9/043 (ANS74)%d      error message text not found '       IDENTIFICATION DIVISION.       PROGRAM-ID. program1.       ENVIRONMENT DIVISION.       INPUT-OUTPUT SECTION.       FILE-CONTROL.            SELECT  CONTROL-FILE                    ASSIGN  TO      "c:\\data\\MCDFCTL"              ACCESS MODE       &nb

These sequences work very well, but insert the Picture at A1        *>   Get the collection of WorkBooks           invoke ExcelObject "getWorkBooks"               returning WorkBooksCollection       *>   Add a new WorkBook to the collection           invoke WorkBooksCollection "Add"               returning WorkBook           invoke ExcelObject "getActiveSheet" returning Activesheet           invoke Activesheet "getPictures" returning Pictures           invoke Pictures "Insert&quo

Sometimes when I build my visual cobol win form project I will get a compile error I-O error:  IDY file.  I then have to close visual studio, go to the debug folder of the project and delete the files within in.  I restart visual studio, open the project and compile is successful.  Does anyone know why this randomly happens or what can be done to fix the problem?   Thanks.

Is it possible to open multiple pdf files in the browser control? Something like  MODIFY BROWSER-1 VALUE = pdf1; pdf2.

Olá, estou precisando de um exemplo para Visual Cobol 4 que faça uso de fileshare, nunca utilizei alguem tem um exemplo. E o que é necessário para sua execução? Obrigado.   Hello, I need an example for Visual Cobol 4 that makes use of fileshare, never used someone has an example. And what is necessary for its execution? Thank you.

public class Person { private string Name; private string FirstName; public Person(string name, string firstname) => (Name, FirstName) = (name, firstname);List<Person> listofPersons = new List<Person>(); listofPersons.AddRange(new List<Person> { new Person("John1", "Doe" ), new Person("John2", "Doe" ), new Person("John3", "Doe" ), });

Dear Admin,Currently I meet this error in my local cobol env, any suggestion on it? Very appreciated with your help,thanks!honey:/var/cics_regions/TEST/bin # cob -u GSYSTIME.cbl -C DATA-CONTEXT -C CALL-RECOVERYcob32: Compilation and code generation of COBOL not supported in this product. #I am using Micro Focus Visual Cobol 3.0 on 64bit x86 Linux SUSE12sp3 #It says that: "cob32: Compilation and code generation of COBOL not supported in this product",while the cob32 is already under directory /opt/microfocus/VisualCOBOL/bin honey:/opt/microfocus/VisualCOBOL/bin # ls -lrt|grep cob32-r-xr-xr-x 1 root root   80228 Jun  8  2017 cob32#I have already done these COBOL env variable settings.honey:~ # echo $PATH/sbin:/usr/sbin:/usr/local/sbin:/root/bin:/usr/local/bin:/usr/bin:/bin:/usr/bin/X11:/usr/games:/opt/ibm/cics/bin:/root/bin:/opt/microfocus/VisualCOBOL/bin:/root/bin:/opt/ibm/cicstg/jvm180/binhoney:~ # echo $COBDIR/opt/microfocus/VisualCOBOLhoney:~ # echo $LD_LIBRARY_PA

Created On:  03 December 2012 Problem: Trying to call the dll’s from within a cobol program does not work even when setting the DLL_CONVENTION configuration variable.  The DLL itself appears to be loaded but when trying to access the method fails. Resolution: The only way to load these DLL's now is to pre-load them as calling them from a program does not work. To preload for example: - wrun32 -y xmlif.dll -y rmnet.dll Old KB# 36651#RMNet#xml-extension#COBOL

Hi there,I am trialling Visual Cobol and because I don't have the manuals would like to know if somebody can help convert the following bits of legacy code which are throwing up "unknown type *OLE" errors.Many thanks,Greg. 000350 ENVIRONMENT DIVISION.000360 CONFIGURATION SECTION.000410 SPECIAL-NAMES.000420                 ENVIRONMENT-NAME   IS NT-ENV-NAME000430                 ENVIRONMENT-VALUE  IS NT-ENV-VALUE000440                 CONSOLE IS CONS-1.000450 REPOSITORY.000460                 CLASS OLE AS '*OLE'.... 001220       MOVE  '0'         &nbs

I have read mixed reviews about using the report writer.  Does anyone have any pros and cons they would like to share?  To me, it seems very easy to use when you wish to generate reports instead of having a lot of working-storage section items for filler, headers, footers, etc.  Should the report writer be used for all generated reports?

Is there any way to display a Dialog screen and have it return to the Visual COBOL program without the user having to click anything on the screen? What I am trying to do is display information regarding what my program is doing on the screen for the user to see but I do not want to stop my program from running ( I do not want to interrupt program's run time). Usually, when a Dialog screen displays, it stops the program and waits for user input (it waits for an event triggered by a button on the screen). I am trying to display a screen and have it return to the program without the user having to click on an object on the screen. I have tried the following: ******************************** SCREENSET-INITIALIZED MOVE-OBJECT-HANDLE CLNTPROS DSMOVSZ-HANDLE-COUNT(1) MOVE "mova" DSMOVSZ-FUNCTION(1) CALLOUT "dsmovsz" 0 DSMOVSZ-PARAMETER-BLOCK IF= RETC-FLAG 1 DISPLAY-AND-RETURN DISPLAY-AND-RETURN      RETC ********************************* This code exe

Good day everyone,I was wondering if there were any tweaks that I could enter into the AcuServer config file to improve performance? We're running AcuServer for a customer who's having error problems with the standard 32-Bit runtime and we decided to go down the path of AcuServer to see if it eliminates the errors without worrying about SMB and opportunistic Locking. The problem with AcuServer is that it runs much slower than the runtime.  AcuServer is running on Windows 2012 Server where the data files reside. The shortcuts are running on Citrix clients. Any tips would be appreciated. Cheers, Rafael..#AcuServer

  Problem: After Windows 10  major update the Net Express 5.1 license is corrupted.     Starting Net Express loads the Micro Focus License management System, which shows the License Status as: “Your Net Express license has been corrupted”. Resolution: Some Windows 10 major feature updates delete a number of registry keys that are used by the Net Express license management system. These registry keys are used when checking for a license and if they are not found the License Manager process will fail to function correctly.  This will happen when starting Net Express and when starting the License Management System. Registry keys that may be deleted are:HKEY_LOCAL_MACHINE\\SOFTWARE\\Wow6432Node\\Microsoft\\Windows\\CurrentVersion\\Internet Settings\\{D50D8764-ECB7-4b58-8568-8AF1403B76F1}HKEY_LOCAL_MACHINE\\SOFTWARE\\Wow6432Node\\Microsoft\\Windows\\CurrentVersion\\Internet Settings\\{D50D8764-ECB7-4b58-8568-8AF1403B76F2}Resolution option

We are migrating from Server Express 5.1 to Visual COBOL 3.0.  I am trying to get a very basic COBJVM example to debug.   The environment is   Visual COBOL for express 3.0 on windows 10 Visual COBOL devhub 3.0 on SLES 12.   I have created a new remote COBOL project with Java Byte Code target.   I have created and compiled a very simple COBOL program   (See end of this post)   The program compiles fine, and I can run it by going over to Linux and running cobjrun, but when I try to debug it in eclipse I get the following error                    Could not launch remote project.  Check that the remote server settings are not empty.    the remote server setting is definitely not empty, it shows the correct server.   ----- program ----          program-id. ap02 as "ap02".       data division.       working-storage section

PROBLEM When running a newer version of AcuConnect on the server, the automatic update is triggered and installed on the client machine as expected. After this, when the .atc file is launched, the previous version of AcuThin is still used instead of the new installed version. This means that the automatic update is triggered again.   RESOLUTION An additional registry key, created for the .atc extension and set to a previous version of AcuThin, was causing the .atc file to always be launched with that version even after an automatic update. This registry key atc_auto_file, in fact any <ext>_auto_file key is created when trying to open a file and are prompted with "Open With" or "How do you want to open this file" dialog. Responding with a specific version of AcuThin means that this will always be used regardless of newer versions of AcuThin that are installed. Removing the atc_auto_file registry keys resolves this issue. N.B. The following solution require

Can anyone elaborate on using typedefs as opposed to copy replacing.  I don't understand the concept and the little bit of reading that I found does not help much.  Is this a better way of coding working-storage items?  Please provide example code if possible.#VisualCOBOL

Are there any good code examples available for using the printer routine libraries in a managed cobol program?

I was reading somewhere where the Merge statement is not often used with sequential files.  Is there an alternative or a best practice when using sort and merge statements?

 Hi To summarize: In VC 2.3 for VS, we need to digitally sign portions of an XML document in SOAP envelope.  We are using classes in System.Security.Cryptography.Xml, in particular the class SignedXml We are having trouble signing xml when we add a Reference based on an Id attribute.  We are getting "Malformed Reference Element" exception when ComputeSignature is invoked. After much searhing on the internet I made have found the answer in stackoverflow, but I need to convert C# code below:   public class SignedXmlWithId : SignedXml{ public SignedXmlWithId(XmlDocument xml) : base(xml) { } public SignedXmlWithId(XmlElement xmlElement) : base(xmlElement) { } public override XmlElement GetIdElement(XmlDocument doc, string id) { // check to see if it's a standard ID reference XmlElement idElem = base.GetIdElement(doc, id); if (idElem == null) { XmlNamespaceManager nsManager = new XmlNamespaceManager(doc.NameTable); nsManager.AddNamespace("wsu",