Skip to end of metadata
Go to start of metadata

Beschreibung

Wandelt einen AaqSatz mit 8034*Erwerbungsvormerkung in einen NDdatensatz zurück. Die persönlichen Login-Daten und der vorauss. Erscheinttermin werden abgefragt, falls sie im Benutzerprofil noch nicht vorhanden sind. Ausgangsschirm: Vollanzeige

Hinweise/Fragen

Vorgeschlagener Funktionsname aus Anforderungsliste: EvzuAac

 

Bis auf 3. Pos. der Satzart, dem Status in Feld 0599 und des Kennzeichens in Feld 7001 die gleiche Funktionalität wie EVzuAam!

 

Historie

Datum

geändert von

Beschreibung

2011-06-17

Althaus

neu erstellt

2011-06-30

Althaus

Selektionscode "a" in Kategorie 7001

Code

dnb_erwerbung.js

function EVzuAac() {

	__dnbEVumwandeln("c");
	application.activeWindow.simulateIBWKey ("FR");

}

dnb_public.js

function __dnbEVumwandeln(strMatStatus) {

	var strVETermin = __getProfVal("Erscheinttermin erfassen","vetermin","Bitte vorauss. Erscheinttermin (JJ.MM.TT) eingeben:");
	var str0599 = "\n0599 " + strMatStatus;
	var str7001 = "7001 " + strMatStatus;
	var str4208 = "\n4208 " + strVETermin
	
	if (strMatStatus == "m") {
		str0599 = "\n0599 e" + strMatStatus;
		str7001 = "7001 a";
	}
	
	if (application.activeWindow.getVariable("scr") != "8A"){
		application.messageBox("Datensatzkopie","Der Datensatz muss sich in der Vollanzeige befinden!", "alert-icon");
	} else {

		//LoeExAndererSt();
	
		application.activeWindow.command("k",false);
		__dnbUpdMatStatus(strMatStatus);
		__dnbDeleteTag("8034");
		__dnbDeleteTag("0701");
		
		application.activeWindow.title.startOfBuffer(false);
		application.activeWindow.title.findTag("7001", 0, false, true, false);
		application.activeWindow.title.startOfField(false);
		application.activeWindow.title.endOfField(true);
		application.activeWindow.title.insertText(str7001);
		
		__geheZuKat("0599","",true);
		application.activeWindow.title.insertText(str0599);

		if (strVETermin != "") {
			__geheZuKat("4208","",true);
			application.activeWindow.title.insertText(str4208);
		} else {
			__dnbMeldung("EV umwandeln","Kein Erscheinttermin eingegeben. Kategorie 4208 wird nicht erzeugt!","");
		}
		
	} 

}
Vorgabe
{MP Bearbeiten - PPN/IDN kopieren}
{in Kommandozeile eintragen: „log exemplarlpz exemplarlpz“
{ENTER}
{in Kommandozeile eintragen: „f idn „
{MP Bearbeiten – Einfügen}
{ENTER}
{ in Kommandozeile eintragen: „loe e1“}
{ENTER}
{Button Löschen}
{ in Kommandozeile eintragen:
“log <Login Passwort automat. eintragen>}
{ENTER}
{in Kommandozeile eintragen: „f idn „
{MP Bearbeiten – Einfügen}
{ENTER}
{Button Bearbeiten}
{Cursor ans Ende der Zeile}
{das letzte Zeichen löschen}
{Einfügen “c“} 
{MP Bearbeiten – Suchen: „8034“ *}
{FB Weitersuchen} („8034“ * wurde markiert)
{FB Abbrechen}
{diese Zeile löschen}
{„0599 c„}
{ Zeilenwechsel }
{„4208 <Wunschdatum automatisch eintragen>„}
{Button Enter}
-- Ende –

Seitenanfang

  • No labels