Ver Mensaje Individual
  #2  
Viejo 02/05/08, 19:40:30
gutus gutus is offline
Junior Member
 
Fecha de Ingreso: jul 2007
Mensajes: 9
Bapi_alm_order_maintain

Espero te sirva estos códigos.
PARAMETERS: Material LIKE AUFM-MATNR DEFAULT 'R-1310',
Werk LIKE AFRV-WERKS DEFAULT '1200',
Lager LIKE AUFM-LGORT DEFAULT '1500',
Anzahl LIKE AUFM-MENGE DEFAULT '1',
Einheit LIKE AUFM-MEINS DEFAULT 'ST',
VorgngNr LIKE AFRU-VORNR DEFAULT '10'.
...

MethodenLine-REFNUMBER = '000001'.
MethodenLine-OBJECTTYPE = 'COMPONENT'.
MethodenLine-METHOD = 'CREATE'.
MethodenLine-OBJECTKEY = '000000500502'.
INSERT MethodenLine INTO TABLE Methoden.
CLEAR MethodenLine.

MethodenLine-REFNUMBER = '000000'.
MethodenLine-METHOD = 'SAVE'.
MethodenLine-OBJECTKEY = '000000500502'.
INSERT MethodenLine INTO TABLE Methoden.

KomponenteLine-MATERIAL = Material.
KomponenteLine-PLANT = Werk.
KomponenteLine-STGE_LOC = Lager.
KomponenteLine-ACTIVITY = VorgngNr.
KomponenteLine-REQUIREMENT_QUANTITY = Anzahl.
KomponenteLine-REQUIREMENT_QUANTITY_UNIT = Einheit.
INSERT KomponenteLine INTO TABLE Komponente.

CALL FUNCTION 'BAPI_ALM_ORDER_MAINTAIN'
TABLES
IT_METHODS = Methoden

IT_HEADER =
IT_HEADER_UP =
IT_HEADER_SRV =
IT_HEADER_SRV_UP =
IT_USERSTATUS =
IT_PARTNER =
IT_PARTNER_UP =
IT_OPERATION =
IT_OPERATION_UP =
IT_RELATION =
IT_RELATION_UP =
IT_COMPONENT = Komponente

IT_COMPONENT_UP =
IT_TEXT =
IT_TEXT_LINES =
EXTENSION_IN =
RETURN = Return
ET_NUMBERS = AufNummer.

CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'

EXPORTING
WAIT =
IMPORTING
RETURN = Return.


Saludos.
Responder Con Cita