David, As a newbie, I am clueless as to what you are trying to do.
However, the following line looks strange: GETPROPERTY ModLevel TEXTVALUE eModLeve’l Should not eModLeve be eModLevel? Happy New Year to you, too! Bob Speth ----- Original Message ----- From: "David M. Blocker" <[EMAIL PROTECTED]> To: "RBG7-L Mailing List" <[email protected]> Sent: Saturday, January 01, 2005 4:32 PM Subject: [RBG7-L] - PROPERTY componentid TEXTVALUE .varname problems > Happy New Year! > > I don’t expect an answer today – I just work odd hours and here I am working > on New year’s Day. > > I’m beginning to think I’ve gone a little mad here. I have a working example > in a database of using the PROPERTY component TEXTVALUE .varname command to > change the value of a column on entry. I can’t for the life of me see what > ’s different about that working example from the one I’m trying to create > other than one is run from a button and another from a DBEdit control “On > exit”, but even if I try it from a button it won’t go. > > The working example has this relevant set of code (form is called with > ENTER): > > SET NULL ' ' > PROPERTY TABLE Invoice 'EDIT' > PROPERTY PONO TEXTVALUE .fSearchFor > RECALC VARIABLES > > It works like a charm. > > Thinking I’m mad, I’m trying first to get this to work on CONCOMP and can’ t. > I’d love it if someone can replicate this for me to see if I’m dreaming. > > 1. Modify form Concomp > 2. Create this custom EEP for field CustState ON EXIT: > > SET VAR eCustState TEXT = NULL > SET VAR eDefState TEXT = NULL > SET VAR eDefState = 'MA' > GETPROPERTY CustState TEXTVALUE ‘eCustState’ > IF eCustState IS NOT NULL THEN > GOTO BOTTOM > ENDIF > PROPERTY TABLE Customer 'EDIT' > PROPERTY CustState TEXTVALUE .eDefState > SAVEROW > LABEL BOTTOM > CLE VAR eCustState,eDefState > RETURN > > 3. And create this custom EEP for field ModLevel ON EXIT: > > SET VAR eModLevel INTEGER = NULL > SET VAR eDefMod INTEGER = NULL > SET VAR eDefMod = 1 > GETPROPERTY ModLevel TEXTVALUE ‘eModLeve’l > IF eModLevel IS NOT NULL THEN > GOTO BOTTOM > ENDIF > PROPERTY TABLE Customer 'EDIT' > PROPERTY ModLevel TEXTVALUE .eDefMod > SAVEROW > LABEL BOTTOM > CLE VAR eModLevel,eDefMod > RETURN > > 4. Save the form > > 5. ENTER USING CustomerEnter > 6. Leave CustState blank – it does NOT change to MA > 7. Leave ModLevel blank – it does NOT change to 1 > > The NULL setting makes no difference. > > SAVEROW or RECALC VARIABLES – neither one makes a difference. > > My working example is an INTEGER column and variable, so I tried both here – > one text column and one integer. Makes no difference. The GETPROPERTY > commands are working fine – trace shows that. > > I have the same problem using Build 78 or the beta of 79. It occurs on both > my portable and desktop, both running Windows XP. > > I added a lookup expression to the form from a new States table in the > hopes that that would force a recalc variables to work, but it did not help. > > Can anyone replicate this problem or show me the error of my ways? I’m > guessing it’s a big DUH but I can’t see it! > > David Blocker > > > David Blocker > [EMAIL PROTECTED] > 781-784-1919 > Fax: 781-784-1860 > Cell: 339-206-0261 > > --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.825 / Virus Database: 563 - Release Date: 12/30/04
