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

Advanced
-Collapse +Expand Paradox To/From
To/FromCODEGuides
-Collapse +Expand Paradox Store
PRESTWOODSTORE

Prestwood eMagazine

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

   ► MB LobbyCorel Paradox / ObjectPAL Coding BoardParadox Forms Topic   Print This     

Bringing the Active record to a new form

Bringing the Active record to a new form in Paradox Forms topic (part of our Corel Paradox / ObjectPAL Coding group).

Quick Search: Bringing   Bringing Active   Bringing Active record   new form  
Ash.B2
Melville, -- --

OK, I'm back.  Sorry.

So when I was doing the big form (that kept crashing), when I would move to the next NoteTab, I would arrive at the same record that I was at on the previous page.

For example...

Notebook Tab 1 was the OE Parts List (details of the original manufacturer parts and their part numbers)

Notebook Tab 2 was the Supplier Parts List (Parts actually available from aftermarket suppliers.  They each have their own part number, so it was tied back to the OE part number.  IE, the front fender had the OE part number XXX001, and that part was available from 3 different suppliers, Supplier A called it A0001, Supplier B called it B0001, and Supplier C called it C0001. 

When I was on the Tab 1 record Part Number XXX0001, when I would go to Tab 2, I would see a table with parts A0001, B0001, and C0001, with all of their info, including price, supplier name, etc.

Notebook Tab 3 would contain the supplier information.  So if I clicked on B0001 on Tab 2, when I went to Tab 3 I would see Supplier B's information.

Notebook Tab 4 contained information about ordered parts... you get the idea.

My problem is that the big form as described above kept locking up/corrupting/dying/ whatever you want to call it.  It stopped working.

My solutuion was to start the same system, but instead of Notebook Tabs, each time I want to move to the next level, I open a new form with a Wait call.  My problem now is that I can't figure out how to get that same functionality regarding staying on record.  If I open Form 2, the Supplier parts list, how to I get it to automatically show the parts corresponding to the OE part number that was active on form 1?  Likewise, when I get a supplier part, say B0001, and I want the Supplier info from Form 3, how do I get form 3 to open on the appropriat supplier?

I hope I'm not too confusing here, I'm just trying to describe what I'm wanting to do.  The tables are already populated, btw.  I'm not trying to add to them via ObjectPal... merely view them. (I have other forms for data entry.. necessary because of the particular layout of information I'm using).

Sorry to be such a hassle, but I've spent all afternoon looking through the ObjectPal Reference guide, and the Paradox 10 manual has virtually no info in it at all.  (Help files won't work.. Microsoft support says they can't fix that)

Thank you in advance for your replies.

 Posted 52 days ago (Thread Starter)
Comment Quote
About Ash.B2 -Collapse +Expand
Visit Profile
Membership pending.
Member subscribes to this thread but email is NOT VERIFIED.
Email Not Verified!
Once email is verified, we will review and approve the account.
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 #17703, 2 replies
Thread Started 10/24/2019 7:22:27 PM
View Counter=61
Last Reply Posted 10/27/2019 3:32:47 PM)
Location=Melville, -- -- 
Joined=55 days ago   MB Posts=12  
Ash.B2
Melville, -- --

Tried using libraries

created a library AustinLib.lsl

in Var I have

Var
sPartID    string
endVar

It has 2 custom methods

cmSentPartID

method cmSendPartID(APartID String)
     sPartID = APartID
endMethod

cmGetPartID

method cmGetPartID()
return sPartID
endMethod

In the sending form I have (In the Uses, Var, and Open blocks of the form)

Uses ObjectPAL
    "AustinLib.lsl"
endUses

Var
    lib Library
endVar

method open(var eventInfo Event)
    if eventInfo.isPreFilter() then
        ;// This code executes for each object on the form
     else
        ;// This code executes only for the form
    lib.open("AustinLib.lsl" , GlobalToDesktop)    
    endIf
endMethod

and on the button which I use to open the next form...

method pushButton(var eventInfo Event)
var
    APartID        String
    fNext            Form
endVar

   APartID = PartID.RecordOEPartsTable.OEPartID.value
    lib.cmSendPartID(APartID)

    fNext.open("SupplierPartForm.fsl")
endMethod

forms keep giving me a syntax error when I use Objectpal in the Uses block, when I remove ObjectPAL from the uses block it is ok, but I think that works differently then, no?

In any case, when I remove ObjectPal, it works, but then the button highlights "cmSendPartID()" and says "Unknown Method Name".  I've triple and quadruple checked that it matches the library spelling.

On the new form, I just put a button to receive and print the string on the status bar, and figure once I can get that to work, then I'll add the functionality of using the incoming string to find and highlight the corresponding record on the new form.

the Uses, Var, and Open blocks on the form are identical to those on the sending form, and I get the same errors regarding ObjectPal in the Uses block.

The button on the receiving form is as follows:

method pushButton(var eventInfo Event)
   msgInfo("Part Number ", lib.cmGetPartID() + " OE Part ID")
endMethod

Again, I get an "unkown Method name" error.  I've also tried opening the library from within the button instead of in the form's open block

At this point, I'm not sure what I'm doing wrong.

Is there another way to move the value?  The library isn't working, and I can't figure out why.

Maybe I can go through a table?  what kind of code would I need for that?

Thanks

 Posted 50 days ago (Thread Starter)
Comment Quote
About Ash.B2 -Collapse +Expand
Visit Profile
Membership pending.
Member subscribes to this thread but email is NOT VERIFIED.
Email Not Verified!
Once email is verified, we will review and approve the account.
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 #17706 (Level 2) and Parent is 17703
Reply Posted 10/26/2019 9:57:16 AM
Location=Melville, -- -- 
Joined=55 days ago   MB Posts=12  
Most Recent Post
Ash.B2
Melville, -- --

Never mind.

Tried for a few days, couldn't get libraries to work (maybe a windows 10 issue?), but I figured it out using a query to a temp table, and pulled the value from the temp table into the second form.

Maybe not the most elegant, but it works.

 Posted 49 days ago (Thread Starter)
Comment Quote
About Ash.B2 -Collapse +Expand
Visit Profile
Membership pending.
Member subscribes to this thread but email is NOT VERIFIED.
Email Not Verified!
Once email is verified, we will review and approve the account.
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 #17707 (Level 3) and Parent is 17703
Reply Posted 10/27/2019 3:30:55 PM
Location=Melville, -- -- 
Joined=55 days ago   MB Posts=12  
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 = P1151A1
Enter key:
Icon: A Post    Thread    Idea    Important!    Cool    Sad    No    Yes    Includes a Link...   
Thread #17703 Counter
61
Since 10/24/2019

Follow PrestwoodBoards on: 


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