Clipper On Line • Ver Tópico - Harbour nas nuvens.

Harbour nas nuvens.

Aqui é o lugar para bater papo e trocar idéias sobre os mais variados assuntos

Moderador: Moderadores

 

Harbour nas nuvens.

Mensagempor Itamar M. Lins Jr. » 02 Set 2019 19:47

Ola!
Tá rolando:
https://groups.google.com/forum/#!topic/harbour-users/sQZNx2X8SCs

This library consists of following parts ( as of now )

awsservices.prg - SDK to consume AWS Web Services - hbtip
httpclient.prg - Class which simplifies REST API consumption - hbtip
netioclient.prg - Class which simplifies to connect to multiple hbnetio servers - hbnetio
utilities.prg - Functions to support all above plus pulling infos about linux instances

Quem viver verá!
A discussão é onde hospedar os fontes.

Saudações,
Itamar M. Lins Jr.
Avatar de usuário

Itamar M. Lins Jr.
Colaborador

Colaborador
 
Mensagens: 3719
Data de registro: 30 Mai 2007 11:31
Cidade/Estado: Ilheus Bahia
Curtiu: 127 vezes
Mens.Curtidas: 192 vezes

Harbour nas nuvens.

Mensagempor Itamar M. Lins Jr. » 03 Set 2019 13:36

Ola!
Lembrando que já uso uhttpd do Mindaugas, com sucesso, comandas de restaurantes.
Vou fazer agora uma entrada de dados via smartphone, contagem de estoques(conferência) LetoDbf+uHttpd+ Harbour+Html. Fica Show!
A pessoa vai no deposito conferindo as mercadorias, peças automotivas com o celular 100% online. Conferiu, ajustou, gerando um relatório de contagens.

Saudações,
Itamar M. Lins Jr.
Avatar de usuário

Itamar M. Lins Jr.
Colaborador

Colaborador
 
Mensagens: 3719
Data de registro: 30 Mai 2007 11:31
Cidade/Estado: Ilheus Bahia
Curtiu: 127 vezes
Mens.Curtidas: 192 vezes

Harbour nas nuvens.

Mensagempor fladimir » 03 Set 2019 16:41

Tem como postar um vídeo do funcionamento pra termos ideia na pratica como fica?
Ou prints
Sun Tzu há mais de três mil anos cita nas epígrafes de seu livro “A Arte da Guerra“:

“Concentre-se nos pontos fortes, reconheça as fraquezas, agarre as oportunidades e proteja-se contra as ameaças”.
“Se não é vantajoso, nunca envie suas tropas; se não lhe rende ganhos, nunca utilize seus homens; se não é uma situação perigosa, nunca lute uma batalha precipitada”
.


DESKTOP CONSOLE Harbour | MinGW | DBF | CDX | FastReport | MySQL
DESKTOP VISUAL... Harbour | MinGW | Xailer | MariaDB Nativo | FastReport
MOBILE Android/IOS e WEB - Windev Mobile 22
Avatar de usuário

fladimir
Colaborador

Colaborador
 
Mensagens: 2363
Data de registro: 15 Nov 2006 19:21
Curtiu: 26 vezes
Mens.Curtidas: 137 vezes

Harbour nas nuvens.

Mensagempor Itamar M. Lins Jr. » 04 Set 2019 14:08

Olá!
Screenshot_20190904-135021.png


Lembrando que isso é HTML + CSS + Javascript + Harbour.

Saudações,
Itamar M. Lins Jr.
Anexos
IMG_20190904_143216062.jpg
IMG_20190904_143007911.jpg
Desktop
IMG_20190904_143415867.jpg
Desktop
Screenshot_20190904-134612.png
Screenshot_20190904-134833.png
Screenshot_20190904-134907.png
Basta teclar o botão que adiciona as quantidades.
Screenshot_20190904-135031.png
Avatar de usuário

Itamar M. Lins Jr.
Colaborador

Colaborador
 
Mensagens: 3719
Data de registro: 30 Mai 2007 11:31
Cidade/Estado: Ilheus Bahia
Curtiu: 127 vezes
Mens.Curtidas: 192 vezes

Harbour nas nuvens.

Mensagempor fladimir » 05 Set 2019 00:05

Agradeço o envio das imagens, consegui ter uma ideia de como funciona.
Pelo q percebi ficou Web ajustado pra Mobile correto.

Eu migrei de linguagem para contemplar digamos assim, Web e Mobile, mais Mobile precisamente falando, algo é fato, quem quiser continuar terá q evoluir, não tem como escapar do futuro q cada dia nos aperta, digamos assim, eu sinceramente não imagino como faria isso q vc fez no Harbour, não sei se é complexo ou não ou tudo q teria q instalar/ter pra funcionar.

Q bom q conseguiu, e torço para q colegas aki do fórum q fazem parte de nossas histórias, q ainda não tem nada nessa área, possam ver o qto antes (dependendo o segmento) seja em Harbour ou Outro.
Como disse mudei de linguagem por achar mais fácil, mas se em harbour conseguem resultados satisfatórios q seja em harbour, mas volto a falar, meu amigos e colegas, esse futuro esta cada vez mais presente.

Grande abraço a todos.
Sun Tzu há mais de três mil anos cita nas epígrafes de seu livro “A Arte da Guerra“:

“Concentre-se nos pontos fortes, reconheça as fraquezas, agarre as oportunidades e proteja-se contra as ameaças”.
“Se não é vantajoso, nunca envie suas tropas; se não lhe rende ganhos, nunca utilize seus homens; se não é uma situação perigosa, nunca lute uma batalha precipitada”
.


DESKTOP CONSOLE Harbour | MinGW | DBF | CDX | FastReport | MySQL
DESKTOP VISUAL... Harbour | MinGW | Xailer | MariaDB Nativo | FastReport
MOBILE Android/IOS e WEB - Windev Mobile 22
Avatar de usuário

fladimir
Colaborador

Colaborador
 
Mensagens: 2363
Data de registro: 15 Nov 2006 19:21
Curtiu: 26 vezes
Mens.Curtidas: 137 vezes

Harbour nas nuvens.

Mensagempor Itamar M. Lins Jr. » 05 Set 2019 19:17

Ola!
digamos assim, eu sinceramente não imagino como faria isso q vc fez no Harbour, não sei se é complexo ou não ou tudo q teria q instalar/ter pra funcionar.


Acredite, não tem nada de mais.
É só HTML, as frescuras dos botões etc, vc vê na web vc mesmo copia e cola o código que vc gostar.
O código do Harbour é esse mesmo que todos usamos.
É a mesma coisa que vcs fazem ai no programa de vcs porque ele converte para HTML e CSS.
Quem sabe HTML faz tela para qualquer tamanho. Quem tem uma simples noção de CGI faz até sem usar Harbour.

Já escrevi aqui outras vezes. Vc acessa sites da WEB com seu celular correto ? Tem alguma coisa instalada no seu celular ?
VC acessa o pctoledo com a opção MOBILE, tem alguma coisa instalada no seu celular ?
É simples de mais. O problema é que poucos querem estudar. O Antonio Linares esta fazendo muita, mas muita coisa para celulares etc... com Harbour. Mas cadê os Brasileiros lá interagindo ?

Tem infinitas formas de fazer. Inclusive com as novas IDE´s que vc só cola! Nem código tem, para no caso de força de vendas, já olhei o de entrega de gás, o rapaz dá de graça os fontes, fácil de entender grava tudo lá nas nuvens via FIREBASE. https://www.kodular.io/ Enfim tem miríades de opções inclusive com Harbour.
Eu fiz com harbour pq, ficou mais rápido a parte de "back end"

FUNCTION HRBMAIN(...)

Local n, cArq, aImpressoras := {}
LOCAL cHtml := "", cRDD := "DBFCDX", nRec := 0
LOCAL nConnect, cPATH := "//localhost:2812/"
Local cPDV   := uhttpd_GetField( "cPDV"  )
Local cLogin := uhttpd_GetField( "cLogin" )
Local cAbrir := uhttpd_GetField( "abrir" )

If ValType(cLogin) == "U"
   cLogin := "U"
EndIf

RDDSetDefault("LETO")

leto_commit()
DBCloseAll()

If select('im') > 0
  im->(DBCloseArea())
EndIf

cIndex := cPATH+"impressoras.cdx"
cDBF   := cPATH+"impressoras.dbf"
DbUseArea(.t.,'LETO',cDbf,"im",.T.,.F.,'PTISO')
If leto_file(cIndex) //não precisa leto_file!
   DBSETINDEX( cIndex )
Else
   index on area  tag im01
EndIf

im->(dbGoTop())
Do While im->(!eof())
   AAdd(aImpressoras,{im->area,im->impressora,im->pularlinha,im->copia,im->guilhotina,im->corte})
   im->(DbSkip())
EndDo
im->(DbCloseArea())

If select('pdv') > 0
  pdv->(DBCloseArea())
EndIf

cIndex := cPATH+"pdv"+cPDV+".cdx"
cDbPDV := cPATH+"pdv"+cPDV+".dbf"
DbUseArea(.t.,'LETO',cDbPDV,"pdv",.T.,.F.,'PTISO')
If leto_file(cIndex) //não precisa leto_file!
   DBSETINDEX( cIndex )
Else
   index on Cod_Mercad tag tag01
   index on AreaPrint  tag tag02
EndIf
nRec := pdv->(LastRec())


Arquivo farolweb.hbp
#
# $Id$
#

-3rd=hbide_version=1.0
-3rd=hbide_type=Lib
-3rd=hbide_title=farolweb
-3rd=hbide_output=farolweb

-gh
farolweb.hbc
-o../home/cgi-bin/
index.prg
grupos.prg
login.prg
logout.prg
produtos.prg
info.prg
comandas.prg
fechar.prg
cozinha.prg
portaria.prg
destravar.prg
farol_lib.prg
toplist.prg
imprime.prg
hbwin.hbc

Vai gerar arquivos com o mesmo nome só que com HRB na pasta CGI, compilado ninguém mexe nos fontes. Isso é beeeemmm velho no harbour, mas o povo não acompanha e tem que pagar(ás vezes) para algum intermediário explicar.

Com algumas horas de estudo a pessoa aprende a lógica, não pode é achar que é coisa do outro mundo.

Saudações,
Itamar M. Lins Jr.
Avatar de usuário

Itamar M. Lins Jr.
Colaborador

Colaborador
 
Mensagens: 3719
Data de registro: 30 Mai 2007 11:31
Cidade/Estado: Ilheus Bahia
Curtiu: 127 vezes
Mens.Curtidas: 192 vezes

Harbour nas nuvens.

Mensagempor bencz » 07 Set 2019 11:51

Muito interessante!!
Vale também ressaltar este projeto: viewtopic.php?f=4&t=23055&p=134471&hilit=harbour_mod#p134471
Avatar de usuário

bencz
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 422
Data de registro: 28 Abr 2012 17:36
Curtiu: 6 vezes
Mens.Curtidas: 23 vezes




Retornar para Bate Papo

Quem está online

Usuários vendo este fórum: Nenhum usuário registrado online e 1 visitante


Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro