Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 31

changes.mady.by.user Cristian Eduardo Porras Franco

Gravado em

comparado com

Nova versão 32

changes.mady.by.user Cristian Eduardo Porras Franco

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Totvs custom tabs box
tabsConfiguraciones previas, Flujo de pruebas, Punto de Entrada, Ejemplo de uso
idspaso1,paso2,paso3,paso4
Totvs custom tabs box items
defaultyes
referenciapaso1
  • Desarrollar y compilar el punto de entrada "LOCXPERG".
Totvs custom tabs box items
defaultno
referenciapaso2

En el módulo Facturación (SIGAFAT): 

  • Ir al menú Actualizaciones | Facturación | Facturaciones (MATA467N).
  • El MsgAlert se mostrará con el mensaje ''Punto de entrada LOCXPERG''
  • Consulta el grupo de preguntas.
Totvs custom tabs box items
defaultno
referenciapaso3

Descripción

Punto de entrada para el usuario poder elegir un grupo de preguntas diferente, dependiendo de la rutina siendo ejecutadaque se está ejecutando.
El retorno de cada pregunta debe respetar el mismo del grupo de preguntas original, ya que estas se procesan internamente en el fuente.
La utilidad de este punto de entrada es mantener el DEFAULT de respuestas para cada documento o cada grupo de documentos.

Programa Fuente:

LocxNF.PRW

Función

LocxPERG

Parámetros

Parámetro: nTipo
Tipo: Numérico
Descripción: Tipo de documento

Retorno:

La primera posición debe tener el grupo de preguntas que debe ser utilizado, y la segunda posición debe contener .T. si las preguntas deben ser mostradas en pantalla, y .F. si no deben ser mostradas. Ejemplo: Return {"MATXNF", .F.}

Estructura del array:

  • Posición [1]: grupo de preguntas.
  • Posición [2]: .T. o .F.
Totvs custom tabs box items
defaultno
referenciapaso4

Ejemplo:

Bloco de código
languagejs
themeMidnight
titleLOCXPERG
linenumberstrue
#INCLUDE "PROTHEUS.CH"

User function LOCXPERG()

Local aRet := {'MTXRED',.T.}

If FunName() == "MATA467N" //Factura de Salida

    MsgAlert("Punto de Entrada LOCXPERG ")
    aRet := {"MATXNF", .T.}

EndIf

Return aRet






...

04. INFORMACIÓN ADICIONAL

Grupo Estándar

ORDENPREGUNTATIPOTAMAÑODECIMAL
01¿Incluir Vínculo ?N10
02¿Asiento Contab. On-Line ?N10
03¿Muestra Asiento Contab. ?N10
04¿Agrupa Asientos ?N10
Aviso
title¡ Atención !

No utilizar menos preguntas, que las que se usan en el padrón.

...