Histórico da Página

Ponto de Entrada

Descrição:	Este Ponto de Entrada é utilizado para preenchimento de campos customizados do cabeçalho do pedido.
Localização:
Eventos:	aCab := {; {"C7_NUM" , cNumero , Nil},; // Numero do Pedido {"C7_EMISSAO" , dDataBase , Nil},; // Data de Emissao {"C7_FORNECE" , SA2->A2_COD , Nil},; // Fornecedor {"C7_LOJA" , SA2->A2_LOJA , Nil},; // Loja do Fornecedor {"C7_CONTATO" , " " , Nil},; // Contato {"C7_FILENT" , self:cOrigem , Nil} ; // Filial Entrega } // // Campos customizáveis entram aqui // aCabCus := IIF(ExistBlock('VCLSAP1'), ExecBlock("VCLSAP1",.f.,.f.), {}) for nIdxC := 1 to LEN(aCabCus) AADD(aCab, {aCabCus[nIdxC][1], aCabCus[nIdxC][2], Nil} ) // campos customizados e obrigatórios next //
Programa Fonte:	VEICLSAP
Função:
Retorno:	Array de arrays no padrão { {campo, valor}, {campo, valor},{campo, valor} }

Exemplo:

User Function VCLSAP1()

Return {;

{"C7_COND", "01"} ;

}