Solved

ONLY THING I WANT TO KNOW IS WHEN THE CUST_ NAME IS SELECTED FROM THE POPUP , HOW CAN WE STORE IN MEMORY VARIABLE FOR FURTHER USE.

Posted on 2009-05-09
6
26 Views
Last Modified: 2016-05-18
ONLY THING I WANT TO KNOW IS WHEN THE CUST_ NAME IS SELECTED FROM THE POPUP , HOW CAN WE STORE IN MEMORY VARIABLE FOR FURTHER USE.
0
Comment
Question by:DVS2005
  • 3
6 Comments
 
LVL 41

Expert Comment

by:pcelba
ID: 24342975
This can be done in procedure which is called when user selects some option from the popup (Esc key deactivates the popup and leaves the variable empty):

USE Customer

SET ORDER TO cust_name

SET CONFIRM ON

PRIVATE lcSelectedCust
 

DEFINE POPUP MyPop PROMPT FIELD customer.cust_name RELATIVE SCROLL TITLE "Select Customer"  && you may use more parameters

ON SELECTION POPUP MyPop DO l_custSelection WITH PROMPT()
 
 

*-- Your code
 
 

lcSelectedCust = ""

ACTIVATE POPUP MyPop

*-- Here the lcSelectedCust variable contains selected Cusomer name
 
 

*-- Other commands etc...
 

RELEASE POPUPS MyPop
 
 

PROCEDURE l_custSelection

PARAMETER lcPrompt
 

lcSelectedCust = lcPrompt

DEACTIVATE POPUP MyPop
 

RETURN

Open in new window

0
 
LVL 14

Accepted Solution

by:
tusharkanvinde earned 500 total points
ID: 24346780
When you move up and down the popup, you also move the record pointer of the base table.

So you can have something like

DEFINE POPUP MyPop PROMPT FIELD customer.cust_name RELATIVE SCROLL TITLE "Select Customer"
ON SELECTION POPUP MyPop deactivate popup
activate popup MyPop
if bar()<>0
   ?customer.cust_name
else
   ?'nothing selected'
endif
0
 
LVL 41

Expert Comment

by:pcelba
ID: 24347842
I've been thinking how to deactivate popup and assign the selected value into variable without procedure call and tusharkanvinde answered it in advance :-)

I would recommend to assign points to tusharkanvinde.
0
 

Expert Comment

by:EE_AutoDeleter
ID: 41602654
I've requested that this question be deleted for the following reason:

No comment has been added to this question in more than 21 days, so it is now classified as abandoned.

I have recommended this question be closed as follows:

Not enough information to confirm an answer.

If you feel this question should be closed differently, post an objection and a moderator will read all objections and then close it as they feel fit. If no one objects, this question will be closed automatically the way described above.

Experts-Exchange Auto Deleter
0
 
LVL 41

Expert Comment

by:pcelba
ID: 41602655
The answer is ID: http:#a24346780.
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Microsoft Visual FoxPro (short VFP) is a programming language with it’s own IDE and database, ranking somewhat between Access and VB.NET + SQL Server (Express). Product Description: http://msdn.microsoft.com/en-us/vfoxpro/default.aspx (http://msd…
This article shows gives you an overview on SQL Server 2016 row level security. You will also get to know the usages of row-level-security and how it works
This is used to tweak the memory usage for your computer, it is used for servers more so than workstations but just be careful editing registry settings as it may cause irreversible results. I hold no responsibility for anything you do to the regist…
Sending a Secure fax is easy with eFax Corporate (http://www.enterprise.efax.com). First, just open a new email message. In the To field, type your recipient's fax number @efaxsend.com. You can even send a secure international fax — just include t…

863 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

24 Experts available now in Live!

Get 1:1 Help Now