Change documents for customer Z table - serious help wanted

Question

Hi all,
I am no beginner and I don't expect any comments from beginners.
Situation: My customer wants to replace the material valuation transactions MRN1 MRN2 MRN3 due to bad performance and locking problems with own developed programs.
The valuation results will be stored in a customer Z-Table on a monthly base. For auditing and transparency purposes, this Z-table has to get a change object and the update routines will have to write change documents.
Due to the expected size of the new Z-table, it is not advisable to simply switsch on table logging.
In this huge project (and in none I participated!) nobody ever implemented the change document process for a Z-table. <b>BUT EVERYBODY CAN TELL YOU THI IS NO PROBLEM AT ALL.</b>
I read some documentation at SAP and serached for threads or blogs here. I could not find anything desribing that in depth.
So before I start, I'd be happy to get some hints from people who created own change documents and implemented the process. Links to documentation and other helpful pages are also welcome.
If I can keep the process simple, I'd like to create a BLOG on this - because I think, in the future it will get more and more difficult to pass the auditing process with undocumented features and uncontrolled table changes.
TIA.
Regards,
Clemens

Answer 1

Hi,
Please check this thread.
http://www.sapdevelopment.co.uk/tips/changedoc/cd_createch.htm
Once you create your change document object using generate update pgm option then  please check the WRITE document fm.
I have done this long back i am updating CDHDR and CDPOS for 2 table YATT and YATTPLANTS. Here YATT have single record (header table) and YATTPLANTS have multiple records (item table)
function yatt_write_document           .
  call function 'CHANGEDOCUMENT_OPEN'
    exporting
      objectclass             = 'YATT           '
      objectid                = objectid
      planned_change_number   = planned_change_number
      planned_or_real_changes = planned_or_real_changes
    exceptions
      sequence_invalid        = 1
      others                  = 2.
  case sy-subrc.
    when 0.                                   "ok.
    when 1. message a600 with 'SEQUENCE INVALID'.
    when 2. message a600 with 'OPEN ERROR'.
  endcase.
if upd_yctc                           ne space.
   call function 'CHANGEDOCUMENT_SINGLE_CASE'
     exporting
       tablename              = 'YATT                          '
       workarea_old           = o_yatt
       workarea_new           = n_yatt
        change_indicator       = upd_yattc
        docu_delete            = 'X'
     exceptions
       nametab_error          = 1
       open_missing           = 2
       position_insert_failed = 3
       others                 = 4.
    case sy-subrc.
      when 0.                                "ok.
      when 1. message a600 with 'NAMETAB-ERROR'.
      when 2. message a600 with 'OPEN MISSING'.
      when 3. message a600 with 'INSERT ERROR'.
      when 4. message a600 with 'SINGLE ERROR'.
    endcase.
  endif.
  if upd_yctcauthplnts                  ne space.
    call function 'CHANGEDOCUMENT_MULTIPLE_CASE'
      exporting
        tablename              = 'YATTPLANTS                 '
        change_indicator       = upd_yattplants
        docu_delete            = 'X'
      tables
        table_old              = yyattplants
        table_new              = xyattplants
     exceptions
       nametab_error          = 1
       open_missing           = 2
       position_insert_failed = 3
       others                 = 4.
    case sy-subrc.
      when 0.                                "ok.
      when 1. message a600 with 'NAMETAB-ERROR'.
      when 2. message a600 with 'OPEN MISSING'.
      when 3. message a600 with 'INSERT ERROR'.
      when 4. message a600 with 'MULTIPLE ERROR'.
    endcase.
  endif.
  call function 'CHANGEDOCUMENT_CLOSE'
    exporting
      objectclass             = 'YATT           '
      objectid                = objectid
      date_of_change          = udate
      time_of_change          = utime
      tcode                   = tcode
      username                = username
      object_change_indicator = object_change_indicator
      no_change_pointers      = no_change_pointers
    exceptions
      header_insert_failed    = 1
      object_invalid          = 2
      open_missing            = 3
      no_position_inserted    = 4
      others                  = 5.
  case sy-subrc.
    when 0.                                   "ok.
    when 1. message a600 with 'INSERT HEADER FAILED'.
    when 2. message a600 with 'OBJECT INVALID'.
    when 3. message a600 with 'OPEN MISSING'.
*    WHEN 4. MESSAGE A600 WITH 'NO_POSITION_INSERTED'.
* do not abort, if positions are not inserted!!!
    when 5. message a600 with 'CLOSE ERROR'.
  endcase.
endfunction.
a®