It’ll be easy for you. You should have no problem hiring a qualified network technician to get it done. You have a good enough description for the technician to make an initial plan, and details can be worked out from there. — Tom

What emulator is used? What version? If it’s iSeries Access, what is its service level? — Tom

You still haven’t shown the F-spec for m1ama00, and you haven’t shown the key information for the file from the file description. And you still haven’t explained why the CHAIN statement is in your READ loop.
 
But if you want to know how to read the file in sequence, the best guess is to delete that CHAIN statement from the program. The program will probably work better without it. It doesn’t seem to have a purpose, and it looks like it interferes with your sequencing.
 
Tom

We have checked the VLDCMDKEY indicator with double-click on the mouse and the indicator is not turned on. So even the solution I supposed we could use won’t work.

This would help you i Guess.. 
This is the run_qry subroutine its executed from Load_Data Subroutine.. 


     run_qry       BegSr            
/EXEC SQL                           
+ PREPARE S1 FROM :QRYSTR1          
/END-EXEC                           
*                                   
/EXEC SQL                           
+ DECLARE C1 CURSOR WITH HOLD FOR S1
/END-EXEC                           
*                                   
/EXEC SQL                           
+ OPEN C1                           
/END-EXEC                           
/EXEC SQL                           
+ FETCH NEXT FROM C1 INTO :agent_prm
/END-EXEC                           
/EXEC SQL                                        
+ FETCH NEXT FROM C1 INTO :agent_prm             
/END-EXEC                                                   
* 
/EXEC SQL                                        
+ CLOSE C1                                       
/END-EXEC                                        
                   EndSr                         

Hi Phil and Tom .
Thats my poor coding. 
Simply i want to read m1ama00 file from the beginning to end and execute the subroutine for the each AGCDE.. 
How can i do that..  If u specify the code it would be helpful to me.. 

Thanks 
Surey

Wiki – thank you for your response. According to the documentation, *ULD means “unshifted (not upper shift) left button double click” where we understand that “unshifted” means no use of the shift button. In any case, we’ve tried both cases – pressing the shift button and not pressing it – and the results are the same. CF09/INKI is not turned on. As for VLDCMDKEY, this would indeed tell us that ENTER was not pressed but it wouldn’t indicate that the mouse was used rather than a command key. We could, I suppose, if the indicator for VLDCMDKEY was ON and assuming that the mouse is considered to be a command key, check for all valid command keys (F1-F24) and if no command key was pressed then assume that the mouse was double-clicked. This solution, if it works, is not explicit and leaves open room for error so getting MOUBTN to work is preferable.

To reiterate, what we want is to know that on a particular display field the mouse was double-clicked in order to open and display a particular window.

What platform are you asking about? What OS is being used? Do you only need to rename, or is there a conversion that must be run? What is “ITMAS.FXP”? — Tom

Great.

…though it could indeed be replaced by overflow/underflow if the data isn’t good. — Tom

SQL0406 is “Conversion error on assignment to column &2.” It’s a conversion error (as noted in the question). It goes away when the CAST() is done. — Tom

Apparently not. This was a question about error SQL0406 which is, I believer, an overflow situation.

Error handling for possible overflow/underflow is always a good idea. Can’t argue against it. However, the values in A, B, C and D should sanity checked at the point of entry (or update). If values that will be trouble are not allowed into the file in the first place, later tests can be minimized for processing efficiency. This current process is only updating FLD1, so it might be rational to _assume_ that the existing values will work. Maybe. — Tom

Don’t know if a case can be used in the update..might be two updates with where clauses .. 99999etc where A*B*C/10**D > 9999999999999.99 and the other updates the field with the actual value. 

so I would probably do a case filling the field with 9s when the result is > 9999999999999.99

…SET FLD1 = A*B*C/cast(10**D as int)Will fail with divide by zero error when D is a negative number…Doesn’t matter what you do on the right, process will fail with error SQL0406 when updating FLD1 when the answer has more than 13 significant digits as in 1234567890123.45 * 1234567890123. * 12345678.90123 / 10 * 1 

- Have a down time .- Put the Domino Server Down .- Install PF4 http://www-01.ibm.com/support/docview.wss?uid=swg24028680Then Check it out ..

The load_data subroutine is only useful to show that it doesn’t affect the order of records. It still doesn’t show anything about how the file is ordered. It doesn’t include the F-spec. It doesn’t include the file description. And it certainly doesn’t tell us why you have a CHAIN to the same file right in the middle of a READ loop. That is what causes your problem, but we still can’t tell what the programming should be doing because we don’t know any definitions. — Tom

If it meets your needs, then it’s fine. But the same answer would go for anything you asked about. This isn’t a PC review forum. –Tom

Correction to ‘Answer’: *ULD is Unshifted Left Double-click. — Tom