Linha Microsiga Protheus

Árvore de páginas

Carregando...
Tempo aproximado para leitura: 3 minutos


01. DADOS GERAIS

Produto:

TOTVS Backoffice

Linha de Produto:

Linha Protheus

Segmento:

Backoffice

Módulo:

TOTVS Backoffice (Linha Protheus) - Compras (SIGACOM)

Função:COMXCOL
País:Brasil
Ticket:21653321
Requisito/Story/Issue (informe o requisito relacionado) :DMANMAT02-50176


02. DESCRIÇÃO

Descrição: O ponto de entrada utilizado para verificar os campos alterados na tabela SDT depois da gravação do vínculo de documento no Monitor do TOTVS Colaboração.

Localização: Function MontaTela  - Monta interface de visualização e vínculo do documento, no momento da gravação do vínculo de documento no monitor do TOTVS Colaboração.


Exemplo
#Include 'Protheus.ch'
User Function COMCOLSD()
 
Local ExpA1 := PARAMIXB[1]
Local ExpA2 := PARAMIXB[2]
Local ExpN1 := PARAMIXB[3] //1 Confirmou - 0 Cancelou
 
// Validações do usuário 
SDT->(dBSetOrder(1))
If SDT->(MsSeek(xFilial("SDT")+SDS->DS_CNPJ+SDS->DS_FORNEC+SDS->DS_LOJA+SDS->DS_DOC+SDS->DS_SERIE))
    While SDS->DS_CNPJ == SDT->DT_CNPJ .And. SDS->DS_FORNEC == SDT->DT_FORNEC .And. SDS->DS_LOJA == SDT->DT_LOJA .And. SDS->DS_DOC == SDT->DT_DOC
        If !Empty(SDT->DT_PEDIDO)
            RecLock("SDT",.F.)
                SDT->DT_CFOP := 'N'
            MsUnLock()
        EndIF
        SDT-> (DbSkip())
    End
EndIf
  
Return


03. DEMAIS INFORMAÇÕES

21653321 DMANMAT02-50176 PE COMCOLSD - verifica os campos alterados na tabela SDT - vínculo de documento TOTVS Colaboração / Importador XML

04. ASSUNTOS RELACIONADOS

Não há.