DanMetcalf
|
|
Group: Forum Members
Posts: 7,
Visits: 442
|
Ivan -- I got Sharp-Shooter to finally work for me -- and the instructions you posted were very helpful! We differ only in the final final step -- in the Standard Report Wizard --- I kept getting locked out for some reason -- the datasource ellipsis just doesn't like me there. If I skip that step, I'm ok. Since the Sharp-Shooter documentation gives me indigestion, your step-by-step instructions were a perfect start -- thanks!
|
|
|
Ivan George Borges
|
|
Group: StrataFrame MVPs
Posts: 1.9K,
Visits: 21K
|
Hey Dan. Glad I could help. Yep, the datasource ellipsis has a known bug that comes up when you first create the new report, I have talked to them about it. And have you downloaded the last updated version? The help file is a lot better. Cheers.
|
|
|
DanMetcalf
|
|
Group: Forum Members
Posts: 7,
Visits: 442
|
Ivan-- Thanks Again! v3.7 --- and browsing through Suite_Eng.Doc, as we speak! Hopefully, I'll find something akin to the RowPopulating event handler, where Strataframe has definitely spoiled me. It would be nice to replace row values in a Report Shooter inline report with something meaningful from another BO --- much like the way SF does with e.Values().Displayvalue....
|
|
|
Ivan George Borges
|
|
Group: StrataFrame MVPs
Posts: 1.9K,
Visits: 21K
|
Hi Dan. Have a look at your Designer. If you have your Document property open, you will see under Script some properties you can setup for a general purpose, like Imports (for references), COMMON SCRIPT, GENERATE SCRIPT... and then, if you click any control on your lay-out, you will also find a GENERATE SCRIPT where you can enter any code, something like: Dim loBO As New MyBO txtMyControl.Text = loBO.GetInfo(GetData("MyBOReportBBS.my_Field")) loBO.Dispose() Or anyhing you want. Would that help?
|
|
|
DanMetcalf
|
|
Group: Forum Members
Posts: 7,
Visits: 442
|
Jangling Spurs! Works like a Charm! Here's my final code: Dim lobo = DataObjects("MyVendorNames") loBo.BusinessObject.seektoprimarykey(GetData("MyBBS.Provider")) Dim last = loBo.BusinessObject.LASTNM Dim first = loBo.BusinessObject.FIRSTNM textbox11.Text = first & " " & last As you can see, I had to walk my way through the "BusinessObjectProperty" of the BusinessBindingSource Object to expose the strong-typed properties I was after. Ivan -- thank you for very much for your help!
|
|
|
Ivan George Borges
|
|
Group: StrataFrame MVPs
Posts: 1.9K,
Visits: 21K
|
Dan, you are very welcome. I see you are concatenating First and Last Name properties of your BO. Have you had a look at Custom Properties? Have a look at the Help File, under Application Framework / Business Layer / Common Business Object Tasks / Adding Custom Field Properties... and see if it gives you some ideas. You can also follow the Tutorial, Creating a WinForms App [VB] / Adding Custom Field Properties. Now, just one thing... what is the meaning of "Jangling Spurs" ?
|
|
|
Greg McGuffey
|
|
Group: Forum Members
Posts: 2K,
Visits: 6.6K
|
Now, just one thing... what is the meaning of "Jangling Spurs" ? I think it's from the "Spur-Jangled Banner"? Old cowboy song I think (mostly old cowboys sing it).
|
|
|
Ivan George Borges
|
|
Group: StrataFrame MVPs
Posts: 1.9K,
Visits: 21K
|
ROFL I would enjoy being a cowboy... I asked Trent if we could ride horses and camp on the desert next time I visited, have beens and bacon, kill snakes with a Colt 38... not sure he really enjoyed the idea.
|
|
|
DanMetcalf
|
|
Group: Forum Members
Posts: 7,
Visits: 442
|
That surely saves on code --- Thanks! Dim lobo = DataObjects("MyVendorNames") loBo.BusinessObject.seektoprimarykey(GetData("MyBBS.Provider")) textbox11.Text = loBo.BusinessObject.cust_fullname As far as the Jangling Spurs, Ivan -- I'm not altogether sure... Perhaps I was reminiscing on an old Tex Ritter Song...
|
|
|
Ivan George Borges
|
|
Group: StrataFrame MVPs
Posts: 1.9K,
Visits: 21K
|
Great! I know it doesn't save a lot on this case, but I was just checking if you were aware of the concept. As for Tex Ritter, I've just had a look at his discography!!! I will see if I can download and listen to some of his songs.
|
|
|