Versiones: | Microsiga Protheus 11 |
Compatible Países: | Todos |
Sistemas operativos: | Todos |
Compatible a las Bases de Datos: | Todos |
Idiomas: | Portugués, Español, Inglés |
Descripción: punto de entrada utilizado para verificar los campos modificados en la tabla SDT después de grabar el vínculo del documento en el monitor del TOTVS Colaboración.
Ubicación: Function MontaTela - Monta interfaz de visualización y vínculo del documento.
Eventos: en el momento de grabar el vínculo del documento en el monitor del TOTVS Colaboración
Programa fuente: COMXCOL.PRW
Sintaxis: COMCOLSD - Permite verificar los datos modificados en la tabla SDT después de vincular el documento ([PARAMIXB[1]) -> aCols , ([PARAMIXB[2]) -> aHeader
Parámetros:
NOMBRE | TIPO | DESCRIPCIÓN | OBLIGATORIO |
---|---|---|---|
PARAMIXB[1] PARAMIXB[2] | Array of records | Vector que contiene los campos de la SDT después del momento de vincular el documento Ej: Vinculo con pedido de compras | X |
Observación: no tiene respuesta, porque solamente es para análisis de lo que se trató después de vincular el documento. A partir del resultado encontrado se puede realizar una validación propia.
#Include 'Protheus.ch' User Function COMCOLSD() Local ExpA1 := PARAMIXB[1] Local ExpA2 := PARAMIXB[2] // Validaciones del usuario 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