DECLARE
    -- Declarations
    var_RetVal                SYS_REFCURSOR;
    var_PNOMBREARCHIVO        VARCHAR2 (32767);
    var_PCONTENIDO            BLOB;

    var_MENSAJES              AXIS_D04.T_IAX_MENSAJES;
BEGIN
    -- Initialization
    var_PNOMBREARCHIVO := 'prueba2';
    var_PCONTENIDO := NULL;    -- Modify the code to initialize this parameter
    var_PCANAL := NULL;
    var_PIDDOCUMENTO := 0;
    var_PDESCRIPCIONARCHIVO := 'desc';

    -- Call
    var_RetVal :=
        AXIS_D04.PAC_WS_ZUS.SET_SUBIRARCHIVOSSIN (
            PNOMBREARCHIVO        => var_PNOMBREARCHIVO,
            PCONTENIDO            => var_PCONTENIDO,

            MENSAJES              => var_MENSAJES);

    -- Transaction Control
    COMMIT;

    -- Output values, do not modify
  --  :1 := var_RetVal;
END;