<Lancamento OPERACAO="I"> 
    <ORG_IN_CODIGO>2</ORG_IN_CODIGO>  
    <LOT_IN_CODIGO>51211</LOT_IN_CODIGO>  
    <ACAO_IN_CODIGO>3</ACAO_IN_CODIGO>  
    <LAN_DT_LANCAMENTO>01/11/2007</LAN_DT_LANCAMENTO>  
    <PAR_BO_GRAVANAOATUALIZADO>S</PAR_BO_GRAVANAOATUALIZADO>  
    <ItemLancamento OPERACAO="I"> 
        <ITE_IN_CODIGO>2</ITE_IN_CODIGO>  
        <FIL_IN_CODIGO>3</FIL_IN_CODIGO>  
        <ITE_DT_CONVERSAO>01/11/2007</ITE_DT_CONVERSAO>  
        <ITE_DT_ORCAMENTO>01/11/2007</ITE_DT_ORCAMENTO>  
        <CRE_IN_REDUZIDO>119</CRE_IN_REDUZIDO>  
        <ITE_ST_COMPLEMENTO>4331,27</ITE_ST_COMPLEMENTO>  
        <ITE_RE_VALOR>4331,27</ITE_RE_VALOR>  
        <CentroCusto OPERACAO="I"> 
            <CUS_ST_EXTENSO>10101001</CUS_ST_EXTENSO>  
            <LCC_RE_VALOR>4331,27</LCC_RE_VALOR>  
            <LCC_CH_NATUREZA>C</LCC_CH_NATUREZA>  
            <Projeto OPERACAO="I"> 
                <PRO_ST_EXTENSO>901</PRO_ST_EXTENSO>  
                <RPRO_RE_VALOR>4331,27</RPRO_RE_VALOR>  
            </Projeto> 
        </CentroCusto> 
    </ItemLancamento> 
    <ItemLancamento OPERACAO="I"> 
        <ITE_IN_CODIGO>1</ITE_IN_CODIGO>  
        <FIL_IN_CODIGO>3</FIL_IN_CODIGO>  
        <ITE_DT_CONVERSAO>01/11/2007</ITE_DT_CONVERSAO>  
        <ITE_DT_ORCAMENTO>01/11/2007</ITE_DT_ORCAMENTO>  
        <DEB_IN_REDUZIDO>5</DEB_IN_REDUZIDO>  
        <ITE_ST_COMPLEMENTO>4331,27</ITE_ST_COMPLEMENTO>  
        <ITE_RE_VALOR>4331,27</ITE_RE_VALOR>  
        <CentroCusto OPERACAO="I"> 
            <CUS_ST_EXTENSO>10101001</CUS_ST_EXTENSO>  
            <LCC_RE_VALOR>4331,27</LCC_RE_VALOR>  
            <LCC_CH_NATUREZA>D</LCC_CH_NATUREZA>  
            <Projeto OPERACAO="I"> 
                <PRO_ST_EXTENSO>901</PRO_ST_EXTENSO>  
                <RPRO_RE_VALOR>4331,27</RPRO_RE_VALOR>  
            </Projeto> 
        </CentroCusto> 
    </ItemLancamento> 
</Lancamento>

Exemplo da Chamada no Delphi

var

  vDM: TDM_IntLancamento_Server;

begin

  try

    vDM := TDM_ IntLancamento _Server.Create(Self);

    vDM.CL_ CL_LancInt_.CreateDataSet;

    vDM.CL_ CL_LancInt_.Insert;

    // Alimenta os campos e faz o mesmo com os outros datasets

    vDM.Integra(1{código do usuário},

                          [vDM. CL_LancInt_ .Data, 

                          vDM. CL_ItemLancInt_ .Data, 

                          vDM. CL_ItemLancCCInt_. Data, 

                          vDM. CL_ItemLancProInt_ .Data]);

  finally

    FreeAndNil(vDM);

  end;

end;

Estrutura Analítica dos Campos

Lançamento

Itens Lançamento

Centro de Custo

Projeto

Observações

Os campos com a coluna Update/Delete preenchida são usados para localizar o registro. Todos os outros são usados para alterar o valor do campo.