Minha dúvida é no modulo SIGACOM.
criei um campo na tabela SC7 (C7_PROGRAM). E tem um campo padrão do sistema na tabela SC1 (C1_PROGRAM). Eu quero que a informação que eu coloco no campo C1_PROGRAM, quando insiro uma solicitação de compra, seja levada para o pedido de compra (para esse campo novo que eu criei) quando puxo a solicitação para dentro do pedido.
Como faço? Podem me ajudar?
Boa tarde Angelica,
Para isso você precisara encontra um ponto de entrada para isso, geralmente quando vc esta criando uma solicitação você não tem ainda o pedido.
Mas a ideia seria essa. Primeiro eu crio a solicitação, e depois eu vou no pedido, incluo um novo pedido e puxo a solicitação criada. Mas o campo que eu criei não traz a informação do campo c1_program.
Você disse que é necessário criar um ponto de entrada ?
— Angelica De Castilhos 22 de Jun de 2022Olá Angélica, você pode usar dois pontos de entrada para resolver o problema o MT120VSC(para mostrar o campo no F4"Solicit") e o MT120ISC(adicionar o campo da C1 no acols da SC7), seguem os fontes.
Testei aqui e funcionou como esperado, espero que ajude.
/*/{Protheus.doc} User Function MT120VSC
(Este Ponto de Entrada tem por objetivo manipular os campos do array na rotina de seleção da Solicitação de Compras ou Contrato de Parceria - F4 no Pedido de Compras.)
@type Function
@author Leandro Lemos
@since 23/06/2022
@version P12
@param param_name, param_type, param_descr
@return return_var, return_type, return_description
@example
(examples)
@see (
https://tdn.totvs.com/pages/releaseview.action?pageId=6085488
https://centraldeatendimento.totvs.com/hc/pt-br/articles/360020181932-Cross-Segmento-TOTVS-Backoffice-Linha-Protheus-ADVPL-Ponto-de-entrada-MT120VSC-
)
/*/
User Function MT120VSC()
ExpA1 := ParamIxb[1]
ExpN2 := ParamIxb[2]
//Customização do usuário para manipulação dos campos do array na seleção da Solicitação de Compras
//ou Contrato de Parceria - F4 no Pedido de Compras.
aAdd(ExpA1,'C1_PROGRAM')
Return ExpA1/*/{Protheus.doc} User Function MT120ISC
(MT120ISC - Manipula o acols do pedido de compras)
@type Function
@author Leandro Lemos
@since 23/06/2022
@version P12
@param param_name, param_type, param_descr
@return return_var, return_type, return_description
@example
(examples)
@see (https://tdn.totvs.com/display/PROT/MT120ISC+-++Manipula+o+acols+do+pedido+de+compras)
/*/
User Function MT120ISC()
//Pega posicção do Campo customizado C7_YPROGRA
Local nPosProgram := aScan(aHeader,{|x| Trim(x[2])=="C7_YPROGRA"})
//Grava informação do C1_PROGRAMA no C7_YPROGRA
//Variavel 'n' é do MATA120
ACOLS[n,nPosProgram] := SC1->C1_PROGRAMA
Return .T.