Rocket® COBOL

Problem How to convert cobol-mb (MicroBase) showing accessing copy books and using display at 01 01 syntax.  Resolution Put the 01 01 into a variable. 01 display-cursor. 03 dc-line pic 99. 03 dc-column pic 99. Then just use this in the procedure division. move "0101" to display-prompt-line display "my text" at display-cursor Here is a example of the above display method and others combined with the usage of copy books showing COBCPY and COPYEXT This has been tested with Oracle unix using bash. For all programs and scripts needed for this example, click the link and save as <2679886copy-001.tar> Copy this onto a test area on your unix machine and untar it, see below. Change setup.sh to point at your cobol environment cobsetenv This will compile and run the same program three times. Program1.cbl program-id. Program1 as "Program1". environment divi

I have to translate an XML with <CDATA> with BASE64 binairy data </CDATA>   into a PDF-file. Is it possible to do this with Net Express 5.1 with COBOL. When it is possible, how can I code it in COBOL-statements. I have found a program that called C$CARG for RM/COBOL. Is there a routine in Net Express Cobol ?#cobolnetexpress#XMLBASE64#COBOLserver#NetExpress5.1

What would be the best way to sort an indexed file with a composite key that is > 250 bytes.  Composite key :   02 SRTKEY.      05 SRTIND             PIC 9.      05 SRTACC           PIC X(350).      05 SRTCONTRA   PIC X(350).      05 SRTCNT           PIC 9(8). |KEEP KEY UNIQUE Any input would be appreciated. Thanks.#keygreatrethan250bytes#ACUCOBOL9.2.4#indexedfile#Sort

where can I download acucobol-gt?? I must use c-treeRTG 

Curiosity question:  I know what a Managed Windows Application Project is, but: In Visual Studio, you can:  -> New Project -> Native -> Windows Application (?). What is a Native Windows Application Project? How is it different than, say, a Native Console Application Project? Thanks, Austin

I want to use an ActiveX control from Dynamsoft to scan documents and reading barcodes from documents. Scanning works just fine. But reading barcodes gives an error creating  ActiveX control. The samples they provide all work so I must be doing something wrong. Can someone help me with this? Please find code here

I have installed unixODBC and the Relativity client on Linux and can query the database using the relclienttest utility. However, when I attempt to query the database using isql, I get the following error: # isql -v mydsn[01000][unixODBC][Driver Manager]Can't open lib '/usr/local/liant/lib/relclient.so' : file not found[ISQL]ERROR: Could not SQLConnect Needless to say, the reclient library is in the specified directory and is readable. From extensive Googling of the problem, it seems that the issue is that the Relativity client is 32 bit and isql is 64 bit: # file /usr/bin/isql/usr/bin/isql: ELF 64-bit LSB executable, x86-64, version 1 (SYSV), dynamically linked (uses shared libs), for GNU/Linux 2.6.18, stripped # file /usr/local/liant/lib/relclient.so/usr/local/liant/lib/relclient.so: ELF 32-bit LSB shared object, Intel 80386, version 1 (SYSV), dynamically linked, not stripped I am aware that there is no 64 bit client for Relativity. How have others got around this problem?#Relativity

I have a Visual Studio 2013 - Visual COBOL Managed (can I just refer to it as Visual Cobol .Net?) program that I am using to convert a string data type to a decimal data type, using the "convert" function (ignoring validation for now). Currently, I have a REPOSITORY with this:     class convertClass as "System.Convert". and in the procedural code, I am doing this:    MOVE convertClass::ToDecimal(myString)  TO myDecimal. What I want to know is how to do this using the alternate approach of using the $set ilusing directive so that I can do something like this instead:   MOVE convert::ToDecimal(myString)  TO myDecimal. I have tried it several ways ($set ilusing"System.Convert" and $set ilusing"System"), but I can't seem to get it to recognize System or System.Convert such that I can do this. Thanks

I am looking for specific examples of how, in a Managed COBOL program/class, how to convert back and forth between traditional COBOL data types (such as COMP-3, COMP-5, COMP-X ) to equivalent Net types, and vice-versa.  For example, the data file being processed in the Managed COBOL program has some of these traditional COBOL data types - I need to see how to convert them, both to and from Managed types - specific examples. Thanks

I work for an Agriculture software company as a Crystal Reports Developer.  I’ve been asked to research a way that we can deliver Ad Hoc reporting capabilities to our customers.   I came from a Microsoft SQL environment and now utilizing the Micro focus tools. Considering our database structure is massive and too many fields/tables for the customers to deal with directly (support nightmare).  I was thinking I could deliver pre-defined stored procedures that included the most common fields and linkage to other supporting tables already done.  Then the end-user could write a report using these SP’s.  Come to find out Relativity would not be able to support this. The software tools that I’m familiar with is the Relativity Designer and Crystal reports.   The programmers use the RM – COBOL software.   My Question:  Is there any tools or a way to solve this with the Micro-Focus supported software?

Problem: Application fails with the following error: Load error : file '<ProgramName>'error code: 211, pc=0, call=1, seg=0211 Program not executable by Run-Time System Resolution: This problem usually occurs when a program that was built with a different version of the runtime is called or executed, so all programs that are executed within the same run-unit must be compiled and executed with the same version of the runtime. The same problem also occurs when a 32-bit program is called by a 64-bit program or vice versa. This is also the case if a 32-bit program is executed with the 64-bit runtime or a 64-bit program is executed with a 32-bit runtime.

Logfile: [01E8:01EC][2014-05-06T09:30:29]i001: Burn v3.7.1224.0, Windows v5.1 (Build 2600: Service Pack 3), path: E:\\Downloads_von_C\\Cobol_vce_22.exe, cmdline: ''[01E8:01EC][2014-05-06T09:30:29]i000: Initializing string variable 'ProductRevision' to value '2.2.00244'[01E8:01EC][2014-05-06T09:30:29]i000: Initializing string variable 'InstallFolder' to value '[ProgramFilesFolder]Micro Focus\\Visual COBOL'[01E8:01EC][2014-05-06T09:30:29]i000: Initializing string variable 'RumbaCheckboxState' to value 'disable'[01E8:01EC][2014-05-06T09:30:29]i000: Initializing string variable 'RumbaLabelState' to value 'disable'[01E8:01EC][2014-05-06T09:30:29]i000: Initializing string variable 'InstallFolder2' to value 'C:\\Users\\Public\\Micro Focus\\Visual COBOL'[01E8:01EC][2014-05-06T09:30:29]i000: Initializing numeric variable 'ignorechecks' to value '0'[01E8:01EC][2014-05-06T09:30:29]i000: Initial

I would like to know how to add sql server portion to cobol program in visual studio.

where is the copybook of my program ? in which directory?#COBOL#COBOLFILE#COBOLVISUALCOBOLMIGRATION

How to know how many rows have my project or solution I´m using VC2010 2.2

New to COBOL, I'm a student and im required to download this program for my Business Systems Programminv class. But im not able to install the program because it says that I'm in need of a 32-Bit Oracle Java 1.6 or higher. Can anyone help me find this? I've downloaded the latest Java that I think it is requesting and that's at version 8. #VisualCOBOLJava

I have a small Project that contains 3 programs PROGA is the 'driver' and sets up a common data file and then calls PROGB which processes and then PROGB calls PROGC and further work is done PROGC then returns to PROGB which then returns to PROGA PROGA then sets up a fresh load of data and calls PRGB again, and so on This all works well and is extremely fast However, the behaviour of PROGB changes because some of it's WORKING-STORAGE values are not being loaded as intended For example, if I have the WS entry as this 77  FLAG-A   PIC  X(001) VALUE 'N'. and PROGB sets it to 'Y' during it's first run, FLAG-A is not being loaded as value 'N' when PROGB is called for the second and further times My workaround is to discover this each time and MOVE 'N' TO FLAG-A early in the processing for PROGB which works However, I most probably do not have a parameter set correctly Is there a specific way to CALL or prepare in advance a prog

We recently ran into a problem with our NetExpress apps and Windows Server 2012 R2. Runtimes suddenly slowed down by a factor of 5 to 10 times. We had clients report the same thing. Someone in the ACU Cobol form had a solution and it worked for us as well. Funny thing is some installations of Server 2012 R2 run fast without turning this TSFairShare off. If anyone else has any comments about this problem we'd like to hear them. community.microfocus.com/.../11887.aspx http://www.ryslander.com/disable-fair-sharing-in-windows-server/ https://social.technet.microsoft.com/Forums/sharepoint/en-US/ad88f010-3130-4fa0-ada8-f5245c153858/rd-session-host-slows-down-program?forum=winserverTS

This article describes the method for expanding copybooks in the CodeWatch source editor. Problem: By default, the CodeWatch editor collapses copybooks contained is a source file.  However, sometimes it is useful to view the contents of the copybooks expanded, in-line, in the source. Resolution: You can expand/collapse copybooks in the CodeWatch source editor by toggling the "COPY Files" settings in the "View" menu. Alternatively, you can instruct CodeWatch to expand copybooks, by default, by adding the following option to your CodeWatch configuration file ( %USERPROFILE%\\AppData\\Roaming\\Liant\\CodeWatch\\RMCW.ini )[Editor]AlwaysExpand=Y

Problem When running cobsje, the following error is displayed         Sorry unable to load libcobjvm_sun_150_64 If libcobjvm_sun_150_64 is on shared library PATH, then ensure  'libjava' and  'java' are found on the PATH/Shared Library PATH.  Resolution You need a 64 bit version of libjvm.so available Either search on your system to find one or down load java jdk. Then point JAVA_HOME to this location in a setup.sh script and run it. setup.sh # JAVA_HOME=/home/products/oracle/u01/app/oracleclient/product/11.2.0/client_1/jdk export JAVA_HOME COBMODE=64 export COBMODE # COBDIR=/home/products/sx51ws8 export COBDIR # LD_LIBRARY_PATH=$COBDIR/lib:$LD_LIBRARY_PATH export LD_LIBRARY_PATH # PATH=$JAVA_HOME/bin:$COBDIR/bin:$PATH export PATH # cob -v cob -V # # # this sets up the classpaths and other enviroment variables. # note the . cobsje # the . this will set the environment variables in the cur

Hi, I am getting Error 26 - Licence validation error when I try to use Visual COBOL PE. It appears that validation error was caused by me changing system clock for DAY-OF-WEEK testing. (Had to change clock to see of DAY of week code was returning correct value). Could you please re-enable my licence? I should have Timed licence until 1/24/2016. One of the following emails was used for product licence registration: lazarenko.luda@gmail.comlaza0027@algonquinlive.com Thanks.#Error26-productlicenceclocktamper

Hi In our project earlier we were using a unmanaged DLL that was consumed by C . Now we are migrating from C to .NET. So the same DLL can not be consumed by .NET. The problem statement:- The COBOL program "Prog1" inside the DLL is having 4 Entry points. As read from some of the threads we are trying to create a COBOL COM wrapper Class from File -> New->CLASS->COM Component. This will create a new class in a new Net Express project. then We tried to create 4 method using Class wizard in this Class for all entry points.  1. Like Method1 for Entry1 2. Method2 for Entry2. Now we are not able to understand how to make a call to existing (Prog1) COBOL program for an entry points in the Method. We also tried the below option: Method 1()            :declare in local storage of method 1                     77 default-entry-point  procedure-pointer. :Code in Mehtod     

Hi, Something happened and now if I try to compile to generate an int file under Visual COBOL for Visual STUDIO, I receive FILE I-O ERROR on the .int file and nothing is generated. I am using cobol myfile.cbl int() ; from the Visual COBOL Command Prompt 32-bit

hi, on netexpress 5.1 the function numval of a string don't give abend . On mfe, instead, it give abend "181 invalid parameter error" the source NUMB PIC 9(18) comp. WK-STR PIC X(50).               MOVE "00000061G   " TO WK-STR              COMPUTE NUMB = FUNCTION NUMVAL(WK-STR) I add this compiler directive: HOSTNUMMOVEHOSTNUMCOMPAREHOSTARITHMETICNOSIGNFIXUPCHECKNUM but I don't have the same behavior.. thank... #181numval

In the doc on Interoperability, the link "To use CCW to expose a .NET class to native COBOL" appears to be a broken link. Thanks, Austin1