Jump to content

dev botao

Envio com Schemas s-1.0


EdmarFrazao
Go to solution Solved by José M. S. Junior,
  • Este tópico foi criado há 971 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Todos os envios no Evento com Schemas s.1.0

estão dando erro, informa que não acha os schemas

mas os schemas tem nomes:

  v_S_01_00_00.xsd

O que esta errado na unit: pcesConversaoeSocial linha 2471
Esta assim:

function StrToVersaoeSocial(out ok: Boolean; const s: String): TVersaoeSocial;
begin
  result := StrToEnumerado(ok, s, ['02_04_01', '02_04_02', '02_05_00', 'S01_00_00'],
                          [ve02_04_01, ve02_04_02, ve02_05_00, veS01_00_00]);
end;

function VersaoeSocialToStr(const t: TVersaoeSocial): String;
begin
  result := EnumeradoToStr(t, ['02_04_01', '02_04_02', '02_05_00', 'S01_00_00'],
                          [ve02_04_01, ve02_04_02, ve02_05_00, veS01_00_00]);
end;

 

se os schemas estiverem certos deveria ser assim?

function StrToVersaoeSocial(out ok: Boolean; const s: String): TVersaoeSocial;
begin
  result := StrToEnumerado(ok, s, ['02_04_01', '02_04_02', '02_05_00', '_S_01_00_00'],
                          [ve02_04_01, ve02_04_02, ve02_05_00, veS01_00_00]);
end;

function VersaoeSocialToStr(const t: TVersaoeSocial): String;
begin
  result := EnumeradoToStr(t, ['02_04_01', '02_04_02', '02_05_00', '_S_01_00_00'],
                          [ve02_04_01, ve02_04_02, ve02_05_00, veS01_00_00]);
end;

 

 

Link to comment
Share on other sites

  • Este tópico foi criado há 971 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Guest
This topic is now closed to further replies.
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.