Producto: |
TOTVS Backoffice
|
Línea de producto: | Línea Protheus |
Segmento: | Backoffice |
Módulo: | TOTVS backoffice (Línea Protheus) - Facturación (SIGAFAT)
|
Función: | M461ADT |
Alcances: | Microsiga Protheus 12 |
Versiones: | Microsiga Protheus 12 |
Países compatibles: | Todos |
Sistemas operativos: | Todos |
Compatible con las bases de datos: | Todos |
Nivel de acceso: | Nivel 1 (Acceso Clientes) |
Idiomas: | Todos |
El punto de entrada se ejecuta en la preparación del Documento de Salida en la facturación, para validar si se facturarán o no los ítems del Pedido de Venta.
M461ADT({ cPedido , cItem }) --> lRet
Nombre | Tipo | Descripción |
PARAMIXB[1] | Carácter | Número del pedido de venta |
PARAMIXB[2] | Carácter | Ítem del pedido de venta |
| Nome | Tipo | Descrição | Obrigatório |
|---|---|---|---|
| lRet | Lógico | .T. - Item do pedido será faturado .F. - Não será faturado | X |
#INCLUDE "PROTHEUS.CH"
#INCLUDE "TOTVS.CH"
User Function M461ADT()
Local cPedido := PARAMIXB[1] //Numero del Pedido de Venta
Local cItem := PARAMIXB[2] //Item del Pedido de Venta
Local lRet := Nil
iF cPedido == "TOTVS" .AND. cItem != "02"
lRet := .F.
Alert("El item del Pedido de Venta no se facturará")
Else
lRet := .T.
EndIf
Return lRet