Imprimi Página | Fechar janela

ponto de entrada no orçamento

Impresso de: Helpfacil - Portal do conhecimento
Nome do Forum: ADVPL
Descrição do Forum: Dúvidas sobre a programação em ADVPL
URL:http://www.helpfacil.com.br/display_topic_threads.asp?ForumID=1&TopicID=42454
Data da Impressão: terça-feira, 23 de abril de 2024 at 03:40


Topico: ponto de entrada no orçamento

Postado por: MIRIAMFX2
Assunto: ponto de entrada no orçamento
Data Postagem: quinta-feira, 3 de janeiro de 2019 at 07:54

Bom dia, estou tentando fazer um fonte que carregue o valor do desconto no orçamento, criei um campo na SCJ, SCJ->CJ_XDESCONTO, nele digito o valor total do desconto no orçamento, esse valor deve ser rateado para todos os itens do orçamento, então estou usando o ponto de entrada A415LIOK(), na falta de outro melhor rs, ele dispara quando finalizo a atualização naquela linha da grid do orçamento, o problema esta quando atualizo o orçamento ou transito pelas linhas, ele executa o ponto de entrada então acho que não da pra fazer por ele. Alguém tem alguma ideia?

User Function A415LIOK()
    
    Local aArea := GetArea()
    Local aAreaCJ := SCJ->(GetArea())
    Local aAreaCK := SCK->(GetArea())
    Local lRet := .T.
    Local nItem := 0
    Local nDesc := 0

    SET DELETED OFF

    If CJ_XVLDESC <> 0
       
               nItem := LASTREC()
               nDesc := (CJ_XVLDESC/nItem)
               dbGoTop()                        
                    While !eof()
                        CK_VALDESC := nDesc
                        dbskip()
                    Enddo
    Endif
           
    Restarea(aAreaCK)
    RestArea(aAreaCJ)
    RestArea(aArea)
   
Return lRet


Respostas:

Postado Por: DON.JUNIOR
Data Postagem: sábado, 5 de janeiro de 2019 at 01:11

Não conheço o módulo, mas pelo seu "problema"o mais indicado é trabalhar osdados antes de montar o aCols... teria que analisar melhor, mas uma pergunta no início da rotina para o usuário digitar o valor do desconto, aí você conta a quantidade de linhas e faz o rateio proporcionalmente, quando a tela abrir já virá com os valores preenchidos.

Também pode fazer no final, mas aí terá que abrir uma telinha para digitação do desconto e exibir os novos valores, quando o usuário confirmar na sua tela grava no banco.


Att.
Don Junior



Postado Por: MIRIAMFX2
Data Postagem: terça-feira, 8 de janeiro de 2019 at 16:38

Então mas no inicio seria inviável por que a pessoa pode digitar mais ou menos itens. Esse fonte passa por todas as linhas assim que uma linha é finalizada, no entanto queria que desconsidera-se as linhas em branco.



Postado Por: DON.JUNIOR
Data Postagem: terça-feira, 8 de janeiro de 2019 at 21:06

Então faz no final... Aí vc já vai ter o total de linhas e valor de cada linha caso queira ratear proporcional ao valor da linha. Veja se essa rotina possui um PE após confirmação tipo 415Tok, 415fim ou 415sai. Agora estou no celular, não tenho como ajudar mais.

Att.
Don Junior



Postado Por: JUNIORPLAC
Data Postagem: quinta-feira, 10 de janeiro de 2019 at 15:32

Você é analista, consultor, trabalha com Protheus, Sistemas de informação ou Banco de Dados? Se SIM! Veja nosso portai de troca de conhecimento, PROTHEUS E SQL, conteúdo bom e de GRAÇAAAAAAAAAAAAA!

Canal Protheus e SQL - Conteúdo GRATUITO

TODAS AS NOSSAS REDES DE TROCA DE CONHECIMENTO

Protheus e SQL O dia a dia de quem faz arte com Protheus

Facebook
https://www.facebook.com/protheusesql

Grupo no Facebook
https://www.facebook.com/groups/protheusesql

YouTube
https://www.youtube.com/channel/UCfICFLzDCOqzayF4i6N4yjA

Instagram
https://www.instagram.com/protheusesql

LinkedIn
https://www.linkedin.com/company/protheusesql





Imprimir Página | Fechar Janela