Produto: | TOTVS Backoffice |
---|---|
Linha de Produto: | Linha Protheus |
Segmento: | Backoffice |
Módulo: | SIGAFAT - Faturamento |
Função: | MATA415 - Orçamentos de Venda |
Abrangências: | Microsiga Protheus 12 |
Versões: | Microsiga Protheus 12 |
Compatível Países: | Todos |
Sistemas Operacionais: | Todos |
Compatível com as Bases de Dados: | Todos |
Nível de Acesso: | Nível 1 (Acesso Clientes) |
Idiomas: | Todos |
Este ponto de entrada permite a gravação de dados complementares nos campos do cabeçalho do orçamento (SCJ) e é executado em dois momentos:
A415CANC( cAliasTMP ) --> Nenhum.
Nome | Tipo | Descrição |
---|---|---|
cAliasTMP | Carácter | Alias do cabeçalho do Orçamento de Vendas. |
Retorno | Tipo | Descrição | Obrigatório |
---|---|---|---|
Nenhum | NILL |
Neste exemplo validamos o cancelamento do orçamento de acordo com Cliente e Loja.
#INCLUDE 'PROTHEUS.CH' User Function A415CANC() //Armazena o ambiente ativo para restaurar ao fim do processo Local aArea := GetArea() as array Local cAliasTMP := PARAMIXB[1] as array //Valida cliente e loja, se for cliente 000001 e loja 01, não permite cancelar o orçamento If (cAliasTMP)->CJ_CLIENTE == '000001' .AND. (cAliasTMP)->CJ_LOJA == '01' (cAliasTMP)->CJ_STATUS := "A" //Volto o status para em ABERTO Endif //Restaura o ambiente ativo no início da chamada RestArea(aArea) Return |