IBM-i-RPG-Free-CLP-Code/Copy_Mbrs/BASE36_P.RPGLE

**FREE                                                               
// === BASE36ADD prototype ==========================================
dcl-pr BASE36ADD varchar(50);                                        
    theValue varchar(50) const;                                      
end-pr;