11 replies to this topic

[Emerine]

Preciso imprimir um ARRAY no CRYSTAL REPORTS, do qual eu não sei quantas posições terá...

 

O array é um parâmetro, e o usuário é quem digitará os valores, fiz um teste com 2 valores e consegui imprimir dessa maneira...

 

 

(if {?SUBGRUPO} = '*'
then 'Todos os Subgrupos'
else 'SubGrupo: ' +  {?SUBGRUPO}[1] + ", " + {?SUBGRUPO}[2])

Porém, se eu testo com 1 valor apenas, ele da erro, pois esta tentando imprimir a posição 2 que esta vazia...e se o usuário entrar com mais de 3 valores, obviamente, só irá imprimir os 2 primeiros..=/

 

Enfim, em java, eu faria um laço for 

 

 

for int i = 0; {?SUBGRUPO}.length; i++ {
     {?SUBGRUPO}[i];
}

[Danilomaru]

tente fazer assim:

shared numberVar x;
shared stringVar y;
(if {?SUBGRUPO} = '*'
then 'Todos os Subgrupos'
else 'SubGrupos: ' +
ToText( (for x := 1 to ubound(
{?SUBGRUPO}) do
IFx = ubound({?SUBGRUPO})
THEN 
y := y + ({?SUBGRUPO}[x])
ELSE
y := y + ({?SUBGRUPO}[x]+ ", " );
y;
)
)
)

Edição feita por: Danilomaru, 15/02/2015, 07:10.

[HaroNism]

Amoxicillin Trihydrate By U V Method cheap cialis Fluoxetine Fluoxetinum Mail Order Mastercard Accepted Free Shipping
Stromectol Retail Cialis C20 Preis Viagra Generic Wemon
Cialis Shop Online <a href=http://cialtobuy.com>online pharmacy</a> Priligy Uruguay

[HaroNism]

About Smart Money Prestige Finance significantly enhances pricing and lending criteria Loan Talk Secured Loans Awards Smart Money photobooth gallery lnkd. quick loans Of course they should not discriminate against a customer based on anything other than pure economics.
Dapoxetina 2010 buy viagra online Propecia Ou Acheter Potenzmittel Viagra Gunstig Amoxicillin Dosage For Ear Infection Toddler
Levitra Generico Andorra Cheap Generic Viagra Soft Pills Kamagra Jelly For Sale online pharmacy Viagra Erfahrungsberichte Pflanzliches Viagra Rezeptfrei
Canada Pharmacies No Description Bystolic Online Pharmacy viagra online pharmacy 122 Order Meds Without A Script Buy Generic Levitra Online Magnesium

[HaroNism]

Finpecia For Sale viagra online prescription Kamagra Pillen Viagra A 40 Anni Cipa Canadian Pharmacy Accutane

[Miguceamma]

Buy Now Macrobid buy vardenafil online cheap Viagra Pour Femme Vendu Au Quebec Propecia Cheapest Cialis
Viagra Preiswert viagra Donde Comprar Cialis Barato Cialis Generico Farmacia Europea

[Miguceamma]

Discount Levaquin With Free Shipping Store Extra Generic Super Cialis Online Cialis Without A Prescription viagra Cialis Online Postepay Actonel
Using Outdated Amoxicillin buy viagra Viagra Perte Cheveux Medecine Amoxil
Buy Fruesomide Pills viagra Legitimate Online Pharmacies India Isotretinoin amnesteem skin health medicine on line

[HaroNism]

Viagra Preis Kaufen Vente Kamagra En Ligne Cialis 20 Mg Commenti online pharmacy Medicament Misoprostol C Est Pours Quoi Pediatric Keflex Viagra Kaufen Illegal

[gapedlok]

Discounts! new skin care 2017


Products which fall under this return policy can be returned domestically, as long as they are unused and in the original packaging. No questions asked!
If a product that falls under this guarantee is found to be counterfeit, you will get a full refund (shipping costs included).


READ MORE
Classica - Mens Orange Calfskin Billfold Wallet ( 144.00 $)
Color block splicing flocking stand collar long sleeve men's cotton-padded coat ( 48.93 $)
2016 Women's Snowflake Slim Vintage Denim Dark Light Blue Jeans Casual Stretch Skinny Female Mid Waist Elastic Pants Plus Size ( 19.99 $)
Vsyaotdelka - online store for home
Original ASUS Zenfone Pegasus 3 X008 32GB16GB ROM 5.2 ( 238.45 $)
YG - 300 LCD Projector ( 35.89 $)
New Universal Outdoor Tactical Holster Military Molle Hip Waist Belt Bag Wallet Pouch Purse Phone Case for iPhone 7 for Samsung ( 5.58 $)
Classica Collection - Orange Calfskin Vertical Card Holder Wallet ( 153.00 $)
Messy women's short fluffy mixed gold part bang synthetic wig ( 10.52 $)
Bosonogaya grafinya
1 SET Plug & Play 80W 7200LM H1 H3 H4 H4 HL H7 H8 H9 H11 9005 9006 HB3 HB4 CREE LED CHIP CAR Fog BULBS HEADLIGHT Lamp 3 Colors ( 44.99 $)
nike sb dunk hi pro botanica
Auto Scan Elm327 V1.5 Code Reader OBD2 Elm 327 USB CAN-BUS Adapter Elm327 Interface Car Diagnostic Tools ( 6.99 $)
2016 new arrive women shoulder bag nubuck leather vintage messenger bag motorcycle crossbody bags women bag cx003 ( 24.83 $)
Simple desinged vintage pendant lights lamp with 1 light free shipping ( 127.98 $)

[HaroNism]

Inexpensive Acyclovir Acheter Du Cialis En Europe online pharmacy Buying Levitra In Mexico Finasteride Over Night Cialis Generico PreСÐСâСÐвÐâСÐСâРÐЧo
Buy Doxycycline Without Acquisto Viagra Legale cialis Bay Ventolin Allergy Amoxicillin Symptoms
Amoxil Rats Cialis 2.5 Mg Tablet levitra without prescription Viagra Generique Levitra Buying Clobetasol Drugs Where To Buy Tadalis Sx Soft Online
For Sale Free Shipping Generic Bentyl Tablets viagra online prescription Viagra Rezeptfrei Packstation Viagra Online Forum

[HaroNism]

Buy Propecia Singapore Cialis In Offerta buy viagra Dflucan Without A Pres
Comprar Cialis En Espana Surdosage Levitra On Line Macrobid Delivered On Saturday Medicine only here what is levitra Levitra 20mg Avis Keflex A Sulpha Drug
Cialis 5mg Generic Cialis Tadalafil Propecia Grande generic levitra professional Amoxicillin Pill Identifier Precio De Propecia 1 Mg

[HaroNism]

tamoxifen This cancer is presumed to have a good prognosis
african traditional viagra If she is under 38 years old and the sperm is good, 3 months of clomiphene cycles with good ovulation are often tried
Chinese and Korean residents lasix sat?n Even on my head
Looking for information related to the November 2017 new high blood pressure guidelines levitra basf 20mg