Credit Code Get No Return ?
Oct 1, 2006
Can some one help me with this code, I get no return, ???
. Private Sub cust_credit_score_1_AfterUpdate()
If [Forms]![Customer Form]![cust_credit_reply_1] = " [Bad Credit]"Then
[Forms]![Customer Form]![cust_credit_score_1] = 5
ElseIf [Form]![Customer Form]![cust_credit_reply_1] = "[PoorCredit]"Then
[Forms]![Customer Form]![cust_credit_score_1] = 10
Else
[Forms]![Customer Form]![cust_credit_score_1] = 15
End If
End Sub
Thank You For Your Help
Johnny C.
View Replies
ADVERTISEMENT
Sep 4, 2013
Code:
Dim dbs As DAO.Database
Dim rs As DAO.Recordset
Dim SQLstr As String
[Code]....
I created this about 1 hour ago but my laptop crashed and didnt save. So, I open a record set and rs is now loaded with the record I want,
how do I assign the value of "Status" as a vba variable. when I try StatusInt = rs I get the "Type Mismatch" error...
View 4 Replies
View Related
Apr 17, 2014
I have a code that finds the first, second, and third minimum value in a row across the fields. Now, I am trying to find a code to look at these values, find the field it is located, and return the field name. I tried several variations of my code to return the field name rather than the value, but have been unsuccessful to this point.
Function NthMinimum(intPosition As Integer, ParamArray FieldArray() As Variant) As Variant
Dim varTempArray() As Variant, varTempValue As Variant, intArrayValues As Integer
Dim I As Integer, J As Integer
ReDim varTempArray(UBound(FieldArray))
intArrayValues = 0
[Code] ....
As you can see, this works to find these values while ignoring NULLS. How to return the field name?
View 1 Replies
View Related
Aug 20, 2013
I have lookup table I use to return names for various "Sales Class" codes.It all works good but if there is a code that isn't in the lookup table it leaves that field empty.I want it to return the word "Unknown" for any code that doesn't have a match.Here is the SQL:
Code:
SELECT [Data1].OrderNum, SalesClasses.[Name]
FROM [Data1]
LEFT JOIN SalesClasses ON [Data1].[Sales Class] = SalesClasses.[Code1];
Table examples:
Data1:
OrderNum - Sales Class
111 - class1
222 - class2
333 - classX
[code]...
View 3 Replies
View Related
Jan 7, 2006
Hi,
I am currently building a database which holds information on insurance policies. Each policy holder has the option of paying their annual policy either monthly, quarterly or annually.
At this stage I won't get too in depth, but I have built a table (TblReciepts) which the User enters each receipt as they arrive.
I would like to be able to match off each receipt against the outstanding balance on a realted policy, in this instance the policyholder should give their policyno as a reference in the receipt so that is where the relationship should be.
Can anyone suggest the most effective method of allocating a recipt to the outstanding balance in the table (TBLPolicy)
Regards
View 5 Replies
View Related
Apr 5, 2005
Hi, I'm trying to do up a database for a furniture company.
I used Northwinds as a guide and made a similar Orders form.
However, I need another functionality which Northwinds do not seem to have. I want to check whether the currect Order would cause the customer to exceed his credit limit.
WHAT I DID
For this, I made a query to find the amount any single customer owes to date and the amount that he can still borrow(creditlimit-amountowed+amountpaid). I then made a button which launchs this query.
PROBLEM
The problem is I want when i click this button, the query prompts me for CustomerID, which i have to key in again. Then, it launchs the datasheet showing me the credit he would have remaining if this order went through.
It would be better if I do not need to key in his ID again, since it is already on the form when i keyed in the Order.
Further, it would be much better if I could get the button to display APPROVED/REJECT(postive/negative balance) and also display the amount of the remaining credit.
Sorry for the long description. Thanks for reading and please let me know if I missed out any crucial details.
View 2 Replies
View Related
Apr 18, 2005
Does anyone know of any software or have any code that would allow to process credit cards.
View 4 Replies
View Related
May 5, 2013
I have debit & credit column. Which I use this in the report -->
=IIf([PaymentMet_trans]=2,"",[Amount])
debit = 1 , credit = 2
Now, i would like to have the total sum of it. according to the debit & credit separately instead of the whole total sum.
View 11 Replies
View Related
Dec 24, 2014
I have a form with a subform. The form shows an invoice and the subform the items to be invoiced. On this form I want to have a button that creates a credit of this full invoice.
My question is now how to add the existing invoice and details again to the same invoice table (query) and same details table (query).After clicking this button in the two tables should be the original invoice/details and its credit.
View 4 Replies
View Related
Aug 20, 2012
I need to add a credit note to my statement report which minuses a wrong invoice. For example, if a wrong invoice is given to a customer, then the user uses a credit note form which updates in the credit note table and this shows in the statement report as a minus. I hope that's not too confusing. The problem comes when I need to add it to my report. It will have the same date as the original invoice and the same price, it will just be shown as a minus.
My statement starts as a form which the user has to enter a start date and an end date and select a customer from a combo box, they then click generate statement which opens the report. How would I add the credit note in? I want it to be in the same date selected but the query for the report only contains the invoice date and not the credit note date. If I add this into the query, it clashes and brings up a blank report. Is there anyway to do this? Will I need to create another query for the credit note and add it in as a subreport? Will I have to add another startdate and enddate for it too as a subform in the statement form?
View 10 Replies
View Related
May 23, 2013
I'm new to access... I've been creating a cash register, that has the following tables:
Customer
Credit
Order_main
Order_sub
Products.
I've gotten so far that I can set up and order, consisting of several products, choosing the customer from a dropdown list and display the subtotal of the order.
But I can't, for the love of god, figure out how to deduct the subtotal from the credit value and get it updated.
View 5 Replies
View Related
Nov 20, 2005
Basically, i have a field where the expiry date of a credit card is input, but i want to set an input mask so that it loks something like this:
MM/YY but i cant find a way of doing this!
I then have validation text which makes sure that this value is either equal to or more than todays date! this looks like this:
>=int(now())
So the input mask has to accept this validation...
If you could help, i would be very greatful!
Cheers
View 1 Replies
View Related
Sep 16, 2014
I have a simple UDF that takes a string and returns a variant, which is an array of strings Example Input "Brick Wall" Return value would be a variant array with first element "Brick" and and second element "Wall" Now I have a table with a field of strings, and I want to make a query that returns all the results from the function, one per line.
So if my input table looks like this
[strField]
"kick the ball"
"return the pass"
my query result should looks like this
[Orig] [new]
"kick the ball" "kick"
"kick the ball" "the"
"kick the ball" "ball"
"return the pass" "return"
"return the pass" "the"
"return the pass" "pass"
Last time I had to do something like this I used VBA exclusively, with ADO objects, but I thought a query based solution would be easier.
With my current data the largest return array size my function returns is 27 elements but I wouldn't want to rely on that number being fixed.
View 3 Replies
View Related
May 10, 2007
Hi:
Using MS Access 2000.
Maybe I've been looking at the monitor for too long but... I need to have a query return data based on a date field or return all dates greater than 1/1/2001 if left blank.
criteria: [Enter date - mm/dd] Or >#1/1/2001#
When I leave it blank it gives me all dates as it's supposed to but when I type a date it does not filter by that date, I still get everything.
I also tried [Enter date - mm/dd] Or Like "*" but it behaves the same way. I know it has got to be easy but my skull may be too thick to let me see it.
Any help is appreciated.
:confused:
View 5 Replies
View Related
Feb 16, 2006
Works great, but when I hit the number "3", (3 times in row) it will let me into the form. I want it to not let me in IF I don't know the password.
Where did I go wrong?
Private Sub Form_Load()
Dim pw As Variant
If InputBox("What is the password?", "Password") = "1" Then
Else
MsgBox "Invalid Password", vbCritical, "Sorry Charlie"
DoCmd.Close
If InputBox("What is the password?", "Password") = "2" Then
Else
MsgBox "Invalid Password", vbCritical, "Sorry Charlie"
DoCmd.Close
End If
End If
End Sub
View 14 Replies
View Related
Jan 14, 2007
I protect my code from people being able to read it by setting a password on the code from Tools > Properties, selecting the Protection tab and entering a password, and clicking "Lock Project"
Is there a way to write code that will remove that Lock Project check and check it back on?
I've looked through the Application.SetOption command and it doesn't seem to be one of the choices. It would be very helpful if someone knew how to do this.
Thanks
SHADOW
View 6 Replies
View Related
Mar 28, 2007
Hi,
In a query, I am using the following code to return the average length of each tenancy. This works fine unless the length is 0. If so, it only brings back 'blank'. How can I change this code to return a 0 value?
Tenure Length AVG: IIf([Average Tenure Length]>0,Format([Average Tenure Length],"Fixed",Format(0,"Fixed")))
Thanks in advance
Lee
View 2 Replies
View Related
Oct 4, 2005
Hi guys
Im trying to set my label to a string.
Something like
myLabel.caption = StringOne & chr(13) & StringTwo
The problem is I just get funny symbols instead of the carriage return.
Please help
Thank you in advance
View 2 Replies
View Related
Mar 22, 2008
Hi There,
Can anyone tell me how to send a Carrage Return in Access? When I try to use the 'SendKeys with{Enter}', Access starts to run in an endless loop that seems to be some Wizard. All I want to do is go to a new line within the same text field.
Can any one help me? I'm an amature at Access and VBA.
View 7 Replies
View Related
Apr 24, 2006
Hi all
i would like to know if there is a way to return a field to null
thanks in advance
View 2 Replies
View Related
Apr 24, 2006
Hi all
i would like to know if there is a way to return a field to null
thanks in advance
View 1 Replies
View Related
Oct 17, 2006
I am creating a database for a hyperthetical car hire company. I have created three tables, customer table, car table and bookng table. The customer table is linked to the booking table using a Customer ID (autonumber). The car table is linked to the booking table using NumberPlate. The primary key for the booking table is Booking ID.
The cars are catagorised in different groups e.g. hatchback, sports car etc. The customer will choose a car type which is entered into the booking table. They will also enter the dates for which they want to hire their car.
I want my database to take these dates and the type of car, search through the car table and return a list of cars of that type which are availiable on these dates.
Can this be done???
View 1 Replies
View Related
Aug 19, 2005
When running a query, I want to hide duplicates records for a given field. PO# will have many duplicates, depending on how many part numbers were order on the same PO#. Other unique fields are not displayed. Can an expression help with this? If not, how do I go about hiding them in a query?
Current Query results:
DATE PO#
08/18/2005 ABCD
08/18/2005 ABCD
08/18/2005 ABCD
08/18/2005 ABCD
Desired Query results:
08/18/2005 ABCD
Thanks in advance with any help!
View 2 Replies
View Related
Dec 12, 2005
When the SSN field is null I would like this query to return : 000000000, is this possible and if so could you show me how? Thanks
SELECT
[CASEHEADS RECEIVING NON WELFARE MONEY].IVA_MEMBER_ID AS [IVA #],
[CASEHEADS RECEIVING NON WELFARE MONEY].MEM_SSN AS SSN,
Sum([CASEHEADS RECEIVING NON WELFARE MONEY].AMT_DISBURSE) AS AMT,
[CASEHEADS RECEIVING NON WELFARE MONEY].DT_DISBURSE AS [DATE] INTO [CASEHEADS RECEIVING NON WELFARE MONEY TBL2]
FROM [CASEHEADS RECEIVING NON WELFARE MONEY]
GROUP BY [CASEHEADS RECEIVING NON WELFARE MONEY].IVA_MEMBER_ID, [CASEHEADS RECEIVING NON WELFARE MONEY].MEM_SSN, [CASEHEADS RECEIVING NON WELFARE MONEY].DT_DISBURSE
ORDER BY [CASEHEADS RECEIVING NON WELFARE MONEY].IVA_MEMBER_ID;
View 3 Replies
View Related
Jul 20, 2006
Is there a way while using the count query to make it return zero when using the criteria (not like "N") instead of a blank datasheet.
View 1 Replies
View Related
Aug 16, 2006
I hope this is a simple query becuase my brain has drawn a blank on it.
I have a query with a parameter which a form textbox. If the text box has X value I want to use one list of parameters and if has Y I want to list all rows in the query.
Any help appreciated!
Dave
View 7 Replies
View Related
