package mypacked;

import java.math.BigDecimal;
import javax.activation.DataHandler;
import javax.jws.WebMethod;
import javax.jws.WebParam;
import javax.jws.WebService;
import javax.xml.bind.annotation.XmlMimeType;
import javax.xml.ws.BindingType;
import javax.xml.ws.soap.MTOM;
import javax.xml.ws.soap.SOAPBinding;

@WebService(targetNamespace = "http...tempuri.org", portName = "TestWSSoap12HttpPort") // NOT SURE WHAT TO DO HERE ?
@BindingType(SOAPBinding.SOAP12HTTP_BINDING) // NOT SURE IS THIS CORRECT ?
@MTOM // CAN I USE THIS IN MY VERSION AND WITH JAX-RPC ?
public class upload_file {

  @WebMethod
  public BigDecimal createJournal(@WebParam(name = "journal") String journal) {
    return null ;
  }

  @WebMethod
  public void attachFile(
    @WebParam(name = "id") BigDecimal id,
    @WebParam(name = "filename") BigDecimal filename,
    @WebParam(name = "data") @XmlMimeType("application/octet-stream") DataHandler data) {
  }
}

-------------------------------------------------------------------------------------------------

create or replace
PACKAGE BODY JANIS  AS

function upload_file(session_id in number, upload_id in number)
         return xmltype
  AS
  temp varchar2(4000);
  crlf char(2):=chr(13)||chr(10);
  BEGIN
   
    if upload_id is null then
      raise_application_error(-20032,'');
    end if;

    temp:='<definitions
            xmlns="http://schemas.xmlsoap.org/wsdl/"
            xmlns:soap="http://schemas.xmlsoap.org/wsdl/soap/"
            xmlns:tns="http://attachment.tip/"
            xmlns:xsd="http://www.w3.org/2001/XMLSchema"
            xmlns:mime="http://schemas.xmlsoap.org/wsdl/mime/"
            targetNamespace="http://attachment.tip/">'||crlf;
    temp:=temp||'  <types/>'||crlf;
    temp:=temp||'  <message name="sendImage">'||crlf;
    temp:=temp||'    <part name="image" type="xsd:base64Binary"/>'||crlf;
    temp:=temp||'  </message>'||crlf;
    temp:=temp||'  <message name="sendImageResponse"/>'||crlf;
    temp:=temp||'  <message name="sendOctet">'||crlf;
    temp:=temp||'    <part name="octet" type="xsd:base64Binary"/>'||crlf;
    temp:=temp||'  </message>'||crlf;
    temp:=temp||'  <message name="sendOctetResponse"/>'||crlf;
    temp:=temp||'  <portType name="AttachmentTip">'||crlf;
    temp:=temp||'    <operation name="sendImage">'||crlf;
    temp:=temp||'      <input message="tns:sendImage"/>'||crlf;
    temp:=temp||'      <output message="tns:sendImageResponse"/>'||crlf;
    temp:=temp||'    </operation>'||crlf;
    temp:=temp||'    <operation name="sendOctet">'||crlf;
    temp:=temp||'      <input message="tns:sendOctet"/>'||crlf;
    temp:=temp||'      <output message="tns:sendOctetResponse"/>'||crlf;
    temp:=temp||'    </operation>'||crlf;
    temp:=temp||'  </portType>'||crlf;
    temp:=temp||'  <binding name="AttachmentBinding" type="tns:AttachmentTip">'||crlf;
    temp:=temp||'    <soap:binding style="rpc" transport="http://schemas.xmlsoap.org/soap/http"/>'||crlf;
    temp:=temp||'    <operation name="sendImage">'||crlf;
    temp:=temp||'      <soap:operation soapAction=""/>'||crlf;
    temp:=temp||'      <input>'||crlf;
    temp:=temp||'        <mime:multipartRelated>'||crlf;
    temp:=temp||'          <mime:part>'||crlf;
    temp:=temp||'            <soap:body parts="" namespace="http://attachment.tip/" use="literal"/>'||crlf;
    temp:=temp||'          </mime:part>'||crlf;
    temp:=temp||'          <mime:part>'||crlf;
    temp:=temp||'            <mime:content part="image" type="image/jpeg"/>'||crlf;
    temp:=temp||'          </mime:part>'||crlf;
    temp:=temp||'        </mime:multipartRelated>'||crlf;
    temp:=temp||'      </input>'||crlf;
    temp:=temp||'      <output>'||crlf;
    temp:=temp||'        <soap:body namespace="http://attachment.tip/" use="literal"/>'||crlf;
    temp:=temp||'      </output>'||crlf;
    temp:=temp||'    </operation>'||crlf;
    temp:=temp||'    <operation name="sendOctet">'||crlf;
    temp:=temp||'      <soap:operation soapAction=""/>'||crlf;
    temp:=temp||'      <input>'||crlf;
    temp:=temp||'        <mime:multipartRelated>'||crlf;
    temp:=temp||'          <mime:part>'||crlf;
    temp:=temp||'            <soap:body parts="" namespace="http://attachment.tip/" use="literal"/>'||crlf;
    temp:=temp||'          </mime:part>'||crlf;
    temp:=temp||'          <mime:part>'||crlf;
    temp:=temp||'            <mime:content part="octet" type="application/octet-stream"/>'||crlf;
    temp:=temp||'          </mime:part>'||crlf;
    temp:=temp||'        </mime:multipartRelated>'||crlf;
    temp:=temp||'      </input>'||crlf;
    temp:=temp||'      <output>'||crlf;
    temp:=temp||'        <soap:body namespace="http://attachment.tip/" use="literal"/>'||crlf;
    temp:=temp||'      </output>'||crlf;
    temp:=temp||'    </operation>'||crlf;
    temp:=temp||'  </binding>'||crlf;
    temp:=temp||'  <service name="AttachmentService">'||crlf;
    temp:=temp||'    <port binding="tns:AttachmentBinding" name="AttachmentTip">'||crlf;
    temp:=temp||'      <soap:address location="http://localhost:9080/SwAService/services/AttachmentTip"/>'||crlf;
    temp:=temp||'    </port>'||crlf;
    temp:=temp||'  </service>'||crlf;
    temp:=temp||'  </definitions>'||crlf;
    
    return (xmltype(temp));

exception
    when others then
       if sqlcode=-20031 then
          raise_application_error(-20031,'...');
       elsif sqlcode=-20032 then
          raise_application_error(-20032,'...');
       elsif sqlcode=-20033 then
          raise_application_error(-20033,'...');
       elsif sqlcode=-20036 then
          raise_application_error(-20036,'...');
       else
          raise_application_error(-20099,'...');
       end if;

  END upload_file;

END JANIS;