Rocket® Visual COBOL®

When debugging in Visual Cobol, if your program displays anything eg.    display "result " some-varthis output ends up in the runw.exe window. How, for all that is holy, do you manage this window? Move it around, decide where it pops up, resize it, anything?If your debuging session is active you just get a busy cursor when you move your pointer to it. If you stop debugging the window goes away. In Net Express you had some control over this window, in Visual Cobol it's just horrible. Case in point, like many others I'm working from home, at the office I have two displays, at home I have one. This is where my runw window ends up, at the edge of the screen, cut off, and I cannot move it. So if anyone has figured out some way to interact with this *thing* - care to share?

Hi All,Hope you are well.When importing Visual COBOL Remote Projects (from Linux Platform), is there a way to filter (remote directories and/or files extensions) when the remote initial directory contains a lot of files?Thanks in advance.Franck.

We are evaluating a possibility of migrating customer database from ORACLE to POSTGRESQLCustomer is using Visual Cobol - PROCobol  (Not only (also  java, .NET) -  but we have around 100000 lines of COBOL).Is it practicable (reasonable) to migrate it from Oracle ProCOBOL to OpenESQL POSTGRES? Has anyone tried it, also with other databases?Any hints?

with openEsql assistant it is possible to convert SQL Pictures clauses in Cobol Syntax.SQL_Name nchar(40) not null --> SQL-Name     pic x(40).Is the reverse way also possible?Who know from a tool that haven this functionality?for one data record, this can be done manually, but by more than 100 file-records, this may be helpfullThanks 

Hello VC Forum,in my current project we have to generate JSON from from a COBOL structure which looks like01 jsonStructure. 05 array1Count pic 9. 05 array2Count pic 9. 05 array1 occurs 1 to 5 depending on array1Count. 05 array2 occurs 1 to 5 depending on array2count. 10 subarrayCount pic 9. 10 subarray occurs 1 to 5 depending on subarrayCount.Unfortunately VC compiler produce on the part "subarray" an error:without ODOSLIDE directive: COBCH0144S OCCURS DEPENDING subsidiary to OCCURS only allowed with ODOSLIDEwith ODOSLIDE directive: COBCH0245S DEPENDING ON item subarrayCount missing or illegal.It is maybe possible, to use fix occurs structures, but then we get problems with the called service because of empty elements generated by JSON GENERATE.Does someone have the same problem? Is there any possibility to use dynamic occurs structures with JSON GENERATE or to avoid the

After a clean compile of the MF sample program AIRCODE.CBL, I got this statement from the 'OUTPUT';------ Build started ------C:\\Program Files (x86)\\Microsoft Visual Studio\\2019\\Community\\MSBuild\\Micro Focus\\Visual COBOL\\v1.0\\MicroFocus.COBOL.CurrentVersion.targets(364,9): error : MSBMF002 - An internal error occurred. Exception text follows:C:\\Program Files (x86)\\Microsoft Visual Studio\\2019\\Community\\MSBuild\\Micro Focus\\Visual COBOL\\v1.0\\MicroFocus.COBOL.CurrentVersion.targets(364,9): error : The path is not of a legal form.========== Build failed ==========Time Elapsed: 0.06 seconds I do not know what the 'legal form' means nor how to correct it. 

Hi,my (maybe 25 years old) Copy starts with01 L-VD-Daten sign leading separate.02 MOVE-LVDDATEN.03 Gesamt.05 VNR PIC S9(8)....Trying to compile it in Visual Cobol 5 CobolCopyBook-Project/COBOL-JVM-Poject I am getting 'COBCH0217S Preceding item at this level has zero length' .Is there maybe any directive to avoid this ?Sincerely,Herbert 

I just got Visual COBOL 5.0 Yesterday, and installed it.  Then I went to install the COBOL Server for windows, and received an error that I cannot install that until Visual COBOL 2017 has been uninstalled.So, I went and uninstalled Visual COBOL - and I am still getting the same error.Windows doesn't show Visual COBOL as an installed program any more, so I don't know where it is finding it.I have attached my log file.  

on mssql tool the database is created, with visual Cobol not, i become mssql-error-code -102 or -226What is wrong?Please see the Notepad document in attachment to create tables is not the Problem! create DATABASE    

Who had programming EDIFACT as Orders, Invoices or DESADV and can publish a Cobol source code?Thanks

We have a program running on COBOL Server 3.0. We read from and write to data files. At some customer locations we install COBOL Server on several PCs. Data files will typically be located on one PC and shared using Windows 10 network file sharing. The other PCs running COBOL Server, on the same network, will access the data files on a mapped network drive.Performance is usually acceptable, but at some locations response times increase drastically. A procedure that takes <2 secs on one setup may take >45 secs on another. I looked at the network traffic on one such troublesome location as I ran the procedure. The network traffic on the PC with the data file was at Send: 2Mbps , Receive: 1Mbps while the other PC was waiting for data (for about 50 secs). Running the same procedure on my own network, with the same data, there is hardly any network activity on the PC with the data files, and the procedure is done in about 1 second.(This may of course be down to netwo

Many People have Problems to start new Projects with the new possibility, having use in the past Dialog System Screens with Netexpress and continue with VC5.xWho has developped new forms wicht vs2017/2019 working with VC5.x and sales this for there use!By respecting the 4 parts by developpment:- grafical Screen Interface (VS, html, other?)- program logic/Dialog (managed or unmanaged Cobol)- database interface (not isam, mssql, Oracle, db2, mysql or other)- grafical printing Interface (with Combit List&Laber or other performant Tools)My only Problem is the new grafical Screen Interface and will not make many Errors and can give my experience by the 3 others Programm parts!Who know where to buy grafical Screens?I mean MF must do more and give us more professional examples!Or must we create a Startup?

i use a demo json Cobol program found by mfWith netexpress 5.x no error by compiling, with visual Cobol 5.x following Errors:json generate json-doc from Person Count in c1             *> (line 68)Name of salary is 'income'                              suppress NS-num *> for security                                     *> (line 70) Typ  *> for brevityCOBCH0012 Operand json is not declared                    --> Line 68COBCH

who as experience and have included pyhton?thanks for more Information!

In all examples (that I've found) in MF documentation about XML syntax extension to COBOL the variable for file-status is in the select (with organization is xml) is defined as s9(9) comp.Here's a fun trick, stack the xml and procob precompilers, in your procob config file have comp5=yes which is recommended. Procob will worry that your file-status might be used as a host variable and will change it to comp-5. Now if you're using lvl 88 definitions to check your status, eg.            88 end-of-file-xml value -7.    88 not-well-formed-xml value -9.This will work in Net Express but fail in Visual Cobol.Back to the question then - why is the status variable defined as pic s9(9) comp in examples? Is something like pic s9(4) comp-5 considered harmful? If yes - why, if no - documentation should be changed to reflect th

Problem With SQLCA's SQLERRMC limited to PIC X(70), calling Oracle's SQLGLM allows to retrieve error messages longer than 70 characters. The following works fine in 32-bit: 05 ORACLE-ERROR-TEXT PIC X(100) VALUE SPACES. 05 ORACLE-ERROR-SIZE PIC S9(9) COMP-5 VALUE 100. 05 ORACLE-MSG-LENGTH PIC S9(9) COMP-5 VALUE ZERO. CALL 'SQLGLM' USING ORACLE-ERROR-TEXT, ORACLE-ERROR-SIZE, ORACLE-MSG-LENGTH However in 64-bit, the same CALL fails with RTS 114 'Attempt to access item beyond bounds of memory'. Solution The Oracle 64-bit version requires a 64-bit data definition for the length parameters passed to SQLGLM. They should be defined as PIC S9(18) COMP-5. The following shoul

Hi,I am getting'COBCH0853S System error - evaluation stack mismatch ... -> in the line 'EVALUATE HV-POS' using the VC5 Bytecode Compiler when compilingEVALUATE HV-POS       WHEN 02 MOVE 'something ' TO H-TEXT       ADD 1 TO ZZ-02       WHEN 67 MOVE 'something else ' TO H-TEXT       MOVE 'J' TO KEZ-AUSGABE      WHEN 68 MOVE 'something else x ' TO H-TEXT      MOVE 'J' TO KEZ-AUSGABE      WHEN ANY MOVE ' ' TO H-TEXTEND-EVALUATEReducing the nestings, e.g.EVALUATE HV-POS       WHEN 02 MOVE 'something ' TO H-TEXT       ADD 1 TO ZZ-02*       WHEN 67 MOVE 'something else ' TO H-TEXT*       MOVE

Hello,Brand new to this forum, my name is Nicolas and I am in charge to optimize COBOL programs converted from IDEAL.I have two questions regarding the profiler.1. The results of the Profiler are quite inconsistent on our site for Online programs.I ran 10 times the same transaction with the same input and results in MF Profile are difficult to analyse. Sometimes there is one procedure taking 100%. another one there are four procedures taking each 25%, then 3 other procedures taking each 33%Anybody had inconsistent results like this and have a clue on how to improve the profiling on Online programs ?2. Since 2 or 3 monthes ago, there are sometimes new lines at the beginning of the profiler in the Call Count.Please look at the attachment.There are some weird characters, is this normal or a problem on my site ?Before I had only one line in this section. What are the new lines for and means ?Thanks and Kind regar

I have a masked text box control on my windows form which I want to use in order to display a SSN to the user. I chose a predefined mask description in the properties windows and it looks as follows: 000-00-0000.When I move a value that has leading zeroes to my mask text box, however, it drops the leading zeroes. For example, if I move a value of '000001234' to the mask text box, it displays it as follows:  123-4_-____. I works well if there are no leading zeroes. If I move the value '123456789'  to the mask text box for example, it displays it correctly as follows: '123-45-6789'. 

In Visual Cobol 5.0 for Visual Studio 2019 I can not get context help to work.When I hit F1 it goes to " lang:"en"&form=S00028" target="_blank">https://www.bing.com/search?q=how to get help in windows 10&filters=guid:"4028227-en-dia" lang:"en"&form=S00028 . When I hit F1 should it go to to online Visual Cobol Help?     

i wanted test the email sending on visual Cobol. I know at the base the example was written in netexpress 5.xI missed MF-Copy files as:commdlg.cpymfres.cpyminiwin.cpywingdi.cpywintypes.cpy (in MF-Files fail the Definition of lphandle)winuser.cpyAre there other files to be placed in source programs?Using the netexpress copy files in visual Cobol gives any error on the Syntax!I can posted this in a separate message!

There are a many examples how to send emails via MS Outlook and i think that is also possible with groupwise?Who as a done this? in the Moment i am able to send mail with the tool "blat.exe", the only Problem is that the mail don't appear in GroupwiseAre the a documentation for Groupwise api?thanks for help! 

Is it possible to find the full license key number using the License Administration utility, AppTrack? 

Problem: Each Server (region) running under Enterprise Server shows, on its Server > Properties > General tab, settings named Shared Memory Pages and Shared Memory Cushion.  These have default values such as 512 and 32, for example.  But the values might need to be adjusted to be certain the Server has enough shared memory.  When a Server is running under load and the shared memory settings are exceeded, the following error might appear in the console.log:  'CASKC0007W Shared memory storage constrained'.  How should a person decide what values to specify? Solution: The product documentation contains charts to help estimate the amount of shared memory a Server might require, for example as shown on this page: http://documentation.microfocus.com/help/topic/co

Is there any way to redeem a  Cobol Server license key purchased in 2008 by mý company? The only information i have is the serial number.