Histórico da Página

Este Ponto de Entrada é chamado  no momento em que um orçamento vai para liberação de descontos. Sua chamada é efetuada a cada gravação dos itens do orçamento.

OFIXI001

OXVS7DGR - Itens da Liberação de Venda ( [ ] )

()

  dbSelectArea("VS7")             RecLock("VS7",.t.)	VS7->VS7_FILIAL := xFilial("VS7")	VS7->VS7_NUMIDE := cNumVS6	VS7->VS7_SEQUEN := Strzero(nItVS7,4)	VS7->VS7_TIPAUT := "1"	VS7->VS7_GRUITE := VS3->VS3_GRUITE	VS7->VS7_CODITE := VS3->VS3_CODITE	VS7->VS7_DESPER := aRetDes[2]	VS7->VS7_DESDES := VS3->VS3_PERDES	VS7->VS7_VALORI := VS3->VS3_VALPEC	VS7->VS7_VALPER := nValPerm	VS7->VS7_VALDES := VS3->VS3_VALPEC - (VS3->VS3_VALDES/VS3->VS3_QTDITE)	VS7->VS7_MARPER := aRetDes[3]	VS7->VS7_MARLUC := VS3->VS3_MARLUC	VS7->VS7_QTDITE := VS3->VS3_QTDITE	MsUnlock()	if ExistBlock("OXVS7DGR")	   ExecBlock("OXVS7DGR",.f.,.f.)	Endif