Rocket® COBOL

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 generation of empty elements by fix occurs?ThanksAndreas#J

I have a COBOL program for internal use that sends emails to multiple addresses.Does COBOL have a method to check the addresses one by one and return a status? If not, will this method work in COBOL?https://www.interserver.net/tips/kb/check-email-address-really-exists-without-sending-email/ 

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 would like to write in SQLite with AcuCobol 9.2.5 and use sqlite3.dll. Is it possible and when yes, where can I find an example?Thank you in advance.Werner

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 network and computer p

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 need to gather certain counties (that will vary, depending on various other data and so cannot be predefined) and put them in a dropdown, so one may later be selected by the user. Is there now a way to do this?Thanks.

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 68COBCH0058 Not a Report Name or a Report Group &nbsp

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

Windows 10 updates on client machines (no rhyme or reason as to which version or build of Windows 10 this occurs in are removing the comdlg32.ocx activeX file from the Windows system directory (Syswow64 on 64 bit systems) . To fix this, we need to gain admin access to the workstation – run an elevated command prompt and re-register the comdlg32.ocx after placing a copy of it back in the system folder.Anyone know of a replacement I can use in RMCOBOL-WOW instead of the comdlg32.ocx? 

We are in the process of upgrading to W-10.  One of our users is trying to test and is receiving the following:faulting application name: runcobol.exe, version: 10.1.2006.516, time stamp: 0x4469702a faulting module name: ntdll.dll, version: 10.0.18362.387, time stamp: 0xa4208572 exception code: 0xc0000006 fault offset: 0x00071d40 faulting process id: 0x3ba8 faulting application start time: 0x01d58912c2f11422 faulting application path: x:\\long\\runcobol.exe faulting module path: c:\\windows\\system32\\ntdll.dll report id: 735818e3-2df2-4d96-9451-d34d05622742 faulting package full name: faulting package-relative application id:Does anyone know what the problem is?

It's hard to explain in words, basically from this:To this:The data is saved properly, the only issue is the display.I guess this has something to do with COBOL's limitation, and I cannot expect a user to type '&&' just for convenience. 

I am calling a .DLL using .NET.  I used NETDEFGEN to create applicable Copy books.I have coded a test, that fails with a Memory Access Violation.The error is on the statement that is passing a Handle that was created from CLASS that was created.  Unfortunately the documentation and the samples do not replicate the coding that I need.  I have included a test program that reproduces the error.  I suspect the CLASS is not set up in NETDEFGEN correctly.  I have attached the program, the .DEF copy files from NETDEFGEN and the library.  I have inserted comments describing the issue,  just in front of the line that is executed that causes the error. 

I have ne release of 10.3.0 installed and the "@!" command in debug does not work.  After issuing it on a given cobol statement, the program just continues on from where it initially stopped at my breakpoint.

Has anyone been able to control a Verifone Crdit/Debit Card Reader.The device can communicate either on the network or USB.  I assumed that C$Socket could to the trick.  Can anyone offer advise or help on how to hook this thing up and does C$SOCKET talk to a COM port ?    Randy --- HELP --- I'm drowning in technology that is poorly documented.  #Verifone#CreditcardReader#USBCommunication#CSOCKET

Has anyone encrypted their unix vsam files?  I am looking for a product that can provide some level of encryption of unix vsam files which would be compatible with Server Express (on server side) and Visual Cobol (on client side).  Any suggestions would be appreciated.#encryption

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 the fact that this may cause unexpected results in some configurations. 

We have having a comctl32.dll crash error very intermittently on our AWS server.  It does not do it on our other servers.  It is very intermittent and only when a large refresh is taking place and not every time.  We are running 10.2 and here is the error message: Problem Event Name:                          APPCRASH   Application Name:                             wrun32.exe   Application Version:                           10200.0.0.7639   Application Timestamp:                  &

I am trying to get the postcode API to work  but I keep getting 'invalid API key'.I have a valid API key so what am I doing wrong?           CALL "HttpGet" USING                 DESTINATION-URL                 RESPONSE-POINTER                 RESPONSE-LENGTH                 "X-Api-Key:"                                 API-KEY                 x"00&quo

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 should work across both 32-bit and 64-bit platforms: 05 ORACLE-ERROR-TEXT PIC X(100) VALUE SPACES. $IF P64 SET 05 ORACLE-ERROR-SIZE PIC S9(18) COMP-5 VALUE 100. 05 ORACLE-MSG-LENGTH PIC S9(18) COMP-5 VALUE ZERO. $ELSE 05 ORACLE-ERROR-SI