ProFox October 2017

profox@leafe.com

53 participants
61 discussions

Reactivated old FOXil
by Jürgen Wondzinski 18 Oct '17

18 Oct '17

Hi all.... Yes, that old wOOdy FOXil is still alive and kicking :) After several years of silence and self-maintenance, I thought it couldn't hurt to take a look at ProFox again. In the meantime I checked the 60-age mark, managed to survive 5 years as a freelancer (after the breakdown of the ProLib companies in 2009), and 2 years ago I changed back into employment. They offered me some obscene amount of money to get me onboard to manage and enhance their inhouse software. Finally I couldn't resist, even after sleeping over that decision for three nights.. Thus now I find myself in a 9 to 18 job, with driving 86km each morning and evening (which means starting at 7:30 and returning at 19:30), but I'm very happy with my salary (and 30 days of payed vacations :) ) It could be worse than that .... That one and only application I'm in charge now, manages about 60.000 customers and their investments of about 1.5 million containers (those steel boxes for freight), which are rented out to shipping companies; with an annual turnarount of hundreds of million euros. All managed in a classic VFP9 app (based on the VFX framework). We print about 80.000 sheets of paper every quarter (that are rental statements for our customers) with the help of Amyuni and XFRX, and do banktransfers of about 110 Milion euros every quarter to those customers... Some big money is involved here.. Talking about rounding differences at calculation time :) I'm stil involved a little bit in alternate dev-tools, stil dabbling around in Servoy and Lianja, but due to that VFP job I barely have time to follow those tools extensively. I wish I could dedicate more time into that, but currently I and my collegue are still burried up to the nose with software changes and additions.. Now let's see how often I manage to chime in here :) wOOdy "*´¨) ¸.·´¸.·*´¨) ¸.·*¨) (¸.·´. (¸.·` * .·`.Visual FoxPro: It's magic ! (¸.·``··*

1 0

Trigger design
by Dave Crozier 18 Oct '17

18 Oct '17

Profox People, I decided to add an audit trail feature into a small system here at Flexipol via the DBC Triggers roughly based on the example in MegaFox chapter 7. In order to make things simple and more in line with OOP philosophy I decided to construct an Audit Class with all the logic embedded into a packaged class for adding into the audit tables. So far so good… However I now find that I cannot action the “add audit record" method in the class i.e. oAudit.Log(”Add”, “”Customer”) The prior created and visible object oAudit becomes invisible in the Trigger code despite being defined as a public variable. In fact the situation is somewhat worse in that when executing Trigger code it seems you cannot create objects or access any existing object’s method code which I find strange indeed and I am interested why. My only alternative is to go back to make all the auditing code .prg based which is fine but not an ideal solution. Unless anyone has any other ideas…..or a reason why you can’t use existing objects or create objects in trigger code. Ho Hum. Dave --------------------------------------------------------------- This communication and the information it contains is intended for the person or organisation to whom it is addressed. Its contents are confidential and may be protected in law. If you have received this e-mail in error you must not copy, distribute or take any action in reliance on it. Unauthorised use, copying or disclosure of any of it may be unlawful. If you have received this message in error, please notify us immediately by telephone or email. Flexipol Packaging Ltd. has taken every reasonable precaution to minimise the risk of virus transmission through email and therefore any files sent via e-mail will have been checked for known viruses. However, you are advised to run your own virus check before opening any attachments received as Flexipol Packaging Ltd will not in any event accept any liability whatsoever once an e-mail and/or any attachment is received. It is the responsibility of the recipient to ensure that they have adequate virus protection. Flexipol Packaging Ltd. Unit 14 Bentwood Road Carrs Industrial Estate Haslingden Rossendale Lancashire BB4 5HH Tel:01706-222792 Fax: 01706-224683 www.Flexipol.co.uk --------------------------------------------------------------- Terms & Conditions: Notwithstanding delivery and the passing of risk in the goods, the property in the goods shall not pass to the buyer until the seller Flexipol Packaging Ltd. ("The Company") has received in cash or cleared funds payment in full of the price of the goods and all other goods agreed to be sold by the seller to the buyer for which payment is then due. Until such time as the property in the goods passes to the buyer, the buyer shall hold the goods as the seller's fiduciary agent and bailee and keep the goods separate from those of the buyer and third parties and properly stored protected and insured and identified as the seller's property but shall be entitled to resell or use the goods in the ordinary course of its business. Until such time as the property in the goods passes to the buyer the seller shall be entitled at any time

8 12

Re: Trigger design
by Charlie-gm 18 Oct '17

18 Oct '17

(resending again - doesn't seem to be going through) On 10/17/2017 5:58 AM, Dave Crozier wrote: ... > I decided to add an audit trail feature into a small system here at > Flexipol via the DBC Triggers roughly based on the example in MegaFox > chapter 7. > > In order to make things simple and more in line with OOP philosophy I > decided to construct an Audit Class with all the logic embedded into a > packaged class for adding into the audit tables. So far so good… > However I now find that I cannot action the “add audit record" method > in the class i.e. > > oAudit.Log(”Add”, “”Customer”) ... > My only alternative is to go back to make all the auditing code .prg > based which is fine but not an ideal solution. As I recall, the "database environment" can access the environment it was run within. So if you opened the database from a "VFP application" all the PUBLIC objects of the application are visible to the database code (such as triggers and stored procedures). But if you have to allow for the database to be opened via ODBC or OLEDB, then pretty much only the environment of the database is in scope. You could take your auditing code and create stored procedures out of it and it should be available all the time. But there are some restrictions in a "database only" environment (I don't recall them at the moment - maybe "creating objects" was something that could not be done in database-only code - I'm pretty sure you can do SCATTER/GATHER though - may have to use the MEMVAR clause). As a quick example, this is a generic log stored proc I had (it is a stored proc in a VFP database). Not vouching for it: I don't know for sure that I tested this through ODBC, etc. Basically, I would call this in the trigger code (INSERT, DELETE, MODIFY) and would pass 2 parameters. E.g. in the Insert trigger I would put: "fn_LOGdata('a', <name of table getting the record inserted>). Of course there was some set up before this - aka the log tables exist in the DB, they have an identical structure to the table being logged plus a few other fields. So maybe this will give you some ideas. PROCEDURE fn_LOGdata(_pType, cTbl) *-- _pType: type of logging (a-add, d-delete, m-modify) *-- ctbl: the table being logged. The assumption is a log table of the exact same name, but with "z0_" at the start of the name *-- if a global variable glnosprun exists, ALL stored procedure code is prevented from executing IF TYPE('m.glnosprun') == "U" LOCAL cLogTbl, tCurrTime, zlog_modtype, zlog_time, zlog_user, table_ref, ctmp m.tCurrTime = DATETIME() m.cLogTbl = "z0_" + ALLTRIM(m.cTbl) SELECT (m.cTbl) SCATTER MEMO MEMVAR *-- set up values for the log_mod_type, log_time, log_user m.zlog_modtype = _pType m.zlog_time = tCurrTime *-- there may be a better way to get the logged on user... cTmp = SYS(0) m.zlog_user = IIF(ATC('#', cTmp) > 0, UPPER(ALLTRIM(SUBSTR(cTmp, ATC('#', cTmp) + 1))), 'NoNetwork') INSERT INTO (m.cLogTbl) FROM MEMVAR SELECT (m.cTbl) ELSE ENDIF ENDPROC HTH, -Charlie --- StripMime Report -- processed MIME parts --- multipart/alternative text/plain (text body -- kept) text/html ---

1 0

Sad news...
by Dave Crozier 18 Oct '17

18 Oct '17

Fellow Profoxers, I have just been told of some unfortunate news regarding our colleague Allen Pollard (known as Al by most people) who has unfortunately departed to the to the great database in the sky after a short protracted illness. Al was a great entrepreneur and specialised in generating systems for airports to handle all their movements (hence his company name gatwicksoftware) as well as being a good personal friend. He loved VFP with avengence and made it do things that other developers said was impossible. We first met many years ago in the UK at a local VFP developers conference in London and went on to meet regularly in Prague at the now defunct Devcons. IN recent years he had moved over to first Spain, then France and had painstakingly restored a set of gites which I unfortunately never got to visit despite making many plans to fly over there and land at his local airfield in Brittany. After having had contact with fellow Profoxer Jean Laermans recently, I was made aware of Al's deteriorating condition - he had been diagnosed with an incurable brain tumour. I tried to contact him via the social media we had used in the past but to no avail and now find that he was too ill to participate. I fondly remember our Jam session nights playing guitars when he was in the UK and our drunken sessions in Prague as well as him constantly being mistaken for Eric Clapton. He will be sorely missed on both the programming front as well as the personal one and I shall miss his banter very much. RIP Allen Dave Crozier

18 19

UK VFP Developer required...
by Dave Crozier 14 Oct '17

14 Oct '17

For anyone interested: https://www.jobserve.com/gb/en/search-jobs-in-Solihull,-West-Midlands,-Unit… or http://tinyurl.com/yd8jo5vb Dave --- StripMime Report -- processed MIME parts --- multipart/alternative text/plain (text body -- kept) text/html ---

8 10

Odd Behaviour
by John Weller 13 Oct '17

13 Oct '17

I have been dragged out of retirement to write a simple accounts package for a local charity and am realising how much I have forgotten. The main data entry screen has the usual clutch of controls - a grid, textboxes, combos, etc. All the controls are on the form and as I set each one up I run the app to check for bugs and typos. I am starting to get some odd behaviour, I have an option group with 2 options. The Interactive Change method has some code which sets the active page of a pageframe as shown below: ThisForm.pgfIncExp.ActivePage = This.Value ThisForm.Refresh It has been working fine for a couple of days but suddenly if I select Option 2 from Option 1 I get an error message which says that ThisForm.Refresh is not a recognised command but selecting the other way, which runs the same code, doesn't give an error. I have started saving a copy of the form after each successful run and find if I replace the SCX and SCT files with the earlier version the problem goes away for a while then reappears. Has anyone come across anything similar? John John Weller 01380 723235 07976 393631

4 7

RE: Odd Behaviour
by John Weller 13 Oct '17

13 Oct '17

Hi Ken, An interesting thought! I've used it without parentheses for years and it's never bitten me on the bum - perhaps this is the first time :-) I'll start using the brackets. John John Weller 01380 723235 07976 393631 > -----Original Message----- > From: ProfoxTech [mailto:profoxtech-bounces@leafe.com] On Behalf Of > Ken Dibble > Sent: 13 October 2017 15:26 > To: profoxtech(a)leafe.com > Subject: Re: Odd Behaviour > > > >ThisForm.pgfIncExp.ActivePage = This.Value ThisForm.Refresh > > Probably already thought of but the proper syntax of the command is: > > ThisForm.Refresh() > > (ie, with parentheses) > > Such code would run semi-reliably without the parens in VFP 6 but less so in > later versions. I have had a few instances in which bad code generates errors > under some circumstances but not others, in seemingly random fashion, > owing most likely to the behavior of the compiler. > > Ken Dibble > www.stic-cil.org > > [excessive quoting removed by server]

1 0

Re: [ADMIN] Change to Profox list message headers?
by Jerry Wolper 13 Oct '17

13 Oct '17

>> And it does make the mailing list look funny in GMail: https://imgur.com/D7qa6Rv > > Damn, I look good in shades! Are you my long-lost twin, Vince? -Jerry --- StripMime Report -- processed MIME parts --- multipart/alternative text/plain (text body -- kept) text/html ---

2 1

Fox Tales
by Eric Selje 13 Oct '17

13 Oct '17

No, not the book (which is fun if you haven't read the history of Fox Software), but the new PBS Nature episode which is all about cute red foxes. It's a neat episode and at 9:15 there's a segment about the urban canids in my neighborhood here in Madison, WI, which are under study. Enjoy http://www.pbs.org/wnet/nature/fox-tales-full-episode/15540/?button=fullepi… Eric P.S. Not sure about availability in all areas. --- StripMime Report -- processed MIME parts --- multipart/alternative text/plain (text body -- kept) text/html ---

2 1

FoxInCloud 2.25 released
by FoxInCloud Support 13 Oct '17

13 Oct '17

Hi, FoxInCloud 2.25 provides: - Bootstrap support complete - treeView support - FAA improvement and bug fixes - FoxInCloud Live Tutorial (FLT) in Bootstrap mode: http://foxincloud.com/tutotest/bs/ blog post: http://foxincloud.com/blog/2017/10/05/FoxInCloud-2.25-bootstrap-support-com… Enjoy! -- The FoxInCloud support team support(a)foxincloud.com Make sure to visit our FAQ! http://foxincloud.com/faq.php Get FREE support by posting your requests in a public forum: West-Wind message board: http://support.west-wind.com/ > FoxInCloud forum Level Extreme: https://www.levelextreme.com/ > FoxInCloud area LinkedIn: https://www.linkedin.com/groups?gid=3567945 Facebook: https://www.facebook.com/groups/154135627955227/

3 4

2026

2025

2024

2023

2022

2021

2020

2019

2018

2017

2016

ProFox October 2017