14. März 2014 12:57
Hallo Zusammen,
wie löst ihr folgednes Problem ? mir fällt nix sinnvolles ein, was ich auch umgesetzt bekäme ...
Entwicklung und Echtbetrieb finden auf demselben SQL-Server statt.
Zur Entwicklung kopiere ich eine bestehende Datenbank
nun möchte ich mir irgendwo, irgendwie auf der Clientoberfläche den Datenbanknamen anzeigen lassen um zu erkennen, ob ich im Echtsystem bin oder in der Entwicklungsumgebung bin..
Geht das ?
Den Mandanten möchte ich ungern umbenennen, da es eine programmierung gib, die den Mandantennamen auswertet und davon abhängig eine Auswahl trifft.
14. März 2014 13:32
Danke für den Tipp,
ich suche jedoch etwas, was sich an "prominenter" Stelle, sprich im Menü oder im Programmheader oder oder oder .... einnistet und mir den manuellen Aufruf erspart.
Praktisch so ein kleines "Autostart" -Tool ....
was mir im wesentlichen die Tastenfolge ALT-D K I abnimmet und dieses Infos fest einblendet ..
14. März 2014 13:49
Hallo,
bau die doch im Menü einen Menüordner "Testsystem" und "Echtsystem" ein.
Gruß, Fiddi
14. März 2014 14:03
wie kann ich dann die Sichtbarkeit steuern ?
14. März 2014 14:24
Hallo,
das musst du einmal nach dem kopieren der Datenbank im Company-Menü manuell einfügen.
Gruß, Fiddi
14. März 2014 14:31
h-d.neuenfeldt hat geschrieben:ich suche jedoch etwas, was sich an "prominenter" Stelle, sprich im Menü oder im Programmheader oder oder oder .... einnistet und mir den manuellen Aufruf erspart.
Du kannst den Aufruf in der Codeunit 1 and das Ende der Funktion LogInStart() einbauen, dann öffnet sich die Form automatisch nach dem Login:
- Code:
LicPerm.GET(LicPerm."Object Type"::Form,FORM::"Database Info");
IF GUIALLOWED AND
(LicPerm."Execute Permission" = LicPerm."Execute Permission"::Yes)
THEN
IF DBInfo.GET THEN
IF DBInfo."Show Database Info" THEN
FORM.RUN(FORM::"Database Info");
14. März 2014 15:30
Danke für die Ideen, ich probier mal über das Wochenende ....
22. Mai 2014 09:27
ich habe es nun ganz anders gelöst :
Bei uns sind Test/Entwicklungsdatenbanken im Namen immer mit einem führenden Text "TEST" bzw. "SIC" gekennzeichnet.
Daraus ergibt sich dann folgendes kleiens Programm :
- Code:
function TesteaufEntwicklungsumgebung
var
Name DataType Subtype Length
DatenbankListe Record Database
CLEAR(DatenbankListe);
DatenbankListe.SETRANGE("My Database",TRUE);
DatenbankListe.FIND('-');
IF UPPERCASE(COPYSTR(DatenbankListe."Database Name",1,4))='TEST' THEN EXIT(TRUE);
IF UPPERCASE(COPYSTR(DatenbankListe."Database Name",1,3))='SIC' THEN EXIT(TRUE);
EXIT(FALSE);
Zuletzt geändert von Natalie am 22. Mai 2014 10:13, insgesamt 1-mal geändert.
Grund: Code-Tags hinzugefügt - bitte das nächste Mal selber ergänzen.
Powered by phpBB © phpBB Group.
phpBB Mobile / SEO by Artodia.