IT Answers » IF statement

If Statements

R123456s — Wed, 30 Nov 2011 20:02:47 +0000

how to look up numbers only?

EmployeeNumber query in SQL Server 2008

Mmdmurphy — Mon, 20 Jun 2011 19:25:57 +0000

I am trying to write a query that will generate employee numbers. Employee number = first initial & first 7 characters of last name. UNLESS that is taken, then it’s first initial, first 6 characters of last name, then the number 1. UNLESS that is taken, then it’s first initial, first 6 characters of last name, then the number 2… UNLESS… until we get to the number 9 and give up… HOW?

Stuck on an IF statement in Lotus Domino

AMcAuley3 — Mon, 28 Feb 2011 20:30:55 +0000

I need to get this statement so that it will only update when a new doc is created. I am having a problem with the IF statement and it is currently update ever doc even if it does have new records. I only wnat the new record(actionitems) to update the agent is below

Sub Initialize %REM REFRESH OSHA INFO Update ALL OSHA Numbers in Current Agenda Headers %END REM Const LOGNAME = “RefreshOshaInfo” REM Notes Handles Dim ss As New NotesSession Dim db As NotesDatabase Dim vw As NotesView Dim vc As NotesViewEntryCollection Dim vcEntry As NotesViewEntry Dim doc As NotesDocument REM Dim DC As NotesDocumentCollection Dim RRembview As NotesView Dim item As Variant Dim strfield As String Dim temp As Variant Dim Count As Integer Dim agendaloc As Integer Dim agyear As Integer Dim agmonth As Integer Dim locv As NotesView Dim Headerdoc As NotesDocument Dim workcount As Integer REM Other Dim nTotalNeededUpdate As Integer Dim nTotalProcessed As Integer Dim bUpdate As Boolean Dim ErrorMsg As String REM Saved Fields Dim nLostTimeDays As Integer Dim nNonLostTimeDays As Integer Dim nYTDAccidents As Integer Dim nYTDDriverAccidents As Integer Dim bodyarray As NotesDocument Dim Ekey As Variant Dim adoc As NotesDocument Dim cUpdate As Boolean REM Dim nActionitems As Integer REM Dim agendaitem As String Dim ActionItems As Integer Dim aview As NotesView Dim workA As Integer Dim ALcount As Boolean Dim doccount As Integer On Error Goto ProcessError Call AgentLogAction(LOGNAME, “<——Start——>”) Set db = ss.CurrentDatabase Set aview = db.GetView(“RREMB”) ‘added 2/16/2011 ErrorMsg=”View CurrHeaders NOT Found” Set vw = db.GetView(“CurrHeaders”) ’All Current Agenda Headers Set vc = vw.AllEntries ErrorMsg = “View collection NOT Found” Set vcEntry = vc.GetFirstEntry ErrorMsg=”" Do While Not (vcEntry Is Nothing) Set doc = vcEntry.Document REM AM changes 2/16/2011 Ekey = doc.Loc(0)& “~” & doc.mtgyy(0) & “~” & doc.mtgmm(0) Set DC= aview.GetAllDocumentsByKey(Ekey,True) WorkA = dc.count If workA = doc.actionitems(0) Then alcount =True Else doc.ActionItems = dc.count REM doc.ActionItems(0) = dc.Count End If nTotalProcessed = nTotalProcessed + 1 REM Save current values nLostTimeDays= doc.LostTimeDays(0) nNonLostTimeDays = doc.NonLostTimeDays(0) nYTDAccidents = doc.YTDAccidents(0) nYTDDriverAccidents= doc.YTDDriverAccidents(0) REM Update Osha Numbers for this doc Call GetOshaInfo(doc.Loc(0), doc) bUpdate = False bUpdate = bUpdate Or alcount bUpdate = bUpdate Or ( nLostTimeDays <> doc.LostTimeDays(0) ) bUpdate = bUpdate Or ( nNonLostTimeDays <> doc.NonLostTimeDays(0) ) bUpdate = bUpdate Or ( nYTDAccidents <> doc.YTDAccidents(0) ) bUpdate = bUpdate Or ( nYTDDriverAccidents <> doc.YTDDriverAccidents(0) ) If bUpdate Then Call doc.Save (True,False) nTotalNeededUpdate = nTotalNeededUpdate + 1 End If Print Right(“00000″ + Cstr(nTotalProcessed), 5) & ” OSHA Headers processed - ” + Right(“00000″ + Cstr(nTotalNeededUpdate), 5) & ” OSHA Headers needed updates.” Set vcEntry = vc.GetNextEntry(vcEntry) Loop Finish: Call AgentLogAction(LOGNAME, Right(“00000″ + Cstr(nTotalProcessed), 5) & ” OSHA Headers processed.”) Call AgentLogAction(LOGNAME, Right(“00000″ + Cstr(nTotalNeededUpdate), 5) & ” OSHA Headers needed updates.”) Call AgentLogAction(LOGNAME, “<——End——->”) Exit Sub ProcessError: Stop Call AgentLogError(LOGNAME,0, “Line: ” & Erl() & “Error:” & Err() & “=” & Error() ) Resume POExit POExit: End Sub

How to run a command within a CLP only during a specific time frame

lotofbad — Tue, 28 Dec 2010 07:26:09 +0000

I have a pgm that perfroms verious system checks and alerts me if there is a problem.

I would like to add an If statement to exclude some of the checks that fall between a certain time period and have it jump to a specific lable in the script to continue. thus skipping over the commands that do not need to run during the time frame.

Can someone show me an example and explain the process?

How to pick a source for a subform in Access 2003?

Techexpressinc — Fri, 26 Nov 2010 14:13:09 +0000

I have 3 different DB-s, I am working with. I have no problem linking the data in. The user is in DB-a. My problem is I need the little bit of tricky code to check my DB-A’s plainid the DB the user is in. To check the DB-A’s planid against DB-B’ plainid then use the data to fill a sub-form. If there is not a match go to DB-C and use that data to fill in a sub-form. The sub-form data is for display only, not to update.

C# how to: IF Statement

Ak1bo78 — Tue, 01 Dec 2009 23:16:57 +0000

Hello guys, C# question here…Could I ask or is there better website?

Regards

How can I add an IF statement to a .php file

TheFinder — Thu, 12 Nov 2009 20:28:17 +0000

Hi everyone, I have a form that has 6 fields to be filled in by the user. I’m not too good at editing .php files, so I come to you here. Here’s my problem. Fields 1, 2,3,4 and 6 always gets filled in. but sometimes, field 5 will get filled in and if this is the case I need an IF /else statement saying that if field 5 gets filled in then Show fields 5,2,3,4 and 6 as well as Fields 1, 2,3,4 and 6 on the email back to user. I hope this makes sense. Please help. Thank you.

How to subtract positive number from negative number in an IF string

WAT — Sun, 12 Jul 2009 21:12:46 +0000

Having trouble with knowing how to subtract positive from negative numbers in an IF formula. Also want to add a conditional formatting for all negative time in column H.

Using ‘IF’ statements in query/400

HTLFTMP — Wed, 24 Jun 2009 20:02:58 +0000

I need to create a work field that will be populated differently, dependin on a series of ‘If’ statements. Ex: If TMRPER = ‘M’, use TMRFRQ value. If TMRPER = ‘D’, then use TMRFRQ divided by 30, rounded to the nearest whole number. Any idea how to do this?

If Statement isn’t evaluating out correctly

Rbrown38059 — Tue, 21 Apr 2009 20:00:00 +0000

I am trying to learn VB.Net using VB Studio 2005 Express edition and a pretty good text book. I thought I was beginning to understand concepts until this exercise came up – now I wonder… No matter what value I put into txtOrderTotal.Text, I get the same dDiscountTotal… This is ‘hand-fed’ code that is directly entered from the textbook (and I verified accuracy). Is it maybe something to do with the text-to-decimal change? Here is the code:

Dim dOrderTotal As Decimal
Dim dDiscountPct As Decimal
Dim dDiscountAmount As Decimal
Dim dInvoiceTotal As Decimal

dOrderTotal = txtOrderTotal.Text
If dOrderTotal >= 500 Then
dDiscountPct = 0.2
ElseIf dOrderTotal >= 250 And dOrderTotal < 500 Then
dDiscountPct = 0.15
ElseIf dOrderTotal >= 100 And dOrderTotal < 250 Then
dDiscountPct = 0.1
Else
dDiscountPct = 0
End If
dDiscountAmount = dOrderTotal * dDiscountPct
dInvoiceTotal = dOrderTotal – dDiscountAmount

lblDiscountAmount.Text = dDiscountAmount
lblInvoiceTotal.Text = dInvoiceTotal
txtOrderTotal.Focus()

Thanks in advance for any assistance,
R Brown