Project

General

Profile

testerrorinpersistentproc.p

the procedure runner - Vladimir Tsichevski, 05/08/2023 05:54 PM

Download (193 Bytes)

 
1 
block-level on error undo, throw.
2 

    		
  

  

    
      3
    
    
      
define variable hproc as handle no-undo.


    		
  

  

    
      4
    
    
      
run persitentprocwitherror.p persistent set hproc.


    		
  

  

    
      5
    
    
      
run procWithError in hproc no-error.


    		
  

  

    
      6
    
    
      
MESSAGE error-status:ERROR.


    		
  

  

    
      7