Crystal Report on-the-fly

Dibatalkan Dipasang May 22, 2005 Dibayar saat pengiriman
Dibatalkan Dibayar saat pengiriman

I recently came across a project (VB/access) which uses one blank Crystal report file(dsr) and creates all the reports on the fly based on that report. Even the connection is used thru connection string. This I've figured out how to do from other reports on that project. But I cannot figure out how to link a subreport to each record of the main report. say, you have a list of names and related phone numbers. the phone numbers list is the subreport which is to link to each name. I just want a working copy of this.

ggosh

**see attatchment for sample**

if there's expenses attatched with each bed, linked to the main report by bed no., how do you define the link?

## Deliverables

Rent A Coder requirements notice: As originally posted, this bid request does not have complete details. Should a dispute arise and this project go into arbitration "as is", the contract's vagueness might cause it to be interpreted against you, even though you were acting in good-faith. So for your protection, if you are interested in this project, please work-out and document the requirements onsite.

1) Complete and fully-functional working program(s) in executable form as well as complete source code of all work done.

2) Deliverables must be in ready-to-run condition, as follows (depending on the nature of the deliverables):

a) For web sites or other server-side deliverables intended to only ever exist in one place in the Buyer's environment--Deliverables must be installed by the Seller in ready-to-run condition in the Buyer's environment.

b) For all others including desktop software or software the buyer intends to distribute: A software installation package that will install the software in ready-to-run condition on the platform(s) specified in this bid request.

3) All deliverables will be considered "work made for hire" under U.S. Copyright law. Buyer will receive exclusive and complete copyrights to all work purchased. (No GPL, GNU, 3rd party components, etc. unless all copyright ramifications are explained AND AGREED TO by the buyer on the site per the coder's Seller Legal Agreement).

* * *This broadcast message was sent to all bidders on Monday May 23, 2005 2:56:39 PM:

Some more info:

Crystal Report Version 8.0

the project uses Crytal Report Viewer Control([url removed, login to view]) and runtime dll([url removed, login to view])

sample report:- to give you an idea what the thing looks like. the functions used are just to make the coding a little clean-modularised the details of the multiple lines used to do a job.

Public Sub preBedList(Optional rflt As String)

Dim mr As New CRFlatRep

Dim rsql As String

Dim t As Integer

Dim rw As Integer

rpdesc = "Bed List"

rsql = "select b.bed_no,[url removed, login to view],rtrim([url removed, login to view]) as name,[url removed, login to view] from bedmast b,bedcat c where b.btype=[url removed, login to view] order by [url removed, login to view]"

Set mr = SetRepDB(mr, NHCCon, rsql, rflt)

[url removed, login to view] 0, [url removed, login to view](1).Fields(4), crGCAnyValue, crDescendingOrder

[url removed, login to view] 1, [url removed, login to view](1).Fields(3), crGCAnyValue, crAscendingOrder

[url removed, login to view] rSize = crPaperFanfoldStdGerman

rw = 12000 ' 8.5" of [url removed, login to view] excluding margins

'Report Header

[url removed, login to view] = True

t = SetRPgHdr(mr, rpdesc, rw, , True)

Set txT = AddRepTxt([url removed, login to view], "Category", 1800, t + 50, 12, 3000)

Set txT = AddRepTxt([url removed, login to view], "Bed No.", 4800, t + 50, 12, 1500)

Set txT = AddRepTxt([url removed, login to view], "Rate", 6300, t + 50, 12, 1500, , crRightAlign)

t = t + [url removed, login to view] + 50

[url removed, login to view] = t + 50

Set ln = [url removed, login to view](0, t, rw, t)

Set flD = AddRepFld([url removed, login to view](4).Sections(1), "{[url removed, login to view]}", 1800, 50, 15, 4000, 400)

[url removed, login to view] = True

[url removed, login to view](4).Sections(1).Height = 450

t = 0

'Set flD = AddRepFld([url removed, login to view], "{[url removed, login to view]}", 1800, 50, 12)

'[url removed, login to view] = True

Set flD = AddRepFld([url removed, login to view], "{ado.bed_no}", 4800, t + 50, 12)

Set flD = AddRepFld([url removed, login to view], "{ado.r ate}", 6300, t + 50, 12, 1500, , 2)

[url removed, login to view] = [url removed, login to view] + 170

SetRepFtr mr, True, rw

SetRPgFtr mr, , rw

ShowReport mr, True

End Sub

ggosh

* * *This broadcast message was sent to all bidders on Tuesday May 24, 2005 11:39:14 AM:

check up the specs again.

## Platform

VB6, CR 8.0, MS Access 2000

Teknik Microsoft Access MySQL PHP Perancangan Perangkat Lunak Pengujian Perangkat Lunak Visual Basic

ID Proyek: #3730261

Tentang proyek

9 proposal Proyek online Aktif Jun 6, 2005

9 freelancer rata-rata menawar $26 untuk pekerjaan ini

Steel9561

See private message.

$34 USD dalam 7 hari
(197 Ulasan)
6.7
usmannaveedvw

See private message.

$34 USD dalam 7 hari
(46 Ulasan)
4.1
logicatechvw

See private message.

$25.5 USD dalam 7 hari
(10 Ulasan)
4.1
khawajasoftvw

See private message.

$29.75 USD dalam 7 hari
(3 Ulasan)
1.9
softsolution

See private message.

$25.5 USD dalam 7 hari
(1 Ulasan)
0.0
nainauvw

See private message.

$25.5 USD dalam 7 hari
(0 Ulasan)
0.0
strategicsy

See private message.

$4.25 USD dalam 7 hari
(0 Ulasan)
0.0
sharpnaina

See private message.

$21.25 USD dalam 7 hari
(4 Ulasan)
0.0
zhangsf

See private message.

$34 USD dalam 7 hari
(1 Ulasan)
0.0