Rocket® COBOL

Hi, I have tab control in my program. I tried to display the background in bright color instead of the default grey color. I create the tab with this code: DISPLAY TAB-CONTROL UPON MAIN-WINDOW, LINE 1.5, COL 1.5, SIZE 159 CELLS, LINES 89 CELLS, MULTILINE, HANDLE TAB-1TAB-BACKGROUND-COLOR IS 16FONT IS LARGE-FONT. The tab control is then displayed with the color I want, but when I begin adding tabs with this code: MODIFY TAB-1, TAB-TO-ADD = ("&Project", "Proper&ties", "&Revenues && Expenses" ) I got the following memory error message and the program crashes. When I don't use the TAB-BACKGROUND-COLOR IS 16 parameter, I don't have any problem, but don't get the background color I want. Am I doing anything wrong? Are we able to change the background color in any other way? Thanks.

I don't understand what those terms mean.  I would be most appreciative for reference to any "for dummies" documents or videos on BUILD, REBUILD, and CLEAN.#clean#Build

I've got about sixty programs in my solution / project.  (The entire solution is one project) I decided that about ten programs were obsolete, no longer needed, so I deleted the source code (*.cbl). But now when I try to build/rebuild either the solution or project, I get errors like these: 1>COBOL : error COBCH1502: Open fail : 'C:\\PSMJ\\TEST.cbl'1>COBOL : error COBCH1502: Open fail : 'C:\\PSMJ\\X-BB-BENCH.cbl'1>COBOL : error COBCH1502: Open fail : 'C:\\PSMJ\\X-FE-BENCH.cbl'1>COBOL : error COBCH1502: Open fail : 'C:\\PSMJ\\X-FN-BENCH.cbl'1>COBOL : error COBCH1502: Open fail : 'C:\\PSMJ\\X-MC-BENCH.cbl' What can I do to make the solution / project completely forget about these programs?#COBOL#VisualStudio

When using the Acuthin.msi package to install thin client on a windows pc, we very often have the problem that installation terminates with no error messages, but when invoiking acuthin.exe a message is displayed saying that mfc140u.dll is missing on the computer. When installing from the original Extend 10.2.0 installation package, there is no problem. But this is not desirable when installing using remote desktop as the zipped installation package is several hundred MB. Any suggestions? Best regards Lars-Bo#Acuthin#Acuthininstallation

I am trying to do two simple tasks and I cannot find the answer in help topics.    1) How can I format an entry field in Dialog Sytem to display a zip code with dashes. For example, I am trying to display the zip code 115308020 as 11530-8020. I am able to format amount fields and date fields but I cannot figure out zip code fields   2) Dialog Sytem comes with insert fields as INS1 and INS0. I am trying to give the user the ability to overwrite text on an entry field. For example, on most windows application, users simply hit the "insert" key on their keyboard in order to overwrite text as appose to appending text. But the help topics in Dialog System does not really provide information as to how to use their INS1 and INS0 functions in order to achieve this.   Thanks in advance for your help

We have installed 10.2.0 on a new linux server and are using both Windows 7 and Windows 10 workstations running acuthin.exe. There seems to be a difference in how the TAB key works. On one screen we have 6 grids aligned and normally we used the TAB key to switch between the grids. But using TAB on Windows 10 to go to next grid, selects the current cell (as if we pressed ENTER in the cell) before switching to next grid. SHIFT TAB (to go back to previous grid) works fine. Problem only occur on Windows 10. Acuthin on Windows 7 works fine. Any suggestions? Best regards Lars-Bo#acuthintab#Acuthin

Hi,   Are Microfocus Cobol 2.2 source programs for DOS COBOL 85 compliant?   Regards Suresj#COBOL

I have an old Net Express project that I have converted to Visual Cobol 2.3, I had issues getting the RUN time module to load based upon my path command, so I copied all of the runtime modules into my folder and I get the following message:   DSGRUN.dll is in the CCARMARUN folder:     What am I doing wrong?  Do I have a compile/link option incorrect, using dynamic runtime model.   Thanks

I have this code: move 'select * from TABLE where a = ? and b = ? and c = ? to w-sql exec sql open cur_read_2 using :w-a, :w-b, :w-c end-exec But this select can be variable, so I can have here for example only ... where a = ? ... or ... where a = ? and c = ? ... So, can I somehow setup exec-sql part dynamically, to have proper number of host-variables here? In actual case I have 7 WHERE variables and full list of combinations is possible. I suppose that I must use SQL DESCRIPTOR, but I don't know how...#SQL#NetExpress5.1

 VB6 DLL is called CallMSMQ.DLL  if this helps

I am trying to animate a COBOL module using Net Express - Animator. I completed the below steps before trying to animate -  1. I have set up a local server in my machine and copied the necessary input data files to my local disk. 2. We need to run test job in ES Console in Debug mode with 1 step which would contain the impacted Cobol module. I prepared the test job accordingly and as mentioned in Step 1, I copied all relevant input files and loadlib of impacted program to local disk. 3. In ES Console, Server --> Properties --> MTO --> JES --> General, the path for JES Program path, System Catalog, Default Allocated Dataset Location and System Procedure Library is present. Under JES program path, I have put in the concatenation of network and local disk path. Under system catalog, I have mentioned location of Catalog.dat which was copied from network drive to local path. Under 'Default allocated dataset location', I have put in local and network path. Under system proce

Using Data File Editor - Version 2.2.02104 with a fixed length indexed file and an .STR file provided and the data file is not write protected ... When I choose Search > Data File Editor > Data File Find And Replace ... ... instead of presenting the normal popup box, it does nothing (it does not present a popup box). Other search options, such as Find on Current Key work fine (a popup box is presented to enter a search value, etc.). With the very same file, others on my team here do get the normal popup box when doing the find and replace. So I am wondering why it is not doing this for me ??? Thanks  

Hi all, I wanted to know if anyone is currently using the C$REDIRECT function in a Pre mode on file I/O and if you have had success with this in a production environment. Also are there any tips, performance issues etc in using this. I am not replacing the standard I/O routines with this, I am using it as a trigger when certain I/O takes places.   Regards   Scott

Hi, We have a COBOL server 3.0 installed with a valid license. Was trying to compile a program to create .o (object file) in UAT environment and it gave a error "Error[18]: No license code is available for feature RestrictedNativeChecker on host 127.0.0.1." Do I need a devhub to compile. Note: We have a devhub license for DEV env and 2 COBOL server license one each for UAT and PROD.

I want to move a bitmap buttons to a different location on the screen. I referred to the dragdrop sample program  to figure out the logic and wrote a similar routine. My program successfully moves the push-button, BUT,  even after calling W$MOUSE using RELEASE-MOUSE my program does not recognize the mouse Right Click Up/Down when I want to show a pop-up window.  But if I click on a different tab, then the program responds to my right-clicks and displays my pop-up. (My program displays several tab controls).    Is there a problem with the Release-Mouse option.  Note that after calling W$MOUSE using RELEASE-MOUSE  I do issue the SET ENVIRONMENT "MOUSE-FLAGS" TO AUTO-MOUSE-HANDLING, but the problem is still there. Is there something else that needs to be done ? Is there another sample program around that moves a control on the screen ? Thanks in Advance.  

Hello! New to VC programming! I need guidance on a project. I created a windows form with labels, textboxes, radios, checkboxes etc.   I have put a print button, printDialog, printDocument. I set the method of the print button to appear the print dialog menu. I have stuck in this: How to define what to print from the form? For example, If I want to print whatever I see, is there any method.  Thank you in advance for your help!!!

I'm developing a DLL using Visual Cobol 2.2, and I want to make it a NuGet package so that other people in my shop can leverage it.  In my VC project, the first time I tried to do this, I right-clicked on References and clicked on "Manage NuGet Packages."  I received a message along the lines of "Not compatible with project."  Not sure of the exact message text because I only got it once.  After that, if I right-click on References, I do not even get the "Manage NuGet Packages" option.  If I try to add the Nuget package at the solution level, I get a message "...could not be installed because it is not compatible with any project in the solution." What am I missing?  Is there something I need to do to the project properties for it to support NuGet?  Something with the NuGet configuration?  Something to the VC config? Thanks for the help, Mike#nuget#VisualCOBOL

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 t

i have a small sql-testprogram and precompile it under eclipse with Oracle Pro*Cobol . If the result is a int-file, the run works fine using rtsora.  The compile/link as SingleExecutableFile shows the linkerror: 'Cobol program "SQLBEX"/"SQLADR" undefined'. The OracleInstantClient is installed and then libclntsh.so (lib where sqladr and sqlbex is included) ist available in ldconfig-cache. running the program (" ./pgm") shows a similar error Load error : file 'SQLADR'error code: 173, pc=0, call=1, seg=0173     Called program file not found in drive/directory What is the problem? How can i resolve link errors? environment is RHEL, VisualCobol4.0, recent OracleClient   regards lw

I have a Visual Studio 2017 COBOL question. I have a Solution of many projects and the projects all focus on a single form. From that form various projects are initiated for different processing but when returning to the originating form I don't know how to gain control of the processing without initiating something on the form (button). That means the user has to do this to finish the processing from the initiated projects (changes are made to the form). Where do I insert code that will automatically do the processing without intervention by the user? 

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