Producto: | TOTVS Backoffice |
Línea de producto: | Línea Protheus |
Segmento: | Backoffice |
Módulo: | TOTVS Backoffice (Línea Protheus) - Compras (SIGACOM) |
Función: | MATA120 - Pedidos de compra |
País: | Brasil |
Ticket: | |
Requisito/Story/Issue (informe el requisito relacionado): |
El punto de entrada M120TGCT tiene como objetivo personalizar la validación del vínculo entre la solicitud de compras con el pedido de compras propio de la medición de contratos.
Function A120TudOk - Al grabar el Pedido de Compras.
Nombre | Tipo | Descripción |
PARAMIXB[1] | Carácter | Código de la sucursal que el sistema definió para buscar la solicitud |
PARAMIXB[2] | Carácter | Número de la solicitud de compra vinculada al ítem del pedido |
PARAMIXB[3] | Carácter | Ítem de la solicitud de compra vinculada al ítem del pedido |
Tipo | Descripción |
Lógico |
|
#INCLUDE "PROTHEUS.CH"
/*/{Protheus.doc} M120TGCT
PE para personalizar la validación del vínculo entre SC con el
PC propio de la medición de contratos.
@type function
@author
@since 11/11/2024
/*/
User Function M120TGCT()
Local lRet := .T.
Local aArea := GetArea()
Local aAreaSC1 := SC1->(GetArea())
Local cFilSeekC1 := PARAMIXB[1]//Código de la sucursal que el sistema definió para buscar la solicitud
Local cNumSC := PARAMIXB[2]//Número de la solicitud de compra vinculada al ítem del pedido
Local cItemSC := PARAMIXB[3]//Ítem de la solicitud de compra vinculada al ítem del pedido
lRet := FWAlertYesNo("¿Desea continuar con la acción? Sí / No", "¡ATENCIÓN M120TGCT!")
Return lRet