Moin Moin
also ich hab das probem das ich einen Kontenexport für Datev mache das funktioniert auch soweit, nur hab ich jetzt das problem das alle umlaute (ä,ö,ü) ersetzt werden müssen (ae,oe,ue)
die Daten werden in einem ordner geschoben der sie gleich richtig formatieren soll und von dort werden dann die Daten exportiert, die formatierung geschieht wie folgt:
_______________________
LeerText := "\"" + "\"";
AZ := "\"";
KuBz := @If(DTV_KURZBEZ ="";""; AZ + @If(@Contains(DTV_KURZBEZ;"ä");@ReplaceSubstring(DTV_KURZBEZ;"ä";"ae");@If(@Contains(DTV_KURZBEZ;"Ä");@ReplaceSubstring(DTV_KURZBEZ;"Ä";"Ae");DTV_KURZBEZ))+ AZ);
KuBz1 := @If(KuBz ="";""; AZ + @If(@Contains(KuBz;"ö");@ReplaceSubstring(KuBz;"ö";"oe");@If(@Contains(KuBz;"Ö");@ReplaceSubstring(KuBz;"Ö";"Oe");KuBz))+ AZ);
KuBz2:= @If(KuBz1 ="";""; AZ + @If(@Contains(KuBz1;"ü");@ReplaceSubstring(KuBz1;"ü";"ue");@If(@Contains(KuBz1;"Ü");@ReplaceSubstring(KuBz1;"Ü";"Ue");KuBz1))+ AZ);
Name2 := @If(DTV_NAME2 ="";"";AZ + @If(@Contains(DTV_NAME2;"ä");@ReplaceSubstring(DTV_NAME2;"ä";"ae");@If(@Contains(DTV_NAME2;"Ä");@ReplaceSubstring(DTV_NAME2;"Ä";"Ae");DTV_NAME2 + AZ)));
Name21:=@If(Name2 ="";"";AZ + @If(@Contains(Name2;"ö");@ReplaceSubstring(Name2;"ö";"oe");@If(@Contains(Name2;"Ö");@ReplaceSubstring(Name2;"Ö";"Oe");DTV_NAME2 + AZ)));
Name22:=@If(Name21 ="";"";AZ + @If(@Contains(Name21;"ü");@ReplaceSubstring(Name21;"ü";"ue");@If(@Contains(Name21;"Ü");@ReplaceSubstring(Name21;"Ü";"Ue");DTV_NAME2 + AZ)));
Ust := @If(DTV_USTID ="";"";AZ + DTV_USTID + AZ );
PoFa := @If(DTV_POSTF ="";"";AZ +DTV_POSTF + AZ );
Strasse:= @If(DTV_STR ="";"";AZ + @If(@Contains(DTV_STR;"ä");@ReplaceSubstring(DTV_STR;"ä";"ae");@If(@Contains(DTV_STR;"Ä");@ReplaceSubstring(DTV_STR;"Ä";"Ae");DTV_STR + AZ)));
Srasse1:=@If(Strasse ="";"";AZ + @If(@Contains(Strasse;"ö");@ReplaceSubstring(Strasse;"ö";"oe");@If(@Contains(Strasse;"Ö");@ReplaceSubstring(Strasse;"Ö";"Oe");DTV_STR + AZ)));
Strasse2:=@If(Strasse1 ="";"";AZ + @If(@Contains(Strasse1;"ü");@ReplaceSubstring(Strasse1;"ü";"ue");@If(@Contains(Strasse1;"Ü");@ReplaceSubstring(Strasse1;"Ü";"Ue");DTV_STR + AZ)));
Ort := @If(DTV_ORT ="";"";AZ + @If(@Contains(DTV_ORT;"ä");@ReplaceSubstring(DTV_ORT;"ä";"ae");@If(@Contains(DTV_ORT;"Ä");@ReplaceSubstring(DTV_ORT;"Ä";"Ae");DTV_ORT + AZ)));
Ort1:=@If(Ort ="";"";AZ + @If(@Contains(Ort;"ö");@ReplaceSubstring(Ort;"ö";"oe");@If(@Contains(Ort;"Ö");@ReplaceSubstring(Ort;"Ö";"Oe");DTV_ORT+ AZ)));
Ort2:=@If(Ort1 ="";"";AZ + @If(@Contains(Ort1;"ü");@ReplaceSubstring(Ort1;"ü";"ue");@If(@Contains(Ort1;"Ü");@ReplaceSubstring(Ort1;"Ü";"Ue");DTV_ORT + AZ)));
Name1:=@If(DTV_NAME1 ="";"";AZ + @If(@Contains(DTV_NAME1;"ä");@ReplaceSubstring(DTV_NAME1;"ä";"ae");@If(@Contains(DTV_NAME1;"Ä");@ReplaceSubstring(DTV_NAME1;"Ä";"Ae");DTV_NAME1 + AZ)));
Name11:=@If(Name1 ="";"";AZ + @If(@Contains(Name1;"ö");@ReplaceSubstring(Name1;"ö";"oe");@If(@Contains(Name1;"Ö");@ReplaceSubstring(Name2;"Ö";"Oe");DTV_NAME1 + AZ)));
Name12:=@If(Name11 ="";"";AZ + @If(@Contains(Name11;"ü");@ReplaceSubstring(Name11;"ü";"ue");@If(@Contains(Name11;"Ü");@ReplaceSubstring(Name11;"Ü";"Ue");DTV_NAME1 + AZ)));
@Text(DTV_KTO_NR) + ";" + AZ + Name12 + AZ + ";" +Name22+ ";" +KuBz2 + ";" + Ust + ";" + AZ + Strasse2+ AZ + ";" + PoFa+ ";" + AZ + DTV_PLZ + AZ +";" + AZ + Ort2 + AZ + ";" + AZ + DTV_NATION + AZ + ";" + AZ + DTV_KUNDNR + AZ
_______________________
die sache ist nun die das mein Notes abstürzt sobald ich den export starte da aber am export direkt nichts veränder wurde, sondern nur in der formatierung, muss das ja da verursacht werden, kann bloss keinen fehler endecken :-?
Danke schonmal...
Gruss Gregor