I.T. Discussion Community!
-Collapse +Expand
Search Paradox Group:

-Collapse +Expand Paradox To/From
-Collapse +Expand Paradox Store

Prestwood eMagazine

December Edition
Subscribe now! It's Free!
Enter your email:

   ► MB LobbyCorel Paradox / ObjectPAL Coding BoardObjectPAL Topic   Print This     

Best technique for newly inserted blank records???

Best technique for newly inserted blank records??? in ObjectPAL topic (part of our Corel Paradox / ObjectPAL Coding group).

Quick Search: technique   inserted   records   Best technique   Best technique newly   inserted blank  
Most Recent Post
-- --

#Formdata1  Var

  FD1_uiO    uiObject

  FD1_tC      tCursor

#Formdata1  Arrive


  a_logl       logical

  s_str         string

  n_lInt       longInt


  if (eventInfo.isPreFilter())  then

     ;;//for each object (i.e. box, mro, container, field)

     if (active.class  = "Field")  then

         s_str  = self.TableName

         a_logl = FD1_tC.open(FD1_uiO)




     ;;//for Form only

     s_str  = self.name

     a_logl = FD1_uiO.attach(s_str)

     s_str  = self.TableName

     a_logl = FD1_tC.open(FD1_uiO)


#Formdata1  Proc

proc           arriveFieldObject()


  a_logl       logical

  s_str         string

  n_lInt       longInt

  o_uiO       uiObject

  fieldObjectName_str  string

  fieldName_str  string


;;  scenerio where user presses [Ins] key

     a_logl  =  FD1_uiO.recordStatus("New") 

     a_logl.view ("Viewing Record Status...")    ;;  CORRECTLY displays "True"

     a_logl  =  FD1_tc.recordStatus("New") 

     a_logl.view ("Viewing Record Status...")    ;;  INCORRECTLY displays "False"

     fieldObjectName_str   = "fieldName_01"

     a_logl  = o_uiO.attach(fieldObjectName_str)

     s_str  = o_uiO.value

     s_str.view ("Viewing contents of fieldName...")  ;; CORRECTLY displays blank

     fieldName_str  = "fieldName 01" 

     s_str  = FD1_tc.(fieldName_str) 

     s_str.view("Viewing contents of fieldName...")  ;; INCORRECTLY displays contents from the next record


Manually, in Paradox Workspace

[Format][Data Model]  ;; to add table to data model

"Right-click" [Define Field]   ;; to add each field to form


Obviously, FD1_tc  does not "see" the newly inserted blank record.

Whereas, FD1_uiO does "see" the newly inserted blank record through the eyes of the form.

As a programmer/developer,

    I would prefer to use the FD1_tc."fieldName 01"  notation

        over the use of the FD1_uiO."fieldName_01"  notation

    I guess that this is a carryover from my [tableName->fieldName 01] PDOX for DOS days.


What is the best technique for referencing newly inserted blank records???

I have been giving thoughts to the use of FD1_uiO(postRecord)

 Posted 6 years ago (Thread Starter)
Comment Quote
About Robert.B2 -Collapse +Expand
Visit Profile
Approved member.
Member subscribes to this thread with a verified email.
Old Account!
If this is your account, sign in to activate web presence data (sign in quarterly to keep active). Alternatively, you can subscribe to our monthly eMag with a valid email address.
Web Presence Hidden.
Once above is taken care of, full Profile content will display including back links, about me, my message, custom Profile html, social networking links, message board signature, company profile, etc.

Post ID #14975, No Replies Be the first!
Thread Started 1/10/2013 7:49:37 PM
View Counter=1599
Location=-- -- 
Joined=8 years ago   MB Posts=11  

Revive Thread!

Add a comment to revive this old thread and make this archived thread more useful.

Write a Comment...
Full Editor
Sign in...

If you are a member, Sign In. Or, you can Create a Free account now.

Anonymous Post (text-only, no HTML):

Enter your name and security key.

Your Name:
Security key = P192A1
Enter key:
Icon: A Post    Thread    Idea    Important!    Cool    Sad    No    Yes    Includes a Link...   
Thread #14975 Counter
Since 1/10/2013

Follow PrestwoodBoards on: 

©1995-2019 PrestwoodBoards  [Security & Privacy]
Professional IT Services: Coding | Websites | Computer Tech