PC Toledo

... ON", cPathRaiz+"\nfw.ini", .T. )
ENDIF
ENDIF
RETURN { _cBola_, cResName, _lista_ }

/* ********************************
if file("DSPNBLDD.DBF")
use DSPNBLDD shared
do while .not. eof()
if _uf_ $ DSPNBLDD->Autorizado // := aTRTags[i,1]
if _operacao_ = 2 ; _cBola_ := alltrim( DSPNBLDD ...

... Bibliotecas de classes visuais
- ✅ `.scx` - Definições de tela/formulário
- ✅ `.frx` - Definições de relatório
- ✅ `.mnx` - Definições de menu
- ✅ `.dbf` - Tabelas de banco de dados

**Qualidade da recuperação:**
- `.vcx/.scx/.frx/.mnx` → **100% PERFEITO** (Totalmente legível por humanos)
- `.fxp ...

... Bibliotecas de classes visuais
- ✅ `.scx` - Definições de tela/formulário
- ✅ `.frx` - Definições de relatório
- ✅ `.mnx` - Definições de menu
- ✅ `.dbf` - Tabelas de banco de dados

**Qualidade da recuperação:**
- `.vcx/.scx/.frx/.mnx` → **100% PERFEITO** (Totalmente legível por humanos)
- `.fxp ...

... não acessa por outras máquinas(windows) nem Linux.
Pq vc precisa compilar ele com GTXWC e acessar a base de dados, via TCP/IP em cada maquina com Linux.
Vai usar SAMBA para DBF(mapeado), LetoDbf ou UNIXODBC para bancos relacionais... E por ai vai.
No caso do Object Pascal a mesma coisa, não muda nada.

Olá!
Tabela IBPT de SP, até 28 Fev. 2026

Olá!
NCM e as 3 alíquotas Federal, Importado, Estadual.
Deve se manter assim até o final do ano. 12 mil 150 itens(NCM)

Agora com vídeos de alguns sistemas.

... a definir o modo de vídeo e caracteres na inicialização.
Adicione ao seu código:

harbour

REQUEST HB_CODEPAGE_PT850 // Ou PTISO, dependendo da sua DBF
PROCEDURE Main()
HB_SETCODEPAGE("PT850")
SetMode(25, 80) // Garante modo 25x80
// ... restante do código
RETURN


4. Usar hb_GtInfo para boxes ...

... This example uses the Customer.xml file created in the
// prevous example and extracts from it the structure definition
// for the Customer.dbf file.

PROCEDURE Main
LOCAL oXmlDoc := TXmlDocument():new()
LOCAL oXmlNode, aStruct := {}

oXMlDoc:read( Memoread( "customer.xml ...

Boa noite prezados ...

consegui o mesmo efeito WINDOWS / LINUX .. ficou legal !!

quem quiser compilar em linux .. está funcionando com letodbf


#include "hwgui.ch"
#include "rddleto.ch"

REQUEST LETO
REQUEST DBFCDX
REQUEST DBFFPT ...

Boas, estudando aqui também como usar harbour com sql, mais precisamente com postgresql.
Criei um trecho de código base com os principais comandos.


#require "hbpgsql"

PROCEDURE Main()

LOCAL conn, res
LOCAL cOpc := ""
LOCAL cDB := "minhabase"

CLS
? "Connecting to PostgreSQL (postgres ...

Valeu José,

É que achei que era um exemplo completo, mas foi apenas ilustrativo. Reajustei várias funções que tem retorno simples ou apenas mensagem, mas essas que retornam dados que não dá pra saber o que é pra um iniciando em SQL (begin at beginner) não sei como resolver:

ADOLOCAL(), NUMBERSQL ...

ok
josequintas.ch é meio particular, talvez nem precise, deixar só o não tão particular, não sei se o outro usa

#define INKEY_IDLE 800

#define DOW_DOMINGO 1
#define DOW_SEGUNDA 2
#define DOW_TERCA 3
#define DOW_QUARTA 4
#define DOW_QUINTA 5
#define DOW_SEXTA 6
#define DOW_SABADO 7

#ifdef K_F11 ...

José, tem como postar os arquivos:

josequintas.ch
ze_adoclass.ch

Gostaria de testar seu exemplo.

... como iria apresentar os artigos por exemplo do grupo de nome "Porções" ou "Pratos de Peixe".
A não ser que criasse uma variável lógica no arquivo DBF onde se encontram os artigos, fizesse uma procura e verificasse o estado dessa mesma variável.
Como é que sugeria fazer essa leitura de artigos ...