Rocket® COBOL

[Migrated content. Thread originally posted on 19 April 2004]Acuthin connected via a static IP address over an ADSL line. When my application is left idle for a time, e.g. accept screen, the ADSL line closes down disconnecting the application from the server. I am told that Acuthin does not keep constant communication with the Acurcl and as we are not using VPN, it will disconnect, when the ADSL line goes to sleep!.Has anyone got a neat solution?Ideally I would like a neat way to program my application to constantly keep in touch with the server, even while the app is waiting for the user, who has gone to lunch, to complete screen input.Thanks

[Migrated content. Thread originally posted on 11 March 2004]We frequently modify the fd but when we transfert the xfd that has change on oracle he give us a error.I searching a way to add the new variable to table.The size off the table don't change.Ex.OLD FD FD EMP. 01 EMP-REC. 05 EMP-CLE. 10 EMP-CODE PIC X(10). 05 EMP-NAME PIC X(40). 05 FILLER PIC X(100).NEW FD FD EMP. 01 EMP-REC. 05 EMP-CLE. 10 EMP-CODE PIC X(10). 05 EMP-NAME PIC X(40). 05 ADDRESS PIC X(40). 05 FILLER PIC X(60).

[Migrated content. Thread originally posted on 20 February 2004]Vitalworks Inc.Office: Daytona Beach, FloridaApply at: http://www.vitalworks.com/employment.htmlDescription: Conduct full range of programming tasks, including program design, coding, testing, debugging and documentation for standard application programs.Perform analysis and design for custom programs and maintenance of existing programs.Utilizing company standards, write technical specs, program and test interfaces.Overtime and pager coverage as needed. Requirements: Bachelor of Science in Computer Science or a related field or equivalent experience.Three (3) years programming/analysis in business applications.Anesthesiology and/or pain management accounts receivable practice management experience. PC-based Cobol, Windows NT, Terminal Services experience.Experience in business applications programming and analysis.Experience in data requirements necessary for data manipulation to produce desired output and to troubleshoot

[Migrated content. Thread originally posted on 26 March 2004]I am currently working on a issue related to extracting all text strings in the programs to a Vision file, so that the system can depending on a language code and a Text ID look up in this table and get the appropriate text string and return it to the program.Syntax today 01 WS-VARIABLE Pic X(50). Move "This is a test string" To WS-VARIABLESyntax in the future (i hope) 01 WS-VARIABLE Pic X(50). 01 WS-LANG-CODE Pic X(3) Value "ENG".* 1234 is the text id in the vision file of text * string ""This is a test string" Move (Call "GETTEXTSTRPROG" Using WS-LANG-CODE , 1234) To WS-VARIABLEThis is how i hope it could work. The reason why i would like it like this i because I have over 3000 programs to do this in, and if i could program it like shown above, I could just write a conversion program for the source code and replace all strings with a number, and if i change the

[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 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 12 August 2003]Proceed at your own risk!There is a simple method to bypass Acubench's protection logic that only allows a single instance of Acubench on your system. I played with it and everything seems to work fine, but who knows?Step #1: Open acubench as you normally wouldStep #2: right click on acubench executable (Acubench60.exe) and click Run as...Step #3: select 'the following user' and choose a user who is anyobdy but yourself. Of course, you must have the password for that user and that user must have permissions to operate normally on your machine (especially local login).Thats it! Acubench will most likely pop up with the default .ini settings. Your .ini settings are in your 'documents and settings' folder, so look for them to make acubench work the way you want.Merlin

[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 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 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 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 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 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 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 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 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 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 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 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 ?

[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 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 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 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 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 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.