Histórico da Página
Composition Setup |
---|
import.css=/download/attachments/327912/newLayout.css |
Portuguese | ||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: GM120APROV
Descrição:
Eventos Programa Fonte GEMA120.PRW Sintaxe GM120APROV ( ) --> .T. ou .F. Retorno
Observações Exemplos #INCLUDE "PROTHEUS.CH"#INCLUDE "RWMAKE.CH"USER FUNCTION GM120APROV() Local cContr := PARAMIXB[1]Local lRetorno:= .F.dbSelectArea("LIT")LIT->(dbSetOrder(2)) // LIT_FILIAL+LIT_NCONTRIf dbSeek(xFilial("LIT")+cContr ) If LIT->LIT_STATUS == "2" //Status de um contrato quitado lRetorno := .T. EndIfEndIf Return lRetorno |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas