Yeah....that's a whole cleaner than how I would have done it.  :-)

Amount = "59999"
temp1 = Len(Amount)
Cents = Right(Amount, 2)
Dollars = Left(Amount, Temp1-2)
DollarsAndCents = Dollars & "." & Cents



-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of [EMAIL PROTECTED]
Sent: Wednesday, December 05, 2007 2:05 PM
To: [email protected]
Subject: Re: [Talk] Formatting

FormatCurrency -Returns a string using a currency format
  FormatCurrency(var1, 2)



Thank you.
Clayton Leach
Integration Analyst
Phone 937-328-8104
FAX 937-328-6222
Information Systems
Community Mercy Health Partners


                                                                           
             "Walker, Reese"                                               
             <[EMAIL PROTECTED]                                             
             >                                                          To 
             Sent by:                  <[email protected]>        
             [EMAIL PROTECTED]                                          cc 
             WORKSTATION.COM                                               
                                                                   Subject 
                                       [Talk] Formatting                   
             12/05/2007 02:51                                              
             PM                                                            
                                                                           
                                                                           
             Please respond to                                             
             [EMAIL PROTECTED]                                             
                 ATION.COM                                                 
                                                                           
                                                                           





I am pulling a flat file into my data station and I need to format a money
field.  I have a dollar amount of 59999 and I need it to be entered as
599.99.  I do not know much VB so how would I code this?



Thanks,



Reese



Reese E. Walker
Financial Systems Analyst
Phoebe Putney Memorial Hospital
Albany, GA. 31702
Phone: (229) 312-4259
Pager: (229) 431-7658
Fax: (229) 312-4316





CONFIDENTIALITY NOTICE:  This message, including any attachments, is for 
the sole use of the intended recipient(s) and may contain confidential and 
privileged information.  Any unauthorized review, use, disclosure or 
distribution 
is prohibited.  If you are not the intended recipient, please contact the 
sender by reply e-mail and destroy all copies of the original message.
Important:  This email and any attachments may contain confidential information 
subject to protection under the Federal Standards for Privacy of Individually 
Identifiable Health Information (45 C.F.R. Parts 160 and 164).  If you or your 
organization is a “Covered Entity” under the above mentioned regulations, you 
are obligated to treat such information in a manner consistent with the 
regulations.  If it appears that this email was sent to you in error, (1) you 
are prohibited from utilizing or disseminating this email or any attachments; 
(2) please immediately delete it from your computer and any servers or other 
locations where it might be stored, and email this sender or call the Hays 
Medical Center Privacy Officer at (785) 623-2188 advising that you have done 
so.  We appreciate your cooperation.

Reply via email to