proc kle_hostimp_entry_10( user, doc_type_short ) { ////////////////////////////////////// // Falls "Oberregister" (DDF3) nicht gesetzt ist, setze das Feld auf "99 Nicht zugeordnete Dokumente" START ////////////////////////////////////// vars dokarten1 = "DBETR;DDAUE;DABSC;DBERA;DSTEU;DFIBU;DLOHN;DDEBD;DLSTD;DKRED;ABPSA;ABESA;AFBSA;AJASA;ALOSA;ASTSA;AJAOB;ALBRE;AJAAB;ABERO;ABERA;ASTOR;ASTRA;ABEPA;ABEOR;AFIOR;AFIRA;ALBOR;ALBSO;AAURR;AKROR" vars dokarten2 = "DUMMY;AOREG;AREGS;AUREG;AURG2;AURG3;AAURU;AAUR2;ABEUR;ABEU2;ABPUR;ABPU2;AFIUR;AFIU2;AJAUR;AJAU2;ALJUR;ALOUR;ALJR2;ALBU2;ASTU2;ASTUR;ADAUR;ABERB;ABETR;AFIBA;AJAAA;AKRED;ALOJA;ALBSA;ASTEU" vars ergebnis1 = api_function( "string_get_position", dokarten1, doc_type_short, 1, 1 ) vars ergebnis2 = api_function( "string_get_position", dokarten2, doc_type_short, 1, 1 ) if ( ( ergebnis1 > 0 ) || ( ergebnis2 > 0 ) ) { if ( @length( dok_dat_feld[ 3 ] ) == 0 ) { dok_dat_feld[ 3 ] = "99 Nicht zugeordnete Dokumente" } } ////////////////////////////////////// // Falls "Oberregister" (DDF3) nicht gesetzt ist, setze das Feld auf "99 Nicht zugeordnete Dokumente" ENDE ////////////////////////////////////// }