my.clients.path2.html

PMS³² Online- Hilfereferenz

MY.CLIENTS.PATH2

Path2 - Zweiter Pfad zu einem anderen Mandanten, falls nötig... Siehe Refund!

Hilfe: Zusätzlicher Pfadserver

Zweiter Pfad zu einem anderen Mandanten, falls nötig... Siehe Refund!

Code: Zusätzlicher Pfadserver

*/ Kurzbeispiel für den Zugriff auf diese Struktur
*/ Der Zugriff erfolgt über: My.Clients.Path2
*/ Wird dieses Objekt in einem REPLACE oder einer Schleife SCAN ... ENDSCAN | FOR ... NEXT benötigt
*/ so sollte vor der Schleife die Objektstruktur in eine Variable geholt werden!
*/ Die Ausführungsgeschwindigkeit wird dadurch sehr vergrößert!
*/ Beispiel:
*/ Definieren einer LOKALEN Variablen
LOCAL loPath2 AS My.Clients.Path2
*/ Setzen der Variablen
loPath2 = My.Clients.Path2
*/ Jetzt erst die Schleifen durchlaufen... man beachte ALL, dass können ne Menge Sätze sein...
REPLACE ALL Feldname1 WITH loPath2.Function1(),Feldname2 WITH loPath2.Function1(), ...
*/ Oder in einer Schleife...
SCAN
	lvValue = loPath2.Function(Alias.Spalte) + 25
	lvValue = loPath2.Function2(m.lvValue)
	REPLACE Feldname WITH m.lvValue,...
ENDSCAN
*/ Es sind auch geschachtelte Aufrufe möglich...

Liste der Methoden von Path2

CheckPath() - Pfadeinstellungen (2) NameSpace

Rückgabe:[Boolean], Prüft, ob der angegebene Pfad ein Datenbank Pfad ist.

Hilfeinformation

Rückgabe:[Boolean], Prüft, ob der angegebene Pfad ein Datenbank Pfad ist.

Aufrufinformation

Boolean = My.Clients.Path2.CheckPath(tcPath as String,tlAllPath as Boolean,tcTable as Variant)
Boolean = My.Clients.Path2.CheckPath(tcPath,tlAllPath,tcTable)

Codeinformation

CreateDirectory() - Pfadeinstellungen (2) NameSpace

Rückgabe: [Boolean], Create's a directory structure. Return's TRUE if directory is given

Hilfeinformation

Rückgabe: [Boolean], Create's a directory structure. Return's TRUE if directory is given

Aufrufinformation

Boolean = My.Clients.Path2.CreateDirectory(tcDir as String)
Boolean = My.Clients.Path2.CreateDirectory(tcDir)

Codeinformation

EraseDirectory() - Pfadeinstellungen (2) NameSpace

Rückgabe: [Boolean], Erase's an complete directory structure with subdir's and files. Return's TRUE if directory is deleted.

Hilfeinformation

Rückgabe: [Boolean], Erase's an complete directory structure with subdir's and files. Return's TRUE if directory is deleted.

Aufrufinformation

Boolean = My.Clients.Path2.EraseDirectory(tcDirectory as String)
Boolean = My.Clients.Path2.EraseDirectory(tcDirectory)

Codeinformation

FileAppend() - Pfadeinstellungen (2) NameSpace

Rückgabe: [Boolean], Append the file 'tcSourceFile' on file 'tcDestFile' and erases 'tcSourceFile'. Only for Textfiles...

Hilfeinformation

Rückgabe: [Boolean], Append the file 'tcSourceFile' on file 'tcDestFile' and erases 'tcSourceFile'. Only for Textfiles...

Aufrufinformation

Boolean = My.Clients.Path2.FileAppend(tcSourceFile as String,tcDestFile as String,tcSeparateText as String)
Boolean = My.Clients.Path2.FileAppend(tcSourceFile,tcDestFile,tcSeparateText)

Codeinformation

FileMove() - Pfadeinstellungen (2) NameSpace

Rückgabe: [Boolean], Moves a file 'tcSourecFile' to 'tcDestFile'.

Hilfeinformation

Rückgabe: [Boolean], Moves a file 'tcSourecFile' to 'tcDestFile'.

Aufrufinformation

Boolean = My.Clients.Path2.FileMove(tcSourceFile as String,tcDestFile as String)
Boolean = My.Clients.Path2.FileMove(tcSourceFile,tcDestFile)

Codeinformation

FileMoveIfExist() - Pfadeinstellungen (2) NameSpace

Rückgabe: [Boolean], Moves/Appends a file 'tcSourceFile' to 'tcDestFile' if file 'tcSourceFile' exist.

Hilfeinformation

Rückgabe: [Boolean], Moves/Appends a file 'tcSourceFile' to 'tcDestFile' if file 'tcSourceFile' exist.

Aufrufinformation

Boolean = My.Clients.Path2.FileMoveIfExist(tcSourceFile as String,tcDestFile as String)
Boolean = My.Clients.Path2.FileMoveIfExist(tcSourceFile,tcDestFile)

Codeinformation

FileSize() - Pfadeinstellungen (2) NameSpace

Rückgabe: [Long], Returns the FileSize in Bytes.

Hilfeinformation

Rückgabe: [Long], Returns the FileSize in Bytes.

Aufrufinformation

Long = My.Clients.Path2.FileSize(tcFileName as String)
Long = My.Clients.Path2.FileSize(tcFileName)

Codeinformation

GetAllPath() -

Rückgabe:[String], Gibt eine Information mit allen PfadInformationen zurück. Rückgabe ist C-Structure

Hilfeinformation

Aufrufinformation

String = My.Clients.Path2.GetAllPath()

Codeinformation

GetDDDPfad() - Pfadeinstellungen (2) NameSpace

Rückgabe: [String], Gibt den Pfad zum Eintrag aus dem DDD usw. zurück.

Hilfeinformation

Rückgabe: [String], Gibt den Pfad zum Eintrag aus dem DDD usw. zurück.

Aufrufinformation

String = My.Clients.Path2.GetDDDPfad(tcdddPfad as String)
String = My.Clients.Path2.GetDDDPfad(tcdddPfad)

Codeinformation

GetObjectName() - Pfadeinstellungen (2) NameSpace

Rückgabe: [String], Return's an valid objectname from two directory name's.

Hilfeinformation

Rückgabe: [String], Return's an valid objectname from two directory name's.

Aufrufinformation

String = My.Clients.Path2.GetObjectName(tcDbfDir as String,tcFrxDir as String)
String = My.Clients.Path2.GetObjectName(tcDbfDir,tcFrxDir)

Codeinformation

GetProperty() - Abrufen einer Property in der Klasse

Rückgabe der benannten Property der Klasse. tnAsXML... kann sein: 0=Value, 1=C-Structure, 2=XML

Hilfeinformation

Ruft die Value einer Property in der Klasse ab.
Die Parameter: tcProperty as String
tcProperty: Name der Property in der Klasse

Aufrufinformation

Variant = My.Clients.Path2.GetProperty(tcProperty as String,tnAsXMLStructure as Variant)
Variant = My.Clients.Path2.GetProperty(tcProperty,tnAsXMLStructure)

Codeinformation

*/ Vorausgesetzt wird, dass My bekannt ist...
LOCAL lnError AS Number
lnError = My.Clients.Path2.GetProperty('nError')

GetUrlPath() - Pfadeinstellungen (2) NameSpace

Rückgabe: [String], Ermittelt den URL Pfad aus einem gemappten Laufwerk.

Hilfeinformation

Rückgabe: [String], Ermittelt den URL Pfad aus einem gemappten Laufwerk.

Aufrufinformation

String = My.Clients.Path2.GetUrlPath(tcMappedPath as String)
String = My.Clients.Path2.GetUrlPath(tcMappedPath)

Codeinformation

GetValue() - Abrufen einer Variablen in der Klasse

Führt das genannte Script aus. Vorhandene Zeiger: poThis=oKlasse, poCom=oNameSpace

Hilfeinformation

Ruft die Value einer Variablen in der Klasse ab.
Die Parameter: tcVariable as String

Aufrufinformation

Variant = My.Clients.Path2.GetValue(tcScript as String)
Variant = My.Clients.Path2.GetValue(tcScript)

Codeinformation

*/ Vorausgesetzt wird, dass My bekannt ist...
LOCAL lcIdx02 AS String
lcIdx02 = My.Clients.Path2.GetValue('My.cIdx02')
IF !ISNULL(m.lcIdx02)
	WAIT WINDOW m.lcIdx02
ELSE
	*/ My in der Klasse nicht bekannt!
ENDIF

ReadPthFile() - Pfadeinstellungen (2) NameSpace

Rückgabe: [Boolean], Liest die PTH Datei aus und schreibt die bekannten Werte in THIS.Clients() etc...

Hilfeinformation

Rückgabe: [Boolean], Liest die PTH Datei aus und schreibt die bekannten Werte in THIS.Clients() etc...

Aufrufinformation

Boolean = My.Clients.Path2.ReadPthFile()

Codeinformation

SetNewFipId() - Pfadeinstellungen (2) NameSpace

Rückgabe: [Boolean], Weist dem Mandante eine neue cIdx09 zu.

Hilfeinformation

Rückgabe: [Boolean], Weist dem Mandante eine neue cIdx09 zu.

Aufrufinformation

Boolean = My.Clients.Path2.SetNewFipId(tcIdx09 as String)
Boolean = My.Clients.Path2.SetNewFipId(tcIdx09)

Codeinformation

SetNewX02Values() - Pfadeinstellungen (2) NameSpace

Rückgabe: [Boolean], Setzt neue Werte für die Mandanten Eigenschaften. Reset wird automatisch durchgeführt...

Hilfeinformation

Rückgabe: [Boolean], Setzt neue Werte für die Mandanten Eigenschaften. Reset wird automatisch durchgeführt...

Aufrufinformation

Boolean = My.Clients.Path2.SetNewX02Values(tcIdx02 as String,tcIcx02 as String,tcDbfDir as String,tcFrxDir as String,tcSysManDir as Variant,tcSysDir as Variant)
Boolean = My.Clients.Path2.SetNewX02Values(tcIdx02,tcIcx02,tcDbfDir,tcFrxDir,tcSysManDir,tcSysDir)

Codeinformation

SetProperty() - Setzen einer Property in der Klasse

Setzt die Value an die benannte Property. tnAsObject kann sein: 0=Value, 1=C-Structure, 2=XML

Hilfeinformation

Setzt die Value an die benannte Property.
Die Parameter: tcProperty as String,tvValue as Variant,tnAsObject as Integer
tcProperty: Name der Property in der Klasse
tvValue: Value der Property
tnAsObject: 0=Value, 1=C-Structure, 2=XML
Wird tnAsObject nicht angegeben, so wird 0=Value vorausgesetzt

Aufrufinformation

Variant = My.Clients.Path2.SetProperty(tcProperty as String,tvValue as Variant,tnAsObject as Integer)
Variant = My.Clients.Path2.SetProperty(tcProperty,tvValue,tnAsObject)

Codeinformation

*/ Als Beispielcode für eine Klasse in einem COM+ Server
*/ Vorausgesetzt wird, dass My bekannt ist...
=My.Clients.Path2.SetProperty('nError',0,0)
*/ oder auch...
=My.Clients.Path2.SetProperty('nError',0)

Terminate() -

Den COM+ Server vor dem Release im Aufrufer beenden.

Hilfeinformation

Aufrufinformation

Variant = My.Clients.Path2.Terminate()

Codeinformation

WritePthFile() - Pfadeinstellungen (2) NameSpace

Rückgabe: [Boolean], schreibt die Pfad Informationen zurück in die Datei

Hilfeinformation

Rückgabe: [Boolean], schreibt die Pfad Informationen zurück in die Datei

Aufrufinformation

Boolean = My.Clients.Path2.WritePthFile()

Codeinformation

WriteSettings() - Schreiben div. Informationen in ein LOG-File

Mit dieser Methode kann eine Protokollierung div. Informationen in einem LOG File erfolgen.

Hilfeinformation

Mit dieser Methode kann eine Protokollierung div. Informationen in einem LOG File erfolgen.
Diese Methode ist 'nur' bei den NameSpace Servern von PMS zu finden!

Aufrufinformation

Variant = My.Clients.Path2.WriteSettings(tcWann as String)
Variant = My.Clients.Path2.WriteSettings(tcWann)

Codeinformation

*/ Als Beispielcode für eine Klasse in einem COM+ Server
*/ Vorausgesetzt wird, dass My bekannt ist...
=My.Clients.Path2.WriteSettings('Heute um 15:00Uhr')
*/ oder auch...
=My.Clients.Path2.WriteSettings(TTOC(DATETIME(),1))		&& Ausgabe: JJJJMMTThhmmss

Liste der Properties von Path2

Clients - Pfadeinstellungen (2) NameSpace

Gibt eine Objektkette als C-Struktur zurück. PMS32.PTH.DBFDIR als C-Struktur.

Hilfeinformation

Gibt eine Objektkette als C-Struktur zurück. PMS32.PTH.DBFDIR als C-Struktur.

Aufrufinformation

String = My.Clients.Path2.Clients

Codeinformation

ClientsTable - Pfadeinstellungen (2) NameSpace

Wert:[String], Gibt eine Tabelle zurück, mit den Clientinformationen

Hilfeinformation

Aufrufinformation

String = My.Clients.Path2.ClientsTable

Codeinformation

ClientsTableNetwork - Pfadeinstellungen (2) NameSpace

Ähnlich ClientsTable, jodoch wird die PMS32.PTH Datei im Netzwerkverzeichnis von PMS32 ausgewertet!

Hilfeinformation

Aufrufinformation

String = My.Clients.Path2.ClientsTableNetwork

Codeinformation

_Clsid - CLS-ID des COM+ Servers

CLS-ID des COM+ Servers. Wird im INIT() ermittelt.

Hilfeinformation

Diese Property gibt es nur bei NameSpace Servern, dies sind Programmteile, die in einem geschützten Speicherbereich ablaufen. Sollten Sie mal von außen auf den NameSpace von PMS32 zugreifen und es fehlt Ihnen die Aufrufinformationen, so kann obiger String aus der Registry ermittelt werden.

Aufrufinformation

String = My.Clients.Path2._Clsid

Codeinformation

LOCAL lcClsID AS String
lcClsID = My.Clients.Path2._Clsid
WAIT WINDOW m.lcClsID

_ComServer - Pfad und Name des COM+ Servers

Dateiname und Pfad des gestarteten COM+ Servers

Hilfeinformation

Diese Property gibt es nur bei NameSpace Servern, dies sind Programmteile, die in einem geschützten Speicherbereich ablaufen.

Aufrufinformation

String = My.Clients.Path2._ComServer

Codeinformation

LOCAL lcComServer AS String
lcComServer = My.Clients.Path2._ComServer
WAIT WINDOW m.lcComServer

_Isreleased_ -

Hilfeinformation

Aufrufinformation

Boolean = My.Clients.Path2._Isreleased_

Codeinformation

_Name - Name der COM+ Klasse

Name der COM+ Klasse. MUSS angegeben werden. Dieser _Name wird übertragen und ist von außen abfragbar. Diese Property ist ReadOn

Hilfeinformation

Dateiname der Applikation. Wenn unter Vfp gestartet wird! sind diese Werte NICHT gesetzt! Die Property _Name gibt den Klassennamen der EXE bzw. DLL zurück.
Mit diesem Namen und dem Namen der EXE/DLL kann dann die COM+ Klasse instanziiert werden. Gleiches kann man auch aus den Eigenschaften der Programmklasse
EXE/DLL herausfinden.

Aufrufinformation

String = My.Clients.Path2._Name

Codeinformation

LOCAL lcComName AS String
lcComName = My.Clients.Path2._Name
WAIT WINDOW m.lcComName

_Pcreleaselog_ -

Hilfeinformation

Aufrufinformation

Variant = My.Clients.Path2._Pcreleaselog_

Codeinformation

_ServerName - Name der COM+ Server Datei

Name des Servers, wie bei der Initialisierung

Hilfeinformation

Die Property _ServerName gibt den kompletten Klassennamen der EXE bzw. DLL zurück.
Mit diesem Namen und dem Namen der EXE/DLL kann dann die COM+ Klasse instanziiert werden.
Gleiches kann man auch aus den Eigenschaften der Programmklasse EXE/DLL herausfinden.

Aufrufinformation

String = My.Clients.Path2._ServerName

Codeinformation

LOCAL lcServerName AS String
lcServerName = My.Clients.Path2._ServerName
WAIT WINDOW m.lcServerName

_StartMode - Startmodus des aufrufenden Servers

Startmode des externen Aufrufers. Derjenige, der den COM+ Server initialisiert. _StartMode='cMode,cNumber'

Hilfeinformation

Die Property gibt den Startmodus des Aufrufers zurück. Es gibt insgesamt 6 Modi:
0 - Unter VFP Entwicklung
1 - Unter VFP-COM Steuerung
2 - Start als COM.EXE
3 - Start als COM.DLL in Singleprocess
4 - Start als EXE (Standard Programmaufruf)
5 - Start als COM.DLL in Multiprocess

Aufrufinformation

Number = My.Clients.Path2._StartMode

Codeinformation

*/ Abfrage des Modus
WAIT WINDOW My.Clients.Path2._StartMode

_Sys1016 - Verwendeter Speicher

Verwendeter Speicher in Byte

Hilfeinformation

Gibt den verwendeten Speicher des Namespace zurück.
Rückgabe ist Byte.

Aufrufinformation

Integer = My.Clients.Path2._Sys1016

Codeinformation

LOCAL liBytes AS Integer
*/ Abfrage des Speichers
liBytes = My.Clients.Path2._Sys1016
WAIT WINDOW LTRIM(STR(m.liBytes/1024))+" kB"

_Version - Version der Programmdatei

Versionsnummer des Servers im Format H.U.DD.V1V2.BBBB

Hilfeinformation

Versionsnummer nach PMS32 Konvention. H.U.DD.SSHH.bbbb
Die Property _Version gibt die Programmversion (gilt für DLL, EXE und auch für APP) zurück.
H      - Hauptversion
U      - Unterversion
DD      - Datenbankversion
SS      - Servicepack
HH      - Hotfix
bbbb- Buildnumber

Aufrufinformation

String = My.Clients.Path2._Version

Codeinformation

WAIT WINDOW My.Clients.Path2._Version

_VfpVersion - VFP Version

Version von Visual FoxPro

Hilfeinformation

VFP Version der VFP-9 dll.

Aufrufinformation

String = My.Clients.Path2._VfpVersion

Codeinformation

WAIT WINDOW My.Clients.Path2._VfpVersion

cAddDir - Verzeichnis lokaler Systemerweiterungen

Wird nicht benötigt. Enthielt früher die Addon's

Hilfeinformation

Wird nicht benötigt. Enthielt früher die Addon's

Aufrufinformation

String = My.Clients.Path2.cAddDir

Codeinformation

cAppNameExe - Name der Applikation

Übertragen des Application.Servername

Hilfeinformation

Mit dieser Property kann der Name der Applikation abgerufen werden.

Aufrufinformation

String = My.Clients.Path2.cAppNameExe

Codeinformation

*/ Als Beispielcode für eine Klasse in einem COM+ Server
*/ Vorausgesetzt wird, dass My bekannt ist...
LOCAL lcName AS String
lcName = My.Clients.Path2.cAppNameExe

cClass -

Hilfeinformation

Aufrufinformation

String = My.Clients.Path2.cClass

Codeinformation

cCssDir - Verzeichnis der Definitionsdateien

Verzeichnis der Systemscripts

Hilfeinformation

Pfad der Systemscripte
Normalerweise zu finden unter \\server\freigabe\...\pms32\sys\

Aufrufinformation

String = My.Clients.Path2.cCssDir

Codeinformation

IF !DIRECTORY(My.Clients.Path2.cCssDir)
	*/ Benötigte Pfade sollten eigentlich da sein!
	=MESSAGEBOX("Pfad fehlt:" + My.Clients.Path2.cCssDir,64,"Systemscript Verzeichnis")
ENDIF

cCubDir - Microcube Verzeichnis

Wert:[String], Verzeichnis der Cube Dateien. Dieses Verzeichnis kann für jeden Mandanten separat angegeben werden.

Hilfeinformation

Pfad der Microcubes (OLAP)
Normalerweise zu finden unter \\server\freigabe\...\pms32\daten\mandant\

Aufrufinformation

String = My.Clients.Path2.cCubDir

Codeinformation

IF !DIRECTORY(My.Clients.Path2.cCubDir)
	*/ Benötigte Pfade sollten eigentlich da sein!
	=MESSAGEBOX("Pfad fehlt:" + My.Clients.Path2.cCubDir,64,"Microcube Verzeichnis")
ENDIF

cDbfDbc -

Wert:[String], DBC des Mandanten

Hilfeinformation

Aufrufinformation

String = My.Clients.Path2.cDbfDbc

Codeinformation

cDbfDir - Mandantenverzeichnis

Verzeichnis der Mandanten Tabellen

Hilfeinformation

Pfad der Mandantentabellen
Normalerweise zu finden unter \\server\freigabe\...\pms32\daten\mandant\

Aufrufinformation

String = My.Clients.Path2.cDbfDir

Codeinformation

IF !DIRECTORY(My.Clients.Path2.cDbfDir)
	*/ Benötigte Pfade sollten eigentlich da sein!
	=MESSAGEBOX("Pfad fehlt:" + My.Clients.Path2.cDbfDir,64,"Mandanten Verzeichnis")
ENDIF

cDbfReadOnly - Pfadeinstellungen (2) NameSpace

Wert:[String], Gibt Pfad und Namen der Definitionsdatei zurück.

Hilfeinformation

Aufrufinformation

String = My.Clients.Path2.cDbfReadOnly

Codeinformation

cDbfVer - Pfadeinstellungen (2) NameSpace

Version der Mandantentabellen

Hilfeinformation

Version der Mandantentabellen

Aufrufinformation

String = My.Clients.Path2.cDbfVer

Codeinformation

cDefDir - Startverzeichnis

Startverzeichnis von PMS32. Aus diesem Verzeichnis heraus weden andere abgeleitet! cLogDir, cResDir, cTabDir, cPthFile

Hilfeinformation

Dokumenten Verzeichnis des Mandanten
Normalerweise zu finden unter \\server\freigabe\...\pms32\daten\mandant\docs\

Aufrufinformation

String = My.Clients.Path2.cDefDir

Codeinformation

IF !DIRECTORY(My.Clients.Path2.cDefDir)
	*/ Benötigte Pfade sollten eigentlich da sein!
	=MESSAGEBOX("Pfad fehlt:" + My.Clients.Path2.cDefDir,64,"Dokumenten Verzeichnis")
ENDIF

cDirList -

Wert:[String], Rückgabe aller durch den Mandant angegebenen Verzeichnisse

Hilfeinformation

Aufrufinformation

String = My.Clients.Path2.cDirList

Codeinformation

cDocDir -

Wert:[String], Rückgabe des Dokumenten Verzeichnisses

Hilfeinformation

Aufrufinformation

String = My.Clients.Path2.cDocDir

Codeinformation

cDskDir - Verzeichnis der Desktop-Dateien

Desk-Verzeichnis für die Ablage der Webseite für den Screen.

Hilfeinformation

Desktop Verzeichnis zur Darstellung des Hintergrundes in PMS32
Normalerweise zu finden unter \\server\freigabe\...\pms32\desk\

Aufrufinformation

String = My.Clients.Path2.cDskDir

Codeinformation

IF !DIRECTORY(My.Clients.Path2.cDskDir)
	*/ Benötigte Pfade sollten eigentlich da sein!
	=MESSAGEBOX("Pfad fehlt:" + My.Clients.Path2.cDskDir,64,"Desktop Verzeichnis")
ENDIF

cFrxDbc -

Wert:[String], DBC des Reportverzeichnisses

Hilfeinformation

Aufrufinformation

String = My.Clients.Path2.cFrxDbc

Codeinformation

cFrxDir - Reportverzeichnis

Verzeichnis der Mandanten Reports

Hilfeinformation

Report Verzeichnis des Mandanten
Normalerweise zu finden unter \\server\freigabe\...\pms32\reports\mandant\

Aufrufinformation

String = My.Clients.Path2.cFrxDir

Codeinformation

IF !DIRECTORY(My.Clients.Path2.cFrxDir)
	*/ Benötigte Pfade sollten eigentlich da sein!
	=MESSAGEBOX("Pfad fehlt:" + My.Clients.Path2.cFrxDir,64,"Report Verzeichnis")
ENDIF

cFrxVer - Pfadeinstellungen (2) NameSpace

Version der Reporttabellen

Hilfeinformation

Version der Reporttabellen

Aufrufinformation

String = My.Clients.Path2.cFrxVer

Codeinformation

cHlpDir - Verzeichnis der Hilfedateien

Verzeichnis der Hilfe-Dateien

Hilfeinformation

Verzeichnis der Hilfedateien
Normalerweise zu finden unter \\server\freigabe\...\pms32\hlp\

Aufrufinformation

String = My.Clients.Path2.cHlpDir

Codeinformation

IF !DIRECTORY(My.Clients.Path2.cHlpDir)
	*/ Benötigte Pfade sollten eigentlich da sein!
	=MESSAGEBOX("Pfad fehlt:" + My.Clients.Path2.cHlpDir,64,"Hilfedateien Verzeichnis")
ENDIF

cIcx02 - Pfadeinstellungen (2) NameSpace

Bezeichnung des Mandanten

Hilfeinformation

Bezeichnung des Mandanten

Aufrufinformation

String = My.Clients.Path2.cIcx02

Codeinformation

cIdx00 - Pfadeinstellungen (2) NameSpace

Name des Terminals, siehe auch cTerminal

Hilfeinformation

Name des Terminals, siehe auch cTerminal

Aufrufinformation

String = My.Clients.Path2.cIdx00

Codeinformation

cIdx02 - Mandanten ID

Mandanten ID aus PMS32. Weist dem Pfadserver PMS_08.PmsPath den Mandanten zu. Setzen aller Pfade.

Hilfeinformation

Mandanten-ID. Diese ist in der Datei pms32.pth gespeichert und dient dort zur Zuordnung des Mandante und dessen Pfade.
Auszug aus der Pfaddatei pms32.pth:

      */ Verzeichnis der Microcube - Dateien. Wenn leer dann gleich: cDbfdir
      cCubdir = ""
      */ Ein 'anderes' Dokumentenverzeichnis kann angegeben werden. Wenn nicht angegeben dann gleich: cDbfdir+'docs\'
      */ cDocDir = ""
      */ Verzeichnis der Mandantentabellen. Hier ein Beispiel mit UNC Pfaden.
      */ Wird die Freigabe auf dem Server 'versteckt' \pms$\ angegeben, so kann ein Cryptovirius das Verzeichnis nicht finden!
      cDbfdir = "\\server\pms$\pms32\daten\demo.32\"
      */ Verzeichnis der Reporttabellen
      */ Gibt man Bilddateien in einem Report mit My.Clients.Path.cFrxDir+'BILDNAME.JPG' an, so kann PMS32 einfach auf einen anderen Rechner kopiert werden!
      cFrxdir = "\\server\pms$\pms32\reports\demo.32\"
      */ Beschreibung des Mandanten
      cIcx02  = "TESTMANDANT DEMO"
      */ ID der Firmenparameter zum Mandant.
      cIdx09  = "DEMO"
      */ Kann unter der Mandanteninformation leer sein, wenn für mehrere Mandanten das 'gleiche' Systemverzeichnis gültig ist.
      cSysdir = ""
      */ Willkommens-Information als Hintergrundbild in PMS32
      cWelcome= "pms32.htm"
      */ Nummer des Mandanten, beim Einsatz eines BarcodeScanners sollte diese Nummer EINDEUTIG sein!
      nNumber = 1
<>

Aufrufinformation

String = My.Clients.Path2.cIdx02

Codeinformation

*/ Abfrage der Mandanten-ID
WAIT WINDOW My.Clients.Path2.cIdx02

*/ Wenn man mittels VFP Zugriff auf die Applikation braucht:

*/ 1. vfp9.exe öffenen
*/ 2. In das Startverzeichnis von PMS32 wechseln (MUSS)
CD c:\pms\pms32
*/ 3. My Instanziieren
My = NEWOBJECT("pmsmy","pmsmyhandler.vcx","pmsmyhandler.app")
*/ 4. Den letzten aktuellen Mandanten zuweisen
My.cIdx02 = My.cIdx02
*/ 5. Los gehts...

cIdx02l - Mandanten ID

Mandanten ID der letzten Aktivierung des Users.

Hilfeinformation

Die Mandanten ID wird der Klasse normalerweise nach dem INIT von My zugewiesen und ist damit der Klasse und einem eventuellen NameSpace bekannt.
Durch die Zuweisung werden die Pfade und div. andere Properties in der My-Struktur gesetzt. Enthält die Klasse eine Script Definitionsdatei,
zu finden unter SYS\*.define so wird diese mit der Zuweisung der Mandanten ID geladen.

Aufrufinformation

String = My.Clients.Path2.cIdx02l

Codeinformation

*/ Beispielcode zu Setzen der Mandanten ID
My.Clients.Path.cIdx02 = "DEMO_DEMO"
*/ Obiges Beispiel geht auch direkt über My
My.cIdx02 = "DEMO_DEMO"
*/ Nach dem INIT von My muss der Mandant angegeben werden, eine Routine könnte in etwa so aussehen:
PUBLIC My
My = NEWOBJECT("pmsmy","pmsmyhandler.vcx","pmsmyhandler.app")
*/ Bitte wundern Sie sich nicht über die nächste Programmzeile...
*/ Ist die Mandanten ID unter My leer, so wird der Pfadserver aktiviert (PMS_08.DLL)
*/ und aus diesem der letzte aktive Mandant geholt! My.Clients.Path.cIdx02l
My.cIdx02 = My.cIdx02

cIdx09 - Pfadeinstellungen (2) NameSpace

ID der Firmenparameter des angegebenen Mandanten

Hilfeinformation

ID der Firmenparameter des angegebenen Mandanten

Aufrufinformation

String = My.Clients.Path2.cIdx09

Codeinformation

cLogDir - Verzeichnis der LOG-Dateien

Verzeichnis der LOG Dateien. cDefDir+'LOG\'

Hilfeinformation

Verzeichnis der LOG-Dateien
Normalerweise zu finden unter c:\benutzer\\appdata\local\temp\pms32\
Nach Beenden von PMS32 sind dir Daten unter: \\server\pms$\pms32\log\TERMINAL # USER\ zu finden...

Aufrufinformation

String = My.Clients.Path2.cLogDir

Codeinformation

IF !DIRECTORY(My.Clients.Path2.cLogDir)
	*/ Benötigte Pfade sollten eigentlich da sein!
	=MESSAGEBOX("Pfad fehlt:" + My.Clients.Path2.cLogDir,64,"LOG-Dateien")
ENDIF

cMethod - Methode des letzten Fehlers

Methode, in der der Fehler auftrat

Hilfeinformation

Methode in der der letzte Fehler auftrat.
Aufbau: [Fehlernummer] [Methode] [Zeilennummer] [Message]

Aufrufinformation

String = My.Clients.Path2.cMethod

Codeinformation

*/ Abruf...
WAIT WINDOW My.Clients.Path2.cMethod

cMitDir - Verzeichnis der Vorlagen-Dateien

Mitgeben auf dem Server

Hilfeinformation

Verzeichnis der Vorlagen-Dateien
Das Verzeichnis ist normalerweise unter: \\server\pms$\pms32\mitgeben\ zu finden...
Das Verzeichnis enthält unter anderem auch TrueType Fonts für die Barcode-Ausgabe auf einem Drucker

Aufrufinformation

String = My.Clients.Path2.cMitDir

Codeinformation

IF !DIRECTORY(My.Clients.Path2.cMitDir)
	*/ Benötigte Pfade sollten eigentlich da sein!
	=MESSAGEBOX("Pfad fehlt:" + My.Clients.Path2.cMitDir,64,"Vorlagen-Dateien")
ENDIF

cMnxDir - Verzeichnis der Benutzermenüs

Verzeichnis der Benutzer- / Zusatzmenüs.

Hilfeinformation

Verzeichnis der Benutzermenüs
Dieses Verzeichnis wird nicht mehr verwendet! Kommt aus PMS16

Aufrufinformation

String = My.Clients.Path2.cMnxDir

Codeinformation

*/ Wird nicht mehr verwendet!

cNetDbc -

Wert:[String], DBC des Netzwerk Verzeichnisses

Hilfeinformation

Aufrufinformation

String = My.Clients.Path2.cNetDbc

Codeinformation

cNetDir - Netzwerkverzeichnis

Verzeichnis der Netzwerk Installation. Grundverzeichnis des Netzwerks von PMS32.

Hilfeinformation

Netzwerkverzeichnis von PMS32.
Das Verzeichnis ist normalerweise unter: \\server\pms$\pms32\ zu finden...

Aufrufinformation

String = My.Clients.Path2.cNetDir

Codeinformation

IF !DIRECTORY(My.Clients.Path2.cNetDir)
	*/ Benötigte Pfade sollten eigentlich da sein!
	=MESSAGEBOX("Pfad fehlt:" + My.Clients.Path2.cNetDir,64,"Netzwerkverzeichnis")
ENDIF

cNetDirLog - Netzwerk - LOG-Dateien

Wert:[String], Netzwerkverzeichnis der Log-Dateien

Hilfeinformation

Verzeichnis der Netzwerk - LOG-Dateien
Das Verzeichnis ist normalerweise unter: \\server\pms$\pms32\log\ zu finden...

Aufrufinformation

String = My.Clients.Path2.cNetDirLog

Codeinformation

IF !DIRECTORY(My.Clients.Path2.cNetDirLog)
	*/ Benötigte Pfade sollten eigentlich da sein!
	=MESSAGEBOX("Pfad fehlt:" + My.Clients.Path2.cNetDirLog,64,"Netzwerk - LOG-Dateien")
ENDIF

cNetDirLogUsr - Netzwerk - LOG-Dateien (User)

Wert:[String], Netzwerkverzeichnis der Benutzer-Log-Dateien

Hilfeinformation

Verzeichnis der Netzwerk - LOG-Dateien des Benutzers
Das Verzeichnis ist normalerweise unter: \\server\pms$\pms32\log\TERMINAL # USER\ zu finden...

Aufrufinformation

String = My.Clients.Path2.cNetDirLogUsr

Codeinformation

IF !DIRECTORY(My.Clients.Path2.cNetDirLogUsr)
	*/ Benötigte Pfade sollten eigentlich da sein!
	=MESSAGEBOX("Pfad fehlt:" + My.Clients.Path2.cNetDirLogUsr,64,"Netzwerk - LOG-Dateien (User)")
ENDIF

cNetVer -

Version der Netzwerk Tabellen

Hilfeinformation

Aufrufinformation

String = My.Clients.Path2.cNetVer

Codeinformation

cPrgVer - Pfadeinstellungen (2) NameSpace

Programmversion der Workstation

Hilfeinformation

Programmversion der Workstation

Aufrufinformation

String = My.Clients.Path2.cPrgVer

Codeinformation

cPthFile - Pfadeinstellungen (2) NameSpace

Pfad und Name der Pfaddatei von PMS32.

Hilfeinformation

Pfad und Name der Pfaddatei von PMS32.

Aufrufinformation

String = My.Clients.Path2.cPthFile

Codeinformation

cResDir - Verzeichnis der externen temp. Dateien

Zweites temp. Verzeichnis für Externe Programme.

Hilfeinformation

Zweites temp. Verzeichnis für Externe Programme.

Aufrufinformation

String = My.Clients.Path2.cResDir

Codeinformation

cResetInfos - Reset C-Structure

Zurücksetzen von beliebigen Informationen in einem COM+ Server!

Hilfeinformation

Reset C-Structure
Diese Property ist normalerweise WriteOnly! Sie dient zum Zurücksetzen verschiedener Informationen.
#DEFINE CRI_REMOVE_MENUES "REMOVE-MENUES"
#DEFINE CRI_REMOVE_CSFILES "REMOVE-CS-FILES"
#DEFINE CRI_REMOVE_SCRIPTS "REMOVE-CS-SCRIPTS"
#DEFINE CRI_CHANGE_IDX09 "CHANGE-IDX09"
#DEFINE CRI_LOGIN "USER_LOGIN"

Aufrufinformation

String = My.Clients.Path2.cResetInfos

Codeinformation

*/ Verschiedene RESET Befehle...
My.Clients.Path2.cResetInfos = "REMOVE-MENUES"
My.Clients.Path2.cResetInfos = "REMOVE-CS-FILES"
My.Clients.Path2.cResetInfos = "REMOVE-CS-SCRIPTS"
My.Clients.Path2.cResetInfos = "CHANGE-IDX09"
My.Clients.Path2.cResetInfos = "USER_LOGIN"
*/ Je nach Klasse wird ein entsprechender RESET ausgeführt!

cSctDir - Verzeichnis der Benutzerscripte

Verzeichnis der Benutzer- Scripte

Hilfeinformation

Verzeichnis der Benutzerscripte
Dieses Verzeichnis wird nicht mehr verwendet! Kommt aus PMS16

Aufrufinformation

String = My.Clients.Path2.cSctDir

Codeinformation

*/ Wird nicht mehr verwendet!

cService - Pfadeinstellungen (2) NameSpace

Nummer des installierten Servicepacks

Hilfeinformation

Nummer des installierten Servicepacks

Aufrufinformation

String = My.Clients.Path2.cService

Codeinformation

cSysDbc -

Wert:[String], DBC des Systemverzeichnisses

Hilfeinformation

Aufrufinformation

String = My.Clients.Path2.cSysDbc

Codeinformation

cSysDbfDir - Mandanten Systemverzeichnis

Systemverzeichnis Mandantenbezogen

Hilfeinformation

Verzeichnis der Systemtabellen von PMS32 unter der Mandanteneinstellung

Aufrufinformation

String = My.Clients.Path2.cSysDbfDir

Codeinformation

*/ Wird intern verwendet!

cSysDir - Systemverzeichnis

Verzeichnis der Systemtabellen. Aus diesen Verzeichnis werden weitere Verzeichnisse abgeleitet.

Hilfeinformation

Verzeichnis der Systemtabellen von PMS32
Das Verzeichnis ist normalerweise unter: \\server\pms$\pms32\dbf\ zu finden...

Aufrufinformation

String = My.Clients.Path2.cSysDir

Codeinformation

IF !DIRECTORY(My.Clients.Path2.cSysDir)
	*/ Benötigte Pfade sollten eigentlich da sein!
	=MESSAGEBOX("Pfad fehlt:" + My.Clients.Path2.cSysDir,64,"Systemverzeichnis")
ENDIF

cSysSysDir - Standard Systemverzeichnis

Systemverzeichnis Systembezogen

Hilfeinformation

Verzeichnis der Systemtabellen von PMS32 unter der Systemeinstellung

Aufrufinformation

String = My.Clients.Path2.cSysSysDir

Codeinformation

*/ Wird intern verwendet!

cSysVer - Pfadeinstellungen (2) NameSpace

Version des Systemverzeichnisses.

Hilfeinformation

Version des Systemverzeichnisses.

Aufrufinformation

String = My.Clients.Path2.cSysVer

Codeinformation

cTabDir - Verzeichnis lokaler Systemtabellen

Verzeichnis der verschiedenen PRG Tabellen

Hilfeinformation

Verzeichnis der verschiedenen PRG Tabellen

Aufrufinformation

String = My.Clients.Path2.cTabDir

Codeinformation

cTabDirList - Pfadeinstellungen (2) NameSpace

Wert:[String], enthält die Liste aller PMS-Tabellenverzeichnisse

Hilfeinformation

Wert:[String], enthält die Liste aller PMS-Tabellenverzeichnisse

Aufrufinformation

String = My.Clients.Path2.cTabDirList

Codeinformation

cTerminal - Pfadeinstellungen (2) NameSpace

Name des Terminals auf dem die Applikation gestartet wurde.

Hilfeinformation

Name des Terminals auf dem die Applikation gestartet wurde.

Aufrufinformation

String = My.Clients.Path2.cTerminal

Codeinformation

cTmpDir - Temporäres Verzeichnis

Verzeichnis der temporären Dateien.

Hilfeinformation

Temporäres Verzeichnis für verschiedene Zwischenspeicherungen
Das Verzeichnis ist normalerweise unter: c:\benutzer\\appdata\local\temp\ zu finden...

Aufrufinformation

String = My.Clients.Path2.cTmpDir

Codeinformation

*/ Same as: ADDBS(SYS(2023))
IF !DIRECTORY(My.Clients.Path2.cTmpDir)
	*/ Benötigte Pfade sollten eigentlich da sein!
	=MESSAGEBOX("Pfad fehlt:" + My.Clients.Path2.cTmpDir,64,"Temporäres Verzeichnis")
ENDIF

cUpdDir - Verzeichnis der Updatescripte

Verzeichnis der Update-Scripts. Siehe auch PMS32D.EXE, BackGroundJob()

Hilfeinformation

Verzeichnis der Systemscripte.
Das Verzeichnis ist normalerweise unter: \\server\pms$\pms32\upd\ zu finden...

Aufrufinformation

String = My.Clients.Path2.cUpdDir

Codeinformation

*/ Same as: ADDBS(SYS(2023))
IF !DIRECTORY(My.Clients.Path2.cUpdDir)
	*/ Benötigte Pfade sollten eigentlich da sein!
	=MESSAGEBOX("Pfad fehlt:" + My.Clients.Path2.cUpdDir,64,"Systemscripte")
ENDIF

cUser - Benutzer

Name des Benutzers (WINDOWS), der die Applikation gestartet hat.

Hilfeinformation

Angemeldeter Benutzer unter PMS32 bzw. Windows

Aufrufinformation

String = My.Clients.Path2.cUser

Codeinformation

WAIT WINDOW My.Clients.Path2.cUser

cVersion - Pfadeinstellungen (2) NameSpace

Hauptinformation der installierten PMS32 Version

Hilfeinformation

Hauptinformation der installierten PMS32 Version

Aufrufinformation

String = My.Clients.Path2.cVersion

Codeinformation

cVfpDir - Pfadeinstellungen (2) NameSpace

Verzeichnis der ADDON-Programme (VFP60)

Hilfeinformation

Verzeichnis der ADDON-Programme (VFP60)

Aufrufinformation

String = My.Clients.Path2.cVfpDir

Codeinformation

cWelCome - Pfadeinstellungen (2) NameSpace

Dateiname der Startseite für den PMS-Screen PMS-Desktop

Hilfeinformation

Dateiname der Startseite für den PMS-Screen PMS-Desktop

Aufrufinformation

String = My.Clients.Path2.cWelCome

Codeinformation

cWelComeDefault - Pfadeinstellungen (2) NameSpace

Default Webseite für den Desktop, muss unter Desk\DE\ liegen wobei DE für das Sprachkürzel steht

Hilfeinformation

Default Webseite für den Desktop, muss unter Desk\DE\ liegen wobei DE für das Sprachkürzel steht

Aufrufinformation

String = My.Clients.Path2.cWelComeDefault

Codeinformation

lDbfReadOnly - Pfadeinstellungen (2) NameSpace

Wert:[Boolean], Gibt an, ob der Mandant ReadOnly ist. .T. - Readonly / .F. - ReadWrite

Hilfeinformation

Aufrufinformation

Boolean = My.Clients.Path2.lDbfReadOnly

Codeinformation

lDirOk - Pfadeinstellungen (2) NameSpace

Gibt .T. zurück, wenn alle Verzeichnisse in Ordnung sind

Hilfeinformation

Aufrufinformation

Boolean = My.Clients.Path2.lDirOk

Codeinformation

lProcessServerRunning - Pfadeinstellungen (2) NameSpace

Wert:[Boolean], Läuft momentan ein Prozessserver auf dem Mandanten?

Hilfeinformation

Wert:[Boolean], Läuft momentan ein Prozessserver auf dem Mandanten?

Aufrufinformation

Boolean = My.Clients.Path2.lProcessServerRunning

Codeinformation

lReset - Reset durchführen

Führt einen Reset der Werte durch.

Hilfeinformation

Führt einen Reset in der Klasse durch

Aufrufinformation

Boolean = My.Clients.Path2.lReset

Codeinformation

My.Clients.Path2.lReset = .T.

lSysX02 - Pfadeinstellungen (2) NameSpace

Gibt an, ob das Systemverzeichnis am Mandanten hinterlegt wurde

Hilfeinformation

Gibt an, ob das Systemverzeichnis am Mandanten hinterlegt wurde

Aufrufinformation

Boolean = My.Clients.Path2.lSysX02

Codeinformation

nError - Fehlernummer des letzten Fehlers

Fehlernummer: VFP+, PMS-, 0 Kein Fehler!

Hilfeinformation

Fehlernummer des letzten Fehlers.
Ist der Wert kleiner null, so handelt es sich um einen logischen Fehler.

Aufrufinformation

Number = My.Clients.Path2.nError

Codeinformation

WAIT WINDOW My.Clients.Path2.nError

nIdx02 - Pfadeinstellungen (2) NameSpace

Nummerische ID des Mandanten. 0 - Default (cIdx02l), 1-N Mandanten. Siehe dort nNumber. Kann wie cIdx02 abgefragt werden...

Hilfeinformation

Nummerische ID des Mandanten. 0 - Default (cIdx02l), 1-N Mandanten. Siehe dort nNumber. Kann wie cIdx02 abgefragt werden...

Aufrufinformation

Number = My.Clients.Path2.nIdx02

Codeinformation

nLine - Zeilennummer des letzten Fehlers

Zeilennummer des Fehlers. Kann auch 0 sein!

Hilfeinformation

Zeilennummer, in der der letzte Fehler auftrat

Aufrufinformation

Number = My.Clients.Path2.nLine

Codeinformation

WAIT WINDOW My.Clients.Path2.nLine

oClass -

Hilfeinformation

Aufrufinformation

Object = My.Clients.Path2.oClass

Codeinformation

Siehe auch : Hauptmenü / Hauptindex / Such Index / Cursor Index / Programm Module / Tabellen Index / Tabellenmodule / Masken Index / Programmcode Index / Servicepacks / My.Struktur / Funktionen / Sonstiges Index

Lokale Benutzerhilfe : Meine eigene Hilfe / Zur�ck zur PMS³² - Hilfe

Dateiversion:1.0.04#3648 - H.U.DD#SSFF 02.12.2022 Senden Sie Ihren Kommentar zu diesem Thema an das Entwicklungsteam von PMS³² Weitere Informationen finden Sie unter der aktuellen PMS³² WEB-Hilfe
Die Informationen dieser Mitteilung sind vertraulich und nur f�r Sie bestimmt. Unbefugtes Weiterleiten, Ver�ffentlichen, Kopieren usw. sind untersagt und werden gerichtlich verfolgt. © PMS Compelec GmbH 2022 ® el-Projekt