CICS
CIC-WRITEQ-TD QUEUE(name) FROM(dataarea) ... [LENGTH(value)] [SYSID(name)] ... [ERROR(errorpara)]
|  
                              					 
                               ERROR (errorpara)  |  
                           				  
                            
                              					 
                               User-defined error routine to perform when an abnormal condition occurs.  |  
                           				
                        
|  
                              					 
                               FROM (dataarea)  |  
                           				  
                            
                              					 
                               Data area to be acted on.  |  
                           				
                        
|  
                              					 
                               LENGTH (value)  |  
                           				  
                            
                              					 
                               Maximum length of data; can be a literal (LINK or XCTL only) or COBOL data name defined as S9(04)COMP. Can also be a partial length (XCTL only). Required with SYSID.  |  
                           				
                        
|  
                              					 
                               QUEUE(name)  |  
                           				  
                            
                              					 
                               Queue name; can be a literal (maximum 8 characters), or COBOL data name (maximum 30 characters) defined as X(4).  |  
                           				
                        
|  
                              					 
                               SYSID(name)  |  
                           				  
                            
                              					 
                               Remote system name; can be a literal or a COBOL data name (maximum 4 characters).  |  
                           				
                        
CIC-WRITEQ-TD QUEUE('TRDQ') FROM(WS-MESSAGE)
... LENGTH(WS-TD-LEN)
... ERROR(ERROR-PARA)