Skip to end of metadata
Go to start of metadata

You are viewing an old version of this page. View the current version.

Compare with Current View Version History

Version 1 Current »

var
  vDM             : TDM_IntFaturamento_Server;
  v_DataNF     : OleVariant;

begin
  try
      vDM := TDM_IntFaturamento_Server.Create(Self);
      vDM. Cl_OEGeral_.Close;
      vDM. Cl_OEGeral_.CreateDataSet;
      vDM. CL_PedProgEntrega_.Close;
      vDM. CL_PedProgEntrega_.CreateDataSet;
      vDM. CL_PedProgEstoque_.Close;
      vDM. CL_PedProgEstoque_.CreateDataSet;

    // Criar o array multidimensional.
     v_DataNF := VarArrayCreate([0, 2, 0, 1], varVariant);

      v_DataNF[0,0] := vDM. Cl_OEGeral_.Data;
      v_DataNF[1,0] := vDM. Cl_PedProgEntrega_.Data;
      v_DataNF[2,0] := vDM. Cl_PedProgEstoque_.Data;

      v_DataNF[0,1] := ' OrdemExpedicao'; // Nome da TAG
      v_DataNF[1,1] := ' ProgramacaoEntrega';
      v_DataNF[2,1] := ' Caracteristica';

      vDM.IntegraOrdemExpedicao('P', v_DataOE, RDMUsuario, '', -1]);
  finally
    FreeAndNil(vDM);
  end;
end; 


Estrutura analítica dos campos


 

Obrigatório?

 

 

Tag

Insert

Up/Del

Descrição

Observação

OrdemExpedicao

S

S

 

 

FIL_IN_CODIGO

S

S

Cód. Filial


EXP_IN_CODIGO

N

S

Cód. Expedição


EXP_DT_EMISSÃO

N

N

Data de Emissão da Expedição


RED_IN_CODIGO

N

N

Código do Agente Redespacho


NOT_ST_UFPLACA2RED

N

N

UF Placa 2


NOT_ST_MOTORRED

N

N

Nome Motorista Redespacho


NOT_ST_PLACA1RED

N

N

Placa 1 Redespacho


NOT_ST_PLACA2RED

N

N

Placa 2 Redespacho


TRA_IN_CODIGO

N

N

Código do Agente Transportador


NOT_ST_MOTORTRA

N

N

Nome Motorista Transportadora


NOT_ST_PLACA1TRA

N

N

Placa 1


NOT_ST_UFPLACA1TRA

N

N

UF Placa 1


NOT_ST_PLACA2TRA

N

N

Placa 2



 

Obrigatório?

 

 

Tag

Insert

Up/Del

Descrição

Observação

ProgramacaoEntrega

S

N

 

 

SER_IN_CODIGO

S

N

Série


PED_IN_CODIGO

S

N

Cód. Pedido


ITP_IN_SEQUENCIA

S

N

Sequência do item do Pedido


IPE_IN_SEQUENCIA

S

N

Sequência do item da Entrega


IPE_RE_QUANTIDADE

S

N

Quantidade do Item da Entrega



 

Obrigatório?

 

 

Tag

Insert

Up/Del

Descrição

Observação

Caracteristica

S

N

 

 

SER_IN_CODIGO

S

N

Série


PED_IN_CODIGO

S

N

Cód. Pedido


ITP_IN_SEQUENCIA

S

N

Sequência do item do Pedido


IPE_IN_SEQUENCIA

S

N

Sequência do item da Entrega


ALM_IN_CODIGO

S

N

Código do Almoxarifado


LOC_IN_CODIGO

S

N

Código da Localização


NAT_ST_CODIGO

S

N

Natureza


MVS_ST_REFERENCIA

S

N

Cód.Referência


MVS_ST_LOTEFORNE

S

N

Nº Lote


MVS_DT_ENTRADA

S

N

Data Entrada


MVS_DT_VALIDADE

S

N

Data Validade


LMS_RE_QUANTIDADE

S

N

Quantidade



Observações


  • Um arquivo XML deverá conter apenas uma Ordem de Expedição.
  • Uma Ordem de Expedição poderá conter um ou vários Pedidos de Venda.
  • Código seqüencial da OE:
    • No momento da inclusão não precisará ser informado no XML (se for será desconsiderado), pois a Ordem de Expedição assumirá o código seqüencial do Mega.
    • No momento da exclusão precisará ser informado no XML, para que o sistema localize o registro.
  • Característica: se a Tag estiver preenchida no XML, o sistema vai sobrepor os dados informados no Pedido de Venda. Lembrando que a unidade de medida a ser considerada nesta tag será sempre a unidade de estoque.


  • No labels