<?xml version="1.0"?>
<OrdemExpedicao OPERACAO="I">
<FIL_IN_CODIGO>3</FIL_IN_CODIGO>
<EXP_IN_CODIGO>400</EXP_IN_CODIGO>
<EXP_DT_EMISSAO>16/01/2012</EXP_DT_EMISSAO>
<RED_IN_CODIGO></RED_IN_CODIGO>
<NOT_ST_UFPLACA2RED></NOT_ST_UFPLACA2RED>
<NOT_ST_MOTORRED></NOT_ST_MOTORRED>
<NOT_ST_PLACA1RED></NOT_ST_PLACA1RED>
<NOT_ST_PLACA2RED></NOT_ST_PLACA2RED>
<TRA_IN_CODIGO>1567</TRA_IN_CODIGO>
<NOT_ST_MOTORTRA></NOT_ST_MOTORTRA>
<NOT_ST_PLACA1TRA></NOT_ST_PLACA1TRA>
<NOT_ST_UFPLACA1TRA></NOT_ST_UFPLACA1TRA>
<NOT_ST_PLACA2TRA></NOT_ST_PLACA2TRA>
<ProgramacaoEntrega OPERACAO="I">
<PED_IN_CODIGO>78354</PED_IN_CODIGO>
<SER_ST_CODIGO>1</SER_ST_CODIGO>
<ITP_IN_SEQUENCIA>1</ITP_IN_SEQUENCIA>
<IPE_IN_SEQUENCIA>3</IPE_IN_SEQUENCIA>
<IPE_RE_QUANTIDADE>3</IPE_RE_QUANTIDADE>
<Caracteristica OPERACAO="I">
<PED_IN_CODIGO>78354</PED_IN_CODIGO>
<SER_ST_CODIGO>1</SER_ST_CODIGO>
<ITP_IN_SEQUENCIA>1</ITP_IN_SEQUENCIA>
<IPE_IN_SEQUENCIA>3</IPE_IN_SEQUENCIA>
<ALM_IN_CODIGO>10</ALM_IN_CODIGO>
<LOC_IN_CODIGO>1</LOC_IN_CODIGO>
<NAT_ST_CODIGO>'DP'</NAT_ST_CODIGO>
<MVS_ST_REFERENCIA>'0000006=200;'</MVS_ST_REFERENCIA>
<MVS_ST_LOTEFORNE>'250101'</MVS_ST_LOTEFORNE>
<MVS_DT_ENTRADA>01/01/2000</MVS_DT_ENTRADA>
<MVS_DT_VALIDADE>01/01/2100</MVS_DT_VALIDADE>
<LMS_RE_QUANTIDADE>3</LMS_RE_QUANTIDADE>
</Caracteristica>
</ProgramacaoEntrega>
</OrdemExpedicao>
Exclusão
<?xml version="1.0"?>
<OrdemExpedicao OPERACAO="D">
<FIL_IN_CODIGO>3</FIL_IN_CODIGO>
<EXP_IN_CODIGO>1795</EXP_IN_CODIGO>
<EXP_DT_EMISSAO>01/03/2012</EXP_DT_EMISSAO>
</OrdemExpedicao>
Exemplo da chamada no Delphi
varvDM : 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.
