Duvidas Gerais não relacionadas nos tópicos acima. Aqui vale qualquer duvida pessoal. Tue, 12 May 2026 03:41:52 +0000 Tue, 12 May 2026 03:41:52 +0000 4Each - Forum Progress http://www.4each.com.br/forums/outros-diversos.9/ Mon, 17 Nov 2025 11:41:31 +0000 http://www.4each.com.br/threads/consulta-rpt_tit_acr_em_aberto.163755/ http://www.4each.com.br/threads/consulta-rpt_tit_acr_em_aberto.163755/ gabriel bdz gabriel bdz estou tentando buscar carteira de meses passados mas pela tabela tit_acr não funciona por conta do saldo já vir zerado em titulos liquidados, e pela movto_tit_acr não estou conseguindo chegar no valor correto.]]> Thu, 05 Dec 2024 16:01:08 +0000 http://www.4each.com.br/threads/pegar-evento-de-clique-bot%C3%A3o.74159/ http://www.4each.com.br/threads/pegar-evento-de-clique-bot%C3%A3o.74159/ tfofano tfofano
def input param p-ind-event as char no-undo.
def input param p-ind-object as char no-undo.
def input param p-wgh-object as handle no-undo.
def input param p-wgh-frame as widget-handle no-undo.
def input param p-cod-table as char no-undo.
def input param p-row-table as rowid no-undo.

/*-----------------------------------------------------------------------*/
/* DEFINICAO DE VARIAVEIS */
/*-----------------------------------------------------------------------*/

DEF VAR c-objeto AS CHAR NO-UNDO.
DEF VAR wgh-flag-excel AS WIDGET-HANDLE NO-UNDO.
DEF VAR wgh-destino AS WIDGET-HANDLE NO-UNDO.
DEF VAR wgh-bt-executar AS WIDGET-HANDLE NO-UNDO.

/*Função de busca de objetos dentro da tela*/
FUNCTION SearchObject RETURN...

Pegar evento de clique botão]]> Mon, 02 Sep 2024 19:53:51 +0000 http://www.4each.com.br/threads/killer-connect-4.1083/ http://www.4each.com.br/threads/killer-connect-4.1083/ Cobra.cne Cobra.cne
Alguns estavam perguntando a respeito do Killer, estou anexando o programa aqui.

Ele finaliza conexões de usuários em banco de dados PROGRESS em conexões locais ou remotas. Com ele é possível através de um cliente Windows desconectar um usuários onde o Banco de Dados está em um servidor Unix (Linux, Risc), ou até mesmo em um servidor Windows.
Utiliza conexões sockets.

A versão deste programa é compatível com o banco de dados OpenEdge 10.1A, porém como os fontes estão no anexo é possível adaptar para versões anteriores ou mais recentes.

Autor: Odair Batista.]]> 25 Fri, 03 May 2024 12:02:43 +0000 http://www.4each.com.br/threads/bodis.43914/ http://www.4each.com.br/threads/bodis.43914/ Kaua Tetzlaff Kaua Tetzlaff Tue, 30 Apr 2024 20:08:39 +0000 http://www.4each.com.br/threads/apostilas-treinamentos.43860/ http://www.4each.com.br/threads/apostilas-treinamentos.43860/ Kaua Tetzlaff Kaua Tetzlaff Thu, 22 Feb 2024 12:04:04 +0000 http://www.4each.com.br/threads/conex%C3%A3o-progress-com-lazarus-delphi.42386/ http://www.4each.com.br/threads/conex%C3%A3o-progress-com-lazarus-delphi.42386/ Alex Mazur Alex Mazur Obrigado]]> Fri, 11 Aug 2023 15:36:37 +0000 http://www.4each.com.br/threads/fwqrcode.16613/ http://www.4each.com.br/threads/fwqrcode.16613/ renata renata 8 Tue, 10 Jan 2023 19:05:29 +0000 http://www.4each.com.br/threads/progamando-datasul.35959/ http://www.4each.com.br/threads/progamando-datasul.35959/ Kaua Tetzlaff Kaua Tetzlaff Sat, 08 Oct 2022 23:41:01 +0000 http://www.4each.com.br/threads/word-libreoffice.26744/ http://www.4each.com.br/threads/word-libreoffice.26744/ Caique Caires Santos Caique Caires Santos
Estou convertendo alguns programas no word para o libreOffice usando a documentação abaixo:
http://tdn.totvs.com/pages/releaseview.action?pageId=195302218

Porém já estou encontrado dificuldade.

Ao executar no editor o comando abaixo:

DEFINE VARIABLE chWord AS office.iface.word.WordWrapper NO-UNDO.
DEFINE VARIABLE chDocument AS office.iface.word.Document NO-UNDO.
{office/office.i Word chWord}

Apresenta o erro:
---------------------------
Erro (Press HELP to view stack trace)
---------------------------
Ocorreu erro durante criacao/conexao ao servidor de automacao para: Word.Application.
Classe não registrada Codigo de erro: 0x80040154 WordWrapper office.ms.word.WordWrapper (5894)
---------------------------
OK Ajuda
---------------------------

Algum já passou por isso?]]> 1 Sat, 08 Oct 2022 23:38:48 +0000 http://www.4each.com.br/threads/convers%C3%A3o-de-probramas-office-para-libre.34670/ http://www.4each.com.br/threads/convers%C3%A3o-de-probramas-office-para-libre.34670/ Francisco Santos Francisco Santos Estou com a seguinte duvida.

Temos alguns programas especificos que fazem uso do Excel para geração de planilhas,
Existe algum recurso que converta esses programas para que funcionem com o libreOffice ?]]> 4 Sat, 20 Nov 2021 13:14:59 +0000 http://www.4each.com.br/threads/6003-op%C3%A7%C3%A3o-inv%C3%A1lida.34515/ http://www.4each.com.br/threads/6003-op%C3%A7%C3%A3o-inv%C3%A1lida.34515/ OSVALDO DE SOUSA ASSIS OSVALDO DE SOUSA ASSIS
Utilizo a API CCAPI303 na manutenção de pedido compras e está apresentando o erro 6003-Opção Inválida para uma determinada empresa.

Alguém já deparou com esse erro e como solucionou ??

Obrigado

Osvaldo]]> 3 Tue, 05 Oct 2021 18:17:54 +0000 http://www.4each.com.br/threads/api-datasul-consumir-via-javascript.34448/ http://www.4each.com.br/threads/api-datasul-consumir-via-javascript.34448/ jonasbfranco jonasbfranco Se sim, poderiam compartilhar o codigo usado.]]> Fri, 24 Sep 2021 19:07:03 +0000 http://www.4each.com.br/threads/habilitar-campo-da-tela-via-parametro.34368/ http://www.4each.com.br/threads/habilitar-campo-da-tela-via-parametro.34368/ danielsufiatti danielsufiatti
alguém já habilitou um campo de uma tela onde o próprio nome do campo esta em uma variável char ?

exemplo:

DEF VAR campo AS HANDLE NO-UNDO.


ASSIGN campo = "fill-in-nome-pessoa":HANDLE.


ASSIGN campo:SENSITIVE = YES.


preciso fazer exatamente isso, porém o "fill-in-nome-pessoa" está em uma variável, que vem de uma configuração de permissões..

ex:


DEF VAR nome-campo AS CHAR.

ASSIGN nome-campo = "fil-Inscr-est".

DEF VAR campos AS HANDLE NO-UNDO.

ASSIGN campos = nome-campo:HANDLE.

ASSIGN campos:SENSITIVE = YES.


porém não consigo transformar o valor da variável em um handle. Alguém já passou por isso ?]]> Tue, 21 Sep 2021 19:08:33 +0000 http://www.4each.com.br/threads/boleto-bradesco-c%C3%B3digo-de-barras.34316/ http://www.4each.com.br/threads/boleto-bradesco-c%C3%B3digo-de-barras.34316/ baierski baierski
Estou tendo problemas na geração do código de barras do Bradesco.
Tenho o modelo, utilizo o programa bcapi016 para receber o código de barras e faço o replace.
O código de barras é gerado no boleto, porém ao tentar ler o código no aplicativo do bradesco ele não consegue ler.

O código que está retornando do totvs é ~{×ObMFÀÃ"]!ÉZZÀÀÜÜ.ÂØÀÀ}.

Alguém consegue dar uma ajuda?

Agradeço a todos.]]> Thu, 04 Mar 2021 21:50:26 +0000 http://www.4each.com.br/threads/ambiente-local-com-oe-11-ex-11-7-5.33183/ http://www.4each.com.br/threads/ambiente-local-com-oe-11-ex-11-7-5.33183/ TrombiniSP TrombiniSP
Por favor.

Obrigado.]]> Mon, 09 Nov 2020 11:51:59 +0000 http://www.4each.com.br/threads/perguntas-e-respostas-usadas-em-entrevistas-de-progress-4gl-adm2.28054/ http://www.4each.com.br/threads/perguntas-e-respostas-usadas-em-entrevistas-de-progress-4gl-adm2.28054/ fdantas fdantas 1. What is Smart objects?

We can play in around with the object handle.so we called as smart object.

Advantage

Reusability

Less development effort

1. What are the types of smart object?

They are 9 Types:

Ø Smart Window.

Ø Smart Frame.

Ø Smart Dialog.

Ø Smart Data browser.

Ø Smart Data Viewer.

Ø Smart Folder.

Ø Smart Panel.

Ø Smart Data Object.

Ø Smart Filter.

1. What is smart container?

Collection of smart object can be placed on the smart container.

What is smart data object(SDO)?

The only one smart object which connect the database.

4. Frequently used functions for SDO?

Before going to use the following functions you should have the handle.

1. Open Queryà Refresh the data (all the rows).

2. GetrowIndentàcurrent record.

3. RowIdWhereàPass the dynamic query....

Perguntas e Respostas usadas em Entrevistas de Progress 4GL - ADM2]]> Mon, 09 Nov 2020 11:48:43 +0000 http://www.4each.com.br/threads/perguntas-e-respostas-usadas-em-entrevistas-de-progress-4gl.28053/ http://www.4each.com.br/threads/perguntas-e-respostas-usadas-em-entrevistas-de-progress-4gl.28053/ fdantas fdantas PROGRESS 4GL Question and Answer
Updated on 21-06-06 by NANDA

1. What are the advantages in progress 4GL?
2. What is the latest version in progress and in which are currently working?
3. What are the two ways of programming in progress?
4. What is the syntax for message statement?
5. What is the syntax for RUN statement?
6. What are the data types in progress?
7. What is the syntax for variable declaration?
8. Why we are using NO-UNDO?
9. How many date formats available in progress?
10. What are the types of looping statement?
11. What is the syntax for REPEAT loop?
12. What is the syntax for FOR-EACH loop and use of FOR-EACH loop?
13. What is the use of EntrY?
14. What is the use of num-entries?
15. What are the types of blocks?
16. what is trigger Block?...

Perguntas e Respostas usadas em Entrevistas de Progress 4GL]]> Thu, 23 Jul 2020 22:13:52 +0000 http://www.4each.com.br/threads/dev-progress-home-office-ou-remoto-porque-n%C3%A3o.27968/ http://www.4each.com.br/threads/dev-progress-home-office-ou-remoto-porque-n%C3%A3o.27968/ TrombiniSP TrombiniSP
Em tempos de pandemia ou mesmo sem a mesma eu sempre me pergunto do; porque os clientes querem os Devs In Company?

Em 2014 só de estacionamento eu recebia 60,00 por dia. O salário mínimo na época nem chegava perto do que é hoje e eu trabalhava 20 dias por mês. Façam as contas.
É só um exemplo.

Alguns me relatam que estão trabalhando pelo TeamViewer ( que eu acho muito ruim)... Enfim.

Muitas empresas hoje estão com Devs remotamente e querendo que tudo volte a ser como antes.

Porque não manter o home office?

Eu pensei em 3 coisas (e deve ter mais algumas) que "impedem" as empresas de entrar nessa.

1 - Segurança para não se expor demais. E isso tem custo.
2 - Custo de implementação de servidores e nova infra-estrutura e manutenção de uma rede mais complexa que demanda também mais RH na área. Tmb tem um custo nisso.
3 - Quer ficar de olho nos Devs para eles não...

Dev. Progress Home Office ou Remoto. Porque não?]]> 2 Tue, 30 Jun 2020 18:10:52 +0000 http://www.4each.com.br/threads/open-office-da-erro-ambiente-grafico.27959/ http://www.4each.com.br/threads/open-office-da-erro-ambiente-grafico.27959/ alexandretm alexandretm Segue fonte

/* Definicoes Parametros **/
DEFINE INPUT PARAMETER p-cod-estabel LIKE ped-venda.cod-estabel NO-UNDO.
DEFINE INPUT PARAMETER p-nome-abrev LIKE ped-venda.nome-abrev NO-UNDO.
DEFINE INPUT PARAMETER p-nr-pedido like ped-venda.nr-pedido NO-UNDO.

/** Variaveis Locais **/
DEFINE VARIABLE c-plan-modelo AS CHARACTER NO-UNDO.
DEFINE VARIABLE c-plan-destino AS CHARACTER NO-UNDO.
DEFINE VARIABLE i-dec AS DECIMAL EXTENT 12 NO-UNDO.
DEFINE VARIABLE i-data AS DATE EXTENT 12...

Open Office da erro ambiente Grafico]]> Fri, 06 Mar 2020 19:44:11 +0000 http://www.4each.com.br/threads/integracao-ems206-x-serasa.4141/ http://www.4each.com.br/threads/integracao-ems206-x-serasa.4141/ acrgallo acrgallo Tanto envio quanto retorno .]]> 2