Recent content by Triad

Of course it's not lining up. Your code is in the wrong sequence. Job Input FileO Read FileA Key KeyX Status Key1 = K-code-num Key2 = K-code-prefix First you read FILEO. At that moment, you've got NOTHING in your W field. Then you tried to read FILEA using the empty W field (so it doesn't...

It's a pain, but you could add AFTER-BREAK logic, detect when your break is on IN-LOC, also test REPORT-PAGE and force in a DISPLAY NEWPAGE there.

A reminder to all--resist the urge to a little present to the code.... The courts have not been favorable to code that shuts itself off, self-destructs or otherwise stops working. Companies are also not that friendly to programmers who design code that only they can maintain. (I got a...

Research dynamic SQL--this is exactly what it can be used for. I've run the query the previous poster shows in a production environment (millions of rows) and it was far too slow. It did a full table scan and then looked at each row to reject it.... The bound SQL had to guess what was in...

Call CA support and ask. www.ca.com

Call CA support and ask. Of course, it might help if you knew the correct product name. (It's been VISION:RESULTS for several years now.)

//INFILE DD * lower case text //SYSIN DD * FILE INFILE INFILE-STRING 1 80 A INFILE-B 1 1 B OCCURS 80 S1 W 2 P 0 JOB...

It sounds like you want to have a fake control break every N rows. Try this: Add a work field. DUMMY-CONTROL W 10 P 0 Guess a breakdown, say 10,000 rows and you want 5 control breaks. JOB INPUT INFILE CASE INFILE:RECORD-COUNT WHEN 1 THRU 10000 DUMMY-CONTROL = 1 WHEN 10001 THRU 20000...

The manual you are looking for is: R005E890RMC CA-Easytrieve Reference Manual Release 9.0 This manual is not in cd-rom form. The CA number for ordering documentation is (800) 637-5858.

You're right, I didn't distinguish between CA-Easytrieve Plus release 6.2(the current product) and Easytrieve release 9.0 (the predescessor product). The later is often called "Easytrieve Classic." I really hope you aren't using Classic. While you can call CA support for help, they...

CA-Easytrieve is not dead. The current release 6.2 is actively supported. That release first came out in 1996--when support for release 6.1 would have been dropped. Release 6.2 is scheduled for 2001. CA-Easytrieve will be around as long as COBOL will be, which is probably forever.

CA-Easytrieve Plus is NOT dead. The mainframe product is on release 6.2 and is actively supported. The SQL interface is a popular addon option. The next release, 6.3, is due out in 2001. Also available are CA-Easytrieve Online (CICS), CA-Easytrieve for Unix and Easytrieve Workstation (DOS only).

Try the following (albeit, performance may be slow): SELECT ticket#, tel# FROM table WHERE tel# IN (SELECT tel# FROM table GROUP BY tel# HAVING count(*) > 1) ORDER BY ticket# If tel# in two fields, use tel#1 || tel#2 in place of all tel# fields above.