Rocket® COBOL

VC for VS 2017 patch 10 on Windows 10, managed COBOL.When the I-O-CONTROL paragraph contains two (2) SAME RECORD AREA clauses:        SAME RECORD AREA FOR FILE1-1, FILE1-2, FILE1-3.        SAME RECORD AREA FOR FILE2-1, FILE2-2, FILE2-3.and        OPEN INPUT FILE1-1, FILE2-1 OUTPUT FILE1-2, FILE1-3, FILE2-2, FILE2-3.and        READ FILE1-1 NEXT RECORD.        READ FILE2-1 NEXT RECORD.then the FD record areas for FILE1-2 and FILE1-3 have the same data as FILE1-1 and the FD record areas for FILE2-2 and FILE2-3 have the same data as FILE2-1.  This is the expected behavior.HOWEVER,When the I-O-CONTROL paragraph contains THREE (3)  SAME RECORD AREA clauses:        SAME RECORD AREA FOR FILE1-1, FILE1-2, FILE1-3.        SAME RECORD AREA FOR FILE2-1, FILE2-2, FILE2-3.        SAME RECORD A

What is the syntax to call a stored procedure that returns a result set? using procob for oracle 11g tried this: EXEC SQL      DECLARE C1_CSR CURSOR FOR      CALL Package.procedure(field1, field2)      END-EXEC.----------------EXEC SQL      OPEN C1_CSREND-EXEC.---------EXEC SQL      FETCH C1_CSR INTO WS-RETURN-VALUEEND-EXEC.   

Hi everybody,i search a source to calculate a CRC-4 Check-Digit in cobol.Who can help? Thanks.

Problem: When trying to run a Server Express development utility, for example the COBOL compiler, the Animator, or the SDE, the following error message appears: Micro Focus LMF - 010: Unable to contact license manager. Resolution: The License Manager is a daemon process that usually runs in the background without requiring manual intervention. The process is named "mflm_manager" (visible in "ps -ef" output). Also, the License Manager creates and uses a named pipe on disk. This is named "LMF-common", and is usually located in /tmp (though its location is configurable). The most common reason for the error message "LMF - 010: Unable to contact license manager" is that the License Manager is not running, and the solution is to re-start the License Manager. 1) Login as root 2) Change directories (cd) to the directory where the License Management Facility (LMF) is installed. This is /opt/microfocus/mflmf by default (or /opt/lib/mflmf or /usr/lib/mflm

Hello there ! I am  evaluating this product for , but have 2 problems   :- impossible to handle JCL objects (not recognized) : no possibility to imports files with *.jcl extenstion, *.jcl extension not recongnized when creating a workspace using Template, no workaround possible using the CA Administration (for example : descibing the application as 100% Mainframe Legacy) etc ….. did I missed something ?- if I have shell scripts that "Run" a Cobol Program or Simply "refers to" a Source Program (in comments for instance) : how do i create this Relationship in a Scope (for Diagramer) ?      For shells, the Relationships available are "Runs System Programs" (it works fine but only for RM and CP shell  commands … no other commands handeling ?) …. and "Runs Program Entry Point"  (so question is : how do you run a Cobol Program Entry Point from shell ? what il the syntax recognized by Analyzer ? ).Final question :

I have a speed problem with SQLI try many configuration variable to speed up SQL searching a way to have the same speed with visionA_MSSQL_ROWCOUNT 10#A_MSSQL_USE_DROPDOWN_QUERIES TRUE#A_MSSQL_LIMIT_DROPDOWN ALLA_MSSQL_NO_RECORD_LOCKS YES#A_MSSQL_CURSOR_OPTION_1 SCROLL#A_MSSQL_SELECT_KEY_ONLY yes#A_MSSQL_FAST_ACCESS 10

I am attempting to compile a Cobol program to java byte code under Red Hat v7 using the following command.cob64 -jt Cobol.cblI get the following error;*1558-S** Failed to start JVMcob64: error(s) in compilation: Cobol.cblIn my research the only advice i can find is to make sure the bit size matches (64 or 32). Hence the cob64 commandCobol version infoversion @(#)cob.c 5.0.0.52PRN=KXCRH/AAD:Ao.U4.13.04PTI=32/64 bitPTI=Micro Focus Visual COBOL Development Hub 5.0PTI=pkg_238079PTI=MFInstallerJava version infojava version "1.7.0_231"OpenJDK Runtime Environment (rhel-2.6.19.2.el7_7-x86_64 u231-b01)OpenJDK 64-Bit Server VM (build 24.231-b01, mixed mode)My Environment (Edited for readability)COBDIR=/opt/microfocus/VisualCOBOLCOBCPY=/opt/microfocus/VisualCOBOL/cpylibLD_LIBRARY_PATH=/opt/microfocus/VisualCOBOL/lib:/usr/lib/jvm/java-1.7.0-openjdk-1.7.0.231-2.6.19.2.el7_7.x86_64/lib:/usr/lib/jvm/java-1.7.0-openjdk-1.7.0.231-2.6.19.2.el7_7.x86_64LIBPATH=/opt/microfocus/VisualCOBOL/lib:/u

Using CobolWow,  CALL WOWSETPROP USING WIN-RETURN LIST1-H COLOR-BACKGROUND 255,128,128.This instruction does not work. What is the correct instruction to change the background color of a list at runtime?

Hello,I am starting development on .Net and would like some initial help to understand the concepts of this kind of development.If someone cloud get me a small demo prohect with a basic menu (two or three options). One of the options being a table maintenance function (number and name).The databse could be in MySQL or SQL. I would like some information on how to create/use this database and where it could be hosted.Thank you in advance for your help at the beginning of a new programming phase.Best regards,Alberto Ferraz

Are there any issues with running binaries compiled in Visual Studio for Visual Cobol 3.0.* under COBOL Server 5.0.* ?

I am developing in Visual COBOL 3.0 for Eclipse. I create simple Cobol programs that I compile to Java (jar-file) and use as a library in my application. I have no problem running with Oracle's JRE, but the program seem to freeze when I run it with Open JDK 8 (JRE downloaded from https://adoptopenjdk.net/).I run my application with this command line:java -Djava.library.path="C:\\Program Files (x86)\\Micro Focus\\Visual COBOL\\bin64" -jar <my jar>Should I be able to run under OpenJDK? Do I need to compile the library differently?

I have a rich multi-line text box with the string “Testing field. ENTER”.  If I press the enter key (carriage return) before the word “ENTER”, it adds a “/n”,  which I believe stands for new line or end of line, to the text property of the rich text box which then looks like follows: "Testing Field. \\nENTER."When I move the text string from my rich text box into a string variable, it moves the “\\n” which give me problems when I attempt to do data manipulation with the string variable.  I cannot remove the “\\n” programmatically in the code because it is invisible to the code. I can only see it when a view the text property of my rich text box during runtime.I should also mention that after pressing the enter key before the word “ENTER”, it configures the ‘Lines’ property of the rich text box as follows:Lines  [0]  “Testing Field.”  [1] “ENTER” I want to be able to move both lines [0] and [1] as a single string into a string variable a

Hi MicroFocus Team,I am getting error message as "Server did not recognize the value of HTTP Header SOAPAction"I have attached my xml and cobol file below, any idea why i am getting above error.Identification division.Program-id. Test.Data division.Working-storage section.01 Doc-response.02 Doc-token pic X(80).01 WS-SOAP-ENVELOP-INPUT.02 FILLER PIC X(26) value '<soap:Envelope xmlns:soap='.02 FILLER PIC X(44) value'"http://schemas.xmlsoap.org/soap/envelope/" '.02 FILLER PIC X(10) value 'xmlns:xsi='.02 FILLER PIC X(43) value'"http://www.w3.org/2001/XMLSchema-instance"'.02 FILLER PIC X(1) value space.02 FILLER PIC X(10) value 'xmlns:xsd='.02 FILLER PIC X(35) value'"http://www.w3.org/2001/XMLSchema">'.02 FILLER PIC X(31) VALUE '<soap:Header><AuthTicket xmlns='.02 filler pic x(39) value'"'.">harlandfs/.../"'.02 FILLER PIC X(21) VALUE '<Authentic

Hi Friends,I got error as "Bad Request - Invalid Content Length" error when logic execute XML IMPORT TEXT.I attached below AuthResponse.xml which was generated in my directory...  Please advise me how do i resolve this?<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN""http://www.w3.org/TR/html4/strict.dtd"><HTML><HEAD><TITLE>st</TITLE><META HTTP-EQUIV="Content-Type" Content="text/html; charset=us-ascii"></HEAD><BODY><h2>Bad Request - Invalid Content Length</h2><hr><p>HTTP Error 400. There is an invalid content length or chunk length in the request.</p></BODY></HTML> Attached my full program below. I am not sure whether i am doing it correct. My requirement is to pass the user name and password to the web service thru variable  'Doc-Authentication' and i should get response into variable Doc-response from webservice. Iden

In C#, if you have a string (say, TestString) and you want to test it to see if it contains only numeric digits 0-9, you can do this:I basically just need to know how to code what's on the if statement in Visual COBOL.Thanks

How did you create soap envelope thru acugt cobol program?

Below code I should get response from web service. But, I got runtime error as """""Error : 28[34]  -in function:Load document"""""XML IMPORT TEXT        Doc-response        response-payload        response-len        "Doc-response"if not XML-OK go to z. I knew below description ... But, I could not think what could be issue. doc-response.xml file is getting generated at the time run time.... Or program expecting doc-response.xml should be created on my own? i am confused lot!!!! my requirement is to pass 28Error - in function: LoadDocumentAn error was detected while trying to load an XML document. This normally means that there was a problem locating the document (either the document does not exist or there is a problem with permissions). This error may also occur if the input document contains an XML header but no elements.&nb

Hello to all COBOL Analyzer users, As you are part of this community, I want to share some exciting news with you today before it is promoted to the general public.  We now have a new offering on the Azure marketplace. This offering allows you to create a virtual machine on Azure that have the latest version of COBOL Analyzer installed and setup for evaluation. The created machine is preloaded with a sample application which means you can try it immediately and also use the tutorials we have here to learn how to use the product without the need to install or setup anything. Go to this page for more information on how to take advantage of this new offering. Yes, we also have the same offering for Visual COBOL! For a full walkthrough on how to get this all to work, read this. Any questions or feedback, feel free to post here in the community and we’ll help you. Thanks, Guy Sofer Product Manager COBOL Analyzer#Trial#Azure#codeanalysis#COBOL#CobolAnalyzer#Cloud#ApplicationIntelligence

Below is a program, that i am getting XML-OK value as "30" while execution. Any advise please? my requirement is to pass username and password to web service and return response as token. I am trying web service first time in acucobolgt cobol.Procedure division.main.stop ' 'XML INITIALIZE.XML EXPORT FILEDoc-Authentication"Authrequest.xml""Doc-Authentication""AuthrequestF2C.xsl".if not XML-OK go to z. MY full program below.=============================Identification division.Program-id. Test.Data division.Working-storage section.01 Doc-Authentication.02 Doc-User Pic X(13) value 'Tester'.02 Doc-Pwd Pic X(09) value '123456'.01 Doc-response.02 Doc-token pic X(80).01 request-payload usage pointer.01 response-payload usage pointer.01 response-status pic 9(3) value zero.01 response-status-2 pic 9(3) value zero.01 response-len pic s9(4).01 request-len pic s9(4).01 a-single-char pic x.copy "lixmlall.cpy".01 Desired-S

Got it fixed, using the wrong Flag.

I am trying to use Visual COBOL for Visual Studio to call a SOAP webservices method to return multiple attribution of an item. The webservices method takes in a string value (item number), and returns a dataset (dsItemDetails). It is a very simple dataset, only one table in the dataset, and only one row in the return table, two columns in the return row, they are (item number), and (item description).My questions is: how can I move the item description value in the return row to a string variable (strLableName) in Visual COBOL?I knew the webservices call worked, I checked the row count in the returned dataset - datatable. It had a value of 1.The other problem I had was I could not get the DataSet Visualizer to work in debug. Was it suppose to work in Visual COBOL for Visual Studio? It always work when I coded in Visual Basic with my Visual Studio settings.Below are the codes from my test program:01 wsinquiry type WSName.RXORDWS004 value new type WSName.RXORDWS004.01 inItemNbr pic x(11)

Our application uses pure C/C with EXTFH Callable File Handler such as in ftp://ftp.suportesg.com/pub/download/COBOL/DEMO/EXTFHRD.C. We will work for FCD3 structure defined in fcd3.h file. It is really helpful if you have such C/C samples and documentations. Thanks!

I'm trying to convert this C# code to Visual COBOL:folderBrowserDialog1.RootFolder = Environment.SpecialFolder.MyComputerWhen I try to do this in Visual COBOL, the SpecialFolder enumeration is not found.I'm using Visual COBOL verion 2.3.

 Hello,we have had the Problem already in NetExpress and now we changed die VisualCobol in VisualStudio. To run our native cobol program wie must link it with the /stack option. Is there any possibility to set this option for cbllink within Visualstudio?Thanx in advanceSebastian

I'm trying to compare two nearly-identical COBOL programs in Visual Studio.  In one tab is ST-PEERJOB-TABLE.cbl, and in the other tab is MC-PEERJOB-TABLE.cbl.To switch back and forth between the two, I have to mouse-click the tab I want, which is clumsy and time-consuming.In Excel there are keyboard-shortcuts for toggling between two tabs:  ctrl-PgUp and ctrl-PgDownAre there any analogous keyboard-shortcuts for toggling between two tabs in Visual Studio?