...in the actual body of the email. Here's how the email works currently with an attachment:
local j, lnMaxLength, i, lcMessageText, lvFieldValue
** j & i are counters
private array paDBFields
*** Localizable Strings
#DEFINE DBF_NOT_FOUND_LOC "No table is open in the current work area."...
Hi Mike,
VERY HELPFUL! I haven't messed with detail bands much in the past, just copied old reports to make new ones. I was able to get the department deductions to use a detail band dynamically, so there could be 100 different deduction types in a Department and it will work. Now I just need...
Hi All,
I have an old report that I was handed to revise which has :
Page 1 with Employee and Employer total pay by PayType, Deductions, and Witholdings
Page 2 with Summary of Departments totals for PayType and Withholdings (which I'm supposed to add Deductions to dynamically)
Page 3 is the...
Hi All,
atlopes and Olaf - Thanks, can't wait to try it.
MikeLewis and Stefan - Thanks for the lesson and for expounding on the topic!
also atlopes - I have validation for my colorpicker button to ensure -1 doesn't get into the field. It's either blank or has a color, so as long as it's...
Hi All,
I'm currently storing colors to a field that is numeric using GETCOLOR(). All references to DynamicBackColor talk about using RGB() function. I can't seem to get the actual colorCode to work in the same manner. Does anyone know if this is possible. Here's what I'm trying to no avail...
Hi Olaf,
I've just added (successfully) to the KeyFieldsList a new field I made called COMUNIQ C(10), wherein I put Sys(2015) whenever appending. I did a
REPL COMUNIQ WITH SYS(2015) ALL for the current records and now even if all three records match exactly on the grid and I change one or...
...prcomm.user_id,ALERTED prcomm.alerted,SHCOMM prcomm.shcomm,contact PRCOMM.contact,company PRCOMM.company'
UseDeDataSource = .F.
**and in the init I have it set to buffering using
=cursorsetprop("buffer",5,"supplmt")
Is it right in front of me and obvious to everybody but me? I'm so confused...
Olaf! Friggin Brilliant!!!!
I just stumbled onto some legacy code that looks similar, but I like your direct approach. Here's what they used:
WITH ThisForm
RETURN GETFLDSTATE(-1, .r_cMasterAlias) <> ;
REPLICATE("1", LEN(GETFLDSTATE(-1, .r_cMasterAlias)))
ENDWITH
Thanks.
Dan
Hi All,
Is there a function to know whether the cursor (that the CursorAdapter uses to update the table) has been changed? If changes are made to my grid and somebody tries to exit out without clicking Save, I'd like a message to ask if they'd like to Save (meaning do a TableUpdate(.T.) ) or...
***UPDATE****
1. To add to the fun, I just discovered that even if I close my EXE, do something to code, recompile and run it, the procedure Still Works as long as Thunderbird was initialized via my EXE. If I close Thunderbird and open it manually instead of from my VFP EXE, then it fails again...
...is first closed in compile mode):
SET CLASSLIB TO "..\classes\buttons.vcx" ADDITIVE
loMail = NEWOBJECT('mailbtn','..\classes\buttons.vcx')
***compiling the email body stuff here*************************************************************** Start Email...
...what I've got now that is working:
SELECT c_emadds
SCAN
lcMailBody=""
SELECT cur_emails
SCAN FOR CUR_EMAILS.E_MAIL=C_EMADDS.E_MAIL
*!* SELECT CUR_EMAILS
*!* SELECT CUR_EMAILS.* FROM CUR_EMAILS WHERE CUR_EMAILS.E_MAIL=C_EMADDS.E_MAIL inTO CURSOR blah1 READWRITE...
Hi All,
Looking for recommendations for the best method to send out daily summary emails to several salespeople. I have a cursor with their emails and details for each record. I'd like to just be able to transform this cursor as text or table in an email and send. Not sure how to do that. I...
Hi Olaf,
Yes supplmt is the CA cursor alias. Fields in the grid are like ControlSource = 'supplmt.ctype' (and the like).
The real table is called prcomm.dbf. I didn't have a "Save" button currently as I thought I was experiencing automatic saves once I leave a record and once the...
Hi Olaf,
I got it working by using the second cursor like so:
PUBLIC nSecs
nSecs = SECONDS()
** determine which optionbutton is pressed
DO CASE
CASE thisform.optiongroup1.Value = 1 && This contact only
m.obResult = thisform.r_filter
CASE thisform.optiongroup1.Value = 2 && This contact only...
Hi danfreeman,
I'm working with a team and I don't want to add anything or take away from the base class, just want a new form I can mess with. Thanks!
Dan
Just a quick update:
When I tried doing *fill cursor based on updated settings
loPrcomm.CursorFill()
it closed out the cursor 'supplmt' and the grid now is blank, no gridlines and no visible data.
Does that mean I have to do a cursor at the beginning with the whole table and do BROWSE FOR ...
Thank you, Olaf for that descriptive answer. I appreciate it!
A follow up question, since I've invested several hours in the CursorAdapter class and integrating it with my grid:
Which would be faster:
1. A vague cursor and just filtering it by using BROWSE FOR ... AND BLAHBLAH
Or
2. Is it...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.