Histórico da Página
GFEA0701 - Manipulação de
...
Tabela na
...
Exclusão de
...
Um Documento de Frete Relacionado a uma
...
Fatura
Características do Requisito
Linha de Produto: | Microsiga Protheus |
Segmento: | Logística |
Módulo: | SIGAGFE |
...
Ponto de Entrada - GFEA0701
Descrição: | Manipulação de tabela na exclusão de um documento de frete relacionado a uma fatura. |
Localização: | Botão |
...
Excluir |
...
da grade inferior ( |
...
Documentos de Frete da Fatura Relacionados |
...
), opção disponível em |
...
Documentos de Frete |
...
. | |
Programa Fonte: | GFEA070A - Digitação de Faturas de Frete (SIGAGFE) |
Parâmetros: |
...
Este ponto de entrada não recebe parâmetros. |
Retorno: |
...
Este ponto de entrada não possui retorno. |
...
| Bloco de código |
|---|
...
|
...
|
...
|
...
|
...
|
4
5
6
7
8
9
10
11
12
13
User Function GFEA0701()
...
| |
#INCLUDE "PROTHEUS.CH" User Function GFEA0701() Local cExpGW3 := "GW3->GW3_FILFAT+GW3->GW3_EMIFAT+GW3->GW3_SERFAT+GW3->GW3_NRFAT+DToS( |
...
GW3- |
...
>GW3_ |
...
DTEMFA)" Local cExpGW6 := "GW6->GW6_FILIAL+GW6->GW6_EMIFAT+GW6->GW6_SERFAT+GW6->GW6_NRFAT+DToS(GW6->GW6_DTEMIS) |
...
...
" Local cSeek := &cExpGW6 GW3->( dbSetOrder(8) ) GW3->( dbSeek(cSeek) ) While !GW3->( Eof() ) .And. cSeek == &cExpGW3 If GW3->GW3_DTEMIS > dDATABASE |
...
RecLock("GW3", .F.) |
...
GW3->GW3_MOTBLQ := "Data de Emissão do documento de frete não poderá ser maior que Data Corrente." |
...
GW3->GW3_DTBLQ := DDATABASE |
...
GW3->( MsUnlock() ) |
...
EndIf
EndIf GW3->(dbSkip()) |
...
End
...
EndDo
Return
|
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas