Error due to return opcode in subprocedures

Hi,

When I compile the below subprocedure code, I get an error "An operand
must not be specified for a procedure that does
not return a value."

Can anyone tell me how to rectify this error. Do I have to mention the
return variable in the Subprocedure Prototype section too.?

Also can someone send me some good document for learning subprocedures
and modules.?

-----------------------------------------------------
hnomain                                                      
                                                             
dmod1_getresult   pr                                         
d var1                           2s 0                        
d var2                           2s 0                        
             
                                                           
pmod1_getresult   b                   export                 
dmod1_getresult   pi                                         
d var1                           2s 0                        
d var2                           2s 0                        
d result          s              3s 0                        
                                                             
c                   eval      result = var1 + var2           
c                   return    result                         
p                 e                                          
                                                    
-------------------------------------------------------


Thanks,
Ganesh.        


Confidentiality Notice

The information contained in this electronic message and any attachments to 
this message are intended
for the exclusive use of the addressee(s) and may contain confidential or 
privileged information. If
you are not the intended recipient, please notify the sender at Wipro or 
Mailadmin@xxxxxxxxx immediately
and destroy all copies of this message and any attachments.