My client current process shift amount is prorating. Now my client requirement employee change shift (SE20321D) to normal (NSO70012) in the mid of the month employee will get shift full amount,

Question

Hi Experts,
Please help me to solve this two issues
I will give you clearly about my client requirement
in the current system (existing)  already configured  for shift allowance.
shift allowance for executive
Shift Allowance Rates
2 shift
3 shift
RM  240
RM 330
shift allowance for non executive
Shift Allowance Rates
Category 1
Category 2
2 shift
3 shift
2 shift
3 shift
RM  180
RM 280
RM 95
RM 130
they are not maintained (there is no any key)   in info type 0014 or info type 0015  they earliest hr consultant  copied to  the Shift Allowance wage types :- 5533, 5534,5535,5536,5537,5538and 5559
Note : 5533 & 5536 are for Payment.
Other wage types are for calculation purposes only.
And they modified (standard LAP9)  YAP9 (copied)  schema written pcr  for shift allowance
The pcrs are YSH1,YSH2,YSH3,YSH4,YSH5,YSH6,YSH7,YSH8,AND YSHF
1) So my actual my client requirement (Issue 1)
    In my client current process shift amount is prorating.   Now my client requirement  employee change shift (SE20321D)   to normal (NSO70012) in the mid of the month
employee will get shift  full amount
2) client requirement (Issue 2)     Shift Allowance become prorate if the Action (Info type 0000)  in the same month have changes. (Depand the action type)
Actions are
WA,WB,WC,WD,WE,WF,WG,WH,WI,WJ,WK,WL,WM,WN,WO,WP
XO,X1,X2,X3,X4,X5,X6,X7,X8,X9.
XA,XB,XC,XD,XE,XF,XG,XH,XI,XJ,XK,XL,XM,XN,XP,XQ,XR,XS,XT,XW,XX,XY,XZ.
Y0,Y1,Y2,Y3,Y4,Y5,Y6,Y7
YA,YB,YC,YD,YE,YF,YG,YH,YI,YJ,YK,YL,YM,YN,YP,YQ,YU,YV,YW,YX,YY,YZ
Z9,ZY
Example
in same month employee changed action on 20.07.2014
Kindly help me to solve this issues  feel very happy for your help.and if you need any information about issue please let me know i will share to you.
Thank you
Raamarao

Answer 1

Try this, it works very well for me.
import XMonad.Hooks.ManageHelpers (composeOne, isFullscreen, isDialog, doFullFloat, doCenterFloat)
myManageHook = composeAll. concat $
[ [ className =? c --> doCenterFloat| c <- floats]
, [ resource =? r --> doIgnore | r <- ignore]
, [ resource =? "gecko" --> doF (W.shift "net") ]
, [ isFullscreen --> doFullFloat]
, [ isDialog --> doCenterFloat]]
where floats = ["sdlpal", "MPlayer", "Gimp", "qemu-system-x86_64", "Gnome-typing-monitor", "Vlc", "Dia", "DDMS", "Audacious", "Wine"]
ignore = []
myLayout = tall ||| Mirror tall||| Full ||| tab ||| float
where
tall = named "Tall" $ limitWindows 4 $ minimize $ Tall 1 (3/100) (1/2)
tab = named "Tab" simpleTabbedBottom
float = named "Float" simpleFloat
main = do
myStatusBarPipe <- spawnPipe myBar
conkyBarProc <- spawnPipe conkyBar
trayproc <- spawnPipe myTrayer
xmonad $ ewmh $ withUrgencyHook NoUrgencyHook $ defaultConfig {
terminal = "urxvt"
, manageHook = manageDocks <+> myManageHook <+> manageHook defaultConfig
Last edited by helloworld1 (2012-08-14 05:20:56)