Rocket® ACUCOBOL®

[Migrated content. Thread originally posted on 15 December 2003]Does anyone have a sample of the code necessary to delete a record from a SQL Server table?The code I'm using:EXEC SQL DELETE tbl_XXXX WHERE tbl_XXXX_Field1 = :WS-FIELD1END-EXECreturns an error message of"Parse error at tbl_XXXX"when I compile the programThanks!!

[Migrated content. Thread originally posted on 06 October 2003]Hello,I use acurcl / thinclient ( UNIX Server , Windows client) and in order to configure my access, I have to use the acurcl's interface.If I had few, ok , I could use it, but when you have more than 20 users ( in fact 70 for me with more than one access authorization) it become impossible.So I asked for, to Acucorp FRANCE, the acuaccess file description to write a cobol program interface ( not the crypting key, only the FD and SL).The answer of San diego is NO, nothing more !! so i am wondering... If acucorp do not want to give me theses elements may be it's because they are working on an interface smart and easy-to-use ? So Ok but quickly... because for our customers ...this configuration's interface is obligatory (prohibitive)...May be some others users have not still encountered the disadvantage... they could think about that.

[Migrated content. Thread originally posted on 13 October 2003]I am looking at running 120 thin client users on a Windows 2000 server. Does anyone have this many users on a Windows server? If so, would you mind sharing your server configuration and how well your server performs?Thanks

[Migrated content. Thread originally posted on 22 August 2003]Does anyone have experience with compiler pre-processors in Acucobol? I've recently worked with Progress which has pretty powerful pre-processors built into the comiler. I've read in Acucobol's doc that we can write our own pre-processors. Are there any pre-processors available which I can use/buy without having to write them myself? I miss Progress's pre-processor variables & "ifdef"s.Thanks,Bill

[Migrated content. Thread originally posted on 23 March 2005]We need to encrypt data within a record. Our environment is AcuCobol 5.2.1 on an AIX box.I believe we need an external utility / copybook that can be called to encrypt prior to writing and decrypt after read, depending upon a users security privleges. An unprivileged user would see garbled data, a person with the need to know the data would see the text. I am comfortable that we can keep the encryption key secure using the underlying OS security, but am unaware of a tool to perform the encryption/decryption.Has anyone any experience with this?

[Migrated content. Thread originally posted on 18 November 2003]Is there anyone out there using ACUSQL 5.2.1 with MS SQL Server 2000 ? I'm trying to run a stored procedure which is a prepared statement. When I go to run the program, it errors out.

[Migrated content. Thread originally posted on 07 April 2003]Has anyone used acu4gl with the idea of incoporating foreign keys and relationships within the database design. And if so what level of restructuring/re-engineering was imposed on the the source base? Or did you have to resort to using imbeded SQL to do so?

[Migrated content. Thread originally posted on 21 July 2003]When we navigated in a grid to be able to copy the cell when we are not in begin entry!and i did used SET EXCEPTION 3 TO COPY-SELECTION SET EXCEPTION 22 TO PASTE-SELECTION SET EXCEPTION 24 TO CUT-SELECTION SET EXCEPTION 26 TO UNDO

[Migrated content. Thread originally posted on 19 March 2003]For our laboratory application we often calculate the standard deviation.The intrinsic function "standard-deviation" within AcuCobol calculates using the "biased" or "n" method. Instead we would like to have an intrinsic function that calculates the standard deviation using the "nonbiased" or "n-1" method.Is it possible that AcuCobol makes an intrinsic function for standard deviation using the "nonbiased" or "n-1" method?greetings Ties van Valen

[Migrated content. Thread originally posted on 25 June 2003]As most of us develop software for administrative purposes, it might be convenient to control the "lock" keys of the keyboard.Here is some source illustrating how to inquire the current status of, and how to toggle the Numlock, Scroll-lock and Capslock keys: IDENTIFICATION DIVISION. PROGRAM-ID. SetNumLck. WORKING-STORAGE SECTION. 77 key-val pic 9(2) comp-5. 77 HStat USAGE HANDLE OF STATUS-BAR. 77 NUM-STYLE PIC 9 VALUE 1. 77 SCR-STYLE PIC 9 VALUE 2. 77 CAP-STYLE PIC 9 VALUE 2. 77 CHOICE PIC X. 77 WS-ESC PIC 9(3) VALUE 0. 88 F1-ESC VALUE 1. | Toggle NUM LOCK 88 F2-ESC VALUE 2. | Toggle SCR LOCK 88 F3-ESC VALUE 3. | Toggle CAP LOCK 88 F4-ESC

[Migrated content. Thread originally posted on 17 February 2003]Hello,I would like to combine all my business logic for a module into a single program. There are two ways to do that:1. a 'what to do' code with each call.2. entry points.Either will do, but I perfer entry points. The big advantage with them is that you can tailor paramater passing to each type of call.In AcuCobol, you get to call entry points of a program if that program is loaded in memory. This is my problem. How do you specify in the linkage section which entry point gets which parameters? I would the default entry point to have 0 parameters so I can call the program and load it up, allowing access to the alternate entry points. When I try to do this I get linkage runtime errors.My code looks like LINKAGE SECTION. 01 P1 unsigned-int. 01 P2 unsigned-int. 01 P2 unsigned-int. PROCEDURE DIVISION. | main. *default initializatio

[Migrated content. Thread originally posted on 17 March 2003]We are currently attempting to make some of our Cobol data available on the web using AcuODBC and AcuServer. The data resides on a Unix box and is being accessed via a web page using ASP from a windows 2000 server. We are intermittantly getting the error:Error Type:Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)[AcuCorp, Inc.][AcuODBC Driver][ISAM]Unable to open xfd fileThe kicker is that we have had success.This occured first on our production system and mysteriously cleared up after assigning a new but identical DSN. Now, the error exists on our development system but does not clear up when doing the same.We're stumped!Any insight would be appreciated.

[Migrated content. Thread originally posted on 03 July 2003]In a Grid, when we are in Entry Mode, leaving the cell, we want to move the cursor to the next cell. We used (version 5.2) in Msg-Finish-Entry event : MODIFY Form1-Gd-1, CURSOR-X ..., CURSOR-Y ...We upgrade to version 6.0 and it?s not working properly. e.g. Cell X 1, Y 2 Value ="AA"Cell X 2, Y 2 Value = spaces Form1-Gd-1-Ev-Msg-Finish-Entry. MOVE SPACES TO PRT DFT MODIFY Form1-Gd-1, X 1, Y 2 INQUIRE Form1-Gd-1, CELL-DATA IN PRT (PRT = "AA") MODIFY Form1-Gd-1, CURSOR-X 2, CURSOR-Y 2 MODIFY Form1-Gd-1, X 2, Y 2 INQUIRE Form1-Gd-1, CELL-DATA IN DFT (DFT = "AA" instead of spaces) IF DFT = SPACES MODIFY Form1-Gd-1, X 2, Y 2, CELL-DATA "BB" END-IF.As a result: Cell X 1, Y 2 V

[Migrated content. Thread originally posted on 20 March 2003]Does anyone knows if I can get the label of a menu-item when I select it?

[Migrated content. Thread originally posted on 26 February 2003]Does anybody have suggestions on how they have caught spurious code 98's We are working with Tech support and they are being very helpful. Thought there may be some stories out here. This is a tough on and the noraml things have lead us nowhere.We have several hundred installs and one (our largest - of course) is experiencing these problems. We don't know if we are chasing an OS/Hardware glitch, or a problem with some of our "C" code, or a previously undiscovered Vision problem. We are on AIX 4.3 withe local files.Any stories or hints would be appreciated.Looking for Sherlock Holmes.Thanks,

[Migrated content. Thread originally posted on 18 March 2003]Hi, I am new to Acucorp's products - I am accessing MS SQL using AcuSQL, and I have not been able to successfully pre-compile my Cobol pgm with a call to a stored procedure. I obviously do not have either the syntax right, or do not have the precompiler options set correctly.I am precompiling as follows:\\\\dir01\\acusql521\\ACUSQL.EXE -Pk MSSQL mysrcesq.cob -Pr mysrcegt.cob and the call to my stored procedure looks like: EXEC SQL CALL pGETNEXT :PTBL-SQL, :TBL-SQL, :NUM-SQL, :optbl OUTPUT, :otbl OUTPUT, :onbr OUTPUT, :oname OUTPUT, :oprompt OUTPUT, :ofile OUTPUT, :oactive OUTPUT, :oStatus OUTPUT END-EXEC.When I precompile the source file, I get 'parse error at :PTBL-SQL'Does anyone have any idea what I am doing wrong??Thanks!Patti

[Migrated content. Thread originally posted on 24 July 2003]Could someone please tell me that the 5.2.1 runtime is not compatible with windows XP HOME, or are there any known issues? The errors that keep coming up are: "wrun32.exe has performed an elligal OP., ", encountered a problem and must be shuit down, windows XP HOME reboots on its own. Is this hardware issue or a networking issue? Someone please tell me.Thanx,

[Migrated content. Thread originally posted on 17 April 2003]we have one site that is having weird problems with printing in terminal services, I am assuming it's hardware related but thought it wouldn't hurt to post and see if anyone has seen this.we have a simple printing routine Open extend Printer-name write printer-rec close printer-nameyou get the idea.we are using the windows spooler -P SPOOLERThe workstation is accessing the software via terminal services,and the printer is shared on the network and availible in the terminal services session.the problem is that a few times each day the program bombs with an error 30 on the printer. when it attempts to print to the printer. So we have added the c$rerr to the declaritives to try to get a sence of what is going on, but we can't duplicate the problem.has anyone had something weird like this happen.

[Migrated content. Thread originally posted on 19 March 2003]create @Application of @CRAXDRT handle is hx-crapp.modify hx-crapp @OpenReport (ws-fileid) returning hx-crreport.MODIFY hx-crreport @PrintOut(0).destroy hx-crreport.destroy hx-crapp.

[Migrated content. Thread originally posted on 07 March 2003]I have a program name MENU and the MENU is calling ather program and i want the program that has been call to used another run unit and i want to passed the link to other program.i now about c$run but it is heavy to passe the link and the cblconfig so it is very heavy to do so.Thank you for help.

[Migrated content. Thread originally posted on 21 February 2003]I am searching a way to include a rebuild in the declative of a file.1 - if i could read the file as binary sequentiel then i will be able to rebuild it so what is the first record that have the index.2 - If i have a way to take the vutil32 and included in my programmation but while he rebuild to be able to know where he is in the file...

[Migrated content. Thread originally posted on 28 July 2003]Hi,I wrote this sample program using the new zlib.dll shipped withAcuGT 6.0.This program uses such library to compress/decompress filesusing standard zlib alghoritm. It is fully compatible with gzip and itis compatible with Winzip.Any comment is appreciate.Enjoy!Luca:D

[Migrated content. Thread originally posted on 11 April 2003]Working fine so far I am trying to use a multiply cie.The name of the file for the customer is 01ARCLI.001 for cie 1 and 02ARCLI.001 for the cie 2IN the odbc i name CIE-01 for my data of 01ARCLI.001 andCIE-02 for my data of 02ARCLI.001And i want the same report just to change the database so far i try this without successInquire hx-crreport Database IN hx-database.Inquire hx-DATABASE Tables in hx-databases.inquire hx-DATABASES Item(1) in WS-NAME.Inquire hx-database Parent IN ws-name.Inquire hx-database DictionaryLocation IN ws-name.I am searching the name of database that his used for the report.and the way to change it.

[Migrated content. Thread originally posted on 14 March 2003]I would like to be able to interact with a scanner from an acucobol program using active-x, dll, etc. In short what I would like is have my program allow the scanning in of a document and then let the operator enter key words, location, file name so this information could be captured to a field and then later searched and retrieved and the document displayed to the screen via a call from another acucobol program. In summary, a simplied imaging application. I have an equipment management program and I would like to give the operator the opportunity to scan in repair work orders, etc and associate them with a given piece of equipment.

[Migrated content. Thread originally posted on 12 February 2003]Would there be any issues changing acurcl from port number 5632 to say 21. We have WAN issues of 30 min to load a sreen at the client end or no screen loaded though server end indicates an active session. Believe telco has prioritised traffic such as ftp on the ADSL link at the expense of others. Additionally will acurcl timeout ?