Ich habe jetzt eine Information gefunden, dass SSL_INIT_Application statt SSL_INIT benutzt werden sollte. Ein Beispiel dazu habe ich auch gefunden und angepasst.

Code:
SSLInitApp_p = %alloc(%size(SSLInitApp));                 
SSLInitApp = *loval;                                      
%str(%addr(c_sslAppID):%len(%trim(ssl_App_Name))) =       
              %trim(SSL_App_Name);                        
SSLInitApp.AppID = %addr(c_sslAppID);                     
SSLInitApp.AppIDLen = %scan(X'00':c_sslAppID) - 1;        
SSLInitApp.lclCert = *Null;                               
SSLInitApp.lclCertLen = 0;                                
SSLInitApp.CipherList = %addr(SSLCipherList);             
SSLInitApp.CipherElem = 11;                               
SSLInitApp.SessType = 0;                                  
SSLInitApp.reserved1 = 0;                                 
SSLInitApp.protocol = 0;                                  
SSLInitApp.TimeOut = 0;                                   
 rc = SSL_Init_Application(%addr(SSLInitApp_p));      
if rc <> 0;                                           
// handle error!                                      
          Msg   = %str(strerror(errno));              
       die(%editc(rc:'P') + ' ' + Msg);               
endif;
Dann bekomme ich den Fehler zurück:

Der für das Argument angegebene Wert ist nicht korrekt.
Leider wird nicht angegeben, welches Argument. Sieht jemand was offensichtlich Falsches?