Histórico da Página
...
04. EXEMPLO DE UTILIZAÇÃO
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
User Function ART153Local cDesc := "" dbSelectArea("SD1") dbSetOrder(1) If dbSeek(xFilial("SD1")+SF3->F3_NFISCAL+SF3->F3_SERIE+SF3->F3_CLIEFOR+SF3->F3_LOJA) .And. SF3->F3_TIPO <> "D" If !Empty(SD1->D1_NFORI) .And. !Empty(SD1->D1_SERIORI) cDesc += "Referente NF nº:"+SD1->D1_NFORI+CHR(13) +", registrada em: "+DToC(SD1->D1_DTDIGIT)+CHR(13)+CHR(10) Else cDesc := "Compra para recebimento futuro"+CHR(13)+CHR(10) EndIf EndIf Return cDesc |
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas