Rocket® ACUCOBOL®

[Migrated content. Thread originally posted on 18 October 2004]We are looking for a program that convert non-Cobol formats such as CSV, DBF, Excel, etc to VISION files.

[Migrated content. Thread originally posted on 20 October 2004]We have been running on a Windows 2000 server with the thin client and using Vision files for several months. One problem I am having is trying to determine which user has a record locked. All users are mapped to a single account on the server.Short of recoding all of my applications, does anyone know how I can find the user or at least the PID of the task that has a record locked in a Vision file.Thanks, Duane

[Migrated content. Thread originally posted on 27 October 2004]Is it possible to encrypt within the cobol application, sent it through the internet and decrypt the data on the thin client. without using a thirdparty ( like Microsoft Windows EFS).

[Migrated content. Thread originally posted on 15 October 2004]I have the F8-key programmed as the key to delete records. So when inquiring a customer, pressing F8 will delete the customer after the user has been prompted with a message-box, asking to delete this customer Yes/No...In the customer-form, there's a TAB-control. On one of these tabs there's a GRID-control.Now, if I go to the grid and press the BACKSPACE, my software act as if the F8-key is pressed, asking to delete this record ?How can I evoid this behavior ?

[Migrated content. Thread originally posted on 16 October 2004]He give me that on the M$PUT so if there someboby how did have that problem what was the solution! if not interne-sw IF AFF-MODE(AFF-IDX) NOT = "GRID" IF AFF-CLE-POINTER(AFF-IDX, MEM-IDX) = NULL CALL "M$ALLOC" USING 177, AFF-CLE-POINTER(AFF-IDX, MEM-IDX) IF AFF-CLE-POINTER(AFF-IDX, MEM-IDX) = NULL IF LC-LANGUE = CONST-FRANCAIS DISPLAY MESSAGE BOX "Pas capable d'utilis? la memoire" TYPE MB-OK GO TO FIN ELSE DISPLAY MESSAGE BOX "Memory allocation error" TYPE MB-OK GO TO FIN END-IF END-IF END-IF CALL "M$PUT" USING AFF-CLE-PO

[Migrated content. Thread originally posted on 19 October 2004]I have a sequence of cobol programs that should be run sequentially ( PROG1 PROG2 & PROG3 ). So I put into a .bat filewrun32.exe PROG1wrun32.exe PROG2wrun32.exe PROG3But they all run 'simultaneously'. Is there any way to make execution of the .bat file wait until the programs issue their STOP RUNs before continuing?Secondly, if I issue a STOP RUN with a return code value, how can I test that value in the .bat file? Or do I need a workround ?Sorry if my problem seems duller than most, but Im still stuck on the basics.

[Migrated content. Thread originally posted on 14 October 2004]I am having a strange problem with my very large order entry program, which is a suite of programs with lots of calls and 5 screens. The second screen is where all the action happens, and there are 5 main ways to close an order. Each is driven by a graphical button, which executes a routine, and sets 'exit-pushed' to true; closing the second screen. The 5 routines appear to be identical, except that 2 of the 5 routines appear to ignore the 'set exit-pushed to true' leaving the screen hanging out there (flapping in the breeze). FYI this is a standard graphical program generated by acu-bench. I have done dozens of these types of programs before with no such behavior. The difference seems to be that this is quite a bit larger. Any general ideas on why, within an exception proc, the runtime would ignore a 'set exit pushed to true' ? Any general ideas would be greatly appreciated. Thanks.

[Migrated content. Thread originally posted on 12 October 2004]Having a problem with radio buttons. I have a screen with a tool bar, a multiline text entry field, and two radio buttons.The entry field's id is 1 and tab control is 1. It is set as enable - true, read only - false.The radio buttons have both higher ID's and tab control numbers. They are group 1 with group value's 1 & 2 respectively. They share the same value variable.Whenever the screen is displayed initially the first radio button has the focus and is set as selected even though the value variable is zero. Any reason for this behavior?

[Migrated content. Thread originally posted on 07 October 2004]Can someone please tell me if there are any special things that I have to do to make the Scroll function work on a screen, or tell me the things that make the Scroll option stop working on screens? I have tried a couple of times to make the screen scroll on it own but can't seem to make it work. I either have to use the wheel on the mouse of drag the vertical bar down.Thanks for any help

[Migrated content. Thread originally posted on 06 October 2004]I have heard it is possible to execute a SQL Server Stored Procedure from a cobol program using "I$IO". Is this true, and if so does anyone have an example of the necessary coding?Thanks a lot!:confused:

[Migrated content. Thread originally posted on 12 October 2004]I have a db2 field that is defined as decimal and i set up a an item as s9(7)v99 comp-3.When the program runs, I get an SQL error -304, which says that the value is out of range. This does not appear to make sense as all the manuals and help sources insist that this is the correct interpretation. Is this an acucobol problem???Ian Warner

[Migrated content. Thread originally posted on 08 October 2004]Hello,First, forgive my ignorance. I am new to AcuBench (and Cobol for that matter). My experience is with VB/Active Server Pages and I've recently been learning AcuBench in an effort to upgrade some character based apps to gui using the bench.I have a grid control that is populated from an array in an FD. To do so I use the following code in an event paragraph:* load-grid. MOVE ZEROS to SC-L-INDEX PERFORM UNTIL SC-L-INDEX = 40 ADD 1 to SC-L-INDEX MODIFY GI-SC-GRID, RECORD-TO-ADD = sc-hist-container-item(SC-L-INDEX) END-PERFORM .This loads the grid as desired with data for a particular "Member". However when I switch "members" I cannot clear the data from the grid. I've tried everything that I can think of and have checked my code several times without success. If anyone had any insight it would be appreciate

[Migrated content. Thread originally posted on 05 August 2003]We are developing an HR program in cobol, is it possibleto take a photo through cobol and store it in a binary vision fileWe have a web cam attached and can probably find an ocx totake the photo as a jpg but how to convert the jpg into a vision data record

[Migrated content. Thread originally posted on 05 October 2004]I am trying to run the version 2.3.2 compiler under Windows-XP and am getting the message "Out of Main Memory!" for large programs. I did not have this problem under Windows-98. Are there any parameter settings that will allow me to circumvent this problem?

[Migrated content. Thread originally posted on 06 October 2004]I am trying to code a DB2 sql fetch statment, and find the pre-compiler will not let me have a receiving field greater than 254 bytes, even though the manual says theat a varchar (pic x) can be up to 4000 bytes, any ideas?ps the pre-compiler is the IBM supplied for DB2Ian

[Migrated content. Thread originally posted on 30 September 2004]I created a entry-field with the upper word and i want ro removed the upper statement.DISPLAY ENTRY-FIELD LINE 1 POSITION 1 SIZE 1 LINES 1 HANDLE ENTRY-HANDLEMODIFY ENTRY-HANDLE UPPERBUT I WANT TO REMOVED THE UPPER!:D

[Migrated content. Thread originally posted on 24 September 2004]Hello,I am just getting Started with AcuBench and its going fairly well.Is it possible to have a screen that displays a tab control within a larger "Main" tab control? I've built it in the screen designer and it compiles without error but only the "Main" tab control (and some other unrelated controls) is displayed when executed. Any insight would be appreciated!Mick

[Migrated content. Thread originally posted on 10 September 2004]I had to increase the size of my grid being used as data entry. I use the control-value in the screen control to monitor the last item in the grid to move the cursor control to the a certain place on the screen. The issue I am having is the screen control only has three digits. I have a need for four digits. I still have 4.3.1 compiler/runtime. The data in the control-value is being truncated.When I change it to a four digit field, the compile says screen-control error. Has anyone encountered this issue? Your assistance will be greatly appreciated.

[Migrated content. Thread originally posted on 25 August 2004]Well I am sure that this sounds stupid, but i just cannot see how to get an embedded date validation procedure to operate sensibly. 01 scr-main. 03..... 03..... 03 scr-date after procedure validate-date. 05 entry-field pic 99 using day auto. 05 entry-field pic 99 using month auto. 05 entry-field pic 99 year.only enters the procedure validate-date for the first two 'auto' fields - not for the last one.01 scr-main. 03..... 03..... 03 scr-date . 05 entry-field pic 99 using day auto after procedure validate-date. 05 entry-field pic 99 using month auto after procedure validate-date. 05 entry-field pic 99 year after procedure validate-date.This enters the procedure validate-date for all three elemental fields.BUT - what I really want is for the after event procedure to only activate after the gro

[Migrated content. Thread originally posted on 31 August 2004]I have a modal window displaying data and a tab-control.(Max lines 55 - Max cols 80).On the tab, there are some buttons to click to call subsequent programs. These subprograms are made to display just above the tab with the same dimensions.Now, users can choose to maximize their windows in a setting screen.My question :If the user chooses to maximize there windows and the modal window is displayed with maximums as discrived above, ... when he clicks a button on the tab ... how can I make sure that the called program is displayed just above the tab-cotrol.I tried to give the Col and Line to the subprogram, but it doesn't display right.Any suggestions ?Txs

[Migrated content. Thread originally posted on 24 August 2004]Guys,You will probably know this or have encountered this already, but I have a program which imports data from another application via a flat file.This import program really needs to show the user whats happening, i.e. Current customer being imported, and some counters to show if its a new account, existing account and total records imported.This is fine when I run it on my own machine locally, but when I run it in thin client mode, it doesn't display anything until its finished?Is there some runtime/thin client flag which I need to switch on?Many thanks,Shaun

[Migrated content. Thread originally posted on 01 June 2004]How do I catch Windows Shutdown while my application is active and possibly minimised? Once I have caught it how do I then tell windows to abandon shutdown so that the user has the chance to close WRun32 App before shutting down.Thank you.

[Migrated content. Thread originally posted on 19 August 2004]Folks,I appear to have 2 problems with UNC paths.First oneIf I open I-O or EXTEND on a non existant file it just complains with error status 35,00.I've got IO_CREATES 1 in a config file by the way.Second oneI open input a UNC file locally on my own machine, and it works fine, however if I run the same program through the thin client it always returns error status 93,00.If the file does not exist, it still seems to want to return error status 93,00.Any ideas?I could get around this all with mapped drives, but i'd have to do this on 12 different machines. Plus it a government customer, it might upset them if I ask for access to all these machines.Edited to say these are both Line Sequential files, and not indexed files.Regards,Shaun

[Migrated content. Thread originally posted on 22 August 2004]I have recently started coverting a load of legacy acu cobol to windows and am finding some very frustrating things that may well be a lack of knowledge on my part. I am doing it the hard way at the moment without using ACUbench - but making quick and reasonable progress.Can someone tell me how to use grids so that user entry into cells is formatted - i.e. numeric edited, currency etc. I have already given up on the hope that grids will aloow a cell to contain drop down lists etc. If there is no way of using grids to accept edited data I am a little confused as to what use to make of it.Keith Lawrence

[Migrated content. Thread originally posted on 20 August 2004]Guys,How do I send control codes to a windows printer?I'm new to all this, so please excuse me if this is a stupid question.For what its worth, previously in unix, we just have the relevant hex control codes inside the print file.Now we're using the windows spooler, it just appears to do its best in printing the characters out!Regards,Shaun