f$PSI_ActiveBO

Mit dieser Funktion wird intern das aktive Business Objekt geholt und dessen Name zurückgegeben. Der Aufruf dieser Funktion ist nötig, wenn beim Speichern eines Datensatzes der Status –14 zurückgeliefert wurde. Dies geschieht dann, wenn beim Speichern eines Kopfdatensatzes festgestellt wird, dass noch mindestens 1 Positionsdatensatz eingegeben werden muss. Beispiel ist das Anlegen eines Kundenvorgangkopfs, der immer auch eine Kundenvorgangsposition benötigt. PSIPENTA öffnet dann automatisch das zugehörige Formular. Mit f$PSI_ActiveBO merkt sich die Schnittstelle dieses Business Objekt als aktiv, und schreibt dessen internen Namen auf den übergebenen ePOS Parameter

Syntax:	Status = f$PSI_ActiveBO (ParaNameBO)
	Argument		Typ	Bedeutung
	ParaNameBO		Zeichenkette	Name des ePOS Parameters, auf den der Name des aktiven Business Objekts geschrieben wird
Ergebnis:	Ganzzahl	Status der Funktion Mögliche Werte: -3,-4,--999 Die Bedeutung der Werte kann der Liste der möglichen Stati entnommen werden Liste der Rückgabewerte der Funktionen
Beispiel: (Anlegen eines kundenauftrags)	Status = f$PSI_Detail ('PKVK' ,0) Status = f$PSI_Ausführen(2,'NUMGEN') .. Auswerten des Status... Status = f$PSI_LiesWert('KD_VORGANGS_NR','PSIAuftragKopf.AuftragNr','') Status = f$PSI_SetzeWerte ('PSIAuftragKopf','Liste_AU_K','Fehlertxt') Status = f$PSI_Ausführen (2,'KP') Status = f$PSI_Speichern () Auswerten des Status ... Status = f$PSI_ActiveBO('PSIAuftragKopf.PosBO') Status = f$PSI_Detail (PSIAuftragKopf.PosBO ,0) Status = f$PSI_SetzeWert ('ARTIKEL_NR','1061') Status = f$PSI_SetzeWert ('MD_POSITIONS_TYP','N') Status = f$PSI_SetzeWert ('AUFTRAGS_MENGE','1') Status = f$PSI_SetzeWert ('WUNSCH_LIEFERTERMIN','20040513') Status = f$PSI_Ausführen(2,'PP') Status = f$PSI_Ausführen(2,'TE') Status = f$PSI_Lesen () Status = f$PSI_Speichern ()