Versionen im Vergleich

Schlüssel

  • Diese Zeile wurde hinzugefügt.
  • Diese Zeile wurde entfernt.
  • Formatierung wurde geändert.
Kommentar: Migrated to Confluence 5.3

...

Auszug

Wandelt einen AaqSatz mit 8034*Erwerbungsvormerkung in einen NDdatensatz zurück
Ausgangsschirm: Vollanzeige
Das persönliche Login wird - falls . Die persönlichen Login-Daten und der vorauss. Erscheinttermin werden abgefragt, falls sie im Benutzerprofil noch nicht vorhanden - abgefragtsind.
Der vorauss. Erscheinttermin wird abgefragt.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!

 

...

Datum

geändert von

Beschreibung

2011-06-17

Althaus

neu erstellt

...

2011-06-30

Althaus

Selektionscode "a" in Kategorie 7001

Code

dnb_

...

erwerbung.js

...

Code
Codeblock
function EVzuAac() {

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

}

dnb_public.js

Codeblock
	

function __dnbEVumwandeln(strMatStatus) {

	var dnbPromptstrVETermin = utility.newPrompter()__getProfVal("Erscheinttermin erfassen","vetermin","Bitte vorauss. Erscheinttermin (JJ.MM.TT) eingeben:");
	var strDatestr0599 = "\n0599 " + strMatStatus;
	var msgstr7001 = dnbPrompt.prompt("Funktion: EV umwandeln","Bitte vorauss. Erscheinttermin (JJ.MM.TT) eingeben:",strDate,null,null);
"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");
		__dnbDeleteTag("7001"
		application.activeWindow.title.startOfBuffer(false);
		__geheZuKatapplication.activeWindow.title.findTag("7001","",true, 0, false, true, false);
		application.activeWindow.title.insertText("\n7001 " + strMatStatusstartOfField(false);

		if (strMatStatus == "m") {
			strMatStatus = "e" + strMatStatusapplication.activeWindow.title.endOfField(true);
		application.activeWindow.title.insertText(str7001);
		}
		__geheZuKat("0599","",true);
		application.activeWindow.title.insertText("\n0599 " + strMatStatusstr0599);

		if (msgstrVETermin =!= true"")	 {
			strDate = dnbPrompt.getEditValue();
			__geheZuKat("4208","",true);
			application.activeWindow.title.insertText("\n4208 " + strDatestr4208);
		} else {
			__dnbMeldung("EV umwandeln","Kein Erscheinttermin eingegeben. Kategorie 4208 wird nicht erzeugt!","");
		}
		
	} 

}

...