Perguntas Liberação de venda direta

Bom dia,

Existe alguma rotina para liberar os orçamentos da venda direta?, quando feita a venda pelo pedido de venda existe a rotina de liberação de pedidos ou por credito ou por estoque, na venda direta existe algo parecido?

obrigado

Marcelo o venda direta não vai tratar o pedido como o faturamento trato. O que se pode fazer é usar o ponto de entrada FTVD7030, conforme tdn.totvs.com/pages/releaseview.action?pageId=6784588 e exemplo;

User Function FTVD7030()
Local _nValid := ParamIxb[1] //1- LinhaOk e 2- TudoOk
Local _nTpOp := ParamIxb[2] //1- Orçamento, 2- Venda e 3- Pedido
Local lRet := .T.
Local nPosQtd := aScan(aHeader, { |x| AllTrim(x[02]) == "LR_QUANT" })

If _nValid == 1 //Validação da linha do atendimento/venda
(LinhaOk).
If aCols[N][
nPosQtd] > 5 //Quantidade
lRet := .F.

EndIf
ElseIf _nValid == 2 //Validação geral do atendimento
(TudoOk).
If _nTpOp == 1 //Salva como Orcamento //Validações do cliente
ElseIf _nTpOp == 2 //Salva como Venda //Validações do cliente
ElseIf _nTpOp == 3 //Salva como Pedido //Validações do cliente
Else
lRet := .T.
EndIf
EndIf
Return lRet