All About Programming

  DATA  :     FID        TYPE   THEAD - TDID ,     FLANGUAGE  TYPE   THEAD - TDSPRAS ,     FNAME      TYPE   THEAD - TDNAME ,     FOBJECT    TYPE   THEAD - TDOBJECT .   FID        =  'BEST' .   FNAME      = 'MAT0001' . "Material Number   FOBJECT    =  'MATERIAL' .   FLANGUAGE  =  'EN' .    REFRESH  IT_FLINES .    CLEAR  IT_FLINES .   IT_FLINES - TDFORMAT  =  '*' .   IT_FLINES - TDLINE    = 'Long Text Purchase Order Text' .    APPEND  IT_FLINES .    CALL  FUNCTION  'CREATE_TEXT'      EXPORTING       FID          =  FID       FLANGUAGE    =  SY - LANGU       FNAME        =  FNAME       FOBJECT      =  FOBJECT       SAVE_DIRECT  =  'X'       FFORMAT      =  '*'      TABLES       FLINES       =  IT_FLINES[]      EXCEPTIONS       NO_INIT      =  1       NO_SAVE      =  2        OTHERS       =  3 .      CALL  FUNCTION  'COMMIT_TEXT'        EXPORTING         OBJECT           =  FOBJECT         NAME           

1. Add custom field declaration in structure bestand Custom field can be added directly with Insert line area or using enhancement point 2. Add New Enhancement Point in list_ouput sub routines ENHANCEMENT  1   ZMB52_ADDITIONALFIELD .     "active version """""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""$"$\SE:(134) Form LIST_OUTPUT, Start, Enhancement ZMB52_ADDITIONALFIELD, Start                                                                               A    data :  wa_fcat 

Melanjutkan dari postingan  sebelumnya , yaitu menu transaksi. Pada menu transaksi ini terdapat 9 menu, yaitu : 1. Create Purchase Requisition 2. Create Purchase Order 3. Create Reservation 4. Approve PR 5. Approve PO 6. Inventory Movement Penerimaan PO Setelah penerimaan PO berhasil, maka akan menambah stock inventory atas material yang ada di PO yang sudah diterima Transfer Stock Berdasarkan Reservasi Berdasarkan no Reservasi  3000000000 terdapat permintaan material MAT0001 Sejumlah 100 PC dari gudang WH00 ke Gudang WH01, setelah proses transfer ini dilakukan maka stock Material MAT0001 digudang WH00 akan berkurang sejumlah yang di transfer dan akan menambah stock digudang WH01 sejumlah yang ditransfer. Terlihat informasi dari system bahwa stock material MAT0001 digudang WH00 tidak mencukupi permintaan transfer ke gudang WH01, quantity yang ditransfer bisa diganti misal menjadi 20 maka yang 80 akan menjadi outstanding atas reservasi tersebut. maka secara stock atas material MAT0001 a