Still celebrating National IT Professionals Day with 3 months of free Premium Membership. Use Code ITDAY17

x
?
Solved

How to do a between in script <>??

Posted on 2003-11-13
14
Medium Priority
?
222 Views
Last Modified: 2013-12-18
Hi All
I have the requirement of Using the CarriedOver days  before July, the carried over value is between 1 and 5. If the person is requesting time off prior to June and they are requesting more days than is in the CarriedOver then the balance of the days would come from there allowd Holidays
If Carried over is 0 then it comes right off the holidays

E.g.

I have 15 days holiday and 4 carried over this =19
It is prior to June and I take 7 days holiday
The carriedover field loses it 4 and the Total field loses 7

Now here is where it gets tricky if the Approved vacation is cancelled I have to repoulate the fields to the value prior to approval

Carried over gets back 4 and total gets seven

This so the managers can track the carried over days and make sure they are used first.

Here is what I have so far

If doc.CarriedOverAH(0)= note.NewDaysTotal(0) Then
doc.CarriedOverAH = doc.CarriedOverAH(0) - note.NewDaysTotal(0)
doc.TotalDaysOffCalc = note.TotalDaysOff(0)
doc.RemainingCalc = doc.TotalAH(0) - doc.TotalDaysOffCalc(0)


The If statment should read something like

If doc.CarriedOverAH(0)is between 1 and 5 and If note.type(0) = "Vac" And  Month(note.StartDate(0)) < 6 Then
doc.CarriedOverAH = doc.CarriedOverAH(0) -between 1 and 5
doc.TotalDaysOffCalc = note.TotalDaysOff(0)
doc.RemainingCalc = doc.TotalAH(0) - doc.TotalDaysOffCalc(0)


Regards

James

0
Comment
Question by:adspmo
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 6
  • 5
  • 3
14 Comments
 
LVL 31

Assisted Solution

by:qwaletee
qwaletee earned 400 total points
ID: 9742362
Hi adspmo,

I honstely don't know why you are doing it this way... changing the value based on the request, and changng back if request denied.  Instead, why not wait to deduct until after the request is approved?!

Anyway, here's the basic logic:

pendingCarryOver = empRecord.carryOver(0)
pendingHolidays = empRecord.holidays(0)
request.PendingCarryOver = pendingCarryOver
request.pendingHolidays = pendingHolidays
allAvailable = pendingCarryOver + pendingHolidays
requestedAmount = request.requestedAmount(0)
if requestedAmount > allAvailable Then
  'reject request as impossible?
  Exit sub
end if
remainingCarryOver = pendingCarryOver - requestedAmount
If remainingCarrOver < 0 then
  remainingHolidays = pendingHolidays + remainingCarryOver 'which is negative
  remainingCarryOver = 0
else
  remainingHolidays = pendingHolidays
end if
empRecord.carryOver = remainingCarryOver
empRecord.holidays = remainingHolidays



'to "put it back" if request is denied:
empRecord.carryOver = request.pendingCarryOver
empRecord.holidays = request.pendingHolidays

Best regards,
qwaletee
0
 

Author Comment

by:adspmo
ID: 9742381
The intent is the that request can be cancelled after it is approved
0
 
LVL 24

Accepted Solution

by:
HemanthaKumar earned 1000 total points
ID: 9742439
I believe I have already mentioned on how to accomodate the carriedover but here you are trying to release it back.. Right !

Here is something that you might want to take a look

If note.Status(0) = "Approved" and note.NewStatus(0) = "Cancel" then

if month(note.StartDate(0)) < 6 then
  doc.CarriedOverAH(0) = doc.TotalAH(0) - Here substitute the field which has total vacation reserved for that year

if doc.TotalDaysOff(0) < doc.CarriedOverAH(0) then
  doc.CarriedOverAH(0) = doc.CarriedOverAH(0) + note.TotalDaysOff(0)
else
  doc.TotalDaysOffCalc = 0
  doc.RemainingCalc = doc.TotalAH(0) + note.TotalDaysOff(0)
end if
 
end if


End if   ' satus recall


~Hemanth
0
VIDEO: THE CONCERTO CLOUD FOR HEALTHCARE

Modern healthcare requires a modern cloud. View this brief video to understand how the Concerto Cloud for Healthcare can help your organization.

 
LVL 31

Expert Comment

by:qwaletee
ID: 9742485
ANother point:

The calculation code should NOT need to account for which part of teh year it is.  Instead, you should  have some maintenance code that on July 1 at 1:00 AM, goes out and zeroes the caryyOver values.
0
 

Author Comment

by:adspmo
ID: 9742592
The requirement is quite rigid

The carried over have to be used by the end of June and this only applies if Type = "Vac"

0
 
LVL 24

Expert Comment

by:HemanthaKumar
ID: 9742719
Change this

if month(note.StartDate(0)) < 6

to

if month(note.StartDate(0)) < 6 and note.type(0) = "Vac" then
0
 
LVL 24

Expert Comment

by:HemanthaKumar
ID: 9742933
If you are looking for between function ?? It is not available rather how you do it is like this

1 < doc.CarriedOverAH(0) and doc.CarriedOverAH(0) > 5

0
 

Author Comment

by:adspmo
ID: 9743028
This is with the approved but the same question applies I would like to do a between because 0 is always less than something it should read >=1 and <=5


if month(note.StartDate(0)) < 6 and note.type(0) = "Vac" then

If note.NewDaysTotal(0)>=1 and <=5 Then
doc.TotalDaysOffCalc = note.NewDaysTotal(0) - doc.HolidaysAH(0)
doc.CarriedOverAH = doc.CarriedOverAH(0) - note.NewDaysTotal(0)

If note.NewDaysTotal(0) >doc.CarriedOverAH(0) Then

doc.TotalDaysOffCalc = note.TotalDaysOff(0)
doc.CarriedOverAH = 0
doc.RemainingCalc = doc.TotalAH(0) - doc.TotalDaysOffCalc(0)
0
 
LVL 24

Expert Comment

by:HemanthaKumar
ID: 9743138
OOps what was I thinking ?

It is

1 <= doc.CarriedOverAH(0) and doc.CarriedOverAH(0) <= 5

I don't think it is a good idea to rely on static numbers. Rather I would do a manipulation so that my carriedover is not over/under utilized.

0
 
LVL 31

Expert Comment

by:qwaletee
ID: 9743254
The requirement may be rigid, but the software design to fulfill the requirement need not be.  Overall, pardon me for saying so, but you have a poorly designed system in a number of ways, and this insistence on coding it as a "between" instead of an easily-understood logic sequence only demonstrates it further.
0
 

Author Comment

by:adspmo
ID: 9747600
Thats why I am here. I am trying to accomplish both goals.


0
 
LVL 24

Expert Comment

by:HemanthaKumar
ID: 9748063
So james, Where are we now ? Is it working or any problems ?
0
 

Author Comment

by:adspmo
ID: 9748702
I am trying to come at it from a different way. I have been asked to break it down it to multiple fields

e.g.
Alloted       Used     Remaining

This will actually make it easier to restore values if an approved leave is cancelled

Right now I am rewriting the script to accomplish this

I am sure I will be in touch later

Thanx

James
0
 
LVL 24

Expert Comment

by:HemanthaKumar
ID: 9749523
Let me suggest you something here.

Try to set raw fields/variables and not compute anything in the approval end. ComputeWithForm should do rest of its work like calculation in the leave form.

Let me explain it with eg;

Say Leave form has

Raw fields
========
TotalLeaveForYr -- 15
LeaveApproved -- varies and set from Approval form
LeaveDenied --varies and set from Approval form
UseCarried -- Flag to whether use carried or not 1-Yes, 0-No, set from Approval form.

This will be computed fields
===================
TotalLeaveTaken = TotalLeaveTaken + LeaveApproved - LeaveDenied
Carried = Default from prev yr and the calculated from this @If(UseCarried; @If(Carried >= LeaveApproved; Carried - LeaveApproved; 0); 0);
Remaining = TotalLeaveForYr + Carried - TotalLeaveTaken

This is what I was suggesting when you started of with this application. That way I don't have to maintain my complex calc in approval form.. But it always depends on you as you are the one who facing the customer.

0

Featured Post

How to Use the Help Bell

Need to boost the visibility of your question for solutions? Use the Experts Exchange Help Bell to confirm priority levels and contact subject-matter experts for question attention.  Check out this how-to article for more information.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

For users on the Lotus Notes 8 Standard client, this article provides information on checking the Java Heap size and adjusting it to half of your system RAM in attempt to get the Lotus Notes 8.x Standard client to run faster.  I've had to exercise t…
This is an old article, please see an updated version of this article, located here: http://www.experts-exchange.com/articles/23619/Notes-8-5x-Windows-7-Notes-info-and-tips.html
How to fix incompatible JVM issue while installing Eclipse While installing Eclipse in windows, got one error like above and unable to proceed with the installation. This video describes how to successfully install Eclipse. How to solve incompa…
Want to learn how to record your desktop screen without having to use an outside camera. Click on this video and learn how to use the cool google extension called "Screencastify"! Step 1: Open a new google tab Step 2: Go to the left hand upper corn…

704 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question