Como Chamar uma Tela de Consulta Padrão(SXB) com a Função ConPad1

Adilio Costa 112 comentários

Tempo de leitura: 2 minutos

Olá. No post de hoje iremos aprender como chamar uma tela de consulta padrão(SXB) com a função ConPad1 em ADVPL.

Existem situações em que necessitamos abrir uma tela de consulta padrão sem ter que clicar na lupa. Por exemplo, numa situação onde um determinado campo é preenchido e através de um Gatilho de Campos(SX7) podemos fazer a chamada da consulta padrão para ser mostrado uma tela onde o usuário poderá selecionar um registro da consulta padrão.

Para esse finalidade temos a função ConPad1 em ADVPL. Ao final da execução da função se o usuário tiver confirmado a consulta padrão o retorno será armazenado num array chamado aCpoRet e a quantidade de posições desse array dependerá da quantidade de retorno de campos da função ConPad1.

 

Sintaxe:

ConPad1(,,,cSXB,cExp,,lVisual,cExpPos)

 

Parâmetro(s):

Retorno:

 

Exemplo da função ConPad1 em ADVPL:


#Include "TOTVS.ch"

/*/{Protheus.doc} User Function fConPad1
Exemplo de como abrir uma tela de consulta padrão(SXB)
@type Function
@author Adilio Costa
@since 12/04/2024
/*/

/*--------------------------------------------------------------------------------------------------------------*
 | Função:ConPad1                                                                                               |
 | Desc:Exibe uma tela de consulta padrão baseada no Dicionário de Dados(SXB)                                   |
 | Link: https://terminaldeinformacao.com/2021/10/13/como-chamar-uma-consulta-padrao-via-codigo-fonte-advpl/    |
 |                                                                                                              |
 | Blog:  https://protheusadvpl.com.br                                                                          |
 | Canal: https://youtube.com/ProtheusAdvpl                                                                     |
 | Cursos:https://hotmart.com/pt-br/club/protheusadvpl                                                          |
 *--------------------------------------------------------------------------------------------------------------*/

User Function fConPad1()
	Local aArea      := FWGetArea()
	Local cCodFor := "000001"
	Local cLoja   := "01"

	Private cCodChave := cCodFor+cLoja

	DBSelectArea("SA2")
	SA2->(DBSetOrder(1)) //Filial + Código + Loja

	//Mostra a consulta padrão de nome SA2 - Fornecedores(na SXB)
	If (ConPad1(, , , "SA2"))
		//Se a consulta foi confirmada, mostra o fornecedor selecionado
		MsgInfo("O fornecedor selecionado foi:"+aCpoRet[1], "Função ConPad1")

	EndIf

	//Mostra a consulta padrão de nome SA2(na SXB) já posicionando no código do fornecedor cCodFor e loja do fornecedor cLoja
	If (ConPad1(, , , "SA2", /*cCampoRet*/, /*lGet*/, /*lOnlyView*/,cCodChave))
		//Se a consulta foi confirmada, mostra o fornecedor selecionado
		MsgInfo("O fornecedor selecionado foi:" + aCpoRet[1], "Função ConPad1")

	EndIf

	FWRestArea(aArea)
Return

 

É isso aí, finalizamos aqui mais um post no Blog ProtheusAdvpl. Caso tenha ficado alguma dúvida deixe seu comentário ou nos envie um e-mail para adiliocosta@protheusadvpl.com.br, até um próximo post, grande abraço e fica com Deus.

 
Receba as últimas atualizações do ProtheusAdvpl
Deixe seu melhor email
Nós respeitamos sua privacidade.

112 Comentários


  1. Excellent blog here Also your website loads up very fast What web host are you using Can I get your affiliate link to your host I wish my web site loaded up as quickly as yours lol

    Responder

  3. What i dont understood is in reality how youre now not really a lot more smartlyfavored than you might be now Youre very intelligent You understand therefore significantly in terms of this topic produced me personally believe it from a lot of numerous angles Its like women and men are not interested except it is one thing to accomplish with Woman gaga Your own stuffs outstanding Always care for it up

    Responder

  6. I was recommended this website by my cousin I am not sure whether this post is written by him as nobody else know such detailed about my trouble You are amazing Thanks

    Responder

  7. Wow, incredible blog layout! How long have you ever been blogging for?

    you make blogging glance easy. The overall glance of your web site is excellent, let alone the content material!
    You can see similar here najlepszy sklep

    Responder

  13. Somebody essentially lend a hand to make significantly articles Id state That is the very first time I frequented your website page and up to now I surprised with the research you made to make this actual submit amazing Wonderful task

    Responder

  15. I was recommended this website by my cousin I am not sure whether this post is written by him as nobody else know such detailed about my trouble You are amazing Thanks

    Responder

  16. Simply wish to say your article is as amazing The clearness in your post is just nice and i could assume youre an expert on this subject Well with your permission let me to grab your feed to keep updated with forthcoming post Thanks a million and please carry on the gratifying work

    Responder

  17. I loved as much as you will receive carried out right here The sketch is tasteful your authored subject matter stylish nonetheless you command get got an edginess over that you wish be delivering the following unwell unquestionably come further formerly again as exactly the same nearly very often inside case you shield this hike

    Responder

  19. Nice blog here Also your site loads up fast What host are you using Can I get your affiliate link to your host I wish my web site loaded up as quickly as yours lol

    Responder

  20. Your blog has quickly become one of my favorites. Your writing is both insightful and thought-provoking, and I always come away from your posts feeling inspired. Keep up the phenomenal work!

    Responder

  21. Your articles never fail to captivate me. Each one is a testament to your expertise and dedication to your craft. Thank you for sharing your wisdom with the world.

    Responder

  22. Your passion for your subject matter shines through in every post. It’s clear that you genuinely care about sharing knowledge and making a positive impact on your readers. Kudos to you!

    Responder

  23. I just wanted to drop by and say how much I appreciate your blog. Your writing style is both engaging and informative, making it a pleasure to read. Looking forward to your future posts!

    Responder

  25. Hi i think that i saw you visited my web site thus i came to Return the favore Im attempting to find things to enhance my siteI suppose its ok to use a few of your ideas

    Responder

  26. Your blog is a breath of fresh air in the often stagnant world of online content. Your thoughtful analysis and insightful commentary never fail to leave a lasting impression. Thank you for sharing your wisdom with us.

    Responder

  27. Nice blog here Also your site loads up very fast What host are you using Can I get your affiliate link to your host I wish my site loaded up as quickly as yours lol

    Responder

  29. Its like you read my mind You appear to know so much about this like you wrote the book in it or something I think that you can do with a few pics to drive the message home a little bit but other than that this is fantastic blog A great read Ill certainly be back

    Responder

  30. Your writing has a way of making even the most complex topics accessible and engaging. I’m constantly impressed by your ability to distill complicated concepts into easy-to-understand language.

    Responder

  31. Simply desire to say your article is as surprising The clearness in your post is simply excellent and i could assume you are an expert on this subject Fine with your permission let me to grab your feed to keep up to date with forthcoming post Thanks a million and please carry on the gratifying work

    Responder

  32. Your blog has quickly become my go-to source for reliable information and thought-provoking commentary. I’m constantly recommending it to friends and colleagues. Keep up the excellent work!

    Responder

  35. Your blog is a breath of fresh air in the often stagnant world of online content. Your thoughtful analysis and insightful commentary never fail to leave a lasting impression. Thank you for sharing your wisdom with us.

    Responder

  36. I loved as much as you will receive carried out right here The sketch is attractive your authored material stylish nonetheless you command get got an impatience over that you wish be delivering the following unwell unquestionably come more formerly again since exactly the same nearly a lot often inside case you shield this hike

    Responder

  37. Your writing is like a breath of fresh air in the often stale world of online content. Your unique perspective and engaging style set you apart from the crowd. Thank you for sharing your talents with us.

    Responder

  38. Your blog is a constant source of inspiration for me. Your passion for your subject matter is palpable, and it’s clear that you pour your heart and soul into every post. Keep up the incredible work!

    Responder

  41. I loved as much as you will receive carried out right here The sketch is attractive your authored material stylish nonetheless you command get got an impatience over that you wish be delivering the following unwell unquestionably come more formerly again since exactly the same nearly a lot often inside case you shield this hike

    Responder

  43. Your blog has become an indispensable resource for me. I’m always excited to see what new insights you have to offer. Thank you for consistently delivering top-notch content!

    Responder

  45. I do agree with all the ideas you have introduced on your post They are very convincing and will definitely work Still the posts are very short for newbies May just you please prolong them a little from subsequent time Thank you for the post

    Responder

  46. Your writing is a true testament to your expertise and dedication to your craft. I’m continually impressed by the depth of your knowledge and the clarity of your explanations. Keep up the phenomenal work!

    Responder

  47. I loved as much as youll receive carried out right here The sketch is tasteful your authored material stylish nonetheless you command get bought an nervousness over that you wish be delivering the following unwell unquestionably come more formerly again since exactly the same nearly a lot often inside case you shield this hike

    Responder

  48. Magnificent beat I would like to apprentice while you amend your site how can i subscribe for a blog web site The account helped me a acceptable deal I had been a little bit acquainted of this your broadcast offered bright clear idea

    Responder

  49. certainly like your website but you need to take a look at the spelling on quite a few of your posts Many of them are rife with spelling problems and I find it very troublesome to inform the reality nevertheless I will definitely come back again

    Responder

  50. Somebody essentially lend a hand to make significantly posts I might state That is the very first time I frequented your web page and up to now I surprised with the research you made to create this particular put up amazing Excellent job

    Responder

  51. I do agree with all the ideas you have introduced on your post They are very convincing and will definitely work Still the posts are very short for newbies May just you please prolong them a little from subsequent time Thank you for the post

    Responder

  52. Your blog is a treasure trove of valuable insights and thought-provoking commentary. Your dedication to your craft is evident in every word you write. Keep up the fantastic work!

    Responder

  53. Your blog is a constant source of inspiration for me. Your passion for your subject matter shines through in every post, and it’s clear that you genuinely care about making a positive impact on your readers.

    Responder

  54. What i do not understood is in truth how you are not actually a lot more smartlyliked than you may be now You are very intelligent You realize therefore significantly in the case of this topic produced me individually imagine it from numerous numerous angles Its like men and women dont seem to be fascinated until it is one thing to do with Woman gaga Your own stuffs nice All the time care for it up

    Responder

  56. Attractive section of content I just stumbled upon your blog and in accession capital to assert that I get actually enjoyed account your blog posts Anyway I will be subscribing to your augment and even I achievement you access consistently fast

    Responder

  57. My brother recommended I might like this web site He was totally right This post actually made my day You cannt imagine just how much time I had spent for this information Thanks

    Responder

  58. Its like you read my mind You appear to know a lot about this like you wrote the book in it or something I think that you could do with some pics to drive the message home a little bit but instead of that this is fantastic blog An excellent read I will certainly be back

    Responder

  59. Your writing has a way of resonating with me on a deep level. It’s clear that you put a lot of thought and effort into each piece, and it certainly doesn’t go unnoticed.

    Responder

  60. Thank you for the auspicious writeup It in fact was a amusement account it Look advanced to more added agreeable from you By the way how could we communicate

    Responder

  61. 먹튀 없는 안전한 메이저 사이트 추천 / 토토 사이트 카지노 사이트 먹튀 검증으로 먹튀 방지 / 먹튀 사이트 정보 제공 / 먹튀 신고 / 토토 커뮤니티 / 카지노 커뮤니티 / 먹튀검증 커뮤니티

    Responder

  63. Your writing has a way of resonating with me on a deep level. I appreciate the honesty and authenticity you bring to every post. Thank you for sharing your journey with us.

    Responder

  65. Your blog has become an indispensable resource for me. I’m always excited to see what new insights you have to offer. Thank you for consistently delivering top-notch content!

    Responder

  67. Your blog is a beacon of light in the often murky waters of online content. Your thoughtful analysis and insightful commentary never fail to leave a lasting impression. Keep up the amazing work!

    Responder

  68. Your writing has a way of making even the most complex topics accessible and engaging. I’m constantly impressed by your ability to distill complicated concepts into easy-to-understand language.

    Responder

  69. I just could not depart your web site prior to suggesting that I really loved the usual info an individual supply in your visitors Is gonna be back regularly to check up on new posts

    Responder

  70. I’ve been following your blog for some time now, and I’m consistently blown away by the quality of your content. Your ability to tackle complex topics with ease is truly admirable.

    Responder

  71. เว็บไซต์เราเป็นแพลตฟอร์มที่ช่วยให้ผู้ใช้สามารถแลกเปลี่ยนไลค์และติดตามกันได้อย่างปลอดภัยและมีประสิทธิภาพเว็บไซต์ของเราไม่มีส่วนทำให้บัญชีเฟสบุ๊คของท่านเสียหายหรือมีสแปมแต่อย่างใดหากสมาชิกท่านไหนที่พบปัญหาในการใช้งานสามารถติดต่อทีมงานได้ทางแฟนเพจของเว็บไซต์เราตลอด 24 ชั่วโมง ระบบของเราใช้งานง่ายและฟรี

    Responder

  72. I was recommended this website by my cousin I am not sure whether this post is written by him as nobody else know such detailed about my difficulty You are wonderful Thanks

    Responder

  73. Your blog is a testament to your expertise and dedication to your craft. I’m constantly impressed by the depth of your knowledge and the clarity of your explanations. Keep up the amazing work!

    Responder

  74. Your writing has a way of resonating with me on a deep level. I appreciate the honesty and authenticity you bring to every post. Thank you for sharing your journey with us.

    Responder

  75. certainly like your website but you need to take a look at the spelling on quite a few of your posts Many of them are rife with spelling problems and I find it very troublesome to inform the reality nevertheless I will definitely come back again

    Responder

  76. Your blog is a constant source of inspiration for me. Your passion for your subject matter shines through in every post, and it’s clear that you genuinely care about making a positive impact on your readers.

    Responder

  77. I wanted to take a moment to commend you on the outstanding quality of your blog. Your dedication to excellence is evident in every aspect of your writing. Truly impressive!

    Responder

  78. Your writing has a way of resonating with me on a deep level. I appreciate the honesty and authenticity you bring to every post. Thank you for sharing your journey with us.

    Responder

  79. I’ve been following your blog for quite some time now, and I’m continually impressed by the quality of your content. Your ability to blend information with entertainment is truly commendable.

    Responder

  80. I wanted to take a moment to commend you on the outstanding quality of your blog. Your dedication to excellence is evident in every aspect of your writing. Truly impressive!

    Responder

  81. My brother recommended I might like this web site He was totally right This post actually made my day You cannt imagine just how much time I had spent for this information Thanks

    Responder

  82. Fantastic site A lot of helpful info here Im sending it to some buddies ans additionally sharing in delicious And naturally thanks on your sweat

    Responder

  83. Your blog is a testament to your passion for your subject matter. Your enthusiasm is infectious, and it’s clear that you put your heart and soul into every post. Keep up the fantastic work!

    Responder

  84. Pentingnya bagi pencinta slot mahjong ways untuk mendapatkan scatter hitam untuk meningkatkan kemenangan besar serta perfoma pola gacor di pg slot, Maka user harus optimasi secara sabar untuk mendapatkan jp besar.

    Responder

  85. Pentingnya bagi pencinta slot mahjong ways untuk mendapatkan scatter hitam untuk meningkatkan kemenangan besar serta perfoma pola gacor di pg slot, Maka user harus optimasi secara sabar untuk mendapatkan jp besar.

    Responder

  88. Bergabung dengan Luckybet89 merupakan situs terpecaya dan aman untuk akun kalian, Segera gabungkan lucky bet 89 link paling mudah untuk mendapatkan kemenangan besar setiap hari, Yuk gabung sekarang di luckybet89 sekarang.

    Responder

  89. Bergabung dengan Luckybet89 merupakan situs terpecaya dan aman untuk akun kalian, Segera gabungkan lucky bet 89 link paling mudah untuk mendapatkan kemenangan besar setiap hari, Yuk gabung sekarang di luckybet89 sekarang.

    Responder

  91. Excellent blog here Also your website loads up very fast What web host are you using Can I get your affiliate link to your host I wish my web site loaded up as quickly as yours lol

    Responder

  92. Scatter Hitam merupakan link situs slot mahjong dengan pola scatter hitam yang bisa mendapatkan menang besar dengan promosi terbaik. Segera gabungkan disitus yang ada scatter hitam bisa mendapatkan bayaran besar serta pola paling gacor.

    Responder

  93. Scatter Hitam merupakan link situs slot mahjong dengan pola scatter hitam yang bisa mendapatkan menang besar dengan promosi terbaik. Segera gabungkan disitus yang ada scatter hitam bisa mendapatkan bayaran besar serta pola paling gacor.

    Responder

  95. Your writing has a way of making even the most complex topics accessible and engaging. I’m constantly impressed by your ability to distill complicated concepts into easy-to-understand language.

    Responder

  96. I do not even know how I ended up here but I thought this post was great I dont know who you are but definitely youre going to a famous blogger if you arent already Cheers

    Responder

  98. Wonderful web site Lots of useful info here Im sending it to a few friends ans additionally sharing in delicious And obviously thanks to your effort

    Responder

  99. 먹튀검증 커뮤니티에 참여하여 안전한 온라인 놀이터 정보를 공유하고 받아보세요! 다른 사용자들의 경험과 후기를 통해 사기 피해를 예방하고 안전하게 게임을 즐길 수 있습니다.

    Responder

  101. Just wish to say your article is as surprising The clearness in your post is just cool and i could assume youre an expert on this subject Fine with your permission allow me to grab your RSS feed to keep updated with forthcoming post Thanks a million and please keep up the enjoyable work

    Responder

  102. 먹튀검증커뮤니티에 참여하여 안전한 온라인 놀이터 정보를 공유하고 받아보세요! 다른 사용자들의 경험과 후기를 통해 사기 피해를 예방하고 안전하게 게임을 즐길 수 있습니다.

    Responder

  106. Maxwin500 adalah link alternatif main game slot online terpopuler dengan fitur paling lengkap yang gampang menang maxwin hari ini 2024.

    Responder

  107. Maxwin500 adalah link alternatif main game slot online terpopuler dengan fitur paling lengkap yang gampang menang maxwin hari ini 2024.

    Responder

  108. Maxwin500 adalah link alternatif main game slot online terpopuler dengan fitur paling lengkap yang gampang menang maxwin hari ini 2024.

    Responder

  109. Maxwin500 adalah link alternatif main game slot online terpopuler dengan fitur paling lengkap yang gampang menang maxwin hari ini 2024.

    Responder

  110. Maxwin500 adalah link alternatif main game slot online terpopuler dengan fitur paling lengkap yang gampang menang maxwin hari ini 2024.

    Responder

  111. Maxwin500 adalah link alternatif main game slot online terpopuler dengan fitur paling lengkap yang gampang menang maxwin hari ini 2024.

    Responder

Deixe um comentário

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *