Rocket® COBOL

It's hard to explain in words, basically from this:To this:The data is saved properly, the only issue is the display.I guess this has something to do with COBOL's limitation, and I cannot expect a user to type '&&' just for convenience. 

I am calling a .DLL using .NET.  I used NETDEFGEN to create applicable Copy books.I have coded a test, that fails with a Memory Access Violation.The error is on the statement that is passing a Handle that was created from CLASS that was created.  Unfortunately the documentation and the samples do not replicate the coding that I need.  I have included a test program that reproduces the error.  I suspect the CLASS is not set up in NETDEFGEN correctly.  I have attached the program, the .DEF copy files from NETDEFGEN and the library.  I have inserted comments describing the issue,  just in front of the line that is executed that causes the error. 

I have ne release of 10.3.0 installed and the "@!" command in debug does not work.  After issuing it on a given cobol statement, the program just continues on from where it initially stopped at my breakpoint.

Has anyone been able to control a Verifone Crdit/Debit Card Reader.The device can communicate either on the network or USB.  I assumed that C$Socket could to the trick.  Can anyone offer advise or help on how to hook this thing up and does C$SOCKET talk to a COM port ?    Randy --- HELP --- I'm drowning in technology that is poorly documented.  #Verifone#CreditcardReader#USBCommunication#CSOCKET

Has anyone encrypted their unix vsam files?  I am looking for a product that can provide some level of encryption of unix vsam files which would be compatible with Server Express (on server side) and Visual Cobol (on client side).  Any suggestions would be appreciated.#encryption

In all examples (that I've found) in MF documentation about XML syntax extension to COBOL the variable for file-status is in the select (with organization is xml) is defined as s9(9) comp.Here's a fun trick, stack the xml and procob precompilers, in your procob config file have comp5=yes which is recommended. Procob will worry that your file-status might be used as a host variable and will change it to comp-5. Now if you're using lvl 88 definitions to check your status, eg.            88 end-of-file-xml value -7.    88 not-well-formed-xml value -9.This will work in Net Express but fail in Visual Cobol.Back to the question then - why is the status variable defined as pic s9(9) comp in examples? Is something like pic s9(4) comp-5 considered harmful? If yes - why, if no - documentation should be changed to reflect the fact that this may cause unexpected results in some configurations. 

We have having a comctl32.dll crash error very intermittently on our AWS server.  It does not do it on our other servers.  It is very intermittent and only when a large refresh is taking place and not every time.  We are running 10.2 and here is the error message: Problem Event Name:                          APPCRASH   Application Name:                             wrun32.exe   Application Version:                           10200.0.0.7639   Application Timestamp:                  &

I am trying to get the postcode API to work  but I keep getting 'invalid API key'.I have a valid API key so what am I doing wrong?           CALL "HttpGet" USING                 DESTINATION-URL                 RESPONSE-POINTER                 RESPONSE-LENGTH                 "X-Api-Key:"                                 API-KEY                 x"00&quo

Problem With SQLCA's SQLERRMC limited to PIC X(70), calling Oracle's SQLGLM allows to retrieve error messages longer than 70 characters. The following works fine in 32-bit: 05 ORACLE-ERROR-TEXT PIC X(100) VALUE SPACES. 05 ORACLE-ERROR-SIZE PIC S9(9) COMP-5 VALUE 100. 05 ORACLE-MSG-LENGTH PIC S9(9) COMP-5 VALUE ZERO. CALL 'SQLGLM' USING ORACLE-ERROR-TEXT, ORACLE-ERROR-SIZE, ORACLE-MSG-LENGTH However in 64-bit, the same CALL fails with RTS 114 'Attempt to access item beyond bounds of memory'. Solution The Oracle 64-bit version requires a 64-bit data definition for the length parameters passed to SQLGLM. They should be defined as PIC S9(18) COMP-5. The following should work across both 32-bit and 64-bit platforms: 05 ORACLE-ERROR-TEXT PIC X(100) VALUE SPACES. $IF P64 SET 05 ORACLE-ERROR-SIZE PIC S9(18) COMP-5 VALUE 100. 05 ORACLE-MSG-LENGTH PIC S9(18) COMP-5 VALUE ZERO. $ELSE 05 ORACLE-ERROR-SI

Is there any way to force a mutiline entry field to accept a maximum of 80 characters per line?03 WS-PROBLEM PIC X(80) OCCURS 07. ENTRY-FIELD 3-D ID 116 COL 23 MULTILINE LINES 7 SIZE 80 CELL USE-RETURN MAX-LINES 7 MAX-TEXT 560 USING MULTIPLE WS-PROBLEM.My current code only checks for max lines and max text, but not max text per line.

Hi,I am getting'COBCH0853S System error - evaluation stack mismatch ... -> in the line 'EVALUATE HV-POS' using the VC5 Bytecode Compiler when compilingEVALUATE HV-POS       WHEN 02 MOVE 'something ' TO H-TEXT       ADD 1 TO ZZ-02       WHEN 67 MOVE 'something else ' TO H-TEXT       MOVE 'J' TO KEZ-AUSGABE      WHEN 68 MOVE 'something else x ' TO H-TEXT      MOVE 'J' TO KEZ-AUSGABE      WHEN ANY MOVE ' ' TO H-TEXTEND-EVALUATEReducing the nestings, e.g.EVALUATE HV-POS       WHEN 02 MOVE 'something ' TO H-TEXT       ADD 1 TO ZZ-02*       WHEN 67 MOVE 'something else ' TO H-TEXT*       MOVE 'J' TO KEZ-AUSGABE      WHEN 68 MOVE 'something else x ' TO H-TEXT     

Our programs were converted over from Wang Cobol 10 years ago @ Unicon. So Far so good until now. I am testing version 10.3.0 and have errors opening a file for output if that file already exists. Are there any routines or ??? available for handling a file that already exists? I would like the option to either scratch it or rename it if possible.

i have use this mf-examples and have a half success for sending email via MS Exchange of MF Groupwise.Only if i define one ore more attachment, i become following error message " 114 Attempt to Access item beyond bounds of Memory" bei this command:call WINAPI MAPISendMail   using by value     Mapihandle                                   by value     0 size 4                                     by reference mapimsgstruct                           &nbsp

Hello,Brand new to this forum, my name is Nicolas and I am in charge to optimize COBOL programs converted from IDEAL.I have two questions regarding the profiler.1. The results of the Profiler are quite inconsistent on our site for Online programs.I ran 10 times the same transaction with the same input and results in MF Profile are difficult to analyse. Sometimes there is one procedure taking 100%. another one there are four procedures taking each 25%, then 3 other procedures taking each 33%Anybody had inconsistent results like this and have a clue on how to improve the profiling on Online programs ?2. Since 2 or 3 monthes ago, there are sometimes new lines at the beginning of the profiler in the Call Count.Please look at the attachment.There are some weird characters, is this normal or a problem on my site ?Before I had only one line in this section. What are the new lines for and means ?Thanks and Kind regards.Nicolas.

PROBLEM When trying to re-link the runtime to use Acu4GL 10.2.1 for Informix on Linux, the following error occurs after executing ‘make –f Makefile.inf’ and the re-link fails: /home/informix/lib/esql/checkapi.o: In function `ifx_checkAPI': checkapi.c:(.text 0x0): multiple definition of `ifx_checkAPI' /home/informix/lib/esql/checkapi.o:checkapi.c:(.text 0x0): first defined here collect2: error: ld returned 1 exit status Makefile.inf:251: recipe for target 'libruncbl64.so' failed make: *** [libruncbl64.so] Error 1   SOLUTION The following issues are fixed in AcuCOBOL-GT extend version 10.3.1 which is due for release later this year. Prior to that release, the following workarounds can be used. In the ‘lib’ directory of the Acu installation locate the Makefile.inf that was created when ‘sh inf_inst’ was executed. Open Makefile.inf in a text editor and make the following changes: On the line starting ‘FSI_LIBS = ‘ if there are 2 references to the file checkapi.o then remove the secon

PROBLEM When using the HTTPPOST function with extra headers the response received is ‘HTTP 400 - Bad Request’.   SOLUTION When using either HTTPPOST or HTTPGET there is the option to set extra headers. These extra headers could be either SOAPAction or Authorization headers etc. If this is not formatted correctly the server will respond with an error ‘HTTP 400 – Bad Request’ According to the documentation: extra-headers - An optional alphanumeric item specifying extra headers to be added to the HTTP header. This argument consists of name/value pairs separated by hex x"00", and ended with two x"00"'s. This could be set in the following format in WORKING-STORAGE: 01 EXTRA-HEADERS. 05 filler PIC X(10) value 'SOAPAction'. 05 filler PIC X value x"00". 05 filler PIC X(90) value '"https://SOAPURI"'. 05 filler PIC X value x"00". 05 filler PIC X(13) value 'Authorization'. 05 filler PIC X value x"00". 05 filler PIC X(30) value 'Basic base64-encoded-password'. 05 filler PIC X value x"00". 05

I have a masked text box control on my windows form which I want to use in order to display a SSN to the user. I chose a predefined mask description in the properties windows and it looks as follows: 000-00-0000.When I move a value that has leading zeroes to my mask text box, however, it drops the leading zeroes. For example, if I move a value of '000001234' to the mask text box, it displays it as follows:  123-4_-____. I works well if there are no leading zeroes. If I move the value '123456789'  to the mask text box for example, it displays it correctly as follows: '123-45-6789'. 

In Visual Cobol 5.0 for Visual Studio 2019 I can not get context help to work.When I hit F1 it goes to " lang:"en"&form=S00028" target="_blank">https://www.bing.com/search?q=how to get help in windows 10&filters=guid:"4028227-en-dia" lang:"en"&form=S00028 . When I hit F1 should it go to to online Visual Cobol Help?     

i wanted test the email sending on visual Cobol. I know at the base the example was written in netexpress 5.xI missed MF-Copy files as:commdlg.cpymfres.cpyminiwin.cpywingdi.cpywintypes.cpy (in MF-Files fail the Definition of lphandle)winuser.cpyAre there other files to be placed in source programs?Using the netexpress copy files in visual Cobol gives any error on the Syntax!I can posted this in a separate message!

Problem: At times you may only have an AcuXDBC error number or error code but need more information. Solution: Starting with AcuXDBC version 10.3, error numbers and error codes have been documented in the following locations. Please see the documentation links below.   AcuXDBC Error Numbers and their meanings https://www.microfocus.com/documentation/extend-acucobol/103/extend-Interoperability-Suite/GUID-5EBD0E19-B351-45E0-8404-990401F1734F.html AcuXDBC Client error messages https://www.microfocus.com/documentation/extend-acucobol/103/extend-Interoperability-Suite/GUID-F61C168D-8903-4F89-88F8-7C257183AFAE.html AcuXDBC Server error messages https://www.microfocus.com/documentation/extend-acucobol/103/extend-Interoperability-Suite/BKXDXDTRBLXD9.3.html #TipfromSupport

Problem: After creating a new Data Source to connect to a network server from a client machine, the error is encountered when trying to connect to data via an ODBC application or odbcsql: ERROR: [TOD][ODBC Driver]INVHOSTSYN: Invalid host/service name syntax   Solution: Although all the information on the General tab appears to be correct and complete, on the Logging tab the Log Filename parameter is indicating a log file location that is either invalid or an area where the process does not have permission to create or write to the log file.  Correcting the Log Filename parameter to a valid location will allow the ODBC connection to complete without the INVHOSTSYN error.     For more information on AcuXDBC client and AcuXDBC Server errors, please see their respective documentation links below. Client error messages https://www.microfocus.com/documentation/extend-acucobol/103/extend-Interoperability-Suite/GUID-F61C168D-8903-4F89-88F8-7C257183AFAE.html Server error m

There are a many examples how to send emails via MS Outlook and i think that is also possible with groupwise?Who as a done this? in the Moment i am able to send mail with the tool "blat.exe", the only Problem is that the mail don't appear in GroupwiseAre the a documentation for Groupwise api?thanks for help! 

We are looking at upgrading some of our internal servers; currently we have Xcentricity XBIS running on Server 2008, tried installing version 10.0.0 on on Server 2012 R2.  IIS does not serve up the srf pages, as if IIS doesn't recognize what the srf is.  When I use "XBIS /SHOWSERVER", I get "Show server failed: Class not registered".  When I try to register using "XBIS /REGSERVER", I get "Server rmcbl12r.dll registration failed: the specified module could not be found".Should version 10.0.0 work with Server 2012 R2 or do I need a later version?Or is there a dependency that is not installed? Thanks for any suggestions.

Need help with resetting a combo box. The combo box works fine if a name is selected. I also have a option to enter a customer number. If a wrong customer number is used the combo box will duplicate all the customers again. At the wrong customer I initialize the PO-BOX-CHOICES and reload the table. What might I be missing to prevent duplicates on the combo box?Screen1 is the normal Screen.Screen2 is when it duplicates.Working Storage is the table.Screen Function is the indexing of the combo box.screen2.jpgscreen1.jpgScreen Function.jpg

Is it possible to find the full license key number using the License Administration utility, AppTrack?