Browse all forums dedicated to the Rocket® COBOL product family.
Recently active
Hi - How we can fetch the Paragraph name along side with business rules extracted from Microfocus. Any help on this would be appreciated
Whats is the sentence for uninstall RM Cobol V12 - 64 Bits in Linux CentOS Thanks#RMCOBOL#linuxcobol
Hi, I'm new to the community so I hope I'm asking the question correctly. I installed Visual Studio 2017 for personal use and microfocus COBOL. When I load the program in, the build button is displayed. The compile button is displayed under it. The compile completes with no errors - very simple program. I do not have a run button and debug doesn't have a button to step through the program. When I check the folder where the program is, I have a .int file but no .o or .gnt file. What do I need to do to be able to run this very simple program? Thanks, Chuck Dial#VisualStudio#COBOL
I have a naïve cobol program running in visual cobol 2.3 that get a run time error 173 on MFFH. I have the cobol server path in the bat file that runs the program and even tried copying the bin folder to a different local drive with the same results. What am I missing. I have followed the documentation for running naïve programs from a workstation. PATH=C:\\PROGRAM FILES(x86)\\MICRO FOCUS\\COBOL SERVER\\BIN;D:\\CCARMARUN\\BIN;D:\\CCARMARUN;%PATH% CCARMA CCARMA is the program.
i have a netexpress program calling a vb subroutine passing 3 integer parameters which works fine. If I try to pass the second 2 integers as a group then I cannot get it to work. (the group will eventually have about 50 items in it) VB Prog Imports System.Runtime.InteropServices <ComClass(vbpan32.ClassId, vbpan32.InterfaceId, vbpan32.EventsId)> _Public Class vbpan32 #Region "COM GUIDs" ' These GUIDs provide the COM identity for this class ' and its COM interfaces. If you change them, existing ' clients will no longer be able to access the class. Public Const ClassId As String = "253aac3c-266c-4786-a71c-7185051536c2" Public Const InterfaceId As String = "1882ce84-9369-4d02-ada6-1a6438e56a08" Public Const EventsId As String = "d610f949-b193-4e5a-9398-7a9ed1426c4b"#End Region ' A creatable COM class must have a Public Sub New() ' with no parameters, otherwise, the class will not be ' registered in the COM registry and cannot be created ' via CreateObject. Public Sub New() MyBas
ACCEPT WS-DATE FROM DATE RETURNS A 6 CHARACTER DATE. WHAT NEEDS TO BE DONE TO MAKE THIS 8 CHARACTERS?
We have migrated from netexpress for Windows to visual cobol 4. I need to use cblnames from command line . Where can I find the technical documentation? In the previous environment the command used was: cblnames -V -FM -DUSFHINIA.def @USFHINIA.NAM
Problem: How to put comments in an EXTFH configuration file? This KB applies to Net Express & Server Express products. Resolution: The default 'tag' to insert comments in an EXTFH configuration file is to write a line beginning with a semi-colon ( ; ) ----> ; This is a comment [XFH-DEFAULT] STRIPSPACE=OFF ; Do not remove trailing space characters when performing WRITE or REWRITE operations ; on line sequential or line advancing files. ================ the 'tag' to insert comments is configurable with COMMENT-INDICATOR: for example COMMENT-INDICATOR:* * This is a comment [XFH-DEFAULT] STRIPSPACE=OFF * Do not remove trailing space characters when performing WRITE or REWRITE operations on line * sequential or line advancing files. Old KB# 1355#netexpress#ServerExpress#COBOL#AcuCobol#RMCOBOL
Hi everybody, I am developing a low level solution by using named pipes with dynamic memory allocation with CodeBridge. For this I have been using the library directly but after the execution returns to the main Cobol program, when I use SET statement with a LINKAGE structure it gives me an error 104. The specific question is, if I am using a Cobol POINTER as a C argument for memory allocation, should PointerBaseToCobol, PointerOffsetToCobol and PointerSizeToCobol functions be enough? Or Should I use something else? Greetings! Marcos#CodeBridge#pointers#memoryallocation#RMCOBOL
"Hello". Please allow me to make this post to ask for help. I suspect I have XBIS configured incorrectly. Here is the contents of the SRF: {{ // There must be no whitespace before the XML header, hence the newline-eating comment tags. }}{{ Handler * }}{{//}}{{ Trace(start,file,DIR=/dms/src/DIPO/ptrace,exchfiles) }}{{//}}{{ RunPath(/dms/obj,/dms/dmsdata,/dms/dmsmast) }}{{//}}{{ StartService(DIPOAPPDRVR -A='WHI' -v) }}{{//}}{{ XMLExchange }}{{ SessionComplete }} Here are the contents of the trace file: MODBIS2|1532979782.25|--------S-T-A-R-T--O-F--R-E-Q-U-E-S-T------- from 69.176.97.175 at 2018-07-30 14:43:02 -0500SERVICE|1532979782.36|Generated XML file name: /var/local/liant/bis/bisL7Hh4C-aQ8EK1RUSDSRxeQ-0000.xmlServMsg|1532979782.36|Trace "/var/local/liant/bis/trcL7Hh4C-aQ8EK1RUSDSRxeQ"ServMsg|1532979782.36|Trace onServMsg|1532979782.36|SetProgramDir /var/www/html/dms/services/dipo/prod/ServMsg|1532979782.36|RunPath /var/www/html/dms/services/dipo/prod,/dms/obj,/dms
Micro Focus Visual COBOL. An item in working storage is described as PIC X type but no VALUE clause, as follows: WORKING-STORAGE. 01 WORK-ITEM PIC X(10). In this example, when program loads, does this item have an initial value of spaces? ... or is it "undefined"? (Assume default environment, should environment variables affect the answer). Also, if there is a documentation reference, please provide a link. Thanks!
I have a client that has a current system in production with Net Express. We have converted their code to visual cobol, but they want to have both Net Express and Visual Cobol license on the same server for testing. I this possible to do.
Attention Micro Focus Representatives, I'd like to know if I could freely distribute the RM/COBOL runtime for applications that I develop for people to use, since RM/COBOL doesn't have a method for building .EXE (executable) files and the runtime is required for the programs to run. Sincerely, Jack Stockman
The purpose of this program is to demonstrate how to 1. import an XML file containing BIS elements 2. remove BIS elements with an XSLT stylesheet using 'xsl:copy-of' 3. generate XML file 'result.xml' without the BIS elements 4. remove BIS elements with an XSLT stylesheet using identity transform to copy the subtree starting at a specific node 5. generate XML file 'result2.xml' without the BIS elementsNotes:Step #2 and #4 do the same thing using different XSLT comamnds In theory, the basics of this program would allow an installation of XBISto be used as a "pass through" to another web service. The basic steps would be: a. receive an incoming request b. remove the BIS elements c. produce a request that could be forwarded to another web service. pass_5F00_thru_5F00_sample.zip#RMCOBOL#XMLExtensions#BIS
- How to position a current window at the same x and y coordinates position as my previews window but whereby the two are not parent-child windows and belong to different screensets.#VisualCOBOL#dialogsystem
Hi am trying to read tables from one database and create basically temporary tables in another database on the same server. I have tried the severname.databasename.owner.tablename notation and it doesn't work. It works fine if I use the same database. When I try to use the 2nd DB it just creates a vision file. No translation to acu4gl. I have set the filename_HOST to MSSQL for each file, there also doesn't seem to be any acu4gl messages in the error file when I turn file trace on for the 2nd DB. There is if I just use one database. Can anyone or has anyone been able to communicate to two databases successfully using acu4gl? Thanks#mssql#database#Acu4GL
This example has been tested with Enterprise Developer 4.0 and with Visual COBOL 4.0 for Eclipse and Visual Studio. In situations where an application fails with an error condition that it cannot recover from, you might want the application to terminate the process in such a way that error processing occurs. For such scenarios, Micro Focus provides the CBL_RUNTIME_ERROR library routine that enables you to display a custom message. You need to call the CBL_RUNTIME_ERROR library routine from your code and provide a message string to indicate the error. The API that uses this routine takes a flags parameter. Setting the flag to 0 forces the application to terminate and generate the specified user COBOL Run-Time System error displayed as an RTS 150 message. The message enables the user to determine which (of potentially several) error condition caused the termination. If the core_on_error tunable is also set, CBL_RUNTIME_ERROR makes it easier to debug application errors from a produc
I HAVE A LEGACY SYSTEM THAT I AM CONVERTING TO VISUAL STUDIO. HOW DO I GET THE PROGRAMS TO RECOGNISE FUNCTION KEYS ?
What is the easiest way to create and write a CSV file? Is it necessary to use Excel?
In an older version of MF COBOL I used "current-date" as the Source for a field in the screen section. That triggers a compiler error now. What replaced "current-date"?#screensection#date
Hello, Our company would REALLY like the 64k limit of the extra segment enlarged. We have recently hit it with one of our billing program and are very close to exceeding in in a couple of others. I was wondering if any other users have hit this limit and/or would also like to see it increased? We have also found it very difficult to understand what actually makes up this extra segment because it is not very clear according to the documentation as to what it is. We have been using the Acu stuff for 20 years and our product and our programs have gotten rather large and very complex. We have tried to clean things up, but in doing that we have had some strange results. In reviewing some copy books that we use we have found some fields that are no longer being used so we thought that removing some of these fields might help. We removed some fields and the extra segment did not change, however, once we got to one field that we removed the extra segment fr
We have a customer that does not have an LPT1 port on their PC. They have connected their receipt printer to the USB port on the PC, and our program will not print to the receipt printer because it is looking for the printer to be attached to LPT1. Is there a way in RM COBOL to tell the computer to look at the USB port (like PRINTER1 tells the computer to look at LPT1) (I could use PRINTER? but the customer has instisted that they do not want to have to select the printer EVERY TIME they use the cash register). #RMCOBOL#print
Has anyone else run into the compiler error "Compiled screen description too large"? Apparently this error means a screen description has exceeded 32k. I added a new page with roughly 50 controls on it to a tab control and now the program gets this error when I attempt to compile it. Is there anyway to get the 32k limit increased? This is the second program we've had this happen to. We had this problem about seven years ago with another program and had to rework which controls we were using on the screen to get around the problem. Unfortunately, the way we handled the problem in that program isn't really an option this time around. Thanks, Jim
I am trying to test Cobol Server in Docker, but all licenses we own are recected when building initial image:...Step 18/19 : RUN set MFLICFILE=${MFLICFILE} && "%RMT_DIR%\\\\MFLicenseAdmin.exe" -install %MFLICFILE% ---> Running in 60dec237fcc1Non-STANDALONE license ignored:10 SolarNativeRuntimeDeploy 1.0 LONG NORMAL NETWORK ADD INFINITE_KEYS INFINITE_KEYS 1 JAN 2009 NEVER NO_SHR SLM_CODE 2_LOG_ENCRYPTION_LEVEL NON_COMMUTER NO_GRACE DEMO NON_REDUNDANT NiL NiL Ni NO_HLD NiL 5_MINS xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxNon-STANDALONE license ignored:xxxxxxxThe command 'cmd /S /C set MFLICFILE=${MFLICFILE} && "%RMT_DIR%\\\\MFLicenseAdmin.exe" -install %MFLICFILE%' returned a non-zero code: 8030720... What kind of license do i need. Where can i get at least a test license.#docker#VisualCOBOL#license
In an older version of MF COBOL I used "current-date" as the Source for a field in the screen section. That triggers a compiler error now. What replaced "current-date"?#date#screensection
Already have an account? Login
No account yet? Create an account
Enter your E-mail address. We'll send you an e-mail with instructions to reset your password.