Arquivo de exportação!

[Colder]

Olá pessoal, então tenho este código que uso em um programa meu, ele exporta os dados para um arquivo .txt,

NOME ARQUIVO,C:\Arquivos de programas\Conrds\itens.TXT

VALOR FIXO,2, ,01

UNIDADEMEDIDA,3,00,0

CODIGO,9,000000,0

PRECOVENDA,6,0000.00,0

VALOR FIXO,3, ,000

DESCRICAO,22, ,0

ele gera isto aqui em baixo:

01KG000008000100000Arroz

01UN000009000225000Feijão

porém eu presico que na unidade de medida quando for KG ele gere 000 e quando for UN ele gere 002

que no caso ficara assim:

01000000008000100000Arroz

01002000009000225000Feijão

alguém tem alguma idéia?

Desde já agradeço

[Jhonas]

voce não informou qual linguagem de programação esta usando

uma das formas é ler a string ( 01KG000008000100000Arroz ) e na posição encontrada do KG fazer a substituição por 000

em delphi seria

procedure TForm1.Button1Click(Sender: TObject);
var s : string;
begin
   s := '01KG000008000100000Arroz';
   if pos('KG',s) > 0 then
      begin
         s[pos('K', S)] := '0';
         s[pos('G', S)] := '0';
      end;

      showmessage(s);
end;

abraço