IS-H cl_ish_patient_provisional=>create

Die Frage ist als "gelöst" markiert. Den entsprechend Beitrag findest du hier.

BW, SRM, Berechtigung etc.
3 Beiträge • Seite 1 von 1
3 Beiträge Seite 1 von 1

IS-H cl_ish_patient_provisional=>create

Beitrag von stony007_de (Specialist / 108 / 6 / 0 ) »
Mal wieder eine schwerwiegende Frage zum Klinischen System.
Ich möchte vorläufige Patientendaten anlegen. Irgendwie will er aber nicht

Aktuell sieht mein Code wie folgt aus:

Code: Alles auswählen.

  
DATA:
LD_IS_DATA TYPE RNPAP_ATTRIB ,
LD_IT_CONNECTED_OBJECTS TYPE ISH_OBJECTLIST ,
LD_I_ENVIRONMENT TYPE REF TO CL_ISH_ENVIRONMENT ,
LD_E_INSTANCE TYPE REF TO CL_ISH_PATIENT_PROVISIONAL ,
LD_E_INTERFACE TYPE REF TO IF_ISH_OBJECTBASE.

DATA: L_RC             TYPE ISH_METHOD_RC,
        L_PROVISIONAL    TYPE RNPAP_KEY.
DATA:  LR_ERRORHANDLER  TYPE REF TO CL_ISHMED_ERRORHANDLING.
DATA:  LO_SYS_EXCEPTION TYPE REF TO CX_AI_SYSTEM_FAULT,
         LO_APP_EXCEPTION TYPE REF TO CX_AI_APPLICATION_FAULT.

LD_IS_DATA-VNAME = 'vname_1'.
LD_IS_DATA-NNAME = 'nnmae_1'.
LD_IS_DATA-GBDAT = '01.01.1999'.

CALL METHOD CL_ISH_FAC_ENVIRONMENT=>CREATE
  EXPORTING
    I_PROGRAM_NAME = SY-REPID
  IMPORTING
    E_INSTANCE     = LD_I_ENVIRONMENT
    E_RC           = L_RC.

IF L_RC NE 0.

*      p_okcode = 'TEST'.

  EXIT.

ENDIF.

TRY.
    CALL METHOD CL_ISH_PATIENT_PROVISIONAL=>CREATE
      EXPORTING
        IS_DATA             = LD_IS_DATA
        I_ENVIRONMENT       = LD_I_ENVIRONMENT
      IMPORTING
        E_INSTANCE          = LD_E_INSTANCE
      EXCEPTIONS
        MISSING_ENVIRONMENT = 1
        NO_AUTHORITY        = 2
        OTHERS              = 3.

*----
  CATCH CX_AI_SYSTEM_FAULT      INTO LO_SYS_EXCEPTION.
  CATCH CX_AI_APPLICATION_FAULT INTO LO_APP_EXCEPTION.

ENDTRY.

TRY.
    CALL METHOD LD_E_INSTANCE->SAVE
      CHANGING
        C_ERRORHANDLER = LR_ERRORHANDLER.

  CATCH CX_AI_SYSTEM_FAULT      INTO LO_SYS_EXCEPTION.
  CATCH CX_AI_APPLICATION_FAULT INTO LO_APP_EXCEPTION.

    COMMIT WORK AND WAIT.

ENDTRY.

TRY.

    CALL METHOD LD_E_INSTANCE->GET_DATA
      IMPORTING
        ES_KEY = L_PROVISIONAL.

  CATCH CX_AI_SYSTEM_FAULT      INTO LO_SYS_EXCEPTION.
  CATCH CX_AI_APPLICATION_FAULT INTO LO_APP_EXCEPTION.

ENDTRY.


CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'. 

Ideen?

gesponsert
Stellenangebote auf ABAPforum.com schalten
kostenfrei für Ausbildungsberufe und Werksstudenten


Re: IS-H cl_ish_patient_provisional=>create

Beitrag von ewx (Top Expert / 4784 / 294 / 628 ) »

Code: Alles auswählen.

LD_IS_DATA-GBDAT = '19990101'.
?!

Folgende Benutzer bedankten sich beim Autor ewx für den Beitrag:
stony007_de


Re: IS-H cl_ish_patient_provisional=>create

Beitrag von stony007_de (Specialist / 108 / 6 / 0 ) »
und mal wieder

*klatsch vor'n Kopp*

Danke... :up:

Seite 1 von 1

Vergleichbare Themen

2
Antw.
1605
Views
Create Data
von asano » 11.08.2004 16:54 • Verfasst in ABAP® Core
1
Antw.
6051
Views
customer create
von Gast » 24.02.2005 08:28 • Verfasst in Application Related
2
Antw.
1829
Views
create objects problem
von Thanatos82 » 18.09.2012 10:52 • Verfasst in ABAP Objects®
1
Antw.
2471
Views
Employee Create BAPI
von shilpak » 21.02.2005 14:25 • Verfasst in Development Related
3
Antw.
3935
Views
BAPI for Vendor Create
von sonair » 01.03.2005 08:48 • Verfasst in Development Related

Über diesen Beitrag


Die Frage ist als "gelöst" markiert. Den entsprechend Beitrag findest du hier.

Unterstütze die Community und teile den Beitrag für mehr Leser und Austausch

Aktuelle Forenbeiträge

Zwischensumme Adobe Forms
vor 3 Tagen von Lucyalison 1 / 64
Interne Tabelle
vor 5 Tagen von black_adept 2 / 133
MaLo-Checker in ABAP
vor einer Woche von A6272 6 / 254

Newsletter Anmeldung

Keine Beiträge verpassen! Wöchentlich versenden wir lesenwerte Beiträge aus unserer Community.
Die letzte Ausgabe findest du hier.
Details zum Versandverfahren und zu Ihren Widerrufsmöglichkeiten findest du in unserer Datenschutzerklärung.

Aktuelle Forenbeiträge

Zwischensumme Adobe Forms
vor 3 Tagen von Lucyalison 1 / 64
Interne Tabelle
vor 5 Tagen von black_adept 2 / 133
MaLo-Checker in ABAP
vor einer Woche von A6272 6 / 254

Unbeantwortete Forenbeiträge

Zwischensumme Adobe Forms
vor 3 Tagen von Lucyalison 1 / 64
Group Items auf einer Filterbar
vor einer Woche von Bright4.5 1 / 107
tRFC Transaktionen SM58
vor 4 Wochen von A6272 1 / 140