Histórico da Página

Descrição:Informe o Menu em que estará localizada a rotina

Este Ponto de Entrada usado para preenchimento de campos obrigatórios e de escolha que não podem ser configurados no DPM para geração dos items do pedido corretamente

Eventos:

   {"C7_FLUXO" , "S" , Nil},; // Fluxo de Caixa (S/N)

{"C7_LOCAL" , self:cArmDes , Nil},; // Localizacao

{"C7_DDATCRI", dDataBase , Nil},;

{"C7_PEDFAB" , oDadosItem:GetValue("C7_PEDFAB") , Nil},;

{"C7_DLINORI", oDadosItem:GetVAlue("C7_DLINORI") , Nil} ; //

}

// {"C7_ITEPED" , "" , Nil} ; // não vem no DPMORD ?!?!?!?

//

// Campos customizáveis entram aqui

//

aCust := IIF(ExistBlock('VCLSAP2'), ExecBlock("VCLSAP2",.f.,.f.), {})

//

for nIdxC := 1 to LEN(aCust)

If aCust[nIdxC][1] == "FORMULA"

AADD(aItem, {"C7_PRECO", FG_FORMULA( aCust[nIdxC][2]), Nil})

Else

AADD(aItem, {aCust[nIdxC][1] , aCust[nIdxC][2], Nil}) // 1 = campo 2 = valor

EndIf

next

//

aadd(aItems, aItem)

Next

lMsErroAuto := .f.

MSExecAuto({|v,x,y,z| MATA120(v,x,y,z)},1,aCab,aItems,3)

 Informe o Título da rotina

Função:

Informe o Nome do(s) produto(s) a ser utilizado ou “Todos”