Usando ADVPL com SQL

Segue uma das maneiras de usar ADVPL com SQL :

user function mostrasql
oRBSFFont := tfont():new("lucida console",, -10, .t.)
cQuery := "SELECT B1_COD, B1_DESC FROM SB1010 WHERE D_E_L_E_T_=''"
cQuery := changequery(cQuery)
dbusearea(.t., "TOPCONN", tcgenqry(,,cQuery),"TMP", .f., .t.)
cProduto := ""

do while !eof()
cProduto := cProduto + (TMP->B1_COD + " " + B1_DESC + chr(10))
dbskip()
enddo

dbclosearea()

@ 0, 0 to 420, 550 dialog odJanela title "RESULTADO"
oRBSFMemo := tmultiget():new(92, 5,{uif(pcount()>0, cProduto:=u, cProduto)}, odJanela, 265, 100, oRBSFFont,,,,,.t.,,,,,,.t.)
@ 195, 241 bmpbutton type 1 action close(odJanela) activate dialog odJanela centered
return nil

• Veja também: Campos memo Protheus com ASP.

Comentários

Postagens mais visitadas deste blog

Zeros à esquerda automaticamente

Uma dica simples para que no momento de digitar um código (ex.:000034), você e seus usuários não fiquem contando os zeros à esquerda deste. Configurador Com o pequeno código abaixo (no campo Regra ) num gatilho*, você não terá mais este trabalho. O teste foi feito com o campo RA_REGISTR : Os campos obrigatórios (em azul) devem ser preenchidos. Confirme, saia do Configurador e teste o campo que você configurou o gatilho. Após preencher o campo e clicar TAB (ou ENTER), os zeros à esquerda completam o tamanho do campo : * Se você não sabe onde e como criar gatilhos, acesse o link: Criando gatilhos no Protheus

Status das tabelas: SPED050 e SPED052

STATUS DA TABELA SPED050: Status NFe (campo STATUS) : 1 = NFe Recebida. 2 = NFe Assinada. 3 = NFe com falha no schema XML. 4 = NFe transmitida. 5 = NFe com problemas. 6 = NFe autorizada. 7 = Cancelamento. Status Cancelamento/inutilização (campo STATUSCANC) : 1 = NFe Recebida. 2 = NFe Cancelada. 3 = NFe com falha de cancelamento/inutilização. Status Mail (campo STATUSMAIL) : 1 = A transmitir. 2 = Transmitido. 3 = Bloqueio de transmissão – cancelamento/inutilização. STATUS DO SPED052: 1 = Lote transmitido. 2 = Lote recebido com sucesso. 3 = Lote com erro.

Protheus integrado ao Active Directory (Single SignOn)

Usando a integração do usuário do Protheus com o Active Directory (AD): 1) O ambiente deve estar atualizado (RPO, Update, LIB e Binário). 2) Entre no Configurador / Usuários / Senhas / Política. 3) Na primeira aba, em Parâmetros, defina no como "Habilitar single sign-on" se a integração será obrigatória ou opcional. 4) No combo "Modalidade de Single Sign-on", defina como "Active Directory". Clique em Confirmar. 5) Agora vá ao cadastro do usuário (Usuário / Senhas / Usuários), clique sobre o usuário e clique em Alterar. Na primeira aba (Usuário), selecione a aba Active Directory. 6) Clique duas vezes sobre o campo abaixo de "Domínio", e preencha o domínio da rede. Clique duas vezes sobre o campo abaixo de "Usuário", e preencha o nome de usuário da rede que ficará vinculado a este usuário do Protheus. Clique em Confirmar. Ao entrar no Protheus, já irá aparecer por padrão o dom...

Microsig@ ADVPL

Pesquisar este blog