IT SOLUTIONS
Your full service technology partner! 
+Expand
   ► MB LobbyCorel Paradox / ObjectPAL Coding BoardObjectPAL Topic   Print This     

TCursor

jpusch
 (Inactive)
Lawrence Ks USA

What is the objectPal code, to use a TCursor to add records from a sourceTbl to a destTbl based on the sourceTbl having a blank value in one of its fields.Thank you to anyone that will help.

 Posted 24 years ago (Thread Starter)
Comment Quote
About jpusch +Expand
Location=Lawrence Ks USA  
Joined=24 years ago   MB Posts=2  
Most Recent Post
Joe Ng
-- USA
Here are the pusedo codes. Put them in Pdox and correct any syntax errors.

Var
TcSource TCursor
TcTarget Tcursor
ArRcd DynArray[] AnyType
EndVar

; Copy a record from tableA to tableB is Approved field is blank

TcSource.Open(ôtableAö) ;Source table
TcTarget.Open(ôtableBö) ;Target table
TcTarget.Edit() ;Target table in edit mode

Scan tcSource for tcSource.öApprovedö=öö: ;Only handle records with Approved = blank
TcSource.CopyToArray(arRcd) ;Copy tableAÆs record to a Dynarray
TcTarget.InsertAfterRecord() ;Create a new record
TcTarget.CopyFromArray(arRcd) ;Copy tableAÆs record from dynarray
EndScan
TcSource.Close()
TcTarget.Close()


Good Luck

Joe
 Posted 24 years ago
Comment Quote
About Joe Ng +Expand
Location=-- USA 
Joined=24 years ago   MB Posts=80  

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 = P184A1
Enter key:
Icon: A Post    Thread    Idea    Important!    Cool    Sad    No    Yes    Includes a Link...   
Thread #1524 Counter
2120
Since 4/2/2008

Regarding...

Linked Knowledge Base Article.

This thread is linked to the following KB article.


Mike Prestwood
1. Using ObjectPAL's TCursor Object Type

Exploring ObjectPAL's TCursor object type.

Posted to KB Topic: OPAL: Language Details
17 years ago, and updated 16 years ago
(2 KB Comments)

KB Post
Nothing New Since Your Last Visit
42501
Hits

Corel Paradox / ObjectPAL Coding

Go ahead!   Use Us! Call: 916-726-5675  Or visit our new sales site: 
www.prestwood.com


©1995-2025 Prestwood IT Solutions.   [Security & Privacy]