.net 收发短信验证码:DB2 - Issue & Resolution

1. SQL CODE -501
ERROR DES:
DSNT408I SQLCODE = -501, ERROR:  THE CURSOR IDENTIFIED IN A FETCH OR
         CLOSE STATEMENT IS NOT OPEN   

ERROR ANALYZE:
LOGIC: FETCH 1  THEN UPDATE 1 , AND EVERY 100 THEN COMMIT;
Analyse :  Declare a cursor without 'WITH HOLD', so it will close the cursor in the loop when it perform 1 commit;

resolution:
DELECARE GET_USER CURSOR WITH HOLD FOR

2.  RESOURCE UNAVAIABLE - TS unavailable -904A. ERROR  DESCRIPTION:SQLCODE = -904, ERROR:  UNSUCCESSFUL EXECUTION CAUSED BY AN UNAVAILABLE RESOURCE. REASON 00C90097, TYPE OF RESOURCE  
00000210, AND RESOURCE NAME XDELDX31.TSIGCB01.00000003       B.Analyse :    DSN SYSTEM(DBAG) ->  -DISPLAY DB(DBNAME) SPAE(TSNAME) NAME     TYPE PART  STATUS           
-------- ---- ----- -----------------
TSIGCB01 TS    0001 RW               
TSIGCB01 TS    0002 RW,COPY          
    -THRU      0009                  
TSIGCB01 TS    0010 RW               
    -THRU      0011                  
TSIGCB01 TS    0012 RW,COPY          
    -THRU      0013                  
TSIGCB01 TS    0014 RW               
    -THRU      0017     resolution://*=====================================================
//*      REMOVE COPY PENDING  FOR IGCB TABLES          
//*=====================================================
//COPYPEND EXEC DSNUPROC,ENV=A,UID=WTHELRCA,UTPROC=''  
//SYSERR   DD  DATACLAS=DC&SPEL                        
//SYSUT1   DD  DATACLAS=DC&SPEL                        
//SORTOUT  DD  DATACLAS=DC&SPEL                        
//SORTWK01 DD  DATACLAS=DC&SPLG                        
//SORTWK02 DD  DATACLAS=DC&SPLG                        
//SORTWK03 DD  DATACLAS=DC&SPLG                        
//SORTWK04 DD  DATACLAS=DC&SPLG                        
//SORTWK05 DD  DATACLAS=DC&SPLG                        
//SORTWK06 DD  DATACLAS=DC&SPLG                        
//SORTWK07 DD  DATACLAS=DC&SPLG                        
//SORTWK08 DD  DATACLAS=DC&SPLG                        
//UTPRINT  DD  SYSOUT=*                                
//DSNUPROC.SYSIN DD *                                  
REPAIR SET TABLESPACE XDELDX31.TSIGCB01 NOCOPYPEND    check the status of TS again.NAME     TYPE PART  STATUS          
-------- ---- ----- -----------------
TSIGCB01 TS    0001 RW              
    -THRU      0017        Extend -    1. remove check pend-REPAIR SET TABLESPACE XDELDX31.TSIGCB01 NOCHECKPEND                      2. remove recover pend-REPAIR SET TABLESPACE XDELDX31.TSIGCB01NORCVRPEND