Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Focus Error

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> ABENDS & Debugging
View previous topic :: :: View next topic  
Author Message
nikyojin

New User


Joined: 05 Oct 2005
Posts: 94

PostPosted: Thu Apr 06, 2006 4:38 am    Post subject: Focus Error
Reply with quote

Hi Guys...Pls give me an Idea regarding this.
Code:
MATCH FILE IBPRFNEW                                                           
SUM                                                                           
   DISPLAY_ID_PARTB  AS 'DISPLAYIDPARTB'                                       
   BILLREPNM         AS 'BILLREPNAME'                                         
   OPER_UNIT_NAME    AS 'OPUNITNAME'                                           
   CUST_ACCT_NAME    AS 'NAME'                                                 
BY PARTY_KEY        AS 'PARTYKEY'                                             
BY PROFILE_KEY      AS 'PROFILEKEY'                                           
WHERE BILL_UNIT_ORG_NULL NE '?'                                               
AFTER MATCH HOLD AS HOLD2 OLD                                                 
RUN                                                                           
FOC198) FATAL ERROR IN DATABASE I/O. FOCUS TERMINATING  ERROR WRITING FOCSORT 
 PAGE 262144, CODE 0x0000cccc                                                 
Back to top
View user's profile Send private message

iknow

Active User


Joined: 22 Aug 2005
Posts: 413
Location: Colarado, US

PostPosted: Fri Apr 07, 2006 7:28 am    Post subject: Re: Focus Error
Reply with quote

Hi,

FOC198 error means that "A severe error was encountered in reading from or writing to a FOCUS database. FOCUS was unable to recover from this error, and will return to the host environment. "

In your code you have specified the match type as 'OLD'.

As far as my knowledge is concern the following are the match types available

List of MATCH TYPE
    OLD-OR-NEW include all records from both files
    OLD-AND-NEW include only records matched from both files
    OLD-NOT-NEW include all records from the old file except those matched in the new file
    NEW-NOT-OLD include all records from the new file except those matched in the old file
    OLD-NOR-NEW include all records from the old and new files except those that matched


Try replacing with above one of the type and check the result. It should work well.

NOTE

I have attached the list of FOCUS error messages document for your reference.
Back to top
View user's profile Send private message
nikyojin

New User


Joined: 05 Oct 2005
Posts: 94

PostPosted: Fri Apr 07, 2006 9:22 am    Post subject: Re: Focus Error
Reply with quote

Hi Iknow....Thx for the response....I'll surely be checking this out.....The same code is working with a small I/P file and it has been running in production since long time....Pls inform me the changes after this new information ...
Thanks,
Nikyojin
Back to top
View user's profile Send private message
nikyojin

New User


Joined: 05 Oct 2005
Posts: 94

PostPosted: Fri Apr 07, 2006 5:19 pm    Post subject: Re: Focus Error
Reply with quote

Hi Iknow
The same code was previously running and there are lots of OLD keywords mentioned...still its functioning fine...Pls suggest an alternative if possible......
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> ABENDS & Debugging All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts IEW2456E error when link-editing a C ... Senthilraj JCL & VSAM 0 Fri Oct 13, 2017 3:12 pm
No new posts FTP Skip or ignore error and process ... AJAYREDDY All Other Mainframe Topics 3 Wed Sep 27, 2017 8:12 pm
No new posts Assembler Macro Copybook converted to... Ziquilix PL/I & Assembler 4 Tue Sep 26, 2017 3:07 am
No new posts FUSE - IBM MQ - CICS integration error Kevin Vaz CICS 1 Mon Sep 18, 2017 4:31 pm
No new posts Reply MQ open error Vignesh Sid COBOL Programming 6 Thu Sep 07, 2017 6:02 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us