Rocket® COBOL

[Migrated content. Thread originally posted on 09 August 2011]In my vision file I have numeric data like 12,25. I live in Germany, therefore we store our numeric data with a comma.If I read the vision file via ODBC in ACCESS, I only see 12What is wrong?I had an old XFD-File of that vision file. With this XFD-File I can see the complete field. 00243,00005,09,00008,-02,000,000,TANUM02This line was generated by ACUCOBOL-GT v5.2.00000000243,0000000005,09,0000000008,-02,000,000,06,TANUM02This line was generated by ACUCOBOL-GT v8.1.0 I need to generate XFDs with v8.1.0 to work with my vision files via ODBC. Can anybody help me?

[Migrated content. Thread originally posted on 20 December 2002]Increase attachment size to 153600 bytes or better yet 204800 bytes

[Migrated content. Thread originally posted on 25 November 2002]I am handling a task that need to use Java to call Cobol. But I think I should use C to be the middleware between them. Actually, I have no idea that how to call Cobol from C .According to the manual of AcuCobol 4.2, have a little bit note about this topic only. Is there have any others detailed example for calling Cobol from C ?:confused:

[Migrated content. Thread originally posted on 21 November 2002]We are in the middle of converting out character based applications to GUI. Has anyone done the old style accept and display screens and have radio buttons working correctly in the tab order?The sample program from Acocorp showed examples of the rest of the controls and said that putting radio buttons into this type of screen would be hard.I need to know what the rules are and would love to see sample code.Thanks

[Migrated content. Thread originally posted on 27 December 2002]I finally figured out how to get a file attachment to work with the msmail example that acucorp has posted on this site. If anyone is interested in adding this functionallity let me know.I have it setup just like the msmail program with passing data as the subject, email address, message and I added the path of the attachment.It will now allow you to add 1 attachment to the email.be happy to send you the object if needed.ryanneves@execu-tech.com

[Migrated content. Thread originally posted on 18 November 2002]I am presently evaluating AcuCobol 5.2.0.1 in a Redhat 8.0 environment utilizing the GNOME desktop. I am using Launcher to run a script in TERMINAL. I am trying to ascertain what functions are available to the AcuCobol runtime from within this environment. The following is a list of items with which I have had some success:1) Menubars work2) Function Keys work3) Color worksI have also had some results in this arena that are less than perfect and I am trying to see if anyone has already come up with a work around or found a solution. First, I want to say that I am not stuck on the GNOME desktop. I am simply looking for an OS and a graphical desktop in order to minimize program changes. The programs we are looking to convert to a new environment use character based screens, use color, utilize menubars, and use the mouse. Through changes to the A_termcap file I have been able to get single mouse clicks within the menub

[Migrated content. Thread originally posted on 30 January 2003]I am using this program with thread he is sleeping and wakeing once and a while. PROCEDURE DIVISION USING LINK-REC. MAIN-LOGIC SECTION. DEBUT. PERFORM 0000-INITIALISATION. PERFORM 100-PRINCIPALE. FIN. EXIT-PROGRAM. EXIT PROGRAM. 0000-INITIALISATION. SET ENVIRONMENT "DLL_CONVENTION" TO "1". CALL "User32.dll". 100-PRINCIPALE. PERFORM UNTIL 1=2 CALL "GetKeyboardState" USING BY REFERENCE KEY-TABLE GIVING RET-VALUE MOVE LC-FONT-SMALL TO DEFAULT-FONT MOVE LC-MAIN-HANDLE TO MAIN-HANDLE RECEIVE FIELD FROM THREAD MAIN-HANDLE BEFORE TIME 50 STATUS IN WS-STATUS ON EXCEPTION CONTINUE END-RECEIVE move spaces to field-1 field-2 fi

[Migrated content. Thread originally posted on 12 August 2011]HiDoes any have example/Docementation on how to implement Unicode Support Visual Cobol R4?And also Does XDBC have UNICODE support ?

[Migrated content. Thread originally posted on 01 July 2011]Hi All,Is there any way to embed a document in a Vision file as can be done in a database ?ThanksMedasha

[Migrated content. Thread originally posted on 01 June 2011]Hello, I am still working with acubench 4.3 i want to open an sequential file bij "open output testfile"no problem... my question is : the file is opened in ANSI codei can write as much as i want...I want my file opened in UTF-8 CODE.How can i do that... The problem is when i use ä ö ü, to give my data to an other programto print.. it is not ok... when i open manually my created fileand save it in code utf-8 everything is ok...Thx for your support...Rik

[Migrated content. Thread originally posted on 05 May 2011]I haven't worked with acucobol for some months and now if I want to compile a program I get the message: "Failed to load type library". The program is nevertheless compiled, but I don't like error messages.

[Migrated content. Thread originally posted on 19 May 2011]Hello,In the Interoperability documentation, it says the following in section 5.4.2:Note that you can call COBOL from .NET locally or remotely. You can evenhave the runtime execute remotely without a COBOL object executing on theclient. All you need on the client is a .NET program and a runtime. For thisto work, you set CODE_PREFIX in the configuration file that you providewith the runtime initialization to point to a remote server hosting yourCOBOL application. The remote server must also be running AcuConnect.AcuConnect is able to execute a COBOL object remotely and share data withthe local runtime. For more information on executing remote COBOLprograms with AcuConnect, please refer to the AcuConnect User’s Guide.When AcuConnect is setup to require a password, the first time I try to call a program using AcuConnect, a dialog pops up prompting for the AcuConnect password. The AcuConnect documentation section 2.7.1 says the fo

[Migrated content. Thread originally posted on 13 May 2011]Micro Focus COBOL 6.0, developed in Visual Studio 2008 and run in Micro Focus Enterprise Server.I have a program that issues a START command on a VSAM file by populating part of the key (10 bytes alphanumeric) with two to seven bytes of alphabetic characters followed by spaces, then setting the KEY IS condition to "NOT MOVE 'AG        ' TO VSAM-ALT-KEY2.START  VSAM-FILE   KEY IS NOT In a system using the EBCDIC character set, numeric values, even if only in one of the first two bytes, will satisfy this condition, as their hex values are greater than the hex values of alphabetic characters. But in ASCII, numerics have lower hex values than alphabetics. For the purpose of this program, numeric key values need to be able to start this file.I have not seen any doc indicating that using a compound condition will work in the START command, but I am hoping this is possible. I have tri

[Migrated content. Thread originally posted on 18 May 2011]I created a program that will create an Excel spreadsheet from within my AcuCobol program. It works ok on my local pc, but when I try to run the program in the Citrix environment(where the users live) the results are not consistent. Sometimes the GetSaveAsFilename method will display the dialog box, but it is buried beneath the application and Atl-Tab is the only way to find it. Other times the dialog box never displays and the application just ends. Any ideas on how to make the save box perform consistenly?

[Migrated content. Thread originally posted on 20 April 2011]Hy,I use acuconnect - W$PRINT to print report on client, but on extranet/internet is too slow.I think to increase velocity with a temp file of report spool on server, after that I convert it to a pdf and send it to the client...I can at now: - send a file I can use C$COPY or open with link http - server have a PDF printer that create a file in a directory any ideas???Thank's

[Migrated content. Thread originally posted on 18 April 2011]Dear Community Members,I am working on a Legacy upgrade project. I have a cobol code which has to be called from Java Using JNI.I have worked on JNI where we have java calling C program by creating shared object(Dynamic) or Shared Library(Static Linking). These can be done using xlc (AIX) C compiler and JVM. I want to do the same JNI implementation for calling COBOL program from Java.I want to know the steps to 1) complie a C program using cob compiler.2) Link the complied object to a Shared Object3) Load the shared Object into Java and Call Cobol program from Java.It would be great if i get a code example.Thanks in Advance.RegardsHithesh

[Migrated content. Thread originally posted on 26 March 2011]Hi!I am currently evaluating MFNE 5.1 and am particularly interested in compiling COM components written in OO COBOL. There is no problem with building these using the IDE but I can't make it work properly using cbllink -d from a command line.I spent some time looking at how the process works and was hoping it might be possible to use a Make file that could include the TypeLib. It looks to me that the process doesn't do that, compiling the Typelib into a resource file and linking it that way instead.I don't want to have to manually set up a project for every COM component I want to build. I don't really understand why it forces the extension to be .CBL (my existing legacy is all .COB), and I can't see what this "trigger file" is all about. It doesn't appear to do much. All of my COM stuff is In Process server .DLLs. I wouldn't expect to have to trigger them; just instantiate the Class as

[Migrated content. Thread originally posted on 25 March 2011]Has anyone using AcuCobol had experience with electronic signature pads, especially how the software would interact with AcuGt?

[Migrated content. Thread originally posted on 21 February 2011]Hi ,I am using 64 bit OS , and by default if i install Host Integration server 2010 , it will get installed as 64 bit , here if i want to use 32bit Enterprise server with 64 bit HIS.What kind issue i can face.Have any body faced such kind of issue.If any any body have good pointers to understand it.Thanks and RegardsCheeta

[Migrated content. Thread originally posted on 14 January 2011]With the introduction of 64bit Windows some years ago, something new came in place, a shadow hive serving the numerous 32bits applications out there.I will not go into the details about the diversion of registry access here, but state that the registry on 64bit Windows has a subkey under HKEY_LOCAL_MACHINE\\SOFTWARE named Wow6432Node.A 32bit application making inquiries on HKEY_LOCAL_MACHINE\\SOFTWARE will effectively read under this key: HKEY_LOCAL_MACHINE\\SOFTWARE\\Wow6432Node. The 64bit OS does this automatically, you won't notice.For most, this is just fine, as what is there, is what a 32bit app usually would need to read from the HKEY_LOCAL_MACHINE\\SOFTWARE hive.In some special circumstances however, it might be necessary to read the native hive. As we shall see, it is actually quite easy to accomplish.The key is the library function REG_OPEN_KEY_EXExample:CALL "REG_OPEN_KEY_EX"      USIN

I got error 114 when accessing a linkage item in some rare conditions item, setup is like this In first_program.exe I have link-rec i working storage. 01 link-rec is external by "EXTLINK" in second_program.dll i have it in linkage section. 01 link-rec. Every called program is passed using link-rec. I have listview programs with callback set up, here the declaration is 01 link-rec is external by "EXTLINK" in working-storage section When event vertical scroll fires I need to fill data and call my second_program.dll using link-rec. in second_program.dll when accessing link-rec item I get signal 11 (114) linkagr record not assigned, the call to second_program comes frpm guibase->entrycll. Any suggestions?#Externallinkage114signal_11

Greetings, I would like to welcome everyone to the Micro Focus Net Express / Server Express forum. My name is Chris Glazier and I am a Principal Support Engineer for Micro Focus handling the Visual COBOL, Net Express and Server Express products. I will be your main point of contact for any topics posted within the Net Express/Server Express forum. Please feel free to ask questions about any version of Net Express or Server Express. If you are currently using one of the Net Express or Server Express products and are reporting a problem then please also include information about the actual product name and version that you are using and also the operating system on which you are running. If you are having urgent technical problems with one of these products, I ask you to please go through normal Support channels by opening up an incident with Customer Care. I will do my very best to provide you with an answer to your question or at the very least point you in the right directio

[Migrated content. Thread originally posted on 07 June 2012]Hi All,I'm trying to call the EXTFH opcode 0xFA06 to retrieve file information but my program abort with code 9/-95.What does this code mean?Is there, somewhere, a list of all status code? Thanks in advance.Fly.

[Migrated content. Thread originally posted on 11 June 2012]Hi alllet's compare VB.net codes with Visual COBOL(managed or not) codes. Anyone to convert VB.net codes (below)? Thanks in advance. Imports SystemImports System.TextImports System.IOImports System.Net.MailModule Module1 Dim mail As System.Net.Mail.MailMessage Dim wshost As String = Nothing Dim wsport As String = Nothing Dim wssender As String = Nothing Dim wspassword As String = Nothing Dim wsrecipient As String = Nothing Dim wssubject As String = Nothing Dim wsbody As String = Nothing Dim wsfile As String = Nothing Dim wiport As Integer Dim StreamEncoding As Encoding Dim txtline As String = Nothing Dim txtline2() As String = Nothing Dim flag As Integer Public Sub Main() 'Before read and write getting encode (for Turkish) StreamEncoding = System.Text.Encoding.GetEncoding("iso-8859-9") Dim fs1 As FileStream fs1 = New FileStream("C:\

[Migrated content. Thread originally posted on 02 June 2012]Good Afternoon,I am having a problem creating a Tab Delimited ASCII file. Here is an example:I write the following ASCII record:01 MEI-VT-LUCI-HEADER. 03 FILLER PIC X(06) VALUE "TICKET". 03 FILLER PIC X(01) VALUE X"09". 03 FILLER PIC X(01) VALUE "A". 03 FILLER PIC X(01) VALUE X"09". 03 FILLER PIC X(01) VALUE "B".The hex values should be:54 49 43 4B 45 54 09 41 09 42 0D 0AHowever when I look at the hex values in my resulting ASCII file it looks like:54 49 43 4B 45 54 00 09 41 00 09 42 0D 0AFor some reason the system puts a X"00" before the X"09" in the ASCII file. If I Examine the record before I write it the values look correct.Can anyone offer some advice ?Thanks as a