Urgent: need threadsafe replacement for malloc

Hi,
I have a native library that is using GetDirectBufferAddress to create large chunks
within the java memory model that I can use to subdivide and alloc from
in the native code instead of using malloc. However, there are multiple threads
using these chunks so I need a locking mechanism.
The problem is that MonitorEntry/MonitorExit takes 250 nanoseconds, which is
a huge price to pay for allocation and free, total = 500. My question is can I
do whatever malloc does in the GNU library to make itself immune to jvm
thread context switches, especially on multiple cpu machines. Spin locks,
openmp mutexes? Does anyone know how malloc is made threadsafe to
be ok to use within a JNI library? And how I can get my hands on the
necessary code.
Thanks,
Andy

Greetings Folks,
Like the original poster I am trying to back up my HD info. Got the exact same error message and code:
"The operation cannot be completed because one or
more required items cannot be found.
(Error code -43).
Could not open the data fork of "<unable to get file path>" (-43)."
I was able to trace the error code down on Apple's Support site under the heading: Mac OS X, Mac OS X Server: "Error -43" When Using Windows File Sharing (SMB). Yay...except I have never used Windows file sharing and can't figure how this pertains to my problem.
I did type
in the "<unable to get file path>" into spotlight and
got several hits:
Documents:
core.html.html
windows.html.html
ssl_faq.html
PDF Documents:
About Xcode Tools.pdf
I deleted the "Documents" files (same ones as OP) that came up when I searched <unable to get file path> Was this an oops?
Anyway, the disc was only 50% complete. I got a
"closing session 1" window and that stayed active on
the desktop for a few minutes and then the dvd just
spit out. I put the dvd back in to see what was on it
and didn't even open for a minute or two, just heard
some clicking sounds from the drive and never got a
disc icon on the desktop to even look at what was on
the dvd. I gave it another try but sam thing
happened.
Same thing happened here. I would really like to back up my files. I have already trashed several DVDs in my unsuccessful attempts.
I don't see any replies to the OP--is there anyone with a few cogent thoughts on all this out there? The same thing has now happened to at least 2 Mac users, which makes it seem a lot less like it's all in my head.
Thank you many times over.
iMac G5 2GHz PPC   Mac OS X (10.4.7)   still miss my Indigo G3

Similar Messages

  • I need a Replacement for my Radeon9600

    I am getting pixels on my desktop and it looks like my Radeon9600 has gone awry.I would like to replace it and upgrade with a better card.I have a 2004 G5 (7,2) and I need advice as to the best card for it.I am using a 25" Cinema Display. Any advice would be appreciated.

    Hi-
    A new, bulk card will be without packaging.
    Although new AGP cards are rare, they do, from time to time, show up.
    New Mac OEM Mac cards are the rarest, but not unheard of.
    Old stock coming out of the dark recesses of someone's warehouse isn't inconceivable.
    In this case, old computer stock may be the source.
    Recently, I have seen new, boxed G4 MDD and Quicksilver machines for sale. Also, brand new 23" Apple Cinema Displays (in box) for sale.
    Used cards are by far, the most common cards available.
    Of note, there have been NO new Mac Geforce cards to surface in years.
    There have been new ATI cards on the market recently.
    New Radeon 9800 Pro and new X800 pro cards are to be found for the PC market.
    I recently purchased a very rare, new ATI X800 FireGL, which is now flashed for Mac.
    It is a bulk card, no packaging, but has a 2/2010 date of service tag on it for warranty purposes.
    Dual DVI, one dual link..... sweet!
    And, YES, the X800XT will smoke the Radeon 9600.
    Totally different cards.
    OpenGL performance alone is over 3x that of the 9600.

  • Urgent need of code for abap hr program

    Hi,
    Can any one provide with coding to calculate the leave balance  for employee
    for a given period. Its very urgent.
    Thanks in advance,
    Subha

    Hi
    See this sample code for calculation of absence quota
    using 2001 and 2006 infotypes
    make changes as per your requirement
    REPORT zh_absence_quota
           NO STANDARD PAGE HEADING
           MESSAGE-ID zh_msg
           LINE-SIZE 169
           LINE-COUNT 60(1).
                   T A B L E S  D E C L A R A T I O N S
    TABLES:    pernr,    " Logical PNP
               t001p,    " Personnel Subarea
               t529u,    " Employment Status
               t500p,    " Personnel Area
               t501,     " Employee Group
               t503k,    " Employee Subgroup
               t549a,    " Payroll Area
               t554s,    " Absence Type
               t554t,    " Absence Type Texts
               t556a,    " Quota Type
               t527x,    " Orgn. Unit
               t556b,    " Quota Type Text
               pa0003.   " Payroll Status
    INFOTYPES:
               0000,   " Actions
               0001,   " Organizational Assignment
               2006,   " Absence Quota
               2001.   " Absences
                   T Y P E S  D E C L A R A T I O N S
    Employee Absence Structure
    TYPES: BEGIN OF s_2001,
             pernr TYPE persno,       " Personal Number
             awart TYPE awart,        " Absence Type
             subty TYPE subty,        " Sub Type
             endda TYPE endda,        " End date
             begda TYPE begda,        " Begin date
             abrtg TYPE abrtg,        " Absence days
             ename TYPE emnam,        " employee Name
             atext TYPE abwtxt,       " Absence Type Text
           END OF s_2001.
    Employee Absence Quota Structure
    TYPES: BEGIN OF s_2006,
             pernr TYPE persno,       " Personal Number
             ktart TYPE abwko,        " Absence Quota Type
             year(4) TYPE n,          " Year
             subty TYPE subty,        " Sub Type
             endda TYPE endda,        " End date
             begda TYPE begda,        " Begin date
             anzhl TYPE ptm_quonum,   " Absence Entitlement days
             ename TYPE emnam,        " employee Name
             ktext TYPE kotxt,        " Absence Type Text
             kverb TYPE kverb,        " Deduction Quota days
             anzhb TYPE ptm_quonum,   " Balance days
           END OF s_2006.
    Combined Employee Absence and Quota Structure
    TYPES: BEGIN OF s_rep,
             pernr TYPE persno,       " Personal Number
             ktart TYPE abwko,        " Absence Quota Type
             year(4) TYPE n,          " Year
             anzhl TYPE ptm_quonum,   " Absence Entitlement days
             kverb TYPE kverb,        " Deduction Quota days
             anzhb TYPE ptm_quonum,   " Balance days
             ktext TYPE kotxt,        " Quota Type Text
             awart TYPE awart,        " Absence Type
             abrtg TYPE abrtg,        " Absence days
             ename TYPE emnam,        " employee Name
             atext TYPE abwtxt,       " Absence Type Text
             endda TYPE endda,        " End date
             begda TYPE begda,        " Begin date
           END OF s_rep.
    Declaration of Variables
    DATA : gv_atext TYPE abwtxt,              " Absence Type Text
           gv_ktext TYPE kotxt,               " Absence Type Text
           gv_title1   TYPE sylisel,          " Report title
           gv_year(4)  TYPE c,                " Year
           gv_mon(2)   TYPE c,                " Month
           gv_hrs    TYPE abwtg,              " Hours
           gv_date   TYPE sydatum,            " Date
           gv_date1  TYPE sydatum,            " Date
           gv_dial.                           " Color flag
    Declaration of Constants
    CONSTANTS :
      c_x      TYPE c VALUE 'X',               " Sign
      c_1      TYPE persg   VALUE '1',         " Emp Group
      c_pernr(8) TYPE n VALUE '00000000',      " Pernr
      c_moabw  TYPE moabw   VALUE '01',        " Per SA Grouping
      c_mozko  TYPE mozko   VALUE '01',        " Per SA Grouping
      c_mopgk  TYPE mopgk   VALUE '1',         " Emp SGrp Grouping
      c_endda  TYPE sydatum VALUE '99991231',  " End Date
      c_val1(2) TYPE c VALUE '31',             " Date Type
      c_val2(2) TYPE c VALUE '12',             " Date Type
      c_val    LIKE p0041-dar01 VALUE '01',    " Date Type
      c_date1  LIKE sy-datum VALUE '18000101'. " Date
         I N T E R N A L  T A B L E S  D E C L A R A T I O N S
    DATA: i_2001 TYPE STANDARD TABLE OF s_2001 WITH HEADER LINE,
          i_2006 TYPE STANDARD TABLE OF s_2006 WITH HEADER LINE,
          i_rep1 TYPE STANDARD TABLE OF s_2006 WITH HEADER LINE,
          i_rep  TYPE STANDARD TABLE OF s_rep WITH HEADER LINE.
                     S E L E C T I O N  S C R E E N
    SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
    SELECT-OPTIONS: s_ktart FOR t556a-ktart,  " Absence Quota Type
                    s_awart FOR t554s-subty.  " Absence Type
    SELECTION-SCREEN END OF BLOCK b1.
    SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-002.
    SELECTION-SCREEN BEGIN OF LINE.
    SELECTION-SCREEN COMMENT 1(33) text-003.   " Quota & Absence
    PARAMETERS: p_qa RADIOBUTTON GROUP rb1.
    SELECTION-SCREEN END OF LINE.
    SELECTION-SCREEN BEGIN OF LINE.
    SELECTION-SCREEN COMMENT 1(33) text-004.   " Quota
    PARAMETERS: p_q RADIOBUTTON GROUP rb1.
    SELECTION-SCREEN END OF LINE.
    SELECTION-SCREEN BEGIN OF LINE.
    SELECTION-SCREEN COMMENT 1(33) text-005.   " Absence
    PARAMETERS: p_a RADIOBUTTON GROUP rb1.
    SELECTION-SCREEN END OF LINE.SELECTION-SCREEN END OF BLOCK b2.
                      I N I T I A L I Z A T I O N                        *
    INITIALIZATION.
                  A T  S E L E C T I O N - S C R E E N                   *
    AT SELECTION-SCREEN.
    Validate the screen fields
      PERFORM validate_screen.
                   S T A R T - O F - S E L E C T I O N                   *
    START-OF-SELECTION.
    Selection of Period
      PERFORM get_period.
    Get PERNR from LDB
    GET pernr.
      IF p0000-stat2 <> '0'.
    Get the data from PA0001,PA2001, PA2006
        PERFORM get_pers_data.
      ENDIF.
                   T O P - O F - P A G E                                 *
    TOP-OF-PAGE.
    Header of the List
      PERFORM header.
                   E N D - O F - P A G E                                 *
    Footer
    END-OF-PAGE.
      IF p_qa = c_x.
    Display both Absence and Quota Data
        WRITE /1(188) sy-uline.
      ELSEIF p_q = c_x.
    Display only Quota Data
        WRITE /1(114) sy-uline.
      ELSEIF p_a = c_x.
    Display only Absence Data
        WRITE /1(125) sy-uline.
      ENDIF.
                   E N D - O F - S E L E C T I O N                       *
    END-OF-SELECTION.
    Combine the Absence and Quota Data
      PERFORM append_data.
      IF p_qa = c_x.
    Display both Absence and Quota Data
        PERFORM display_qa_data.
      ELSEIF p_q = c_x.
    Display only Quota Data
        PERFORM display_q_data.
      ELSEIF p_a = c_x.
    Display only Absence Data
        PERFORM display_a_data.
      ENDIF.
    *&      Form  validate_screen
    Validation of Selection Screen fields
    FORM validate_screen .
    Validation of Personnel Number
      CLEAR pa0003.
      IF NOT pnppernr[] IS INITIAL.
        SELECT pernr
        FROM pa0003 UP TO 1 ROWS
          INTO pa0003-pernr
          WHERE pernr IN pnppernr.
        ENDSELECT.
        IF sy-subrc <> 0.
          MESSAGE e999 WITH 'Incorrect Personnel Number'(006).
        ENDIF.
      ENDIF.
    Validation of Employee Status
      CLEAR t529u.
      IF NOT pnpstat2[] IS INITIAL.
        SELECT SINGLE statv
          INTO t529u-statv
          FROM t529u
          WHERE statv IN pnpstat2 AND
                statn = '2' AND
                sprsl = sy-langu.
        IF sy-subrc <> 0.
          MESSAGE e999 WITH 'Invalid Employee Status'(007).
        ENDIF.
      ENDIF.
    Validation of Personnel Area
      CLEAR t500p.
      IF NOT pnpwerks[] IS INITIAL.
        SELECT persa
        FROM t500p UP TO 1 ROWS
          INTO t500p-persa
          WHERE persa IN pnpwerks.
        ENDSELECT.
        IF sy-subrc <> 0.
          MESSAGE e999 WITH 'Incorrect Personnel Area'(008).
        ENDIF.
      ENDIF.
    Validation of Personnel Sub Area
      CLEAR t001p.
      IF NOT pnpbtrtl[] IS INITIAL.
        SELECT btrtl
        FROM t001p UP TO 1 ROWS
          INTO t001p-btrtl
          WHERE btrtl IN pnpbtrtl.
        ENDSELECT.
        IF sy-subrc <> 0.
          MESSAGE e999 WITH 'Incorrect Personnel Sub Area'(009).
        ENDIF.
      ENDIF.
    Validation of Employee Group
      CLEAR t501.
      IF NOT pnppersg[] IS INITIAL.
        SELECT persg
        FROM t501 UP TO 1 ROWS
          INTO t501-persg
          WHERE persg IN pnppersg.
        ENDSELECT.
        IF sy-subrc <> 0.
          MESSAGE e999 WITH 'Incorrect Employee Group'(010).
        ENDIF.
      ENDIF.
    Validation of Employee Sub Group
      CLEAR t503k.
      IF NOT pnppersk[] IS INITIAL.
        SELECT persk
        FROM t503k UP TO 1 ROWS
          INTO t503k-persk
          WHERE persk IN pnppersk.
        ENDSELECT.
        IF sy-subrc <> 0.
          MESSAGE e999 WITH 'Incorrect Employee Sub Group'(011).
        ENDIF.
      ENDIF.
    Validation of Payroll Area
      CLEAR t549a.
      IF NOT pnpabkrs[] IS INITIAL.
        SELECT abkrs
        FROM t549a UP TO 1 ROWS
          INTO t549a-abkrs
          WHERE abkrs IN pnpabkrs.
        ENDSELECT.
        IF sy-subrc <> 0.
          MESSAGE e999 WITH 'Incorrect Employee Payroll Area'(026).
        ENDIF.
      ENDIF.
    Validation of Absence Type
      CLEAR t554s.
      IF NOT s_awart[] IS INITIAL.
        SELECT subty
        FROM t554s UP TO 1 ROWS
          INTO t554s-subty
          WHERE subty IN s_awart AND
                moabw EQ c_moabw AND
                endda EQ c_endda.
        ENDSELECT.
        IF sy-subrc <> 0.
          MESSAGE e999 WITH 'Incorrect Employee Absence Type'(012).
        ENDIF.
      ENDIF.
    Validation of Absence Quota Type
      CLEAR t556a.
      IF NOT s_ktart[] IS INITIAL.
        SELECT ktart
        FROM t556a UP TO 1 ROWS
          INTO t556a-ktart
          WHERE ktart IN s_ktart AND
                mopgk EQ c_mopgk AND
                mozko EQ c_mozko AND
                endda EQ c_endda.
        ENDSELECT.
        IF sy-subrc <> 0.
          MESSAGE e999 WITH 'Incorrect Employee Quota Type'(013).
        ENDIF.
      ENDIF.
    ENDFORM.                  "validate_screen
    *&      Form  get_period
    Get the Correct Period based on Selection screen selection
    FORM get_period.
      CLEAR: gv_year,gv_mon, gv_date, gv_date1.
      gv_year = sy-datum+0(4).
      gv_mon  = sy-datum+4(2).
      IF pnptimr1 = c_x.      " Current Date
        pnpbegda = sy-datum.
        pnpendda = sy-datum.
      ELSEIF pnptimr2 = c_x.  " Current Month
        CONCATENATE gv_year gv_mon c_val INTO gv_date.
        CONCATENATE gv_year gv_mon c_val1 INTO gv_date1.
        pnpbegda = gv_date.
        pnpendda = gv_date1.
      ELSEIF pnptimr3 = c_x.  " Current Year
        CONCATENATE gv_year c_val c_val INTO gv_date.
        CONCATENATE gv_year c_val2 c_val1 INTO gv_date1.
        pnpbegda = gv_date.
        pnpendda = gv_date1.
      ELSEIF pnptimr4 = c_x.  " Upto Today
        pnpbegda = c_date1.
        pnpendda = sy-datum.
      ELSEIF pnptimr5 = c_x.  " From Today
        pnpbegda = sy-datum.
        pnpendda = c_endda.
      ELSE.
        IF ( pnpbegda IS INITIAL AND pnpendda IS INITIAL ).
          pnpbegda = c_date1.
          pnpendda = c_endda.
        ELSEIF pnpbegda IS INITIAL AND NOT pnpendda IS INITIAL.
          pnpbegda = c_date1.
          pnpendda = pnpendda.
        ELSEIF NOT ( pnpbegda IS INITIAL AND pnpendda IS INITIAL ).
          pnpbegda = pnpbegda.
          pnpendda = pnpendda.
        ENDIF.
      ENDIF.
    ENDFORM.              "get_period
    *&      Form  get_pers_data
    Get the Absence and Quota Data from PA0001,PA2001,PA2006
    FORM get_pers_data.
      DATA: lv_year1(4) TYPE n,
            lv_year2(4) TYPE n,
            lv_date1 TYPE sydatum,
            lv_date2 TYPE sydatum,
            lv_anzhb TYPE ptm_quonum.   " Last Year Balance days
    Get data from Respective Infotypes
      rp_provide_from_last p0001 space pnpbegda pnpendda.
    Absence Data
      LOOP AT p2001 WHERE pernr = pernr-pernr AND
                          begda GE pnpbegda   AND
                          endda LE pnpendda.
        IF p2001-awart IN s_awart.
          i_2001-pernr    = pernr-pernr.
          i_2001-subty    = p2001-subty.
          i_2001-awart    = p2001-awart.
          i_2001-abrtg    = p2001-abrtg.
          i_2001-begda    = p2001-begda.
          i_2001-endda    = p2001-endda.
          READ TABLE p0001 WITH KEY pernr = p2001-pernr.
          i_2001-ename    = p0001-ename.
    Get the Absence Type Text
          CLEAR gv_atext.
          SELECT SINGLE atext INTO gv_atext FROM t554t
                  WHERE sprsl = sy-langu AND
                        moabw = c_moabw  AND
                        awart = p2001-awart.
          IF sy-subrc = 0.
            i_2001-atext = gv_atext.
          ENDIF.
          APPEND i_2001.
          CLEAR i_2001.
        ENDIF.
      ENDLOOP.
    Quota Data
      LOOP AT p2006 WHERE pernr = pernr-pernr AND
                          begda GE pnpbegda   AND
                          endda LE pnpendda.
        IF p2006-ktart IN s_ktart.
          i_2006-pernr    = pernr-pernr.
          i_2006-subty    = p2006-subty.
          i_2006-begda    = p2006-begda.
          i_2006-endda    = p2006-endda.
          i_2006-year     = p2006-endda+0(4).
          i_2006-ktart    = p2006-ktart.
          i_2006-anzhl    = p2006-anzhl.
          i_2006-kverb    = p2006-kverb.
          i_2006-anzhb    = p2006-anzhl - p2006-kverb.
          READ TABLE p0001 WITH KEY pernr = p2001-pernr.
          i_2006-ename    = p0001-ename.
    Get the Quota Type Text
          CLEAR gv_ktext.
          SELECT SINGLE ktext INTO gv_ktext FROM t556b
                  WHERE sprsl = sy-langu AND
                        mopgk = c_mopgk  AND
                        mozko = c_mozko  AND
                        ktart = p2006-ktart.
          IF sy-subrc = 0.
            i_2006-ktext = gv_ktext.
          ENDIF.
          APPEND i_2006.
          CLEAR i_2006.
        ENDIF.
      ENDLOOP.
    For Vacation Quota (80) get the Balance of the Last Year and
    add to the Current Year Quota
      LOOP AT i_2006.
        IF i_2006-ktart = '80'.
          lv_year1 = i_2006-endda+0(4).
          lv_year2 = lv_year1 - 1.
          CONCATENATE lv_year2 '01' '01' INTO lv_date1.
          CONCATENATE lv_year2 '12' '31' INTO lv_date2.
          LOOP AT p2006 WHERE pernr = i_2006-pernr AND
                              begda GE lv_date1    AND
                              endda LE lv_date2    AND
                              ktart = '80'.
            lv_anzhb = p2006-anzhl - p2006-kverb.
            i_rep1-pernr = i_2006-pernr.
            i_rep1-ktext = i_2006-ktext.
            i_rep1-anzhl = p2006-anzhl.
            i_rep1-kverb = p2006-kverb.
            i_rep1-ename = i_2006-ename.
            i_rep1-begda = p2006-begda.
            i_rep1-endda = p2006-endda.
            i_rep1-anzhb = lv_anzhb.
            i_rep1-ktart = '80'.
            i_rep1-year = lv_year2.
            APPEND i_rep1.
            CLEAR: i_rep1.
          ENDLOOP.
        ENDIF.
        CLEAR: lv_year1, lv_year2,
               lv_date1, lv_date2,lv_anzhb.
      ENDLOOP.
      SORT i_rep1 BY pernr ktart.
    ENDFORM.          "get_pers_data
    *&      Form  append_data
    Put the Absence and Quota Data into one Report Int Table
    FORM append_data.
      CLEAR:   i_rep.
      REFRESH: i_rep.
      SORT i_2001 BY pernr awart.
      SORT i_2006 BY pernr ktart year.
    Move I_REP1 data into i_2006
      LOOP AT i_rep1.
        MOVE-CORRESPONDING i_rep1 TO i_2006.
        APPEND i_2006.
        CLEAR  i_2006.
      ENDLOOP.
    Move the Absence and Quota Data into a final Int Table
      LOOP AT i_2006.
        i_rep-pernr = i_2006-pernr.
        i_rep-ename = i_2006-ename.
        i_rep-ktart = i_2006-ktart.
        i_rep-anzhl = i_2006-anzhl.
        i_rep-kverb = i_2006-kverb.
        i_rep-ktext = i_2006-ktext.
        i_rep-anzhb = i_2006-anzhb.
        i_rep-year  = i_2006-year.
        CLEAR i_2001.
        CASE i_2006-ktart.
          WHEN '81'.
            PERFORM get_2001 USING i_2006-pernr '1000' i_2006-year.
          WHEN '50'.
            PERFORM get_2001 USING i_2006-pernr '1002' i_2006-year.
          WHEN '80'.
            PERFORM get_2001 USING i_2006-pernr '1001' i_2006-year.
          WHEN '56'.
            PERFORM get_2001 USING i_2006-pernr '1003' i_2006-year.
          WHEN '51'.
            PERFORM get_2001 USING i_2006-pernr '1004' i_2006-year.
          WHEN '52'.
            PERFORM get_2001 USING i_2006-pernr '1005' i_2006-year.
          WHEN '54'.
            PERFORM get_2001 USING i_2006-pernr '1006' i_2006-year.
          WHEN '53'.
            PERFORM get_2001 USING i_2006-pernr '1007' i_2006-year.
          WHEN '55'.
            PERFORM get_2001 USING i_2006-pernr '1008' i_2006-year.
          WHEN '57'.
            PERFORM get_2001 USING i_2006-pernr '1009' i_2006-year.
          WHEN '90'.
            PERFORM get_2001 USING i_2006-pernr '2000' i_2006-year.
          WHEN '58'.
            PERFORM get_2001 USING i_2006-pernr '2001' i_2006-year.
          WHEN '59'.
            PERFORM get_2001 USING i_2006-pernr '2002' i_2006-year.
          WHEN '91'.
            PERFORM get_2001 USING i_2006-pernr '2003' i_2006-year.
        ENDCASE.
        IF sy-subrc <> 0.
          APPEND i_rep.
        ENDIF.
        CLEAR i_rep.
      ENDLOOP.
      SORT i_rep BY pernr ktart year.
      DELETE i_rep WHERE pernr = ' '.
    ENDFORM.              " append_data
    *&      Form  display_qa_data
    Display the Absence and Quota Data
    FORM display_qa_data.
      DATA: lv_flag,                   " New Flag
            lv_tot2 TYPE ptm_quonum.   " Absence Balance days
      IF i_rep[] IS INITIAL.
        MESSAGE i000 WITH 'No Data found'(014).
      ELSE.
        LOOP AT i_rep.
    toggle color
          PERFORM toggle_color.
          IF lv_flag <> space.
            NEW-LINE.
          ENDIF.
          AT NEW pernr.
            READ TABLE i_rep INDEX sy-tabix.
            WRITE:/1 sy-vline,2(8) i_rep-pernr,
              10 sy-vline,11(40)   i_rep-ename.
          ENDAT.
          AT NEW ktart.
            READ TABLE i_rep INDEX sy-tabix.
            WRITE: 1 sy-vline, 10 sy-vline,
              51 sy-vline,52(25)   i_rep-ktext.
          ENDAT.
          AT NEW year.
            READ TABLE i_rep INDEX sy-tabix.
            WRITE: 1 sy-vline, 10 sy-vline,
                  51 sy-vline,
                  77 sy-vline, 78(4)  i_rep-year,
                  82 sy-vline, 83(11) i_rep-anzhl,
                  94 sy-vline, 95(25) i_rep-atext,
                 120 sy-vline,133 sy-vline,
                 144 sy-vline,
                 155 sy-vline,156(13)  i_rep-anzhb,
                 169 sy-vline.
          lv_tot2 = lv_tot2 + i_rep-anzhb.
          ENDAT.
          WRITE: 1 sy-vline,  10 sy-vline,
                51 sy-vline,  77 sy-vline,
                82 sy-vline,  94 sy-vline,
               120 sy-vline,121(12)  i_rep-abrtg NO-ZERO,
               133 sy-vline,134(10)  i_rep-begda NO-ZERO,
               144 sy-vline,145(10)  i_rep-endda NO-ZERO,
               155 sy-vline,169 sy-vline.
          NEW-LINE.
          AT END OF pernr.
            WRITE  : /1(169) sy-uline.
            SUM.
            FORMAT COLOR 3.
            WRITE:/1 sy-vline,   10 sy-vline,
                  51 sy-vline,   77 sy-vline,
                  82 sy-vline,   94 sy-vline,
                 120 sy-vline,121(12) i_rep-abrtg,
                 133 sy-vline,144 sy-vline,
                 155 sy-vline, 156(13) lv_tot2,
                 169 sy-vline.
            FORMAT COLOR OFF.
            WRITE  : /1(169) sy-uline.
            CLEAR lv_tot2.
          ENDAT.
        ENDLOOP.
      ENDIF.
    ENDFORM.              " display_qa_data
    *&      Form  display_q_data
    Display only the Quota Data
    FORM display_q_data.
      DATA: lv_flag.               " New Flag
      SORT i_2006 BY pernr ktart year.
      IF i_2006[] IS INITIAL.
        MESSAGE i000 WITH 'No Data found'(014).
      ELSE.
        LOOP AT i_2006.
    Toggle Color
          PERFORM toggle_color.
          IF lv_flag <> space.
            NEW-LINE.
          ENDIF.
          AT NEW pernr.
            READ TABLE i_2006 INDEX sy-tabix.
            WRITE: /1 sy-vline,  2(8)  i_2006-pernr,
                   10 sy-vline,11(40)  i_2006-ename.
          ENDAT.
          AT NEW ktart.
            READ TABLE i_2006 INDEX sy-tabix.
            WRITE: 1 sy-vline,10 sy-vline,
                  51 sy-vline,52(25)  i_2006-ktext.
          ENDAT.
          AT NEW year.
            READ TABLE i_2006 INDEX sy-tabix.
            WRITE: 1 sy-vline,  10 sy-vline,
                  51 sy-vline,
                  77 sy-vline,78(4)  i_2006-year,
                  82 sy-vline,83(11) i_2006-anzhl,
                  94 sy-vline,95(13) i_2006-anzhb,
                 108 sy-vline.
            NEW-LINE.
          ENDAT.
          AT END OF pernr.
            WRITE  : /1(108) sy-uline.
            SUM.
            FORMAT COLOR 3.
            WRITE: /1 sy-vline, 10 sy-vline,
                   51 sy-vline,
                   77 sy-vline, 82 sy-vline,
                   94 sy-vline, 95(13) i_2006-anzhb,
                  108 sy-vline.
            FORMAT COLOR OFF.
            WRITE  : /1(108) sy-uline.
          ENDAT.
        ENDLOOP.
      ENDIF.
    ENDFORM.              " display_q_data
    *&      Form  display_a_data
    Display Only the Absence Quota
    FORM display_a_data.
      DATA: lv_flag.               " New Flag
      SORT i_2001 BY pernr awart.
      IF i_2001[] IS INITIAL.
        MESSAGE i000 WITH 'No Data found'(014).
      ELSE.
        LOOP AT i_2001.
    Toggle Color
          PERFORM toggle_color.
          IF lv_flag <> space.
            NEW-LINE.
          ENDIF.
          AT NEW pernr.
            READ TABLE i_2001 INDEX sy-tabix.
            WRITE: /1 sy-vline, 2(10) i_2001-pernr,
                   10 sy-vline,11(40) i_2001-ename.
          ENDAT.
          WRITE:  1 sy-vline, 10 sy-vline,
                  51 sy-vline,52(25) i_2001-atext,
                  77 sy-vline,78(12) i_2001-abrtg,
                  90 sy-vline,91(10) i_2001-begda,
                 101 sy-vline,102(10) i_2001-endda,
                 112 sy-vline.
          NEW-LINE.
          AT END OF pernr.
            WRITE  : /1(112) sy-uline.
            SUM.
            FORMAT COLOR 3.
            WRITE: /1 sy-vline, 10 sy-vline,
                   51 sy-vline,
                   77 sy-vline,78(12) i_2001-abrtg,
                   90 sy-vline,101 sy-vline,
                  112 sy-vline.
            FORMAT COLOR OFF.
            WRITE  : /1(112) sy-uline.
          ENDAT.
        ENDLOOP.
      ENDIF.
    ENDFORM.              " display_a_data
    *&      Form  header
    Write the Report Header
    FORM header .
      data : lv_pers type pbtxt,
             lv_orgn type orgtx.
      gv_title1 = sy-title.              " Set List Header
      IF p_qa = c_x.
        NEW-PAGE LINE-SIZE 193.
      ELSEIF p_a = c_x.
        NEW-PAGE LINE-SIZE 125.
      ELSEIF p_q = c_x.
        NEW-PAGE LINE-SIZE 119.
      ENDIF.
    Standard header
      FORMAT RESET.
      CALL FUNCTION 'Z_STANDARD_HEADER'
        EXPORTING
          title1 = gv_title1.
    Get the Personal Area and Org.Unit Texts
      clear : lv_pers,lv_orgn.
      select single name1 into lv_pers
        from t500p where persa = pnpwerks-low.
      select single orgtx into lv_orgn
        from t527x where sprsl = sy-langu and
                         orgeh = pnporgeh-low and
                         endda = c_endda.
      if not lv_pers is initial.
        write : /2 'Personal Area:'(017), 17(25) lv_pers color 7.
      endif.
      if not lv_orgn is initial.
        write : /2 'Organization Unit:'(021), 20(25) lv_orgn color 3.
      endif.
      IF p_qa = c_x.
        FORMAT COLOR COL_HEADING.
        WRITE  : /1(169) sy-uline.
        WRITE:/1 sy-vline,2(8)    'Emp.No'(015) CENTERED,
              10 sy-vline,11(40)  'Employee Name'(016) CENTERED,
              51 sy-vline,52(25)  'Quota Description'(018) CENTERED,
              77 sy-vline,78(4)   'Year'(027),
              82 sy-vline,83(11)  'Entitlement'(019),
              94 sy-vline,95(25)  'Absence Description'(022) CENTERED,
             120 sy-vline,121(12) 'Absence days'(023),
             133 sy-vline,134(10) 'From Date'(024),
             144 sy-vline,145(10) 'To Date'(025),
             155 sy-vline,156(13) 'Quota Balance'(020),
             169 sy-vline.
        WRITE  : /1(169) sy-uline.
      ELSEIF p_q = c_x.
        FORMAT COLOR COL_HEADING.
        WRITE  : /1(108) sy-uline.
        WRITE:/1 sy-vline,2(8)   'Emp.No'(015) CENTERED,
              10 sy-vline,11(40) 'Employee Name'(016) CENTERED,
              51 sy-vline,52(25) 'Quota Description'(018) CENTERED,
              77 sy-vline,78(4)  'Year'(027),
              82 sy-vline,83(11) 'Entitlement'(019),
              94 sy-vline,95(13) 'Quota Balance'(020),
             108 sy-vline.
        WRITE  : /1(108) sy-uline.
      ELSEIF p_a = c_x.
        FORMAT COLOR COL_HEADING.
        WRITE  : /1(112) sy-uline.
        WRITE:/1 sy-vline,2(8)    'Emp.No'(015) CENTERED,
              10 sy-vline,11(40)  'Employee Name'(016) CENTERED,
              51 sy-vline,52(25)  'Absence Description'(022) CENTERED,
              77 sy-vline,78(12)  'Absence days'(023),
              90 sy-vline,91(10)  'From Date'(024),
             101 sy-vline,102(10) 'To Date'(025),
             112 sy-vline.
        WRITE  : /1(112) sy-uline.
      ENDIF.
    ENDFORM.                    " header
    *&      Form  toggle_color
    This routine alters the color of the records in the list
    FORM toggle_color.
      IF gv_dial = space.
        FORMAT COLOR COL_NORMAL INTENSIFIED OFF.
        gv_dial = c_x.
      ELSE.
        FORMAT COLOR 1 INTENSIFIED OFF.
        CLEAR gv_dial.
      ENDIF.
    ENDFORM.                    " toggle_color
    *&      Form  get_2001
    Get the ABsence type for each Quota type
    FORM get_2001 USING p_pernr TYPE persno
                        p_value TYPE awart
                        p_year.
      LOOP AT i_2001 WHERE pernr = p_pernr AND
                           awart = p_value AND
                           endda+0(4) = p_year.
        i_rep-awart = i_2001-awart.
        i_rep-abrtg = i_2001-abrtg.
        i_rep-atext = i_2001-atext.
        i_rep-begda = i_2001-begda.
        i_rep-endda = i_2001-endda.
        APPEND i_rep.
      ENDLOOP.
    ENDFORM.                                                    " get_2001
    <b>
    Reward points for useful Answers</b>
    Regards
    Anji

  • Need a replacement for Intego Antispam since it does not work with Mountain Lion

    Any suggestion.
    Also noticed that if you have installed program that did not come from App Store it may not be able to open it due to Mountain Lion. Whats up with that

    aldonben wrote:
    Thank-you for heads up, so what your saying is all my online threw Safari is 100% protected no need for any protection other than this GateKeeper. Or is that just for my programs.
    GateKeeper is just one of the anti-malware protection features of Mountain Lion. There are others. Mountain Lion actually includes its own malware scanner too. The difference is that it doesn't check for all the millions of Windows viruses. Just keep your software updated. Mountain Lion should do that automatically.
    In the case of spam my internet provide i have email address threw them and even after turning on their filter I continue to get spam, so that why I been asking. I've been told of one today called SpamSieve.
    SPAM is more difficult. I use SpamSieve and highly recommend it.

  • I need a replacement for stolen disks.

    I purchased Adobe CS6 Creative Suit Premium Production software about 2 years ago, and I received installation discs for both Mac and PC. From what I understand each discs can install the software on up to 3 different systems a maximum of 3 times. I installed the windows disk on the same system twice, but the entire suite and all its contents were stolen out of my car about a month ago. I still have the entire suite installed on my current PC and still have yet to use the Mac disks at all. Is there a way for me to receive a replacement kit and if so will it cost me?

    Hi,
    you can download the complete suite online rather.
    Here is the download link
    http://helpx.adobe.com/x-productkb/policy-pricing/cs6-product-downloads.html
    Thank you,
    Mohd Naseem

  • MOVED: MSI TECHNICAL - URGENTLY NEED NEW BIOS FOR DIAMOND PLUS MOBO

    This topic has been moved to BIOS.
    https://forum-en.msi.com/index.php?topic=93688.0

    We are having a issue here with the Nvidia raid changing the raid from raid 0 to raid 2 all by it's self. This has happend twice now on the Diamon Plus board. We have tried all kinds of drives. Sata 1 Sata 2 from 4 companys with no change. We are also having the op system Windows give errors that I have never seen in 20 years of building computers .
      We have contacted tech support by phone and they have been great trying to help us , but to no good out come. Tech support told us here at the shop that this is an issue that they are working on and trying to find a fix.
    This board is a great gamer board if you can find a build of parts that it is stable with, but if not it is a on going problem.
    We are also getting the boot error on the Raid that you are on some systems that we build.
    I will say again that MSI tech support has been great in working with us on this, And we are also starting to see errors on systems that we put out with the Diamond Plus when the first came out for use. Systems that have been stable for about two months are starting to come back with issues with the drives and that is strange as one would think it would stay stable after this long running.
        But in looking back on what has happend , all the issues seem to be due to the Harddrives or Drive controlers.  Now that could encompass the buss or buss controler and or many other factors. But we do think the problem is with one of these.
     I use the diamond plus for my own gaming system, and it is fast. I love it and the changes I can make in the bios. But I cannot use the raid on the board . I have tired and it was not stable , and after two reloads I went to a fast 300 gig single sata drive. After that I have had no issues at all. And with this drive I am running as fast as I did with the raid. I would recomend that others take this route till a fix is found.
     

  • Urgent,need for code in bdc for co02

    hi all,
    im in urgent need of code for developing bdc tcode co02.
    Thanks for your help..

    1. Please record the transaction which you need to change the data in Co02 (Shop Order/Prod. Order)
    2. Create BDC program as normally you do it for normal BDC programs..
    Smaple Code with Recording.
    clear: bdcdata,messtab.
      perform bdc_dynpro using: 'SAPLCOKO1' '0110'.
      perform bdc_field using: 'CAUFVD-AUFNR' t_aufk-aufnr.
      perform bdc_field using: 'R62CLORD-FLG_OVIEW' 'X'.
      perform bdc_field using: 'BDC_OKCODE' '/00'.
      perform bdc_dynpro using: 'SAPLCOKO1' '0115'.
      perform bdc_field using: 'BDC_SUBSCR' 'SAPLCOKO1'.
      perform bdc_field using: 'BDC_OKCODE' '=KOWE'.
      perform bdc_dynpro using: 'SAPLCOKO1' '0115'.
      perform bdc_field using: 'BDC_SUBSCR' 'SAPLCOKO1'.
      perform bdc_field using: 'BDC_CURSOR' 'AFPOD-INSMK'.
       perform bdc_field using: 'AFPOD-INSMK' 'S'.
      perform bdc_field using: 'BDC_OKCODE' '=BU'.
      call transaction 'CO02' using bdcdata mode 'A'
                                            update 'S'
                                            messages into messtab.
    Thanks,

  • Replacement For Not Exists operator in oracle

    Hi Guys,
    I need a replacement for the statement " Where NOT EXISTS (SELECT 'X' FROM ADM_SC_SHIPPING_HEADER_FACT WHERE prod_obj = s.prod_obj AND sc_shipping_doc_num = s.sc_shipping_doc_num AND TO_NUMBER (transportation_status) > TO_NUMBER (s.transportation_status))".
    i am getting an error"literal doesnot match the formatting string" when this statement is included in my procedure.
    Please help me out..
    Thanks in advance.

    1007699 wrote:
    There is no problem with Transportation_status. It is a varchar and it's been converted to number using To_Number .There very likely IS a problem with transportation_status.
    It's supposed to be a number and you're trying to convert it to a number using to_number(), but the error message you're getting implies that there's a value in that column that isn't a valid number.
    If it's not that field, then there must be some othe implicit type conversion going on with one of the other columns in your subquery - 'cos that's what that error message means: "I'm trying to convert from one datatype to another, but it's not in the format I expect".
    Either fix your data to conform to the proper format, or explicitly specify a format that describes your data, or (best of all) use a proper and consistent datatype for your columns. If transportation_status is a number, why store it in a varchar2 column?

  • Iphone Replacement for baseband Issues

    Hello every one this is my first question here ... Since I am in Egypt and we don't have authorized Applecare/store here I would like to know if there is any issues in my iphone and it's no longer in the warranty,I had a hardware issue (No IMEI/Firmware Blank),  that might need a replacement for the phone by paying about 159$ difference (as I heard) ... if the iphone has been fixed before this issue (No IMEI,Firmware Blank) occured since the battery needed to be replaced .... Would I be able to do the replacement for the Iphone itself from apple event it's fixed before from another third party ??
    I am using Iphone 5 ios 7.1.1

    If a third party opened the device, Apple will not service or replace the device any longer even as the advertised discounted prices.  If they did, this would require them to warrant your device for someone else's work, which they will not do, so in your case, you will only have third party options for service at this point, or you can purchase a new phone.

  • Urg: Need to replace standard hierarchy with alt hierarchy

    Hi,
    I have an urgent need to replace the cost center standard hierarchy with the Alternative hierarchy already available. I dont have Business organization implemented so I cannot use Keog3...I need to know if there is any other way..
    this is super urgent...please help...

    Hi i am a student could you please answer
    what is an alternate hierarchy and when do we use it
    Thanks

  • Replacement for LOCAL

    Hi,
        I need the replacement for the keyword LOCAL......
    some how i found the replacement (by my own) but it is not working properly...
    the replacement is data declaration for the local...
    Example program for local...
    REPORT  ZTEST_LOCAL_EXAMPLE.
    DATA text TYPE string VALUE 'Global text'.
    WRITE / text.          " Global text
    PERFORM subr1.
    WRITE / text.          " Global text
    FORM subr1.
      LOCAL text.
    *data text type string.                     "replacement for local
      text = 'Text in subr1'.
      WRITE / text.
      PERFORM subr2 USING text.
      WRITE / text.
    ENDFORM.
    FORM subr2 USING para TYPE string.
      LOCAL para.
      para = 'Text in subr2'.
      WRITE / text.
    ENDFORM.
    Here it is local statement and the replacement statement... but the replacement is not working properly....
    Thanks
    vishnu. R

    Output
    Global text    
    Text in subr1  
    Text in subr2  
    Text in subr1  
    Global text    
    Output with replacement
    Global text     
    Text in subr1   
    Global text     
    Text in subr1   
    Global text     
    Looks fine to me.  What do you expect?
    matt

  • Windows Media Centre - Windows Media Foundation - Windows Apps. Replacement for WMC

    Still looking for a PVR replacement but DVBLogic looks like it might do the job.
    Have gone down the Plex Windows App route (The clostest replacement to WMC player so far) but they are saying they are hamstrung by limitations of the App sandbox? and Windows Media Foundation.
    I need some concrete information from the Windows Media Centre People or Windows Media Foundation people so that developers can be steered in the right direction to help people like me switch over from WMC to something else without major headaches, frustrations,
    days and days of conversion and metadata reentry.
    My post from Microsoft Community
    Hi,
    Since Windows Media Centre almost didn't make it into Windows 8 I have been looking to move to something else before it disappears for good.
    While it might just make it into Windows 10 there certainly won't be any future development.
    I not a big fan of Microsoft products but WMC is one application they nailed
    Some additional smart recording options
    i.e. I had to add "The Big Bang Theory - Return", "The Big Bang Theory - New", "The Big Bang Theory - Finale" etc to my series recording
    A proper library manager (Plex does a great job of this) e.g. by series, season, episode - Movies - Documentaries etc with additional data downloaded.
    A few more playable formats/containers
    It would be perfect.
    A proper Library wasn't as important as most of the metadata could be viewed directly in windows explorer.
    Not supported with other containers.
    This brings me to the first obstacle.
    All the alternatives I have looked at so far can't or won't support .wtv files
    Converting the files to another format/container loses all the explorer properties. (And some of the metadata completely)
    Discussions I have had so far are pointing the finger at the "Windows Media Foundation"
    I.e. Developers can't do anything with .wtv files because WMF doesn't support them.
    So the question is: If Windows Media Centre is no longer viable for Microsoft why haven't they atleast provided the tools for developers to support the format/container they forced upon so many users of their product.
    i.e. Metadata reader/writer
    Codec/Container? player?
    I need a replacement for Windows Media Centre: What is/are the alternative(s)?

    Hi,
    Since Windows Media Centre almost didn't make it into Windows 8 I have been looking to move to something else before it disappears for good.
    While it might just make it into Windows 10 there certainly won't be any future development.
    I not a big fan of Microsoft products but WMC is one application they nailed
    Some additional smart recording options
    i.e. I had to add "The Big Bang Theory - Return", "The Big Bang Theory - New", "The Big Bang Theory - Finale" etc to my series recording
    A proper library manager (Plex does a great job of this) e.g. by series, season, episode - Movies - Documentaries etc with additional data downloaded.
    A few more playable formats/containers
    It would be perfect.
    A proper Library wasn't as important as most of the metadata could be viewed directly in windows explorer.
    Not supported with other containers.
    This brings me to the first obstacle.
    All the alternatives I have looked at so far can't or won't support .wtv files
    Converting the files to another format/container loses all the explorer properties. (And some of the metadata completely)
    Discussions I have had far are pointing the finger at the "Windows Media Foundation"
    I really like the Plex Store App byt they can't play Recoreded TV Files without transcoding them.
    I.e. Developers can't do anything with .wtv files because WMF doesn't support them.
    So the question is: If Windows Media Centre is no longer viable for Microsoft why haven't they atleast provided the tools for developers to support the format/container they forced upon so many users of their product.
    i.e. Metadata reader/writer
    Codec/Container? player?
    I need a replacement for Windows Media Centre: What is/are the alternative(s)?
    Other
    post

  • Need Xserve Replacement Drive

    Need a replacement for one of our internal SATA drives on our Xserve Intel.  There are no Apple drives out there...what do folks recommend for a replacement that is server-worthy?
    Thanks!

    Which XServe model do you have? I have been able to use the following drive (actually, 2 of them) in a 2008 XServe, 2.8 GHz quad core.
    Seagate Constellation ES 1 TB 7200RPM SATA 2.0 3Gb/s 32 MB Cache 3.5 Inch Internal Hard Drive ST31000524NS - Bare Drive
    The Sata III version of the drive was *not* recognized by the XServe.

  • Replacement for C drive

    have a G70t200 CTO  -  CD drive hasdisappeared from  " computer" display ,  does not work.  Need a replacement for
    HL-DT-ST DVDram GSA T50N ATA . do not need lightscribe feature  nor 2 side burn capability.  Can someone recommend a simple CD-dvd drive?
    This question was solved.
    View Solution.

    Disappearing CD/DVD drives seems to be way too common the last couple of years. You 'might' find that it actually reappears if you start the laptop up once without it, shut down, reinstall it and start up again.
    ******Clicking the Thumbs-Up button is a way to say -Thanks!.******
    **Click Accept as Solution on a Reply that solves your issue to help others**

  • Hi, i have a new number and I'm trying to activate iMessage but i can't.  it is only saying waiting for activation,  i have tried a lot of times with not success.  i'm not sure if i need to replace the old one to this new one, or what do do. can you help

    Hi, i have a new number and I'm trying to activate iMessage but i can't.  it is only saying waiting for activation,  i have tried a lot of times with not success.  i'm not sure if i need to replace the old one to this new one, or what do do. can you help

    Troubleshooting iMessage activation:
    http://support.apple.com/kb/TS4268

Maybe you are looking for

  • Rwbld60.exe error while calling a graph wizard from reports 6i.

    Hi, I have a latest patch 4f installed on my machine for reports 6i. When i call a graph wizard from my reports i am getting a program error saying "rwbld60.exe has generated errors". How do i confirm that my new patch is installed successfully. Than

  • View widgets in full screen

    Is it possible to view widgets in full screen.  I have only been able to get the half screen presentation.  That is very cluttered and small for my older eyes.  Of course, I can click on pictures within updates and see those full screen, but I am tal

  • Parsing a xml file

    i need a code for this... write a class for "myxmlparser" to parse "*.xml" fileto "*.dtd" file. sundar

  • Modify .wmf graph in illustrator (make it look nice)

    I'm a newbie, just trying to figure out how to edit a .wmf file that is a graph and was generated by a statistical program. I need to visually enhance this graph, making  it look more appealing for publication in a manuscript. It's very simple, just

  • OS X 10.8.5 - Mail Signature

    Hi, I tried this so many times but I could not find it.I guess there  must be a way to do this. How can i put my Facebook / Twitter link to my facebook/twitter icon (image) attached to my signature ? Thanks, Berke