Rocket® COBOL

 Hi Shjerpe,the previous post locked me out as my keyboard had an issue and replied many many time. In Excel it comes back in alphabetical oder.Much to my complete disbelief as initially I am certain that I ticked off every column left to right against what I saw in my cobol code that uses the xfd. Suddenly the next day its alpha, but at least I got all the columns I believe even though it mentioned truncation (I couldn't see any) MS Access is listing in the correct order but is limited to 256 columns and I have over 1000 I have rebooted, restarted trying to get back.  I will say it seems to be doing a "preview" that I don't recall it doing first time around.

I am sure the first few times I used my DSN with AcuXDBC version 10.3.1 driver 64bit the data from my vision file imported in the same order as the file definition (xfd).  Now everytime it is bringing it in with the column names shown alphabetical order which I do not want. Any ideas?I see also that MS Access still has 256 column limit? I will try MS SQL server linked server so any recent documentation on AcuXDBC and linked servers in MS SQL would be handy. ThanksJim 

I want to be able to have Program A kick Program B off as a thread, have program b stores its pid in a database record such that program a can be invoked at a later time to kill Program BWe are using version 9.2.1, 9.2.3 and 10.1Acugt and acu4glJim

hello.is there a trial for a text based (no gui) cobol compiler/runtime for ubuntu or opensuse (current version)?Thanks

Hi, in my lillte experience I have all the impossible cases of the wordI have a sequential file where is stored numbers in alfanumeric type ( examples "123,45"  "10,00"   "35780,00" "450" )  I need to convert them in numeric variable. How can I do it ?I use a variable declared PIC X(16)  to store each field: If I see it on dislay is correct ( after I have removed the " )I have tried with all the know-how of my mind but I have results very disastrous ( examples 123459,00  10009,00 )I hope the problem is the sign that I declare in the recipient variable [ 77 W-NUMERO pic S9(11)v99 ]Someone can suggest me a method ???Many thanks to all you

I am using C$SYSTEM to call the Adobe reader. Can the filename NOT have any spaces in it?This works fine.C:\\Program Files (x86)\\Adobe\\Acrobat Reader DC\\Reader\\AcroRd32.exe D:\\PFIPRD\\FORMATS\\FormsandFonts.pdfThis does not. (Space after Formsand )C:\\Program Files (x86)\\Adobe\\Acrobat Reader DC\\Reader\\AcroRd32.exeD:\\PFIPRD\\FORMATS\\Formsand Fonts.pdf 

I am trying to help a friend transfer an old piece (circa 2010) of software for her hair salon.  According to the profile in the mfaslmf directory, the version of Net Express is 040 001 and the Server Express 32/64 editions are 003 001 and 003 010.When I first moved the directories to the new Win 10 machine I got the error "ASLM: Semaphore failure  Errno:100".  After research, I tried to move the mfaslmf directory to the root with no change.  I then deleted the root directory thinking it would refer back to the original directory under the application.  I then get an error "The license database for the Net Express Application Server has been moved.  Scanned the registry for the obvious names, but I am stumped.Any help would be appreciated.Thank you.

I have an idea for a service.  It would accept incoming network connections but instead of launching a cobol-thread to process the socket that gets created, it would need to start a separate process, with a new runcbl session.   I've figured out how to pass enough information that the new-process could open a socket back to the service, and together they could handle the communication, but this would basically duplicate all the traffic going in/out of this server, because the information would have to be copied back and forth between the service and the new runtime.   Do-able, but inefficient.  Thus the desire to pass a socket handle to the newly started runtime and let it handle the communication by itself. This will normally be running on a linux server, but it would be nice if windows was also an option.#CSOCKET

Hello to all of you,my native language is not English, but I hope you will understand me. I do my best, and hopefully, you can help me a little.I have asked the MF Support, but I'm not that happy with the answers or better said not-answers. They told me there was a similar error with AcuServer, that should be fixed in Acu 10.0.1 and ask for a trace log when the error occurs, but we don't know where this error come from, and we can't reproduce at will.We are using AcuCobol GT-Runtime (10.0.1) (without AcuServer as far I know) under Linux and have a problem with TM-files in our working directory getting that large until the hard drive is full. The files are beginning with "TM" followed by six random letters and numbers.We found TM-files at another customer server using Acu 8.1.3, most of them have size zero, but some are contain data records we think to know. So, in my opinion these are kind of swap files and the records can A) not be written to a file (indexed, line sequential) or B) be

Need some ideas to get rid of more hardcoding. Currently when we post to the ledger from sales all the accounts and what amounts to use are hardcoded in the program. As I am trying to get rid of as much hardcoding as I can I am look for an idea or if someone has already solved this via some kind of file layout or ?? Some of the amount are added, some are subtracted.Here is one example. MOVE SPACES TO LEDGER-REC REPORT-LINE.MOVE 1020 TO GL06-ACCOUNT.MOVE "DM" TO GL06-COMPANY.IF PASS-COMPANY = "DM"COMPUTE GL06-AMOUNT = SA05-MTH-LIST-PRICE                                                        SA05-MTH-FRT-PORTION                                                        SA05-MTH-ACCRUAL-US

Can anyone tell me why my cobol program has delays when it calls another program in ACUTHIN, but has an immediate response in ACUSERVER?  I am upgrading from 8.1.1 to 10.3.1 and I currently do not have any issues in Production with ACUTHIN.   Granted, we are going from a 2003 server to 2016 server, but I would have expected the same or better performance

Can anyone tell me how to determine why I am getting different results from the same program in 8.1.1 vs 10.3.1 when I accept a font value from standard objects and W$FONT?  I'm migrating from 2003 to 2016 and the results of these statements is causing my screen handling to give strange results.  I have looked everywhere trying to understand the values being returned by these commands without success.

This article discusses the widely used base64 encoding scheme for transmitting binary data via XML. Problem: While most specifications that use XML do not require special encoding of data, XML Extensions and Business Information Server may be used in situations where APIs and specifications have not anticipated the use of XML as an intermediate data representation. In these cases, binary data outside the range of characters that may be easily transmitted by an XML code set may be specified. Resolution: W3C has several specifications that may be used when binary data is to be transmitted within a transport protocol that does not allow all possible character code points (such as ASCII control characters, binary zero, etc.). One of the most widely used is base64. XML Extensions converts data described as numeric within the COBOL program to XML standard character strings that represent the value of the number. However, when binary data must be embedded in an alphan

 Good Morning: I am trying to adapt a part of a C# program (Forms) for Cobol and there is a part that I don't understand. For example: this.Amount=operation.Amount; this.Date=operation.Date; this.Destination=operation.Destination; is converted to: set self::Amount to operation::Amount set self::Date to operation::Date set self::Destination to operation::DestinationWhat is the "this." statement and how to use the converted statement "self ::".ThanksAlberto Ferraz 

Is it possible to get another one year license for Visual COBOL 5.0 PE (running under Visual Studio 2019)? - Mine has expired. I've tried the 'manual send email' option in Visual Studio under 'Micro Focus Visual COBOL Product Licensing' but have not received a response.  I see that version 6.0 is available but I won't be able to download/install it until our office reopens.  Thank you.

We are using visual cobol 2.3, framework 4.5. I need to send out a json file. We don't currently work with json so I am not sure what I am doing. I seen there is a json generate statement in cobol upgrades, but upgrading is not an option for us right now. I guess I envision this to have a text file that we would run a program over to convert to json.  How would the text file need set up? What statements/libraries would be needed? Thanks!

Hi, I know it's somehow weird but the editor in visual studio doesn't transform the keywords to upper-case despite I've already enabled taht from options!! could anyone please help me ?? Best Regards#VisualStudio

I have finally got Alfred to compile on our system with the help from M/F. I need help with a modification I want to do. I want the RW button on to be the default rather than the RO button. I have took a look but can not figure out where to make the modification.  

helloI am trying to use the CBL2XML tool, to convert an XML schema to a cpy cobol file, in order to generate XML invoice files. But it always crashes, and does not generate anything. I have to close the version with the task manager.I try from the command interface, any of the versions of CBL2XML, included in VC 6.0 in 32 and 64 bits, and also the wizard version included in NetExpress 5.1 (CBL2XMLWZ.exe), and I follow the instructions detailed when writing the command, and the result is always the same. Crash,I ask, is CBL2XML really operative? or if there is another alternative.Attached are the XML schematics that I need to generate the cpys.Greetings 

Hi,I am using Microfocus visual cobol(3.0.2). I want to create an XML file with the XD structure in FILE SECTION. XML GENERATE WS-XML-DATA FROM XML-DATACOUNT IN WS-XML-COUNTWITH XML-DECLARATIONEND-XML.I can see the proper data in WS_XML_DATA while debugging but file is not created in the folder.Could you please help me in fixing this problem. Thanks,Anusha.

Compiling any programs from a converted project from Netexpress 5.x i become following compile error:MSB4181 - Die Aufgabe "Cobol" hat "FALSE" zurückgegeben, jedoch keinen Fehler protokolliert. File is MicroFocus.COBOL.CurrentVersion.targetsTraduction from german: The Task "Cobol" have given "FALSE" back, but no error to protocol.I can't find a error, compiling this with older VC will give no error!Thanks for help  

Hi everyone /  ,I'm having trouble activating my free trial for Visual Cobol for Visual Studio 2019.  When I try applying the 16 digit authorization code which was provided to me, I am getting a dialog box with message - "The supplied authorization code does not include a valid license for Visual COBOL for Visual Studio.My Serial (for support): 600000824102Thanks for the help,Saravanan**PERSONAL INFORMATION REMOVED**

Revise AcuToWeb execution on IOS to support W$MOUSE routines.   Associate finger taps to AcuCobol W$MOUSE coding.  Perhaps the following:1-finger-tap held ==>   left-button-pushed1-finger-quick-tap ==>   left-button-released1-finger-2-quick-taps   ==>   left-button-double-clicked1-finger-tap-held with 2nd-finger-double-tap ==>   right-button-double-clickedand be able to determine the position with GET-MOUSE-STATUS (in pixels)or another possibility using Push-Buttons to know what is being tapped is to have transparent Push-Buttons that don't actually display, (or that only show an outline with whatever image is behind it showing through). Then I could have a couple hundred of these push-buttons positioned where I might service the operator's tap to determined where they tapped.I currently have a routine that displays a graphic, representing a layout of a marina, that the operator can double click to sho

Every morning, seemingly once per day our customer gets a memory access violation that causes Acuserver to shutdown First exampleremoving client 'ITDRENMVP17143' user 'xxxxxx.xxxxxx' pid 13588 fid 374Number of files decreased to 152failed: 127311553 - Memory access violation - shutting down Second exampleChecking access for 'd:/data/southpac/prod/v8.6/retail/prod/LV405283.DAT': 0xf, 1opening data segment (#0): d:/data/southpac/prod/v8.6/retail/prod/LV405283.DAT>>Header accesses: 0 updates, 3 locked reads, 0 unlocked reads>>0 unlocked reads waited for update, 0 unlocked reads retriedclosing data segment (#0): d:/data/southpac/prod/v8.6/retail/prod/LV405283.DATremoving data segment (#0): d:/data/southpac/prod/v8.6/retail/prod/LV405283.DATsucceeded (1)v_read: 140, 491, 0, 0x1 - invalid file IDfailed: 1, 9fwrite: 140, 488, 1, 31 - invalid file IDfailed: 9fflush: 140, 488 - invalid file IDfailed: 96584107 - Memory access violation - shutting dow

i had no problem with sql syntax and i work a long time only with sql databases.Now i want to change my conventional programs to access the sql database and all operations as oo cobol.Do you have a little example to call this oo-methods? connect, select, insert, update, drop, etcI want to program this showing the examples in VC6.0 and Netexpress 5.1, but become not a running program.Thank you very much for any help!