File Exception Handler

最新推荐文章于 2023-12-28 10:38:37 发布
最新推荐文章于 2023-12-28 10:38:37 发布
阅读量746 收藏
点赞数
分类专栏： AS400/RPGLE/CL 
Fdspfile CF   E             WORKSTN                        
F                                     INFDS(DSPFDS)          
Fpfile   IF   E           K DISK                           
F                                     INFDS(FIDS01)          
F                                     INFSR(SFERR)           


 *                                      
D DSPFDS          DS                    
D  ROW                  370    370      
D  COL                  371    371      
D  SFLRRN               378    379B 0   
 *                                      

D FIDS01          DS                     
D  STS01            *STATUS              
D  REC01                397    400B 0    

 *                                     
 *  INFDS for cursor location          
 *                                     
D DSPFDS          DS                   
D  ROWCOL               370    371B 0  
D  ROW                  370    370     
D  COL                  371    371     
D  SFLRRN               378    379B 0  

 *                                      
 * Program status data structure        
 *                                      
D SDS            SDS                    
D  WSID                 244    253      
D  USER                 254    263      
D  AAPARM           *PARMS              
D  PGM              *PROC               
D  USTAT                 11     15  0   
D  USRCLN                21     28      
D  UROUTN                29     36      
D  MSGID                 40     46      
D  ULIB                  81     90      
D  UMSGTX                91    170      
D  UFILE                201    208      
D  UFSTAT               209    213      
D  UFSRCL               228    235      
D  UJOBN                264    269  0   
D  UCDAT                288    293  0   
D  UCTIM                294    299  0    
D  UPGM                 334    343       
D  UMODL                344    353       

 *****************************************************************    
 * SFERR - File Exception Handler                                     
 *****************************************************************    
c     SFERR          BEGSR                                            
C     STS01          | +IFEQ      1218                      
C                    | | Z-ADD     1122          STS01      
C                    | -ELSE                                
C     STS01          | | +IFEQ      1211                    
C                    | | | EXSR      *PSSR                  
C                    | | -ELSE                              
C                    | | | Z-ADD     1121          STS01    
C                    | | +END                               
C                    | +END                                 
c                    ENDSR   


 ***************************************************************** 
 * *PSSR - Program Execution Errors Handler                        
 ***************************************************************** 
      *PSSR          BEGSR                                         
C     UERCNT         +IFNE      *ZERO                              
C                    | MOVEL     '*CANCL'      URSUME              
C                    -ELSE                                         
C                    | Z-ADD     1             UERCNT              
C                    | MOVE      'R'           MSGACT              
C                    | MOVEL(P)  'QCPFMSG'     MSGF                
C                    | MOVEL(P)  'QSYS'        MSGFL               
C     UMSGTX         | +IFNE      *BLANKS                          
C                    | | MOVEL(P)  UMSGTX        MSGDTA            
C                    | -ELSE                                       
C                    | | MOVEL(P)  UROUTN        MSGDTA            
C                    | +END                                        
 *                                                                 
C     USTAT          | +IFEQ      *ZEROS                           
C                    | | MOVE      UFSTAT        USTAT             
C                    | | MOVE      UFSRCL        USRCLN            
C                    | +END                                                
C                    | MOVE      USTAT         USTAT4                      
 *                                                                         
C     MSGID          | +IFEQ      *BLANKS                                  
C                    | | MOVE      USTAT4        MSGID                     
C                    | | MOVEL     'RPG'         MSGID                     
C                    | | MOVEL     'QRPGMSGE'    MSGF                      
C                    | +END                                                
 *                                                                         
C                    | CALL      'CLMSG'       PMSGCL                   93 
 *                                                                         
C                    | MOVEL     '1'           UEROPT                      
C                    | EXFMT     PSSR0001                                  
 *                                                                         
C     UEROPT         | +IFEQ      '1'                                      
C                    | | MOVEL     '*GETIN  '    URSUME                    
C                    | -ELSE                                               
C     UEROPT         | | +IFEQ      '2'                                    
C                    | | | MOVEL     '*CANCL  '    URSUME                  
C                    | | -ELSE                                             
C     UEROPT         | | | +IFEQ      '3'                          
C                    | | | | MOVE      '        '    URSUME        
C                    | | | +END                                    
C                    | | +END                                      
C                    | +END                                        
C                    +END                                          
 *                                                                 
C                    DUMP                                          
C                    MOVEL     *BLANK        MSGID                 
C                    MOVE      *ZERO         UERCNT                
 *                                                                 
                     ENDSR     URSUME                              
 */EJECT                                                           


 ********************************************************************       
      RTVCUR         BEGSR                                                  
 *                                                                          
C                    Z-ADD     *ZEROS        PROW              2 0          
C                    Z-ADD     *ZEROS        PCOL              2 0          
C     ROWCOL         DIV       256           PROW                           
C                    MVR                     PCOL                           
 *                                                                          
                     ENDSR                                 

 * Get row & column 
C                    | | EXSR      RTVCUR           
 *                                                  
C     *IN04          | | +IFEQ      *ON             
C                    | | | +SELECT                  
 *
C     PROW           | | | -WHENEQ    5             
C     PCOL           | | | |ANDGE     20            
C     PCOL           | | | |ANDLE     21                             
....
C


 

JmLei
关注
  • 0
    点赞
  • 踩
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
专栏目录
Exception类以及File类（文件名称过滤器）的理解
j_better的博客
05-18 358
Exception异常类每一个程序员在编写程序的时候，总会遇到各种问题，可以是一种错误，也可以是一种异常，我们将这些通常叫做ThrowableThrowable类是java语言中所有异常的超类，它分为error和exceptionError：属于严重错误，一般用代码无法处理，属于不可抗力因素Exception：属于异常问题：可以用代码去处理，它又分为运行时期异常和编译时期异常处理异常的两种方式：方...
关于DuplicateFileException: Duplicate files copied
cat8812的博客
09-02 416
移植别人的xi项目的时候，在编译中出现提示： com.android.builder.packaging.DuplicateFileException: Duplicate files copied 原因是可能多处添加了tong同样的库，只要在gradle文件作屏蔽即可： //为了解决部分第三方库重复打包了META-INF的问题 packagingOptions { exclude...
exception&file&&IO
CS_GaoMing的博客
11-05 262
Java中exception的处理机制和file对I/O的处理。
Exception和File
weixin_38816786的博客
11-23 295
异常分为 编译时期异常:只要不是RuntimeException中异常都属于编译时期异常 运行时期异常:RuntimeException:可能由于不严谨导致的,eg:空指针异常 如: public class ExceptionText1 { public static void main(String[] args) {     int a=10;     int b=0; ...
Java中IO流，File，异常
qq_37263827的博客
01-12 305
Java中IO流，File，异常 IO流：               input （输入）output（输出）  原理： 存储机制：            硬盘，内存， 缓存             硬盘：大容量的存储机制，文件数据        内存：运行中的程序数据        缓存：屏幕中看到的数据       流的流动方向:硬盘>内存> 硬盘
Android实现自定义Crash handler记录崩溃信息实例代码
01-20
File file = new File(dir, fileName); PrintWriter writer = new PrintWriter(new BufferedWriter(new FileWriter(file, true))); writer.println(phoneInfo); writer.println("异常时间: " + timeStr); ...
例如：例外净额
01-28
这里的`expression-to-throw-exception`是你可能抛出异常的代码，`ExceptionType`是你期望捕获的异常类型，`var`是捕获到的异常对象的变量名，`handler-expression`是处理异常的代码，而`finally`块中的`cleanup-...
:fire:xCrash为Android应用程序提供了捕捉java崩溃、本地崩溃和ANR的能力。不需要root权限或任何系统权限。- iqiyi / xCrash
01-27
xCrash can generate a tombstone file (similar format as Android system's tombstone file) in the directory you specified when the app process crashes or ANRs. xCrash has been used in many ...
（最终解决）java.lang.UnsatisfiedLinkError解决尝试
06-01
Java中的`java.lang.UnsatisfiedLinkError`是一个常见的运行时异常，通常出现在Java试图加载本地（C或C++）库但找不到相应的库文件时。这个错误可能是由于多种原因引起的，如库路径设置不正确、库文件不存在或者版本...
Android项目开发错误锦集-DuplicateFileException
黎丶先森的博客
07-20 2956
在将eclipse 项目迁移 android studio 时候报错。 Error:Execution failed for task ‘:vivosdk:transformResourcesWithMergeJavaResForRelease’. com.android.build.api.transform.TransformException: com.android.build
FileNotFoundException（文件未找到异常）可能的原因和解决方法
最新发布
Java开源程序猿
12-28 9087
时，适当地检查文件路径、文件名、权限以及其他可能导致文件未找到的问题。详细的错误日志和异常堆栈信息对于定位和解决问题非常有帮助。时，适当地检查文件路径、文件名、权限以及其他可能导致文件未找到的问题。详细的错误日志和异常。表示在尝试访问文件时，未找到指定的文件或目录。
java.nio.file.NoSuchFileException异常解决
热门推荐
qq_41814311的博客
10-07 2万+
线上环境做做数据导入操作。
IOException（IO异常）可能的原因和解决方法
Java开源程序猿
12-28 7464
的情况进行适当的检查和处理，以提高程序的稳定性和容错性。详细的错误日志和异常堆栈信息对于定位和解决问题非常有帮助。表示在输入/输出操作期间可能发生的异常，通常是由于底层的输入/输出流遇到问题而引起的。的情况进行适当的检查和处理。详细的错误日志和异常堆栈信息对于定位和解决问题非常有帮助。确保在进行输入/输出操作时，对可能导致。确保在进行输入/输出操作时，对可能导致。
emptyFileException异常
zwb的博客
04-21 7527
emptyFileException poi空文件异常 org.apache.poi.EmptyFileException: The supplied file was empty (zero bytes long)空文件异常 原因：读的流没有关 写的流开始写 注意在try()-with-resource中读操作和写操作的顺序，关闭读操作之后再进行写操作 ...
Androiｄ笔记：Android 7.0 FileUriExposedException 解决
陈果的博客
01-13 1万+
Android7.0 异常 FileUriExposedException
Python之异常处理
weixin_46944979的博客
09-12 1011
try…except…else的语法： try: <语句> #运行别的代码 except <名字>： <语句> #如果在try部份引发了'name'异常 except <名字>，<数据>: <语句> #如果引发了'name'异常，获得附加的数据 else: <语句> #如果没有异常发生 finally: <语句> #不管出不出异常，都执行fin
java.nio.file.FileSystemException: xxx: Too many open files
sayyy的专栏
11-09 1万+
前言 linux Redhat 7.0 spring boot 2.0.x jdk1.8 长时间运行程序后，出现java.nio.file.FileSystemException: xxx: Too many open files错误。 很显然是因为文件打开未关闭造成的。 原因 Too many open files错误，因下面的代码引起的： Path path = Paths.get("文...
AS400 Trigger
jmlei的专栏---IBM, AS400, RPGLE, CLLE, Delphi, ASP...
07-25 1410
R TRG01R T01F 10 TEXT('text') T02F 4 0 TEXT('num')  TRG01F@.txt REF(TRG01F)
Handler processing failed; nested exception is java.io.IOError: java.io.FileNotFoundException: Invalid file path这是什么错误
03-27
这是一个处理程序错误，具体来说是在处理程序时发生了一个无法处理的异常。该异常的原因是由于找不到指定的文件路径而导致的。可能是由于文件路径不存在或指向了无效的位置导致的。需要检查文件路径是否正确，并确保...

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值