X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/f5341298db5dbe7e14d0f97525f4f6226e5940c0..c488d6f15da64f80aa77bd8e5c11f86b99abe1ea:/SL/SEPA/XML.pm diff --git a/SL/SEPA/XML.pm b/SL/SEPA/XML.pm index e4bf360d6..a4cf5f5ad 100644 --- a/SL/SEPA/XML.pm +++ b/SL/SEPA/XML.pm @@ -143,7 +143,7 @@ sub to_xml { my $is_coll = $self->{collection}; my $cd_src = $is_coll ? 'Cdtr' : 'Dbtr'; my $cd_dst = $is_coll ? 'Dbtr' : 'Cdtr'; - my $pain_id = $is_coll ? 'pain.008.002.02' : 'pain.001.002.03'; + my $pain_id = $is_coll ? 'pain.008.001.02' : 'pain.001.001.03'; my $pain_elmt = $is_coll ? 'CstmrDrctDbtInitn' : 'CstmrCdtTrfInitn'; my @pii_base = (strftime('PII%Y%m%d%H%M%S', @now), rand(1000000000));