Versões comparadas

Chave

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


01. 

...

DATOS GENERALES

SolucaoCrossLinha

Línea Protheus

SegmentoModulosCrossSegmentos

 

TOTVS Backoffice (

Linha

Línea Protheus) - Compras (SIGACOM)

Story o  
Produto:
Solucoes_totvs_cross

Producto:

TOTVS Backoffice

Linha

Línea de

Produto

producto:

Linhas_totvs
Linha

Segmento:

Segmentos_totvs

Backoffice

Módulo:

Modulos_cross_segmentos
Função

Función:

MATA116 -

Conhecimento

Conocimiento de

Frete

flete

País:

Brasil

Ticket:


Requisito/

Story/Issue (informe

el requisito relacionado)

:



02. 

...

DESCRIPCIÓN

Este Ponto Punto de Entrada tem como função a validação da Nota selecionada na rotina de Conhecimento de Freteentrada tiene como función la validación de la Factura seleccionada en la rutina de Conocimiento de flete.


03.

...

UBICACIÓN

El punto se activa al seleccionar la factura que generará Conocimiento de fleteO ponto é chamado ao selecionar a nota que irá gerar Conhecimento de Frete.


04.

...

PARÁMETROS

NomeDescrição Identificam se o foi selecionado se passou ou Não Marcado

Nombre

Tipo

Descripción

{ThisMark(),ThisInv()}

Array

 Identifica si el documento de entrada

fue seleccionado, verificar

si pasó True(Marcado)

o False(

No marcado)

05.

...

DEVOLUCIÓN

Não háNo existen.

06.

...

EJEMPLO DE

...

UTILIZACIÓN

Bloco de código
languagevb
themeMidnight
firstline1
titleADVPL
#INCLUDE "PROTHEUS.CH"
/*/{Protheus.doc} User Function M116MARK
FunçãoFunción para validar la afactura notaseleccionada selecionadaen noel ConhecimentoConocimiento de Freteflete.
@type  Function
@since 26/09/2024
@version P12
@param param_name, param_type, param_descr
@return return_var, return_type, return_description
/*/
User Function M116MARK()


Local lRet      := .T.
Local _cMArk    := ThisMark()
Local nPos      := aScan(aRecMark,{|x| x == SF1->(Recno())})

lRet:= FWAlertYesNo("Deseja¿Desea prosseguirproseguir comcon ala açãoacción? Sim / NãoNo", "ValidaçãoValidación dade Notala fiscalfactura")

If lRet
    RecLock("SF1",.F.)
    If IsMark('F1_OK',_cMark)
        SF1->F1_OK :=Space(2)
        If nPos > 0
            ADEL( aRecMark, nPos )
            ASIZE( aRecMark, Len(aRecMark)-1 )
        Endif
   Else
        SF1->F1_OK :=_cMark
        If nPos== 0
            AAdd( aRecMark, SF1->(Recno()) )
        EndIf
    EndIf
    MsUnLock()
EndIf


Return

...