Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Dimension an array???
Message
De
05/11/1998 17:11:05
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00154975
Message ID:
00155032
Vues:
25
Hi Becky ----
PROCEDURE genInvoice
LPARAMETERS cLastInvNo   && Assuming its a char
cNewInvNo=""
IF BETWEEN(RIGHT(cLastInvNo,1),"0","9")
   cNewInvNo=cLastInvNo+"A"
ELSE
   cNewInvNo=LEFT(LEN(cLastInvNo)-1)+CHR(ASC(RIGHT(cLastInvNo,1))+1)
ENDIF
RETURN cNewInvno
This will cause the invoice number to cycle in the following manner:

10001
10001A
10001B
etc....



>
>I have a pageframe which displays a new record with an
>invoice number. I now want to do an invoice number with
>an A,B,C following the invoice number in a separate field.
>
>What is the best way to make additional copies of the same
>invoice go from A to B, etc. each time a new invoice is added?
>
>Thanks and have a great day!
>
>Becky
------------------------------------------------
John Koziol, ex-MVP, ex-MS, ex-FoxTeam. Just call me "X"
"When the going gets weird, the weird turn pro" - Hunter Thompson (Gonzo) RIP 2/19/05
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform