Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Urgent
Message
De
31/01/2002 17:31:23
 
 
À
31/01/2002 07:05:07
Information générale
Forum:
Visual FoxPro
Catégorie:
Base de données, Tables, Vues, Index et syntaxe SQL
Titre:
Re: Urgent
Divers
Thread ID:
00613249
Message ID:
00613740
Vues:
16
>dear sir......
>
>kindly send me a project on simple banking transactions at the earliest on this address....
>
>rlprasad@rediffmail.com
>
>
>the project should be simple and lucid so that it can be installed and established in a banking concern

This should get you started. Not object oriented - but hey, it should work.
Of course you'll need to fill in some bits of extra code, but it's free.
LPARAMETER cTrantype, nAcctID, nAmount
LOCAL ok
DO CASE
CASE cTrantype = 'WITHDRAW'
	DO Withdraw with nAcctID, nAmount, ok
CASE cTrantype = 'DEPOSIT'
	DO Deposit with nAcctID, nAmount, ok
CASE cTrantype = 'OPEN'
	DO OpenAcct with nAcctID, nAmount, ok
CASE cTrantype = 'CLOSE'
	DO CloseAcct with nAcctID, nAmount, ok
ENDCASE
RETURN m.ok
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform