Show Posts
This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.
16
Your Views and Comments / Re: Left justify text
« on: June 25, 2007, 08:40:29 AM »
Thanks, I've been using FireFox so didn't see the problem.
Should be ok now, and I learned something about "DIV" !
Should be ok now, and I learned something about "DIV" !
17
Your Views and Comments / Re: Left justify text
« on: June 24, 2007, 01:12:40 PM »
Hmmmmm, I am not seeing any centered text, and I can't find a setting in this board whre I can set that. It may be a CSS thing though. What type browser are you using? Is anyone else having this problem?
18
Web Server - Ask For Help / Re: NTalk- Browse Query
« on: June 21, 2007, 03:41:09 PM »
Sorry, I meant in the "Share Knowledge" section (I forgot what I named it!)
19
Web Server - Ask For Help / Conditional SSL
« on: June 21, 2007, 02:24:25 PM »
I would like to give my customers a choice of running our web app either with SSL or without. Is that possible? In the template it looks like it's either on or not, I don't see a way to make it so the end-user can choose.
20
Web Server - Ask For Help / Re: File Dropdown -Fields-More Settings-Extra Possibilities(not in file)
« on: June 19, 2007, 02:48:46 PM »
I did make one tweak:
IF p_web.getsessionvalue('DPT:Description') = ''
p_web.setsessionvalue('DPT:Description','All Departments')
END
That way if the value was already set to something else (I selected it to use as a filter) it would keep that value.
IF p_web.getsessionvalue('DPT:Description') = ''
p_web.setsessionvalue('DPT:Description','All Departments')
END
That way if the value was already set to something else (I selected it to use as a filter) it would keep that value.
21
Web Server - Ask For Help / Re: Filters again
« on: June 19, 2007, 01:01:44 PM »
Sounds like there may be no value in GLO:CustCode being set. Is GLO:CustCode being set in a different procedure, then calling the browse procedure? Is the global variable threaded by chance (maybe it is on a different thread when you go to use it?).
Bruce cautioned me about using global variables, rather he recommended using p_web.SetSessionValue and p_web.GetSessionValue, or p_web.SetValue and p_web.GetValue.
If you are passing between procedures, the value for glo:CustCode might be passed to it already. Check and see if p_web.GetValue('GLO:CustCode') or p_web.GetSessionValue('GLO:CustCode') return the right filter value. Hopefully it does, and you can use that in your filter.
Bruce cautioned me about using global variables, rather he recommended using p_web.SetSessionValue and p_web.GetSessionValue, or p_web.SetValue and p_web.GetValue.
If you are passing between procedures, the value for glo:CustCode might be passed to it already. Check and see if p_web.GetValue('GLO:CustCode') or p_web.GetSessionValue('GLO:CustCode') return the right filter value. Hopefully it does, and you can use that in your filter.
22
Web Server - Ask For Help / Re: File Dropdown -Fields-More Settings-Extra Possibilities(not in file)
« on: June 19, 2007, 12:45:46 PM »
I noticed the same thing, I have a department filter and I want the first selection to be "All Departments" (basically, no filter). When the page loads, it was showing the first department instead of "All Departments" (even though "All Departments" is first in the list).
There is an embed "Start of "Option Filter & Order"" right before it loops through the Departments table and adds records to the drop list. I added this line of code there:
p_web.setsessionvalue('DPT:Description','All Departments')
and now it properly selects the first item in the list. Maybe something similar will work for you?
There is an embed "Start of "Option Filter & Order"" right before it loops through the Departments table and adds records to the drop list. I added this line of code there:
p_web.setsessionvalue('DPT:Description','All Departments')
and now it properly selects the first item in the list. Maybe something similar will work for you?
23
Your Views and Comments / Re: Is there CapeSoft buy-in?
« on: June 19, 2007, 09:12:55 AM »
I added "Feature Requests" to each board. Bug Reports need to go directly to CapeSoft.
24
Your Views and Comments / Re: Is there CapeSoft buy-in?
« on: June 18, 2007, 08:27:19 PM »
I'll be happy to create those boards if Bruce thinks they will be helpful... seems like a great idea!
25
Web Server - Ask For Help / Re: NTalk- Browse Query
« on: June 18, 2007, 07:06:30 PM »
I have posted a (probably too long) tutorial in the Tips section about building queries with the NetTalk Web Browses. I hope it helps!
26
Web Server - Share Knowledge / Advanced Searching with NetWeb Server
« on: June 18, 2007, 07:04:40 PM »
One of the first things I noticed when using a Web Browse with NetTalk, is that locators don't work very well. At least, they didn't work the way I wanted them to. What I decided I really wanted, was for my end-user to come to the page with the browse, enter in some search criteria, then have the browse filtered on that criteria. So for example, if I had a customer list, rather than display the customer list as a browse first, I would present them with a screen of searchable fields that they could fill in, click "Find", then display the browse using their entries as a filter.
For an example of this, go to http://connect.gopositive.com:4155 login is demo password is demo . Click on the Customer List tab. First you will see a list of searchable field. Type "jane" into the first name field, or "john" into the last name field and click "Find". The next screen you see will be the filtered list. Here is the trick... this is all done with the same procedure!
So, here is how it is done.
First, create a NetWebForm procedure. I called the form CustomerFramingForm. This will serve as the container for the searchable fields and the browse. Set the Form Style however you want (I used "Tab") and the Form Source as "Memory".
On the Fields tab, click Insert and set your Tab Heading as desired. I used 'Customer'.
Next you will create several local variables that will hold your searchable fields. Here is a screen shot of the fields you saw on my customer list:
The fields from l:Account to l:EMail are the search fields. They are used to build the filter that is used. I created another local variable called l:Filter2 to hold the filter based on what is filled in. I then use l:Filter2 as a condition to show or hide fields on this screen. If l:Filter2 is blank, then you will see the search fields. If it is filled in, then you won't see these fields. You could not have this condition, and always display the search fields if you want.
The Query and l:Reset fields are Submit buttons. The l:Reset button is hidden if the l:Filter2 is blank, and displayed if it is filled in.
Here is how the Query button prompts are filled in:
Notice that the URL will call the SAME PROCEDURE that I created. Here is how that is possible.
At the top of the procedure in the embed "Procedure Setup", the following code is added:
l:Filter2 = p_web.GetSessionValue('CustomerFilter')
IF p_web.GetValue('cusaccount') <> ''
p_web.SetValue('l:Account',p_web.GetValue('cusaccount'))
l:Filter2 = ''
END
IF l:Filter2 = ''
IF p_web.GetValue('l:CompanyName')
l:Filter2 = CLIP(l:Filter2) & ' AND CUS_NAME LIKE <39>%' & p_web.GetValue('l:CompanyName') & '%<39> '
END
IF p_web.GetValue('l:Account')
l:Filter2 = CLIP(l:Filter2) & ' AND CUS_CustID LIKE <39>%' & p_web.GetValue('l:Account') & '%<39> '
END
IF p_web.GetValue('l:FirstName')
l:Filter2 = CLIP(l:Filter2) & ' AND CUS_Fnam LIKE <39>%' & p_web.GetValue('l:FirstName') & '%<39> '
END
IF p_web.GetValue('l:LastName')
l:Filter2 = CLIP(l:Filter2) & ' AND CUS_LNam LIKE <39>%' & p_web.GetValue('l:LastName') & '%<39> '
END
IF p_web.GetValue('l:Address')
l:Filter2 = CLIP(l:Filter2) & ' AND CUS_bad1 LIKE <39>%' & p_web.GetValue('l:Address') & '%<39> '
END
IF p_web.GetValue('l:Phone')
l:Filter2 = CLIP(l:Filter2) & ' AND CUS_phn1 LIKE <39>%' & p_web.GetValue('l:Phone') & '%<39> '
END
IF p_web.GetValue('l:Email')
l:Filter2 = CLIP(l:Filter2) & ' AND CUS_EMail LIKE <39>%' & p_web.GetValue('l:Email') & '%<39> '
END
p_web.SetSessionValue('CustomerFilter',l:Filter2)
END
So what is happening here?
l:Filter2 = p_web.GetSessionValue('CustomerFilter')
First, we check to see if a SessionValue containing the filter is already set. Why? This allows us to move to different pages but still maintiain our filter.
IF p_web.GetValue('cusaccount') <> ''
p_web.SetValue('l:Account',p_web.GetValue('cusaccount'))
l:Filter2 = ''
END
This looks to see if the value "cusaccount" is being passed in. We have some invoice history screens that show the customer name on it. You can click on the name, and it will bring you to this page. This allows us to lookup the customer and display them (the account number is unique).
IF l:Filter2 = ''
IF p_web.GetValue('l:CompanyName')
l:Filter2 = CLIP(l:Filter2) & ' AND CUS_NAME LIKE <39>%' & p_web.GetValue('l:CompanyName') & '%<39> '
END
etc...
This is where the filter is built. l:Filter2 will be used later on where PROP:Filter is set.
p_web.SetSessionValue('CustomerFilter',l:Filter2)
Finally, this sets the SessionValue so we can go away and come back later, and still have the same customer filter. It is also passed on the the CustomerTable procedure (the actual customer browse we are going to filter).
That is all the code necessary for the CustomerFramingForm.
You may have noticed that there is a Browse called CustomerTable also in this procedure. It is hidden if l:Filter2 is blank, and visible when it is not.
In the CustomerTable procedure, all that is required is to retrieve the filter we have just built, and apply it. This code is added to the "Procedure Setup" embed:
l:Filter2 = p_web.GetSessionValue('CustomerFilter')
IF l:Filter2 = ''
packet = '<H2>Enter your customer search criteria and click "Find".</H2>' !'<!-- Net:NoQuery --><13,10>'
do SendPacket
Return
END
And finally, at the Start of "Browse Filter" embed:
l:Filter = CLIP(l:Filter) & ' ' & l:Filter2
ThisView{prop:Filter} = CLIP(l:Filter) & ')'
(I created another local variable here called l:Filter, because there is some additional filtering that we do with that variable. You should just construct the filter as your needs require).
Phew, almost done! How do we clear the filter?
With the "Reset" button from our CustomerFramingForm. This is set up as a Submit button, and calls another Form procedure (in this example, "CustomerResetForm".
This is poorly named on my part, as it is actually a NetWebPage. I added the following code right before "do Footer" using the Embeditor:
p_web.SetSessionValue('CustomerFilter','')
packet = clip(packet) & '<!-- Net:CustomerFramingForm -->'
DO SendPacket
All this does, is clear the session and call the CustomerFramingForm again. Since the session is cleared, the filters are blank, and the searchable fields appear again. Remember, you don't have to hide the searchable fields. In fact, if you look at the Inventory List in my sample web app, you can see that the fields are there all the time.
OK, so that is ONE WAY that this can be done. I have an idea for another way that will allow you to create one procedure that can handle all of your Queries for different browses. I'm still playing with that though, so I will share those ideas with you another time!
Let me know if you have any questions, or if you have ideas for improving this technique!
For an example of this, go to http://connect.gopositive.com:4155 login is demo password is demo . Click on the Customer List tab. First you will see a list of searchable field. Type "jane" into the first name field, or "john" into the last name field and click "Find". The next screen you see will be the filtered list. Here is the trick... this is all done with the same procedure!
So, here is how it is done.
First, create a NetWebForm procedure. I called the form CustomerFramingForm. This will serve as the container for the searchable fields and the browse. Set the Form Style however you want (I used "Tab") and the Form Source as "Memory".
On the Fields tab, click Insert and set your Tab Heading as desired. I used 'Customer'.
Next you will create several local variables that will hold your searchable fields. Here is a screen shot of the fields you saw on my customer list:
The fields from l:Account to l:EMail are the search fields. They are used to build the filter that is used. I created another local variable called l:Filter2 to hold the filter based on what is filled in. I then use l:Filter2 as a condition to show or hide fields on this screen. If l:Filter2 is blank, then you will see the search fields. If it is filled in, then you won't see these fields. You could not have this condition, and always display the search fields if you want.
The Query and l:Reset fields are Submit buttons. The l:Reset button is hidden if the l:Filter2 is blank, and displayed if it is filled in.
Here is how the Query button prompts are filled in:
Notice that the URL will call the SAME PROCEDURE that I created. Here is how that is possible.
At the top of the procedure in the embed "Procedure Setup", the following code is added:
l:Filter2 = p_web.GetSessionValue('CustomerFilter')
IF p_web.GetValue('cusaccount') <> ''
p_web.SetValue('l:Account',p_web.GetValue('cusaccount'))
l:Filter2 = ''
END
IF l:Filter2 = ''
IF p_web.GetValue('l:CompanyName')
l:Filter2 = CLIP(l:Filter2) & ' AND CUS_NAME LIKE <39>%' & p_web.GetValue('l:CompanyName') & '%<39> '
END
IF p_web.GetValue('l:Account')
l:Filter2 = CLIP(l:Filter2) & ' AND CUS_CustID LIKE <39>%' & p_web.GetValue('l:Account') & '%<39> '
END
IF p_web.GetValue('l:FirstName')
l:Filter2 = CLIP(l:Filter2) & ' AND CUS_Fnam LIKE <39>%' & p_web.GetValue('l:FirstName') & '%<39> '
END
IF p_web.GetValue('l:LastName')
l:Filter2 = CLIP(l:Filter2) & ' AND CUS_LNam LIKE <39>%' & p_web.GetValue('l:LastName') & '%<39> '
END
IF p_web.GetValue('l:Address')
l:Filter2 = CLIP(l:Filter2) & ' AND CUS_bad1 LIKE <39>%' & p_web.GetValue('l:Address') & '%<39> '
END
IF p_web.GetValue('l:Phone')
l:Filter2 = CLIP(l:Filter2) & ' AND CUS_phn1 LIKE <39>%' & p_web.GetValue('l:Phone') & '%<39> '
END
IF p_web.GetValue('l:Email')
l:Filter2 = CLIP(l:Filter2) & ' AND CUS_EMail LIKE <39>%' & p_web.GetValue('l:Email') & '%<39> '
END
p_web.SetSessionValue('CustomerFilter',l:Filter2)
END
So what is happening here?
l:Filter2 = p_web.GetSessionValue('CustomerFilter')
First, we check to see if a SessionValue containing the filter is already set. Why? This allows us to move to different pages but still maintiain our filter.
IF p_web.GetValue('cusaccount') <> ''
p_web.SetValue('l:Account',p_web.GetValue('cusaccount'))
l:Filter2 = ''
END
This looks to see if the value "cusaccount" is being passed in. We have some invoice history screens that show the customer name on it. You can click on the name, and it will bring you to this page. This allows us to lookup the customer and display them (the account number is unique).
IF l:Filter2 = ''
IF p_web.GetValue('l:CompanyName')
l:Filter2 = CLIP(l:Filter2) & ' AND CUS_NAME LIKE <39>%' & p_web.GetValue('l:CompanyName') & '%<39> '
END
etc...
This is where the filter is built. l:Filter2 will be used later on where PROP:Filter is set.
p_web.SetSessionValue('CustomerFilter',l:Filter2)
Finally, this sets the SessionValue so we can go away and come back later, and still have the same customer filter. It is also passed on the the CustomerTable procedure (the actual customer browse we are going to filter).
That is all the code necessary for the CustomerFramingForm.
You may have noticed that there is a Browse called CustomerTable also in this procedure. It is hidden if l:Filter2 is blank, and visible when it is not.
In the CustomerTable procedure, all that is required is to retrieve the filter we have just built, and apply it. This code is added to the "Procedure Setup" embed:
l:Filter2 = p_web.GetSessionValue('CustomerFilter')
IF l:Filter2 = ''
packet = '<H2>Enter your customer search criteria and click "Find".</H2>' !'<!-- Net:NoQuery --><13,10>'
do SendPacket
Return
END
And finally, at the Start of "Browse Filter" embed:
l:Filter = CLIP(l:Filter) & ' ' & l:Filter2
ThisView{prop:Filter} = CLIP(l:Filter) & ')'
(I created another local variable here called l:Filter, because there is some additional filtering that we do with that variable. You should just construct the filter as your needs require).
Phew, almost done! How do we clear the filter?
With the "Reset" button from our CustomerFramingForm. This is set up as a Submit button, and calls another Form procedure (in this example, "CustomerResetForm".
This is poorly named on my part, as it is actually a NetWebPage. I added the following code right before "do Footer" using the Embeditor:
p_web.SetSessionValue('CustomerFilter','')
packet = clip(packet) & '<!-- Net:CustomerFramingForm -->'
DO SendPacket
All this does, is clear the session and call the CustomerFramingForm again. Since the session is cleared, the filters are blank, and the searchable fields appear again. Remember, you don't have to hide the searchable fields. In fact, if you look at the Inventory List in my sample web app, you can see that the fields are there all the time.
OK, so that is ONE WAY that this can be done. I have an idea for another way that will allow you to create one procedure that can handle all of your Queries for different browses. I'm still playing with that though, so I will share those ideas with you another time!
Let me know if you have any questions, or if you have ideas for improving this technique!
27
Web Server - Ask For Help / Re: NTalk- Browse Query
« on: June 18, 2007, 08:49:11 AM »
I do have a method for doing this, I will get something together later today and post it up for you.
28
Web Server - Ask For Help / Re: Refresh Problem
« on: June 18, 2007, 08:10:13 AM »
Terrific, thanks!
29
Your Views and Comments / Re: Members only posts?
« on: June 18, 2007, 07:20:45 AM »
Good idea, I changed the "Links to live sites" board so only registered members can see it.
30
Your Views and Comments / Re: Is there CapeSoft buy-in?
« on: June 17, 2007, 10:32:59 PM »
I sent Bruce at Capesoft an e-mail letting him know I was putting this up today. I'm hopeful he'll be popping in from time to time...