view release on metacpan or  search on metacpan

lib/Business/Shipping/MRW.pm  view on Meta::CPAN

	</soap:Header>';
	
    return $str;
}

=head2
    Metodo que se usa para la Transmision del envio

    Hasta implementar WSDL real no esta chapuza usar GenMethods para regenerar struct

    Opcional: 'DatosRecogida'
=cut
sub TransmEnvio {
    my $self  = shift;
    my $Envio = shift;

    $Envio = OpenJSON($Envio);
    
    my $Fecha = strftime "%d/%m/%Y", localtime;

    ## TransmEnvioRequest