Tiempo aproximado de lectura 00:05:00 min
Duda
¿Cuál es el funcionamiento del punto de entrada MT410BRW en los pedidos de venta?
Entorno
Cross Segmentos - TOTVS Backoffice (Linea Protheus) - MI - Facturación (SIGAFAT) - A partir de la versión 12.1.2410
Solución
Este punto de entrada se invoca antes de que la rutina «Pedidos de venta» presente mbrowse.
Sintaxis
MT410BRW ( ) --> Ninguna
Retorno
Ninguno (carácter)
No se requiere ningún retorno
Ejemplo
#Include "rwmake.ch"#Include "protheus.ch"User Function MT410BRW()Local aAreaSC5 := SC5->(GetArea())Local aAreaSA3 := SA3->(GetArea())Local cCodUser := RetCodUsr() //Retorna o código do usuárioLocal cCodVen := ""SA3->(dbSetOrder(7))If SA3->(dbSeek(xFilial("SA3")+cCodUser)) // Localiza Vendedor pelo código do usuário cCodVen := SA3->A3_CODEndIfIf !Empty(cCodVen) //Filtra somente os pedidos do vendedor dbSelectArea("SC5") Set Filter To &("SC5->C5_VEND1 == '" + cCodVen + "'")Else //Mostra todos os pedidos dbSelectArea("SC5") Set Filter ToEndIfRestArea(aAreaSC5)RestArea(aAreaSA3)Return |
Ejemplos
0 Comentarios