Import initial: surse ROASTART + text FoxBin2Prg in arbore

Binarele VFP raman pe SVN si sunt git-ignored; COMUN e gestionat separat.

Co-Authored-By: Claude Opus 5 (1M context) <noreply@anthropic.com>
Claude-Session: https://claude.ai/code/session_01A5okKjUKMM5Xk1egq2w81P
This commit is contained in:
2026-08-03 09:34:12 +03:00
commit b241a639b1
81 changed files with 24199 additions and 0 deletions

135
.gitignore vendored Normal file
View File

@@ -0,0 +1,135 @@
# =============================================================================
# Flux text FoxBin2Prg: git urmareste DOAR versiunile text .??2 (in arbore),
# nu binarele VFP. Binarele convertibile si indecsii regenerabili se ignora.
# SVN ramane sursa de adevar pentru binare (via global-ignores pe .??2).
# =============================================================================
# --- Binare VFP convertibile in text .??2 (ambele forme de caz) ---
*.vcx
*.VCX
*.vct
*.VCT
*.scx
*.SCX
*.sct
*.SCT
*.frx
*.FRX
*.frt
*.FRT
*.mnx
*.MNX
*.mnt
*.MNT
*.lbx
*.LBX
*.lbt
*.LBT
*.pjx
*.PJX
*.pjt
*.PJT
*.dbc
*.DBC
*.dct
*.DCT
# --- Indecsi regenerabili (nu se transporta in .db2/.dc2) ---
*.cdx
*.CDX
*.dcx
*.DCX
# --- Tabele .dbf convertite in .db2 (lista explicita; restul .dbf raman binare) ---
Locale/locale.dbf
Locale/locale.FPT
Locale/Locale_back.DBF
Locale/Locale_back.FPT
Locale/locale_lang.dbf
Locale/locale_lang.FPT
Locale/locale_source.DBF
Locale/locale_source.FPT
Locale/locale_xref.DBF
Locale/locale_xref.FPT
# --- Fisiere generate/compilate Visual FoxPro ---
*.fxp
*.FXP
*.mpr
*.MPR
*.mpx
*.MPX
*.vcr
*.VCR
*.src
*.app
*.APP
*.qpx
*.QPX
*.ARM
# --- Backup-uri si fisiere temporare create de editorul VFP ---
*.bak
*.BAK
*.TBK
*.tmp
*.TMP
*.err
*.ERR
*.Stats
*.stackdump
*.scx~
*.sct~
*.vcx~
*.vct~
*.frx~
*.frt~
*.lbx~
*.lbt~
*.mnx~
*.mnt~
*.pjx~
*.pjt~
*.dbc~
*.dct~
*.dcx~
# --- Executabile compilate ---
*.exe
*.EXE
# --- Stare locala / resurse runtime VFP (specifice masinii) ---
roastart_ref.DBF
roastart_ref.FPT
00007IMX0026.CDX
FoxUser.dbf
FoxUser.fpt
*.foxuser*
*.dbf.lock
*.fpt.lock
*.cdx.lock
log.txt
LOG.txt
*.log
# --- Subversion (working copy paralela) ---
.svn/
**/.svn/
# --- COMUN este gestionat separat (nu e urmarit de acest repo) ---
COMUN/
# --- Unelte locale Claude Code ---
.tmp_*
.tmp_*.txt
claude-code-diagnostic-*.md
.claude/
# --- Windows / editor ---
Thumbs.db
ehthumbs.db
Desktop.ini
*.lnk
*.swp
*.swo
.DS_Store

142
CLAUDE.md Normal file
View File

@@ -0,0 +1,142 @@
# CLAUDE.md
This file provides guidance to Claude Code (claude.ai/code) when working with code in this repository.
## What this is
**ROASTART** ("ROA Romfast Applications") is a Visual FoxPro 9 launcher/shell for the ROA business application suite. It is **not** a typical CLI/IDE-buildable project — it can only be edited and built inside the Visual FoxPro 9 IDE on Windows.
- Project file: `roastart.PJX` / `roastart.PJT` (open these in VFP9 to work on the project)
- Compiled output: `roastart.exe` (subsequently wrapped with **Armadillo** — see `ROASTART.ARM`)
- Source language: Visual FoxPro (`.prg`), Visual Class Libraries (`.vcx` + `.vct`), Forms (`.scx` + `.sct`), Reports (`.frx` + `.frt`)
- Data layer: Oracle (ODBC) — connects to `roa.romfast.ro` (previously `83.103.197.79`); local DBFs only for `Locale/` and `roastart_ref`
- Comments and identifiers are in **Romanian**. Preserve that language when adding/modifying comments unless asked otherwise.
- Source control: git runs in parallel with the legacy SVN (`.svn/`). SVN stays the source of truth for the VFP binaries; git (`git@gitea.romfast.ro:romfast/roastart.git`) tracks their FoxBin2Prg text versions in-tree — see the search section below. `COMUN/` is git-ignored here.
## Build / run
There is no command-line build. To produce a new `roastart.exe`:
1. Open `roastart.PJX` in Visual FoxPro 9.
2. `Build → Build Executable…` (the project includes an internal main: `Programe\roastart.prg`).
3. Re-wrap the output with Armadillo using the settings in `ROASTART.ARM` if shipping to customers.
To run the built app, double-click `roastart.exe` from the project root — paths are computed relative to it (see `gcAppPath` / `gcDirMare` in `Programe\roastart.prg`).
`config.fpw` is the VFP runtime config; `roastart.ERR` is the **last build's** unresolved-symbol report (many entries are expected — they refer to symbols that exist in sister ROA applications loaded via shared `COMUN`).
`diag.ps1` is unrelated to the app itself — it is a Claude Code installation diagnostic script.
## File-type conventions (read this before editing)
- Edit only `.prg`, `.vcx`/`.scx` (via the VFP IDE), `.h` headers, and text/XML/INI files.
- **Never hand-edit** the binary sidecars: `.FXP` (compiled prg), `.VCT` (vcx memo data), `.SCT` (scx memo data), `.FRT` (frx memo data), `.CDX` (index), `.FPT` (table memo). They are generated/managed by VFP.
- **Never edit** `.BAK` files — they are stale backups left by VFP.
- When a `.prg` is changed, the matching `.FXP` becomes stale until the project is rebuilt.
## Searching code inside `.vcx`/`.scx` (binary) libraries
Most class/form code lives **inside binaries**, not in `.prg`, so plain grep can't read it. Like the other ROA projects, git tracks the **FoxBin2Prg text versions** (`.vc2`/`.sc2`/`.fr2`/`.mn2`/`.pj2`/`.dc2`/`.db2`), generated in-tree next to each binary — the binaries themselves are git-ignored, with SVN staying their source of truth. Refresh with `git_sync.ps1` (folder-mode, recursive, incremental):
```powershell
powershell -ExecutionPolicy Bypass -File D:\ROA\UTIL\foxbin2prg\git_sync.ps1 -ProjectRoot D:\ROA\ROASTART
```
Run it **at the start of every session and before any `git commit`** so the text matches the binaries. It converts in a temp staging area and copies back only the text (never touching the SVN working-copy binaries) and exits nonzero on failure: **do not commit while `git_sync` reports unexplained failures.** Then `Grep` the `.??2` files in-tree, citing `file:line`. Editing stays IDE-only here — the text is for reading and searching, not for write-back.
Grep can't tell **which class/method** a hit inside a `.vc2` belongs to (the class header may be thousands of lines above it, and ~2/3 of the file is properties/metadata). `vfp_symbols.ps1` indexes the line range of every class/method/procedure and labels hits with their owner. Its built-in defaults target ROAACNPRO, so always pass this project's paths:
```powershell
$s = 'D:\ROA\UTIL\foxbin2prg\vfp_symbols.ps1'
$c = @('-CacheRoot', 'D:\ROA\ROASTART', '-ProjectRoot', 'D:\ROA\ROASTART', '-IndexFile', 'D:\ROA\_vfp_textcache\roastart\_symbols.tsv')
powershell -ExecutionPolicy Bypass -File $s @c -Grep '<expression>' -CodeOnly # hits labeled class.method, code only
powershell -ExecutionPolicy Bypass -File $s @c -Where '<file>.vc2:<line>' # who owns this line
powershell -ExecutionPolicy Bypass -File $s @c -Find '<name>' # where it is DEFINED
powershell -ExecutionPolicy Bypass -File $s @c -Class '<class name>' # inheritance chain + methods
```
The index (`_symbols.tsv`) rebuilds itself when the text is newer, so refresh the in-tree text first (`git_sync.ps1`) — it can't see IDE edits that were never converted. Full search guide: `COMUN\docs\cautare_vcx_vct.md`.
## Architecture
### Entry point and bootstrap (`Programe\roastart.prg`)
This file is the project's main and is dense — read it first. Key responsibilities, in order:
1. **Path discovery** — derives `gcAppPath` (this app), `gcDirMare` (parent dir holding all ROA apps), `gcComunPath` = `<gcDirMare>\COMUNROA\` (sibling shared dir, separate from this repo's local `COMUN\`), `gcTempPath`.
2. **`SET PATH TO`** — appends every subdir under both the app and the shared library so subsequent `DO`/class lookups resolve. New code/classes must live under one of these dirs to be reachable.
3. **`SET CLASSLIB / SET PROCEDURE`** — preloads ~25 class libraries and procedure files. New classes/procedures should be registered here if they need to be globally available before login.
4. **Encryption FLLs**`vfpencryption.fll` and `vfpcompression.fll` are loaded from `COMUNROA` (the sibling shared dir, *not* this repo's `COMUN/`).
5. **`UpdateRoastart()`** (in `Programe\updatecheck.prg`) — pulls a manifest XML from the ROA server and downloads/replaces sibling app binaries before the UI is shown. Touching this code path affects every customer's auto-update.
6. **App object**`goApp = CREATEOBJECT("wzApplication")`; startup form is `Ferestre\frm_fundal.scx` (the always-on background window). The login dialog is launched from there.
7. **Error funnel**`On Error ErrorHandler(...)` posts every runtime error to `roa.romfast.ro/errors/create_xml` via `goMyXMLHTTP` (class `MyXMLHTTP`). Endpoint host comes from `settings.ini` `[errors] host=`.
8. **Single-instance**`TooManyInstances(1)` (defined in `oproceduri_start.prg` / class lib) uses a named semaphore + window property to focus the existing instance instead of starting a second one.
### Public globals you will see everywhere
VFP-style Hungarian naming. **Do not rename or remove these without a full project search** — they're referenced from compiled `.vcx`/`.scx` resources too:
- `gcAppPath`, `gcDirMare`, `gcComunPath`, `gcTempPath`, `gcSecurityPath`, `gcSecurityFile` — paths
- `gcGeneralIniFile` (= `<gcDirMare>\settings.ini`) — shared ROA config
- `goConn` (`oConn`) — wraps `SQLCONNECT`/`SQLDISCONNECT`, runs post-connect session setup
- `goExecutor` (`oExecutor`) — wraps `SQLEXEC`; preferred way to run Oracle SQL/PLSQL. Returns `lnSucces > 0` on success; on failure read `goExecutor.cEroare` and surface it via `aMessagebox`. Use `goExecutor.oReset()` between calls when reusing.
- `goApp` (`wzApplication`) — top-level app object; `goApp.OnShutDown()` is the orderly shutdown path.
- `goLocale` (`Locale.vcx`) — translation; `glTraducere` toggles whether captions get translated.
- `poLog` / `goLog` (`Log_Mesaje`) — diagnostic log; call `poLog.Log(<msg>, Program())`.
- `goMyXMLHTTP` — error reporter (see above).
- `gnIdUtil`, `gcUtil`, `gcUserName`, `glSupervizor`, `glAdministrator`, `gcAcces` — identity/authorization, populated after login.
- `gnIdFirma` — currently selected company (firma). Many SQL queries scope by this.
- `glFontCharSet` — font fallback flag for Eastern European charsets.
### Repository layout
```
Programe/ Top-level .prg files specific to ROASTART (entry point, update, security, version)
Clase/ Visual class libraries specific to ROASTART (ostart*.vcx, appwiz_start.vcx, ofundal_start.vcx)
Ferestre/ Forms (.scx) — frm_fundal is the main background window
Grafice/ App-specific images (PNG/BMP/GIF/ICO)
Rapoarte/ App-specific FoxPro reports (.frx)
Locale/ Localization DBC + DBFs (Romana/English/etc.)
COMUN/ Shared library used by ROASTART AND its sibling ROA apps:
COMUN/clase/ Shared visual class libraries (_baza.vcx is the root base class, ofirma, decabaza, scrollcontainer, etc.)
COMUN/programe/ Shared .prg modules (anaf_efactura, email, importfromxlsx, oproceduri_comune, etc.)
COMUN/ferestre/ Shared forms
COMUN/include/ Shared headers (foxpro.h, comun.h, security.h, mvc.h)
COMUN/utile/ Third-party libs (ctl32, web/wwAPI/wwUtils, hpdf, nfjson/nfXml, GridExtras, GridTreeView, ListProperty, tooltip, calendar, chatbot, email)
COMUN/Plugin/ Customer-specific extension scripts loaded at runtime
COMUN/meniuri/ Menu definitions
COMUN/datemenu/ Menu/permissions data tables
COMUN/Drepturi utilizatori/ User-rights resources
COMUN/Rapoarte/ Shared reports
COMUN/grafice/ Shared images
../COMUNROA/ SIBLING directory (outside this repo) holding the encryption FLLs and other binaries shared at runtime by every installed ROA app. roastart.prg references it as gcComunPath.
```
The repo's `COMUN/` and the sibling `COMUNROA/` are **two different things**`COMUN/` is source shared across the developer's apps, `COMUNROA/` is a runtime deployment dir on the customer machine.
### Auto-update mechanism
Driven from `Programe\updatecheck.prg::UpdateRoastart()`:
1. Reads a server manifest (`Roastart.xml`) listing items to refresh.
2. For each item, `oUpdate.updatecheck(...)` (defined in shared `COMUN`) compares the local file version with the server's, downloads via HTTP through `wwHTTP`/`wwXMLHTTP`, and replaces in place.
3. `gcSecurityPath` (`<gcDirMare>\Security\`) holds the decoded `ROA_SECURITY.TXT` derived from the encrypted `ROA_SECURITY.XML` pulled from the server.
4. `UpdateIniROA()` in `roastart.prg` is a one-shot migration that rewrites `settings.ini` and any `instantclient*\tnsnames.ora` to swap the legacy IP `83.103.197.79` for `roa.romfast.ro`. It self-disables via `[update] is_url_roa=1`.
If you change update logic, also update `changelog_roastart.txt` — it follows a date-stamped XML-comment block format: `<!-- DD/MM/YYYY ROASTART - X.Y.Z :nou:|:modificare:|:eroare: <description> -->`. Customers see this in-app.
### Database
- ODBC to Oracle. Connection bootstraps from `settings.ini` and (for legacy installs) Oracle `tnsnames.ora` under a sibling `instantclient*` folder.
- Default constants in `roastart.prg`: `gcHost = "jcsserver"`, `gcuserName = "contafin_ORACLE"`, `gcPassword = "123"` — these are dev defaults overridden at login by the connection form.
- `versiune_db.txt` (currently `2015_04_28_02`) is the DB schema stamp the app expects; mismatch should trigger an upgrade flow on the server side.
- Always run SQL through `goExecutor.oExecute(lcSql, lcCursor)` — never raw `SQLEXEC` — so the error funnel and connection retry behavior stay consistent.
## Conventions
- **Variable scope prefixes** (strict — used pervasively): `g` global / `p` private / `l` local / `t` parameter, then type letter `c` char, `n` numeric, `l` logical, `d` date, `o` object, `a` array. Examples: `gcAppPath`, `lnSucces`, `tnIdGrupProg`, `goExecutor`.
- **Commenting out**: VFP code uses `*!*` to mark commented-out blocks (vs. `*` for explanatory comments). When you remove code, prefer deleting it cleanly rather than adding more `*!*` graveyards — but follow the surrounding file's style if it's already heavy with them.
- **Modification markers**: changes are often annotated inline as `&& modificare v 2.x.y` followed by a closing `&& modificare v 2.x.y ^`. New significant changes should follow the same convention and bump the version in `changelog_roastart.txt`.
- **Error display**: use `aMessagebox(<msg>, <flags>, <title>)` (project wrapper) rather than `MESSAGEBOX(...)` so localization and styling stay consistent.
- **Cursors**: SQL results land in named cursors (`v_obiectegrup`, `cRoastartXml`, etc.). Always close prior cursors with `If Used(<name>) <newline> Use In <name> <newline> Endif` before re-issuing the query — this is the dominant idiom and avoids "cursor in use" failures.

54
Clase/appwiz_start.vc2 Normal file
View File

@@ -0,0 +1,54 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="appwiz_start.vcx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
*
DEFINE CLASS wzapplication AS wzapplication OF "..\comun\clase\appwiz.vcx"
*< CLASSDATA: Baseclass="container" Timestamp="" Scale="Pixels" Uniqueid="" />
*<PropValue>
Name = "wzapplication"
*</PropValue>
PROCEDURE onshutdown
Lparameters tlSilent
Local lnRaspuns
*!* On Shutdown
*!* On Error
*!* Clear Events
*!* If _vfp.StartMode <> 0
*!* Quit
*!* Endif
If !tlSilent
lnRaspuns = aMessagebox("Dori<72>i s<> p<>r<EFBFBD>si<73>i aplica<63>ia ROA START?",0+4+32,"Confirmare")
Else
lnRaspuns = 6
Endif
If lnRaspuns==6
deconectare()
If Type("goApp.aforms[1]") = "O" And !Isnull(goApp.aforms[1])
*!* daca ma loghez, schimb utilizatorul si apas "Renunta", atunci imi da eroare daca nu am si conditia !isnull
Unbindevents(_Screen,[Resize],goApp.aforms[1],[minimizeaza])
goApp.aforms[1].Release()
Endif
Unbindevents(_vfp.HWnd,0xA123)
On Shutdown
On Error
Clear Events
If _vfp.StartMode <> 0
Quit
Endif
Endif
ENDPROC
PROCEDURE restart
This.SetCaption("ROA Romfast Applications")
If Type("goApp.aforms[1]") = "O" AND !ISNULL(goApp.aforms[1])
Unbindevents(_Screen,[Resize],goApp.aforms[1],[minimizeaza])
Endif
Unbindevents(_vfp.HWnd,0xA123)
DoDefault()
ENDPROC
ENDDEFINE

1126
Clase/ofundal_start.vc2 Normal file

File diff suppressed because it is too large Load Diff

958
Clase/ostart.vc2 Normal file
View File

@@ -0,0 +1,958 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="ostart.vcx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
*
DEFINE CLASS cus_odata_drepturi AS _cusodatabase OF "..\comun\clase\_cus_odata_base.vcx"
*< CLASSDATA: Baseclass="custom" Timestamp="" Scale="Pixels" Uniqueid="" />
*<DefinedPropArrayMethod>
*p: gu
*</DefinedPropArrayMethod>
*<PropValue>
gu =
Name = "cus_odata_drepturi"
*</PropValue>
PROCEDURE make_sql
Lparameters toRec,tnId,tcGU,tcVar
lcActiune = Alltrim(This.cActiune)
If Inlist(lcActiune, "UPDATE",'INSERT') And Type('toRec') != "O"
Return .F.
Endif
If Inlist(lcActiune, "UPDATE",'DELETE') And Type('tnId') != "N"
Return .F.
Endif
If Inlist(lcActiune, "UPDATE",'DELETE')
lcId = Alltrim(Str(tnID))
IF !EMPTY(tcvar)
lcval = ALLTRIM(STR(toRec.&lcvar))
ENDIF
*!* lcidutil = ALLTRIM(STR(toRec.id_util))
IF tcGU == "GRUP"
lci = "id_gd"
lcidutil = ALLTRIM(STR(toRec.id_grup))
lcgu = "id_grup"
ELSE
lcidutil = ALLTRIM(STR(toRec.id_util))
lci = "id_ud"
lcgu = "id_util"
ENDIF
Endif
If Inlist(lcActiune, "UPDATE",'INSERT')
lnidgu = ALLTRIM(STR(tnID))
*!* IF tcGU == "GRUP"
*!* lcIdGU = ALLTRIM(STR(torec.id_grup))
*!* ELSE
*!* lcIdGU = ALLTRIM(STR(torec.id_util))
*!* ENDIF
lcIdProg = Alltrim(Str(torec.id_prog))
lcIdNiv = ALLTRIM(STR(torec.id_nivel))
lcIDFirma = ALLTRIM(STR(torec.id_firma))
Endif
Do Case
Case lcActiune = "INSERT"
IF tcGU == "GRUP"
lcSql = [INSERT INTO GRUP_DREPT (id_grup,id_prog,id_firma,id_nivel) VALUES (] + lnIdGU + [,] + lcIdProg + [,] + lcIDFirma + [,] + lcIdNiv + [)]
ELSE
lcSql = [INSERT INTO UTIL_DREPT (id_util,id_prog,id_firma,id_nivel) VALUES (] + lnIdGU + [,] + lcIdProg + [,] + lcIDFirma + [,] + lcIdNiv + [)]
ENDIF
Case lcActiune = "UPDATE"
lcSql = [UPDATE ] + tcGU + [_DREPT SET id_prog = ] + lcIdProg + [,id_firma = ] + lcIDFirma + [,ID_NIVEL = ] + lcIdNiv +;
[ where ] + lci + [ = ] + lcID
Case lcActiune = "DELETE"
IF !EMPTY(lcvar)
lcSql = [delete from ] + tcGU + [_DREPT where ] + lcgu + [=] + lcIdUtil + [ and ] + lcvar + [=] + lcval &&id_prog sau id_firma
ELSE
lcSql = [delete from ] + tcGU + [_DREPT where ] + lci + [=] + lcId && Sterge Linia curenta
ENDIF
Endcase
*!* STRTOFILE(LCSQL,'C:\DELETE.SQL')
This.csql = lcSql
ENDPROC
PROCEDURE salvare
Lparameters toRec,tnID,tcGU,tcVar
Private llSucces, lnSucces
llSucces = .T.
lnSucces = -1
lcActiune = Upper(Alltrim(This.cactiune))
lcMesaj = ''
lcTitlu = ''
Do Case
Case lcActiune = "INSERT"
lcMesaj = "Doriti sa adaugati inregistrarea?"
lcTitlu = "Adaugare"
lnOptiuni = 4 + 32
Case lcActiune = "UPDATE"
lcMesaj = "Doriti sa salvati modificarile?"
lcTitlu = "Modificare"
lnOptiuni = 4 + 32
Case lcActiune = "DELETE"
lcMesaj = "Doriti sa stergeti inregistrarea?"
lcTitlu = "Stergere"
lnOptiuni = 4 + 32 + 512
Endcase
If aMessagebox(lcMesaj,lnOptiuni,lcTitlu) = 6
PNIESIRE=1
If This.validare()
This.make_sql(toRec,tnID,tcGU,tcVar)
lcSql = Upper(Alltrim(This.csql))
llConditie = 'INSERT'$lcSql Or 'UPDATE'$lcSql Or 'DELETE'$lcSql Or 'BEGIN'$lcSql
If llConditie
lnSucces = SQLEXEC(gnHandle,lcSql)
Endif
If lnSucces < 0
RELEASE laEroare
AERROR(laEroare)
lcTextEroare = ''
IF TYPE('laEroare')!= "U"
lcTextEroare = laEroare(3)
ENDIF
RELEASE laEroare
Do Case
Case lcActiune = "INSERT"
lcMesaj = "Inregistrarea nu a fost adaugata." + CHR(13) + CHR(10) + lcTextEroare
lcTitlu = "Adaugare"
Case lcActiune = "UPDATE"
lcMesaj = "Inregistrarea nu a fost modificata." + CHR(13) + CHR(10) + lcTextEroare
lcTitlu = "Modificare"
Case lcActiune = "DELETE"
lcMesaj = "Inregistrarea nu a fost stearsa." + CHR(13) + CHR(10) + lcTextEroare
lcTitlu = "Stergere"
ENDCASE
aMessagebox(lcMesaj,0+48,lcTitlu)
llSucces = .F.
Endif
If lnSucces >=1 AND lcActiune = "DELETE"
lcMesaj = "Inregistrarea a fost stearsa."
lcTitlu = "Stergere"
aMessagebox(lcMesaj,0+64,lcTitlu)
Endif
ENDIF
ELSE
PNIESIRE=2
ENDIF
Return llSucces
ENDPROC
ENDDEFINE
DEFINE CLASS cus_odata_firma AS _cusodatabase OF "..\..\comun\clase\_cus_odata_base.vcx"
*< CLASSDATA: Baseclass="custom" Timestamp="" Scale="Pixels" Uniqueid="" />
*<PropValue>
Name = "cus_odata_firma"
*</PropValue>
PROCEDURE make_sql
Lparameters toRec,tnId
lcActiune = Alltrim(This.cActiune)
If Inlist(lcActiune, "UPDATE",'INSERT') And Type('toRec') != "O"
Return .F.
Endif
If Inlist(lcActiune, "UPDATE",'DELETE') And Type('tnId') != "N"
Return .F.
Endif
If Inlist(lcActiune, "UPDATE",'DELETE')
lcId = Alltrim(Str(tnId))
Endif
If Inlist(lcActiune, "UPDATE",'INSERT')
lcfirma = Nvl(STRTRAN(Alltrim(Upper(toRec.firma)),['],['']),"")
lcfscurt = Nvl(STRTRAN(Alltrim(Upper(toRec.fscurt)),['],['']),"")
lcCodF = Nvl(STRTRAN(Alltrim(Upper(toRec.cod_fiscal)),['],['']),"")
lcregc = Nvl(STRTRAN(Alltrim(Upper(toRec.reg_comert)),['],['']),"")
lcbanca1 = Nvl(STRTRAN(Alltrim(Upper(toRec.banca1)),['],['']),"")
lccontb1 = Nvl(STRTRAN(Alltrim(Upper(toRec.cont_banca1)),['],['']),"")
lcbanca2 = Nvl(STRTRAN(Alltrim(Upper(toRec.banca2)),['],['']),"")
lccontb2 = Nvl(STRTRAN(Alltrim(Upper(toRec.cont_banca2)),['],['']),"")
lcBanca3 = Nvl(STRTRAN(Alltrim(Upper(toRec.banca3)),['],['']),"")
lccontb3 = Nvl(STRTRAN(Alltrim(Upper(toRec.cont_banca3)),['],['']),"")
lcadresa = Nvl(STRTRAN(Alltrim(Upper(toRec.adresa)),['],['']),"")
lcCodFirma = Nvl(STRTRAN(Alltrim(Upper(toRec.cod_firma)),['],['']),"")
lnpersj = NVL(ALLTRIM(STR(toRec.persoana_juridica)),"0")
lncodang = NVL(ALLTRIM(STR(toRec.codang)),"0")
lcnume = Nvl(STRTRAN(Alltrim(Upper(toRec.nume)),['],['']),"")
lcprenume = Nvl(STRTRAN(Alltrim(Upper(toRec.prenume)),['],['']),"")
lctel = Nvl(STRTRAN(Alltrim(Upper(toRec.telefon)),['],['']),"")
lcfax = Nvl(STRTRAN(Alltrim(Upper(toRec.fax)),['],['']),"")
lcemail = Nvl(STRTRAN(Alltrim(Upper(toRec.email)),['],['']),"")
lcoasp = Nvl(STRTRAN(Alltrim(Upper(toRec.oasp)),['],['']),"")
lncapsv =NVL(ALLTRIM(STR(toRec.capital_soc_var,16,2)),"0")
lncapss =NVL(ALLTRIM(STR(toRec.capital_soc_sub,16,2)),"0")
lcpctl = Nvl(STRTRAN(Alltrim(Upper(toRec.punct_luc)),['],['']),"")
lccaen = Nvl(STRTRAN(Alltrim(Upper(toRec.caen)),['],['']),"")
lcschema = Nvl(STRTRAN(Alltrim(Upper(toRec.schema)),['],['']),"")
lnidm = NVL(ALLTRIM(STR(toRec.id_mama)),"0")
lnmama = NVL(ALLTRIM(STR(toRec.mama)),"0")
lcsucursala = Nvl(STRTRAN(Alltrim(Upper(toRec.sucursala)),['],['']),"")
lnidl = NVL(ALLTRIM(STR(toRec.id_loc)),"0")
Endif
Do Case
*!* Case lcActiune = "INSERT"
*!* lcSql = [INSERT INTO programe (NUME,director,caption,instalat,ordine) VALUES ('] + lcnume + [','] + lcdirector +[','] + ;
*!* lcaption + [',] + lninstalat + [,] + lnordine + [)]
Case lcActiune = "UPDATE"
lcSql = [UPDATE nom_firme SET firma = '] + lcfirma + [',fscurt = '] + lcfscurt + [',cod_fiscal = '] + ;
lcCodF + [',reg_comert = '] + lcregc + [',banca1 = '] + lcbanca1 + [',cont_banca1 = '] + lccontb1 + ;
[',banca2 = '] + lcbanca2 + [',cont_banca2 = '] + lccontb2 + [',banca3 = '] + lcbanca3 + ;
[',cont_banca3 = '] + lccontb3 + [',adresa = '] + lcadresa + [',cod_firma = '] + lcCodFirma + ;
[',persoana_juridica = ] + lnpersj + [,codang = ] + lncodang + [,nume = '] + lcnume + ;
[',prenume = '] + lcprenume + [',telefon = '] + lctel + [',fax = '] + lcfax + ;
[',email = '] + lcemail + [',oasp = '] + lcoasp + [',capital_soc_var = ] + lncapsv + ;
[,capital_soc_sub = ] + lncapss + [,punct_luc = '] + lcpctl + [',caen = '] + lccaen + ;
[',id_mama = ] + lnidm + [,mama = ] + lnmama + [,sucursala = '] + lcsucursala + [',id_loc = ] + lnidl +;
[ where id_firma = ] + lcId
*!* Case lcActiune = "DELETE"
*!*
*!* lcSql = [update programe set sters=1 where id_prog = ] + lcId
Endcase
*!* STRTOFILE(LCSQL,'C:\DELETE.SQL')
This.csql = lcSql
ENDPROC
ENDDEFINE
DEFINE CLASS frm_login AS _frmnotitle OF "..\comun\clase\_frm_base.vcx"
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" />
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
*< OBJECTDATA: ObjPath="cntEngleza" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="cntRomana" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Clb_operator" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Clb_parola" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Cb_server" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Cmd_login1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Cmd_logoff1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="lb_stare" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Odbcreg1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="ImageRomana" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="ImageEngleza" UniqueID="" Timestamp="" />
#INCLUDE "..\comun\include\security.h"
*<DefinedPropArrayMethod>
*m: getlastserver
*m: populate_host
*m: setlastserver
*p: cnume
*p: cparola
*p: nnrincerc
*p: _memberdata && XML Metadata for customizable properties
*</DefinedPropArrayMethod>
*<PropValue>
cnume =
cparola =
DoCreate = .T.
Name = "frm_login"
nnrincerc = 0
Picture = ..\grafice\roastart.bmp
_memberdata = <VFPData>
<memberdata name="getlastserver" display="getLastServer"/>
<memberdata name="setlastserver" display="setLastServer"/>
</VFPData>
*</PropValue>
ADD OBJECT 'Cb_server' AS cb_tx_simplu WITH ;
BorderWidth = 0, ;
Left = 42, ;
Name = "Cb_server", ;
TabIndex = 1, ;
Top = 52, ;
ZOrderSet = 4, ;
_CBBASE1.Name = "_CBBASE1", ;
_LBBASE1.Caption = "Server", ;
_LBBASE1.FontBold = .T., ;
_LBBASE1.Name = "_LBBASE1"
*< END OBJECT: ClassLib="..\comun\clase\lb_tx.vcx" BaseClass="container" />
ADD OBJECT 'Clb_operator' AS clb_tx_simplu WITH ;
BorderWidth = 0, ;
Left = 42, ;
Name = "Clb_operator", ;
TabIndex = 2, ;
Top = 144, ;
ZOrderSet = 2, ;
Text_simplu1.AutoComplete = 3, ;
Text_simplu1.ControlSource = "thisform.cnume", ;
Text_simplu1.Name = "Text_simplu1", ;
Lb_simplu1.Caption = "Operator", ;
Lb_simplu1.FontBold = .T., ;
Lb_simplu1.Name = "Lb_simplu1"
*< END OBJECT: ClassLib="..\comun\clase\lb_tx.vcx" BaseClass="container" />
ADD OBJECT 'Clb_parola' AS clb_tx_simplu WITH ;
BorderWidth = 0, ;
Left = 42, ;
Name = "Clb_parola", ;
TabIndex = 3, ;
Top = 177, ;
ZOrderSet = 3, ;
Text_simplu1.ControlSource = "thisform.cparola", ;
Text_simplu1.Name = "Text_simplu1", ;
Text_simplu1.PasswordChar = "*", ;
Lb_simplu1.Caption = "Parol<6F>", ;
Lb_simplu1.FontBold = .T., ;
Lb_simplu1.Name = "Lb_simplu1"
*< END OBJECT: ClassLib="..\comun\clase\lb_tx.vcx" BaseClass="container" />
ADD OBJECT 'Cmd_login1' AS cmd_login WITH ;
Caption = "\<Intr<74>", ;
Left = 180, ;
Name = "Cmd_login1", ;
TabIndex = 4, ;
Top = 216, ;
ZOrderSet = 5
*< END OBJECT: ClassLib="..\comun\clase\cmd_butoane.vcx" BaseClass="commandbutton" />
ADD OBJECT 'Cmd_logoff1' AS cmd_logoff WITH ;
Caption = "\<Renun<75><6E>", ;
Left = 276, ;
Name = "Cmd_logoff1", ;
TabIndex = 5, ;
Top = 216, ;
ZOrderSet = 6
*< END OBJECT: ClassLib="..\comun\clase\cmd_butoane.vcx" BaseClass="commandbutton" />
ADD OBJECT 'cntEngleza' AS container WITH ;
BorderColor = 0,64,128, ;
BorderWidth = 2, ;
Height = 20, ;
Left = 41, ;
Name = "cntEngleza", ;
Top = 223, ;
Visible = .F., ;
Width = 32, ;
ZOrderSet = 0
*< END OBJECT: BaseClass="container" />
ADD OBJECT 'cntRomana' AS container WITH ;
BorderColor = 0,64,128, ;
BorderWidth = 2, ;
Height = 20, ;
Left = 7, ;
Name = "cntRomana", ;
Top = 223, ;
Visible = .F., ;
Width = 32, ;
ZOrderSet = 1
*< END OBJECT: BaseClass="container" />
ADD OBJECT 'ImageEngleza' AS image WITH ;
Height = 16, ;
Left = 43, ;
MousePointer = 15, ;
Name = "ImageEngleza", ;
Picture = ..\comun\grafice\gb.gif, ;
Stretch = 2, ;
ToolTipText = "Limba engleza", ;
Top = 225, ;
Width = 28, ;
ZOrderSet = 10
*< END OBJECT: BaseClass="image" />
ADD OBJECT 'ImageRomana' AS image WITH ;
BorderStyle = 0, ;
Height = 16, ;
Left = 9, ;
MousePointer = 15, ;
Name = "ImageRomana", ;
Picture = ..\comun\grafice\ro.gif, ;
Stretch = 2, ;
ToolTipText = "Limba romana", ;
Top = 225, ;
Width = 28, ;
ZOrderSet = 9
*< END OBJECT: BaseClass="image" />
ADD OBJECT 'lb_stare' AS lb_titlu_albastru_b12 WITH ;
Caption = "NECONECTAT", ;
Left = 24, ;
Name = "lb_stare", ;
Top = 12, ;
ZOrderSet = 7
*< END OBJECT: ClassLib="..\comun\clase\lb.vcx" BaseClass="label" />
ADD OBJECT 'Odbcreg1' AS odbcreg WITH ;
Left = 24, ;
Name = "Odbcreg1", ;
Top = 190
*< END OBJECT: ClassLib="..\comun\clase\registry.vcx" BaseClass="custom" />
PROCEDURE do_login
*!* 21.06.2012
*!* marius.mutu
*!* tratare utilizatori ADMIN -1, SUPER -2
lcHost = Upper(Alltrim(Thisform.cb_server._cbbase1.Value))
lcSchema = ""
lcPassword = ""
lcIsCrypted = ""
If !Empty(lcHost)
If Used('crsHost')
Select schema,pwd,IsEncrypted From crsHost Where Upper(Alltrim(Host)) = lcHost Into Cursor crsServer
Select crsServer
Go Top
lcSchema = schema
lcPassword = ALLTRIM(pwd)
lcIsCrypted = IsEncrypted
Endif
Endif
lcHost = Alltrim(lcHost)
lcSchema = Alltrim(lcSchema)
lcPasswordOriginal=lcPassword
If lcIsCrypted="1"
IF gnewcryptxml=.T.
lcPasswordOriginal = "*!*"+STRCONV(lcPasswordOriginal,13)
lcPassword = EncryptDecrypt(lcPassword, ENCRYPTKEY, "decrypt","blowfish")
ELSE
lcPasswordOriginal = "*!*" + lcPasswordOriginal
lcPassword = EncryptDecrypt(lcPassword, ENCRYPTKEY, "decrypt","old")
ENDIF
Else
lcPassword = Alltrim(lcPassword)
Endif
deconectare()
lnHandle = conectare(lcHost, lcSchema, lcPassword) && IN proceduri_oracle.prg
If lnHandle < 0
Thisform.do_reset()
Thisform.lb_stare.Visible = .T.
Thisform.lb_stare.Caption = "NECONECTAT"
Return .F.
Endif
Thisform.lb_stare.Visible = .T.
Thisform.lb_stare.Caption = "CONECTAT"
gcHost = lcHost
gcUserName = lcSchema
gcPassword = lcPasswordOriginal
* se logheaza pe schema <contafin> cu <123>
* apeleaza <update_utilizatori>
* verifica daca utilizatorul este in <v_utilizatori> si initializeaza variabila globala <goUtilizator>
*** vad daca utilizatorul trebuie sa se logheze cu un alt DSN (jcsserver) cu alt username (contabilitate) fata de standard (jcsserver,contabilitate)
gcUserNameApp = Alltrim(Thisform.clb_operator.text_simplu1.Value)
gcPasswordApp=Alltrim(Thisform.clb_parola.text_simplu1.Value)
If Empty(Thisform.clb_operator.text_simplu1.Value)
aMessagebox("Nu ati introdus numele utilizatorului!",0+48,"Atentie")
Thisform.clb_operator.SetFocus()
Return
Endif
gnIdUtil = 0
llSucces = .F.
lcUserNameApp = Strtran(Upper(Alltrim(gcUserNameApp)),['],[''])
lcPasswordApp = Upper(Alltrim(gcPasswordApp))
This.MousePointer= 11
lnIdUtil = verifica_utilizator(lcUserNameApp,lcPasswordApp)
This.MousePointer= 0
If (m.lnIdUtil > -1) OR (m.lnIdUtil = -1 AND glAdministrator) OR (m.lnIdUtil = -2 AND glSupervizor)
gnIdUtil = lnIdUtil
llSucces = .T.
gcnume = lcUserNameApp
gcUtil = gnIdUtil
glIntrat = .T.
Endif
If !llSucces
Thisform.nnrincerc = Thisform.nnrincerc + 1
aMessagebox("Autentificarea nu a reusit!" + Chr(13) + Chr(10)+ "Utilizator sau parola incorecte.",0+48,"Atentie")
If Thisform.nnrincerc=3
gnButon=2
Thisform.Release
Else
Thisform.clb_operator.text_simplu1.SetFocus()
Endif
Return
Endif
Thisform.lb_stare.Caption="Conectat: "+Alltrim(Str(gnhandle))
*!* modificare v 2.0.29
This.setLastServer(lcHost)
*!* modificare v 2.0.29 ^
gnButon=1
Thisform.Release
ENDPROC
PROCEDURE do_logoff
gnButon=2
Thisform.Release
ENDPROC
PROCEDURE do_reset
Thisform.cnume=""
Thisform.clb_operator.text_simplu1.Refresh()
Thisform.cparola = ""
Thisform.clb_parola.Refresh()
ENDPROC
PROCEDURE getlastserver
Local loIniHandler
loIniHandler = Createobject("iniaccess")
lcHost = loIniHandler.getLastServer()
Release loIniHandler
Return lcHost
ENDPROC
PROCEDURE Init
DoDefault()
_Screen.Height=This.Height
_Screen.Width=This.Width
_Screen.AutoCenter=.T.
Thisform.Left=0
Thisform.Top=0
_Screen.Refresh()
lnHosts = This.populate_host()
If lnHosts > 0
Thisform.cb_server._CBBASE1.RowSourceType = 2
Thisform.cb_server._CBBASE1.RowSource = 'crsHost.Host'
Select crsHost
*!* modificare v 2.0.29
*!* GO top
lcServer = This.getLastServer()
If Empty(lcServer)
Go Top
Else
Locate For Host = lcServer
If !Found()
Go Top
Endif
Endif
*!* modificare v 2.0.29 ^
lcHost = Host
Thisform.cb_server._CBBASE1.Requery()
Thisform.cb_server._CBBASE1.Value=lcHost
Else
Quit
Endif
If goLocale.Locale = 'Romana'
Thisform.cntRomana.Visible = .T.
goLocale.SetLocale( Thisform )
Else
Thisform.cntEngleza.Visible = .T.
goLocale.SetLocale( Thisform )
Endif
ENDPROC
PROCEDURE populate_host
Local lnValid
lnValid = GetcrsSecurity(gcSecurityFile)
Dimension laDrivere[30]
Thisform.odbcreg1.getodbcdrvrs(@laDrivere,.T.)
*!* modificare v 2.0.29
If Used('crshost')
*!* modificare v 2.0.29 ^
Select crshost
Scan
lcHost=Alltrim(Upper(Host))
If Ascan(laDrivere,lcHost,1)=0
Delete Next 1
Endif
Endscan
*!* modificare v 2.0.29
Endif
*!* modificare v 2.0.29 ^
Return lnValid
ENDPROC
PROCEDURE setlastserver
Lparameters tcHost
Local loIniHandler
loIniHandler = Createobject("iniaccess")
loIniHandler.setLastServer(tcHost)
Release loIniHandler
ENDPROC
PROCEDURE Cb_server._CBBASE1.Destroy
IF USED('crsHost')
USE IN crsHost
ENDIF
ENDPROC
PROCEDURE Cb_server._CBBASE1.DropDown
Thisform.lb_stare.Visible = .F.
ENDPROC
PROCEDURE Cb_server._CBBASE1.LostFocus
*!* lcHost = Upper(Alltrim(This.Value))
*!* lcSchema = ""
*!* lcPassword = ""
*!* lcIsCrypted = ""
*!* If !Empty(lcHost)
*!* If Used('crsHost')
*!* Select schema,pwd,IsEncrypted From crsHost Where Upper(Alltrim(Host)) = lcHost Into Cursor crsServer
*!* Select crsServer
*!* Go Top
*!* lcSchema = schema
*!* lcPassword = ALLTRIM(pwd)
*!* lcIsCrypted = IsEncrypted
*!* Endif
*!* Endif
*!* lcHost = Alltrim(lcHost)
*!* lcSchema = Alltrim(lcSchema)
*!* lcPasswordOriginal=lcPassword
*!* If lcIsCrypted="1"
*!* IF gnewcryptxml=.T.
*!* lcPasswordOriginal = "*!*"+STRCONV(lcPasswordOriginal,13)
*!* lcPassword = EncryptDecrypt(lcPassword, ENCRYPTKEY, "decrypt","blowfish")
*!* ELSE
*!* lcPasswordOriginal = "*!*" + lcPasswordOriginal
*!* lcPassword = EncryptDecrypt(lcPassword, ENCRYPTKEY, "decrypt","old")
*!* ENDIF
*!*
*!* Else
*!* lcPassword = Alltrim(lcPassword)
*!* Endif
*!* deconectare()
*!* lnHandle = conectare(lcHost, lcSchema, lcPassword) && IN proceduri_oracle.prg
*!* If lnHandle < 0
*!* Thisform.do_reset()
*!* Thisform.lb_stare.Visible = .T.
*!* Thisform.lb_stare.Caption = "NECONECTAT"
*!* Return .F.
*!* Endif
*!* Thisform.lb_stare.Visible = .T.
*!* Thisform.lb_stare.Caption = "CONECTAT"
*!* gcHost = lcHost
*!* gcUserName = lcSchema
*!* gcPassword = lcPasswordOriginal
*!* Thisform.do_reset()
ENDPROC
PROCEDURE ImageEngleza.Click
goLocale.Locale='English'
IF TYPE('goLocale') = 'O'
golocale.SetLocale( thisform )
ENDIF
thisform.cntEngleza.Visible = .T.
thisform.cntRomana.Visible = .F.
lcFisierIni = shortpath(GetIniPath())
WritePrivateProfileString("locale", "lang", 'English' ,m.lcFisierIni)
ENDPROC
PROCEDURE ImageRomana.Click
goLocale.Locale='Romana'
IF TYPE('goLocale') = 'O'
golocale.SetLocale( thisform )
ENDIF
thisform.cntRomana.Visible = .T.
thisform.cntEngleza.Visible = .F.
lcFisierIni = shortpath(GetIniPath())
WritePrivateProfileString("locale", "lang", 'Romana' ,m.lcFisierIni)
ENDPROC
ENDDEFINE
DEFINE CLASS frm_mesaj AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" />
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
*< OBJECTDATA: ObjPath="lbl_mesaj1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Nu1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Da1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="imagine1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="lbl_mesaj2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="txt_numar" UniqueID="" Timestamp="" />
*<DefinedPropArrayMethod>
*p: nnr
*</DefinedPropArrayMethod>
*<PropValue>
BorderStyle = 1
Desktop = .T.
DoCreate = .T.
Height = 192
Name = "frm_mesaj"
nnr = 0
Width = 400
_shape1.Height = 29
_shape1.Left = 0
_shape1.Name = "_shape1"
_shape1.Top = 0
_shape1.Width = 402
_shape1.ZOrderSet = 3
_SHAPE2.Height = 29
_SHAPE2.Left = 367
_SHAPE2.Name = "_SHAPE2"
_SHAPE2.Top = 0
_SHAPE2.Width = 34
_SHAPE2.ZOrderSet = 6
LB_TITLU_ALB_B121.Caption = "Titlu"
LB_TITLU_ALB_B121.FontBold = .T.
LB_TITLU_ALB_B121.Name = "LB_TITLU_ALB_B121"
LB_TITLU_ALB_B121.TabIndex = 5
LB_TITLU_ALB_B121.ZOrderSet = 7
BUT_TERMIN1.Left = 368
BUT_TERMIN1.Name = "BUT_TERMIN1"
BUT_TERMIN1.TabIndex = 1
BUT_TERMIN1.Top = 1
BUT_TERMIN1.ZOrderSet = 9
*</PropValue>
ADD OBJECT 'Da1' AS but_da WITH ;
Height = 30, ;
Left = 151, ;
Name = "Da1", ;
TabIndex = 2, ;
Top = 156, ;
Width = 55, ;
ZOrderSet = 2
*< END OBJECT: ClassLib="..\..\comun\clase\cmd_butoane.vcx" BaseClass="commandbutton" />
ADD OBJECT 'imagine1' AS image WITH ;
Height = 33, ;
Left = 12, ;
Name = "imagine1", ;
Picture = ..\..\, ;
Top = 48, ;
Width = 32, ;
ZOrderSet = 4
*< END OBJECT: BaseClass="image" />
ADD OBJECT 'lbl_mesaj1' AS _lbbase WITH ;
Alignment = 2, ;
AutoSize = .F., ;
Caption = "mesaj1", ;
FontSize = 10, ;
Height = 102, ;
Left = 51, ;
Name = "lbl_mesaj1", ;
Style = 0, ;
TabIndex = 4, ;
Top = 42, ;
Width = 339, ;
WordWrap = .T., ;
ZOrderSet = 0
*< END OBJECT: ClassLib="..\..\comun\clase\_lb_base.vcx" BaseClass="label" />
ADD OBJECT 'lbl_mesaj2' AS _lbbase WITH ;
Alignment = 2, ;
Caption = "mesaj2", ;
FontSize = 10, ;
Height = 18, ;
Left = 178, ;
Name = "lbl_mesaj2", ;
TabIndex = 6, ;
Top = 65, ;
Width = 44, ;
ZOrderSet = 5
*< END OBJECT: ClassLib="..\..\comun\clase\_lb_base.vcx" BaseClass="label" />
ADD OBJECT 'Nu1' AS but_nu WITH ;
Height = 30, ;
Left = 207, ;
Name = "Nu1", ;
TabIndex = 3, ;
Top = 156, ;
Width = 55, ;
ZOrderSet = 1
*< END OBJECT: ClassLib="..\..\comun\clase\cmd_butoane.vcx" BaseClass="commandbutton" />
ADD OBJECT 'txt_numar' AS textbox WITH ;
Alignment = 2, ;
BackStyle = 0, ;
BorderStyle = 0, ;
ControlSource = "thisform.nnr", ;
FontBold = .T., ;
FontSize = 10, ;
Height = 23, ;
InputMask = (get_mask(12,gnPa)), ;
Left = 264, ;
Name = "txt_numar", ;
TabIndex = 7, ;
TabStop = .F., ;
Top = 66, ;
Width = 97, ;
ZOrderSet = 8
*< END OBJECT: BaseClass="textbox" />
PROCEDURE actualizeaza_drepturi
*!*
ENDPROC
PROCEDURE Init
LPARAMETERS tctitlu,tcimagine,tctip,tcmesaj1,tmesaj2
DODEFAULT()
WITH this
.lb_titlu_alb_b121.Caption = tctitlu
.imagine1.Picture = IIF(EMPTY(tcimagine),[info_c.ico],tcimagine)
.lbl_mesaj1.caption = IIF(EMPTY(tcmesaj1),[],tcmesaj1)
IF TYPE('tmesaj2') = 'N'
.lbl_mesaj2.visible = .f.
.nnr = tmesaj2
lnCul = IIF(.nnr<0,RGB(255,0,0),iif(.nnr>0,RGB(0,0,255),RGB(0,255,0)))
.txt_numar.forecolor = lnCul
.txt_numar.left = 151
ELSE
.lbl_mesaj2.caption = IIF(EMPTY(tmesaj2),[],tmesaj2)
.txt_numar.visible = .f.
ENDIF
DO case
CASE UPPER(ALLTRIM(tctip)) = [AVERTIZARE] OR UPPER(ALLTRIM(tctip)) = [INFORMARE] OR EMPTY(tctip)
.da1.Visible = .f.
.nu1.Visible = .f.
._shape2.Visible = .t.
.but_termin1.visible = .t.
CASE UPPER(ALLTRIM(tctip)) = [INTREBARE]
.da1.Visible = .t.
.nu1.Visible = .t.
._shape2.Visible = .f.
.but_termin1.visible = .f.
ENDCASE
ENDWITH
ENDPROC
PROCEDURE KeyPress
Lparameters nKeyCode, nShiftAltCtrl
Do Case
Case nKeyCode=27 And nShiftAltCtrl=0
Nodefault
This.do_renunt()
Case nKeyCode=6 And nShiftAltCtrl=2
NODEFAULT
This.do_termin()
Endcase
ENDPROC
PROCEDURE Show
LPARAMETERS nStyle
IF !FILE(THIS.Imagine1.PICTURE)
THIS.IMagine1.Visible=.F.
ENDIF
ENDPROC
ENDDEFINE
DEFINE CLASS keepalive AS timer
*< CLASSDATA: Baseclass="timer" Timestamp="" Scale="Pixels" Uniqueid="" />
*<PropValue>
Enabled = .F.
Height = 23
Name = "keepalive"
Width = 23
*</PropValue>
PROCEDURE Timer
*** instructiune KeepAlive
TRY
lnSucces = goExecutor.oExecute([update SERVER_INFO set value = 'x' where 1=2])
CATCH
ENDTRY
ENDPROC
ENDDEFINE
DEFINE CLASS mygridimagecontainer AS container
*< CLASSDATA: Baseclass="container" Timestamp="" Scale="Pixels" Uniqueid="" />
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
*< OBJECTDATA: ObjPath="Image1" UniqueID="" Timestamp="" />
*<DefinedPropArrayMethod>
*m: backstyle_access
*m: backstyle_assign
*</DefinedPropArrayMethod>
*<PropValue>
BackStyle = 0
BorderWidth = 0
Height = 25
Name = "mygridimagecontainer"
Width = 25
*</PropValue>
ADD OBJECT 'Image1' AS image WITH ;
Anchor = 15, ;
BackStyle = 0, ;
Height = 24, ;
Left = 0, ;
Name = "Image1", ;
Stretch = 1, ;
Top = 0, ;
Width = 24
*< END OBJECT: BaseClass="image" />
PROCEDURE backstyle_access
*To do: Modify this routine for the Access method
this.image1.Picture=EVALUATE(this.Parent.ControlSource)
RETURN THIS.BackStyle
ENDPROC
PROCEDURE backstyle_assign
LPARAMETERS vNewVal
*To do: Modify this routine for the Assign method
THIS.BackStyle = m.vNewVal
ENDPROC
ENDDEFINE

87
Clase/ostart_admin.vc2 Normal file
View File

@@ -0,0 +1,87 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="ostart_admin.vcx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
*
DEFINE CLASS frm_import AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" />
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
*< OBJECTDATA: ObjPath="Clb_tx_simplu1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Clb_tx_simplu2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Clb_tx_simplu3" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Clb_tx_simplu4" UniqueID="" Timestamp="" />
*<PropValue>
DoCreate = .T.
Height = 360
Name = "frm_import"
Width = 766
_shape1.Height = 29
_shape1.Left = 0
_shape1.Name = "_shape1"
_shape1.Top = 0
_shape1.Width = 768
_SHAPE2.Height = 29
_SHAPE2.Left = 730
_SHAPE2.Name = "_SHAPE2"
_SHAPE2.Top = 0
_SHAPE2.Width = 38
LB_TITLU_ALB_B121.Caption = "IMPORT"
LB_TITLU_ALB_B121.FontBold = .T.
LB_TITLU_ALB_B121.Name = "LB_TITLU_ALB_B121"
BUT_TERMIN1.Left = 734
BUT_TERMIN1.Name = "BUT_TERMIN1"
BUT_TERMIN1.Top = 1
*</PropValue>
ADD OBJECT 'Clb_tx_simplu1' AS clb_tx_simplu WITH ;
Left = 24, ;
Name = "Clb_tx_simplu1", ;
Top = 48, ;
Text_simplu1.Height = 23, ;
Text_simplu1.Left = 60, ;
Text_simplu1.Name = "Text_simplu1", ;
Text_simplu1.Top = 3, ;
Text_simplu1.Width = 225, ;
Lb_simplu1.Name = "Lb_simplu1"
*< END OBJECT: ClassLib="..\..\comun\clase\lb_tx.vcx" BaseClass="container" />
ADD OBJECT 'Clb_tx_simplu2' AS clb_tx_simplu WITH ;
Left = 24, ;
Name = "Clb_tx_simplu2", ;
Top = 96, ;
Text_simplu1.Height = 23, ;
Text_simplu1.Left = 60, ;
Text_simplu1.Name = "Text_simplu1", ;
Text_simplu1.Top = 3, ;
Text_simplu1.Width = 225, ;
Lb_simplu1.Name = "Lb_simplu1"
*< END OBJECT: ClassLib="..\..\comun\clase\lb_tx.vcx" BaseClass="container" />
ADD OBJECT 'Clb_tx_simplu3' AS clb_tx_simplu WITH ;
Left = 24, ;
Name = "Clb_tx_simplu3", ;
Top = 138, ;
Text_simplu1.Height = 23, ;
Text_simplu1.Left = 60, ;
Text_simplu1.Name = "Text_simplu1", ;
Text_simplu1.Top = 3, ;
Text_simplu1.Width = 225, ;
Lb_simplu1.Name = "Lb_simplu1"
*< END OBJECT: ClassLib="..\..\comun\clase\lb_tx.vcx" BaseClass="container" />
ADD OBJECT 'Clb_tx_simplu4' AS clb_tx_simplu WITH ;
Left = 24, ;
Name = "Clb_tx_simplu4", ;
Top = 181, ;
Text_simplu1.Height = 23, ;
Text_simplu1.Left = 60, ;
Text_simplu1.Name = "Text_simplu1", ;
Text_simplu1.Top = 3, ;
Text_simplu1.Width = 225, ;
Lb_simplu1.Name = "Lb_simplu1"
*< END OBJECT: ClassLib="..\..\comun\clase\lb_tx.vcx" BaseClass="container" />
ENDDEFINE

1061
Clase/ostart_grup.vc2 Normal file

File diff suppressed because one or more lines are too long

1288
Clase/ostart_init.vc2 Normal file

File diff suppressed because one or more lines are too long

185
Clase/ostart_obiecte.vc2 Normal file
View File

@@ -0,0 +1,185 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="ostart_obiecte.vcx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
*
DEFINE CLASS oleacces AS _olecontrol OF "..\comun\clase\_baza.vcx"
*< CLASSDATA: Baseclass="olecontrol" Timestamp="" Scale="Pixels" Uniqueid="" Nombre="oleacces" Parent="" ObjName="oleacces" OLEObject="C:\WINDOWS\system32\MSCOMCTL.OCX" Value="0M8R4KGxGuEAAAAAAAAAAAAAAAAAAAAAPgADAP7/CQAGAAAAAAAAAAAAAAABAAAAAQAAAAAAAAAAEAAAAgAAAAEAAAD+////AAAAAAAAAAD////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9/////v////7///8EAAAA/v///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////1IAbwBvAHQAIABFAG4AdAByAHkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAWAAUA//////////8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIBTyQaXk8YBAwAAAMACAAAAAAAAAwBPAGwAZQBPAGIAagBlAGMAdABEAGEAdABhAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB4AAgEDAAAAAgAAAP////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAagAAAAAAAAADAEEAYwBjAGUAcwBzAE8AYgBqAFMAaQB0AGUARABhAHQAYQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJgACAP///////////////wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAABcAAAAAAAAAAMAQwBoAGEAbgBnAGUAZABQAHIAbwBwAHMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcAAIA////////////////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAAKIBAAAAAAAABAAAAAIAAAD+////BQAAAP7///8GAAAABwAAAAgAAAAJAAAACgAAAP7///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////+2kEHHiYXREbFqAMDwKDYoIUM0EggAAABIIQAAZhIAALE8wWoBAAYAIgAAABkAAADtAwAACQAAAJmrHQAB782rXAAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAACQAAAA4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA5MzY4MjY1RS04NUZFLTExZDEtOEJFMy0wMDAwRjg3NTREQTFmAHQAIABXAGkAbgBkAG8AdwBzACAAUgBlAHAAbwByAHQAIAABAACADgAAAEhpZGVTZWxlY3Rpb24ABQAAAEwAAAAADAAAAEluZGVudGF0aW9uABEAAABODQAAAAcAAAAAAAAAAAAFAGitHQADAAAAAAAAAAUAAIC46xIAAQAAAFwAH97svQEABQD86xIATgBUAFwAUwB5AHMAdABlAG0AMwAyAAAAQ0AKAAAATGFiZWxFZGl0AAkAAABJCgAAAAAAAAAKAAAATGluZVN0eWxlAAkAAABJCgAAAAEAAAANAAAATW91c2VQb2ludGVyAAkAAABJCgAAAAAAAAAOAAAAUGF0aFNlcGFyYXRvcgAKAAAASAAAAAABAAAAXAcAAABTb3J0ZWQABQAAAEwAAAAABgAAAFN0eWxlAAkAAABJCgAAAAYAAAAMAAAAT0xFRHJhZ01vZGUACQAAAEkKAAAAAAAAAAwAAABPTEVEcm9wTW9kZQAJAAAASQoAAAAAAAAACwAAAEFwcGVhcmFuY2UACQAAAEkKAAAAAAAAAAwAAABCb3JkZXJTdHlsZQAJAAAASQoAAAABAAAACwAAAENoZWNrYm94ZXMABQAAAEwBAAAADgAAAEZ1bGxSb3dTZWxlY3QABQAAAEwAAAAADAAAAEhvdFRyYWNraW5nAAUAAABMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA" />
*<DefinedPropArrayMethod>
*m: actualizeaza_tree
*m: adauga_frunze
*m: bifeaza_nod
*m: citeste_meniu
*m: citeste_noduri
*m: citeste_pageframe
*m: curata_tree
*m: initializeaza_tree
*p: cmeniu && Numele meniului
*p: cpageframe
*</DefinedPropArrayMethod>
*<PropValue>
cmeniu =
cpageframe =
Height = 178
Name = "oleacces"
Width = 322
*</PropValue>
PROCEDURE actualizeaza_tree
Select v_obiectegrup
Scan
lcCheie=Alltrim(cheie)
loNode=This.Object.Nodes.Item(lcCheie)
loNode.Checked= .T.
This.nodeCheck(loNode)
Endscan
ENDPROC
PROCEDURE adauga_frunze
ENDPROC
PROCEDURE bifeaza_nod
Lparameters Node,llChecked
Local loChild,i
*!* If Isnull(Node.Parent)
*!* loProp='this.cnt'+Node.Key
*!* If Node.checked
*!* &loProp=Node.children
*!* Else
*!* &loProp=0
*!* Endif
*!* Node.bold=Node.checked
*!* loChild=Node.Child.FirstSibling
*!* For i=1 To Node.children
*!* loChild.checked=Node.checked
*!* loChild=loChild.Next
*!* Endfor
*!* Else
*!* loProp='this.cnt'+Node.Parent.Key
*!* If Node.checked
*!* &loProp=&loProp+1
*!* Node.Parent.bold=Node.checked
*!* If &loProp=Node.Parent.children
*!* Node.Parent.checked=.T.
*!* Endif
*!* Else
*!* &loProp=&loProp-1
*!* If Node.Parent.checked
*!* Node.Parent.checked=.F.
*!* Endif
*!* If &loProp=0
*!* Node.Parent.bold=.F.
*!* Endif
*!* Endif
*!* Endif
loChild=Node.Child.FirstSibling
For i=1 To Node.children
If loChild.children>0
loChild.Bold=llChecked
This.bifeaza_nod(loChild,llChecked)
Endif
loChild.checked=llChecked
loChild=loChild.Next
loProp="this.cnt"+Node.Key
&loProp=&loProp+Iif(llChecked,1,-1)
Endfor
ENDPROC
PROCEDURE citeste_meniu
ENDPROC
PROCEDURE citeste_noduri
Local lcAcces
lcAcces=[]
For i=1 To This.Nodes.Count
If This.Nodes.Item(i).Checked And This.Nodes.Item(i).Children=0
lcAcces=lcAcces+This.Nodes.Item(i).Key
Endif
Endfor
Return lcAcces
ENDPROC
PROCEDURE citeste_pageframe
ENDPROC
PROCEDURE curata_tree
This.Nodes.Clear
This.Refresh()
ENDPROC
PROCEDURE initializeaza_tree
This.curata_tree()
Select v_obiecte
Scan
lcCheie=Alltrim(cale)
lcText=Alltrim(descriere)
lnNivel=nivel
If nivel=1
lcCheie=Strtran(lcCheie,[/],[])
This.Nodes.Add(,,lcCheie,lcText)
Else
lcTata=Strtran(Substr(lcCheie,1,At([/],lcCheie,lnNivel)),[/],[])
lcCheie=Strtran(lcCheie,[/],[])
This.Nodes.Add(lcTata,4,lcCheie,lcText)
Endif
lcProp="cnt"+lcCheie
This.AddProperty(lcProp,0)
Endscan
ENDPROC
PROCEDURE NodeCheck
*** ActiveX Control Event ***
Lparameters Node
Local loNode
*!* If aMessagebox("Doriti sa suspendati?",4,"")==6
*!* Debug
*!* Suspend
*!* Endif
DoDefault()
llChecked=Node.checked
If Node.children<>0
Node.bold=llChecked
Endif
loProp="this.cnt"+Node.Key
If Isnull(Node.Parent)
If Node.children<>0
This.bifeaza_nod(Node,llChecked)
&loProp=Iif(llChecked,Node.children,0)
Endif
Else
If Node.children<>0
This.bifeaza_nod(Node,llChecked)
&loProp=Iif(llChecked,Node.children,0)
Else
&loProp=Iif(llChecked,1,0)
Endif
loNode=Node
lnProp=Iif(llChecked,1,-1)
Do While !Isnull(loNode.Parent)
loNode=loNode.Parent
loProp="this.cnt"+loNode.Key
&loProp=&loProp+lnProp
Do Case
Case &loProp=0
loNode.bold=.F.
lnProp=Iif(loNode.checked,-1,0)
loNode.checked=.F.
Case &loProp=loNode.children
loNode.checked=.T.
loNode.bold=.T.
lnProp=1
Otherwise
lnProp=Iif(loNode.checked,-1,0)
loNode.checked=.F.
loNode.bold=.T.
Endcase
Enddo
Endif
ENDPROC
ENDDEFINE

1918
Clase/ostart_util.vc2 Normal file

File diff suppressed because one or more lines are too long

1835
Ferestre/frm_fundal.sc2 Normal file

File diff suppressed because it is too large Load Diff

252
Ferestre/frm_iniconfig.sc2 Normal file
View File

@@ -0,0 +1,252 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="frm_iniconfig.scx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
*
DEFINE CLASS dataenvironment AS dataenvironment
*< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" />
*<PropValue>
DataSource = .NULL.
Height = 0
Left = 0
Name = "Dataenvironment"
Top = 0
Width = 0
*</PropValue>
ENDDEFINE
DEFINE CLASS frm_iniupdate AS formtermin OF "..\comun\clase\_frm_base.vcx"
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" />
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
*< OBJECTDATA: ObjPath="Label1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Label2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="cmb_Default" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Label3" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="txt_NetworkPath" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="txt_URL" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="But_renunt1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Command1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="txt_utilizator" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Label4" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Label5" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="txt_parola" UniqueID="" Timestamp="" />
*<PropValue>
BorderStyle = 1
Desktop = .T.
DoCreate = .T.
Height = 191
Name = "frm_iniupdate"
Width = 614
_shape1.Anchor = 11
_shape1.Height = 29
_shape1.Left = 0
_shape1.Name = "_shape1"
_shape1.Top = 0
_shape1.Width = 615
_shape2.Height = 29
_shape2.Left = 553
_shape2.Name = "_shape2"
_shape2.Top = 0
_shape2.Width = 62
Lb_titlu_alb_b121.Anchor = 0
Lb_titlu_alb_b121.Caption = "Configurare actualiz<69>ri"
Lb_titlu_alb_b121.Name = "Lb_titlu_alb_b121"
BUT_TERMIN1.Anchor = 9
BUT_TERMIN1.Left = 584
BUT_TERMIN1.Name = "BUT_TERMIN1"
BUT_TERMIN1.TabIndex = 6
BUT_TERMIN1.Top = 1
Gridsort1.Name = "Gridsort1"
*</PropValue>
ADD OBJECT 'But_renunt1' AS but_renunt WITH ;
Anchor = 9, ;
Left = 554, ;
Name = "But_renunt1", ;
Top = 1
*< END OBJECT: ClassLib="..\comun\clase\cmd_butoane.vcx" BaseClass="commandbutton" />
ADD OBJECT 'cmb_Default' AS combobox WITH ;
FontCharSet = 238, ;
Height = 24, ;
Left = 125, ;
Name = "cmb_Default", ;
Style = 2, ;
TabIndex = 3, ;
Top = 107, ;
Width = 196
*< END OBJECT: BaseClass="combobox" />
ADD OBJECT 'Command1' AS commandbutton WITH ;
Anchor = 9, ;
BackColor = 255,255,255, ;
Caption = "...", ;
Height = 20, ;
Left = 589, ;
Name = "Command1", ;
Top = 48, ;
Width = 24
*< END OBJECT: BaseClass="commandbutton" />
ADD OBJECT 'Label1' AS label WITH ;
BackColor = 255,255,255, ;
Caption = "Re<52>ea local<61> :", ;
FontCharSet = 238, ;
Height = 17, ;
Left = 25, ;
Name = "Label1", ;
Top = 50, ;
Width = 77
*< END OBJECT: BaseClass="label" />
ADD OBJECT 'Label2' AS label WITH ;
BackColor = 255,255,255, ;
Caption = "Internet :", ;
Height = 17, ;
Left = 25, ;
Name = "Label2", ;
Top = 82, ;
Width = 56
*< END OBJECT: BaseClass="label" />
ADD OBJECT 'Label3' AS label WITH ;
AutoSize = .T., ;
BackColor = 255,255,255, ;
Caption = "Metoda implicit<69> :", ;
FontCharSet = 238, ;
Height = 17, ;
Left = 25, ;
Name = "Label3", ;
Top = 110, ;
Width = 97
*< END OBJECT: BaseClass="label" />
ADD OBJECT 'Label4' AS label WITH ;
BackColor = 255,255,255, ;
Caption = "Utilizator :", ;
Height = 17, ;
Left = 25, ;
Name = "Label4", ;
Top = 139, ;
Width = 57
*< END OBJECT: BaseClass="label" />
ADD OBJECT 'Label5' AS label WITH ;
BackColor = 255,255,255, ;
Caption = "Parol<6F> :", ;
FontCharSet = 238, ;
Height = 17, ;
Left = 25, ;
Name = "Label5", ;
Top = 167, ;
Width = 45
*< END OBJECT: BaseClass="label" />
ADD OBJECT 'txt_NetworkPath' AS textbox WITH ;
Anchor = 10, ;
Height = 23, ;
Left = 125, ;
Name = "txt_NetworkPath", ;
TabIndex = 1, ;
Top = 47, ;
Width = 457
*< END OBJECT: BaseClass="textbox" />
ADD OBJECT 'txt_parola' AS textbox WITH ;
Height = 23, ;
Left = 125, ;
Name = "txt_parola", ;
TabIndex = 5, ;
Top = 163, ;
Width = 457
*< END OBJECT: BaseClass="textbox" />
ADD OBJECT 'txt_URL' AS textbox WITH ;
Anchor = 10, ;
Height = 23, ;
Left = 125, ;
Name = "txt_URL", ;
TabIndex = 2, ;
Top = 77, ;
Width = 457
*< END OBJECT: BaseClass="textbox" />
ADD OBJECT 'txt_utilizator' AS textbox WITH ;
Height = 23, ;
Left = 125, ;
Name = "txt_utilizator", ;
TabIndex = 4, ;
Top = 136, ;
Width = 196
*< END OBJECT: BaseClass="textbox" />
PROCEDURE Activate
ENDPROC
PROCEDURE do_termin
inihandler = Createobject("iniaccess")
inihandler.setNetworkPath(Alltrim(Thisform.txt_NetworkPath.Value))
inihandler.setURL(Alltrim(Thisform.txt_URL.Value))
inihandler.setUsername(ALLTRIM(Thisform.txt_utilizator.Value))
inihandler.setPasswordDirect(ALLTRIM(Thisform.txt_parola.Value))
If(Thisform.cmb_Default.ListIndex=1)
inihandler.SetDefault("NetworkPath")
Else
inihandler.SetDefault("URL")
Endif
Release inihandler
DoDefault()
ENDPROC
PROCEDURE Init
DoDefault()
This.cmb_Default.AddItem("Re<52>ea local<61>",1)
This.cmb_Default.AddItem("Internet",2)
inihandler = Createobject("iniaccess")
This.txt_NetworkPath.Value=inihandler.getNetworkPath()
This.txt_URL.Value=inihandler.getURL()
This.txt_utilizator.Value=inihandler.getUsername()
This.txt_parola.Value=inihandler.getPasswordDirect()
If(inihandler.getDefault()="NetworkPath")
This.cmb_Default.ListIndex=1
Else
This.cmb_Default.ListIndex=2
Endif
Release inihandler
ENDPROC
PROCEDURE KeyPress
Lparameters nKeyCode, nShiftAltCtrl
IF nKeyCode=13
thisform.Do_termin()
ENDIF
ENDPROC
PROCEDURE Command1.Click
pathString=GETDIR(thisform.txt_NetworkPath.Value,"Introduceti calea din reteaua locala catre update-uri","Actualizari locale",64)
IF pathString#""
thisform.txt_NetworkPath.Value=LOWER(pathString)
ENDIF
ENDPROC
PROCEDURE txt_NetworkPath.KeyPress
LPARAMETERS nKeyCode, nShiftAltCtrl
ENDPROC
ENDDEFINE

294
Ferestre/frm_update.sc2 Normal file
View File

@@ -0,0 +1,294 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="frm_update.scx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
*
DEFINE CLASS _frmbase1 AS _frmbase OF "..\comun\clase\_frm_base.vcx"
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" />
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
*< OBJECTDATA: ObjPath="Grid1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Grid1.Column1.Header1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Grid1.Column1.Check1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Grid1.Column2.Header1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Grid1.Column2.Mygridimagecontainer1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Grid1.Column3.Header1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Grid1.Column3.Text1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Grid1.Column4.Header1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Grid1.Column4.Text1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="cmdActualizeaza" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Edit1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="_progressbar1" UniqueID="" Timestamp="" />
*<DefinedPropArrayMethod>
*p: lshow
*</DefinedPropArrayMethod>
*<PropValue>
Desktop = .T.
DoCreate = .T.
Height = 393
lshow = .F.
Name = "_frmbase1"
Width = 458
_shape1.Height = 29
_shape1.Left = 0
_shape1.Name = "_shape1"
_shape1.Top = 0
_shape1.Width = 492
_shape2.Height = 29
_shape2.Left = 427
_shape2.Name = "_shape2"
_shape2.Top = -1
_shape2.Width = 34
Lb_titlu_alb_b121.Caption = "Lista cu actualiz<69>rile disponibile"
Lb_titlu_alb_b121.Name = "Lb_titlu_alb_b121"
BUT_TERMIN1.Left = 429
BUT_TERMIN1.Name = "BUT_TERMIN1"
BUT_TERMIN1.Top = 0
Gridsort1.Name = "Gridsort1"
*</PropValue>
ADD OBJECT '_progressbar1' AS _progressbar WITH ;
Left = 60, ;
Name = "_progressbar1", ;
Top = 325, ;
Shape5.Name = "Shape5", ;
shpThermBar.Name = "shpThermBar", ;
lblPercentage.Name = "lblPercentage", ;
lblPercentage2.Name = "lblPercentage2", ;
Shape1.Name = "Shape1", ;
shape2.Name = "shape2", ;
Shape3.Name = "Shape3", ;
Shape4.Name = "Shape4"
*< END OBJECT: ClassLib="..\comun\clase\_therm.vcx" BaseClass="container" />
ADD OBJECT 'cmdActualizeaza' AS commandbutton WITH ;
BackColor = 255,255,255, ;
Caption = "Actualizeaz<61>", ;
FontCharSet = 238, ;
Height = 27, ;
Left = 348, ;
Name = "cmdActualizeaza", ;
Top = 360, ;
Width = 84
*< END OBJECT: BaseClass="commandbutton" />
ADD OBJECT 'Edit1' AS editbox WITH ;
BackStyle = 0, ;
BorderStyle = 0, ;
FontSize = 9, ;
Height = 36, ;
Left = 12, ;
Name = "Edit1", ;
ScrollBars = 0, ;
Top = 349, ;
Visible = .T., ;
Width = 264
*< END OBJECT: BaseClass="editbox" />
ADD OBJECT 'Grid1' AS grid WITH ;
AllowAutoColumnFit = 2, ;
AllowCellSelection = .T., ;
AllowHeaderSizing = .F., ;
AllowRowSizing = .F., ;
ColumnCount = 4, ;
DeleteMark = .F., ;
Enabled = .T., ;
GridLines = 0, ;
HeaderHeight = 0, ;
Height = 264, ;
Highlight = .F., ;
HighlightForeColor = 168,177,202, ;
HighlightRow = .F., ;
HighlightRowLineWidth = 0, ;
HighlightStyle = 0, ;
Left = 12, ;
MousePointer = 15, ;
Name = "Grid1", ;
Panel = 1, ;
RecordMark = .F., ;
RecordSource = "cProgrameUpdate", ;
RowHeight = 28, ;
ScrollBars = 2, ;
ToolTipText = "", ;
Top = 48, ;
Width = 432, ;
Column1.ControlSource = "ales", ;
Column1.Enabled = .T., ;
Column1.Name = "Column1", ;
Column1.Sparse = .F., ;
Column1.Width = 25, ;
Column2.ControlSource = "imagine", ;
Column2.Enabled = .T., ;
Column2.Name = "Column2", ;
Column2.Sparse = .F., ;
Column2.Width = 29, ;
Column3.Alignment = 0, ;
Column3.ControlSource = "proper(explicatie)", ;
Column3.DynamicBackColor = "255,255,255", ;
Column3.DynamicFontSize = "9", ;
Column3.Enabled = .T., ;
Column3.Name = "Column3", ;
Column3.Sparse = .F., ;
Column3.Width = 316, ;
Column4.ControlSource = "versiune", ;
Column4.Enabled = .T., ;
Column4.ForeColor = 97,87,219, ;
Column4.Name = "Column4", ;
Column4.Sparse = .F., ;
Column4.Width = 45
*< END OBJECT: BaseClass="grid" />
ADD OBJECT 'Grid1.Column1.Check1' AS checkbox WITH ;
Alignment = 2, ;
BackStyle = 0, ;
Caption = "", ;
Centered = .T., ;
ControlSource = "ales", ;
Enabled = .T., ;
Height = 17, ;
Left = 35, ;
Name = "Check1", ;
SpecialEffect = 1, ;
Top = 29, ;
Width = 60
*< END OBJECT: BaseClass="checkbox" />
ADD OBJECT 'Grid1.Column1.Header1' AS header WITH ;
Caption = "Header1", ;
Name = "Header1"
*< END OBJECT: BaseClass="header" />
ADD OBJECT 'Grid1.Column2.Header1' AS header WITH ;
Caption = "Header1", ;
Name = "Header1"
*< END OBJECT: BaseClass="header" />
ADD OBJECT 'Grid1.Column2.Mygridimagecontainer1' AS mygridimagecontainer WITH ;
Enabled = .T., ;
Left = 43, ;
Name = "Mygridimagecontainer1", ;
Top = 29, ;
Image1.Name = "Image1"
*< END OBJECT: ClassLib="..\clase\ostart.vcx" BaseClass="container" />
ADD OBJECT 'Grid1.Column3.Header1' AS header WITH ;
Caption = "Header1", ;
Name = "Header1"
*< END OBJECT: BaseClass="header" />
ADD OBJECT 'Grid1.Column3.Text1' AS textbox WITH ;
Alignment = 0, ;
BackColor = 255,255,255, ;
BackStyle = 0, ;
BorderStyle = 0, ;
DisabledForeColor = 0,0,0, ;
Enabled = .F., ;
ForeColor = 0,0,0, ;
Margin = 0, ;
Name = "Text1"
*< END OBJECT: BaseClass="textbox" />
ADD OBJECT 'Grid1.Column4.Header1' AS header WITH ;
Caption = "Header1", ;
Name = "Header1"
*< END OBJECT: BaseClass="header" />
ADD OBJECT 'Grid1.Column4.Text1' AS textbox WITH ;
BackColor = 255,255,255, ;
BackStyle = 0, ;
BorderStyle = 0, ;
DisabledForeColor = 97,87,219, ;
Enabled = .F., ;
ForeColor = 97,87,219, ;
Margin = 0, ;
Name = "Text1"
*< END OBJECT: BaseClass="textbox" />
PROCEDURE Init
thisform.grid1.DoScroll(2)
ENDPROC
PROCEDURE Show
LPARAMETERS nStyle
ENDPROC
PROCEDURE cmdActualizeaza.Click
#Define crlf Chr(13)+Chr(10)
Thisform.cmdActualizeaza.Enabled=.F.
iniHandler=Createobject("iniaccess")
LOCAL loUpdates
loUpdates=createobject("oUpdate",IIF(Reccount('crsserverinfo') = 0,[],Alltrim(crsserverinfo.Value)),Thisform.edit1)
IF TYPE('loUpdates') = 'O'
*!* modificare v 2.0.6
*!* If used("SERVER_INFO")
*!* Use in SERVER_INFO
*!* EndIf
*!* modificare v 2.0.6 ^
Thisform.grid1.Enabled=.F.
Select cProgrameUpdate
Calculate Cnt() For ales=1 To lntotal
lcOldAllowConfirm=iniHandler.getAllowConfirm()
iniHandler.setAllowConfirm("False")
i=0
Scan
i=i+1
If(ales=1)
loUpdates.updatecheck(Alltrim(cProgrameUpdate.nume),.F.,0)
Endif
Thisform._progressbar1.Update(i*100/lntotal)
Delete
Thisform.grid1.Refresh
ENDSCAN
RELEASE loUpdates
ENDIF
Thisform._progressbar1.Complete()
Wait " " Timeout 1
If lcOldAllowConfirm
iniHandler.setAllowConfirm("True")
Else
iniHandler.setAllowConfirm("False")
Endif
Release iniHandler
*write to Log
LogStream=""
LogStream=Thisform.edit1.Value
If LogStream<>""
lnNrOfLines = Alines(LogLines,LogStream)
LogStream=""
For contor = 1 To lnNrOfLines
LogStream=LogStream+Dtoc(Date())+" "+Time()+" > "+ LogLines(contor) + crlf
Endfor
*!* Strtofile(LogStream,gcDirMare+"updates.log",1)
polog.Log(LogStream, Program())
ENDIF
Thisform.Release
ENDPROC
PROCEDURE Grid1.MouseDown
LPARAMETERS nButton, nShift, nXCoord, nYCoord
ENDPROC
ENDDEFINE
DEFINE CLASS dataenvironment AS dataenvironment
*< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" />
*<PropValue>
DataSource = .NULL.
Height = 0
Left = 0
Name = "Dataenvironment"
Top = 0
Width = 0
*</PropValue>
ENDDEFINE

79
Ferestre/waitwindow.sc2 Normal file
View File

@@ -0,0 +1,79 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="waitwindow.scx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
*
DEFINE CLASS dataenvironment AS dataenvironment
*< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" />
*<PropValue>
DataSource = .NULL.
Height = 0
Left = 0
Name = "Dataenvironment"
Top = 0
Width = 0
*</PropValue>
ENDDEFINE
DEFINE CLASS frmwaitwindow AS form
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" />
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
*< OBJECTDATA: ObjPath="Label1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Shape1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="_progressbar1" UniqueID="" Timestamp="" />
*<PropValue>
AlwaysOnTop = .T.
AutoCenter = .T.
BackColor = 255,255,255
BorderStyle = 0
Caption = "Asteptati"
ControlBox = .F.
DoCreate = .T.
Height = 60
Name = "frmWaitWindow"
TitleBar = 0
Width = 348
*</PropValue>
ADD OBJECT '_progressbar1' AS _progressbar WITH ;
Left = 7, ;
Name = "_progressbar1", ;
Top = 36, ;
Shape5.Name = "Shape5", ;
shpThermBar.Name = "shpThermBar", ;
lblPercentage.Name = "lblPercentage", ;
lblPercentage2.Name = "lblPercentage2", ;
Shape1.Name = "Shape1", ;
shape2.Name = "shape2", ;
Shape3.Name = "Shape3", ;
Shape4.Name = "Shape4"
*< END OBJECT: ClassLib="..\comun\clase\_therm.vcx" BaseClass="container" />
ADD OBJECT 'Label1' AS label WITH ;
BackColor = 255,255,255, ;
Caption = "Label1", ;
FontCharSet = 238, ;
FontSize = 12, ;
ForeColor = 0,0,255, ;
Height = 17, ;
Left = 7, ;
Name = "Label1", ;
Top = 12, ;
Width = 334
*< END OBJECT: BaseClass="label" />
ADD OBJECT 'Shape1' AS shape WITH ;
BackStyle = 0, ;
Height = 60, ;
Left = 0, ;
Name = "Shape1", ;
Top = 0, ;
Width = 348
*< END OBJECT: BaseClass="shape" />
ENDDEFINE

BIN
Grafice/2downarrow.gif Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 2.2 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 3.6 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 4.0 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 3.6 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 3.8 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 4.2 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 3.2 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 3.8 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 3.9 KiB

BIN
Grafice/Admin/Main.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 1.9 KiB

BIN
Grafice/Admin/MainD.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 2.2 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 4.0 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 4.5 KiB

BIN
Grafice/Favorite.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 3.7 KiB

BIN
Grafice/Favorite2.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 2.5 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 6.2 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 6.9 KiB

BIN
Grafice/Grup/Drepturig.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 6.3 KiB

BIN
Grafice/Grup/DrepturigD.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 7.0 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 6.3 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 7.1 KiB

BIN
Grafice/Ico/Firma.ico Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 29 KiB

BIN
Grafice/Ico/Grup.ico Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 29 KiB

BIN
Grafice/Ico/Program.ico Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 29 KiB

BIN
Grafice/Ico/Utilizator.ico Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 29 KiB

BIN
Grafice/Iesire.bmp Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 774 B

BIN
Grafice/Iesire.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 5.9 KiB

BIN
Grafice/Init/Firme.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 4.1 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 5.1 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 5.9 KiB

BIN
Grafice/Init/Programe.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 4.6 KiB

BIN
Grafice/Init/ProgrameD.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 5.0 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 1.6 KiB

BIN
Grafice/Init/Serii.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 5.4 KiB

BIN
Grafice/Logoff.bmp Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 774 B

BIN
Grafice/Logoff.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 2.8 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 5.6 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 6.2 KiB

BIN
Grafice/Util/Detaliiu.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 2.9 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 5.7 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 6.3 KiB

BIN
Grafice/Util/Parola.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 5.3 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 6.1 KiB

BIN
Grafice/roastart.bmp Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 230 KiB

BIN
Grafice/update-disabled.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 1.5 KiB

BIN
Grafice/update-yellow.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 2.9 KiB

3041
Locale/locale.db2 Normal file

File diff suppressed because it is too large Load Diff

513
Locale/locale.dc2 Normal file
View File

@@ -0,0 +1,513 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="locale.dbc" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
<DATABASE>
<Name>LOCALE</Name>
<Comment></Comment>
<Version>10</Version>
<DBCEvents>.F.</DBCEvents>
<DBCEventFilename></DBCEventFilename>
<TABLES>
<TABLE>
<Name>LOCALE</Name>
<Comment></Comment>
<Path>locale.dbf</Path>
<DeleteTrigger></DeleteTrigger>
<InsertTrigger></InsertTrigger>
<UpdateTrigger></UpdateTrigger>
<PrimaryKey></PrimaryKey>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
<FIELD_ORDER>
phrase
language
notes
id
translated
</FIELD_ORDER>
<FIELDS>
<FIELD>
<Name>id</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
<FIELD>
<Name>language</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
<FIELD>
<Name>notes</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
<FIELD>
<Name>phrase</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
<FIELD>
<Name>translated</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
</FIELDS>
<INDEXES>
<INDEX>
<Name>id</Name>
<Comment></Comment>
<IsUnique>.F.</IsUnique>
</INDEX>
<INDEX>
<Name>language</Name>
<Comment></Comment>
<IsUnique>.F.</IsUnique>
</INDEX>
</INDEXES>
</TABLE>
<TABLE>
<Name>LOCALE_LANG</Name>
<Comment></Comment>
<Path>locale_lang.dbf</Path>
<DeleteTrigger></DeleteTrigger>
<InsertTrigger></InsertTrigger>
<UpdateTrigger></UpdateTrigger>
<PrimaryKey></PrimaryKey>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
<FIELD_ORDER>
id
siteid
name
abbr
cp
rule1
rule2
exclude
</FIELD_ORDER>
<FIELDS>
<FIELD>
<Name>abbr</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
<FIELD>
<Name>cp</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
<FIELD>
<Name>exclude</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
<FIELD>
<Name>id</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
<FIELD>
<Name>name</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
<FIELD>
<Name>rule1</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
<FIELD>
<Name>rule2</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
<FIELD>
<Name>siteid</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
</FIELDS>
<INDEXES>
<INDEX>
<Name>id</Name>
<Comment></Comment>
<IsUnique>.T.</IsUnique>
</INDEX>
<INDEX>
<Name>name</Name>
<Comment></Comment>
<IsUnique>.F.</IsUnique>
</INDEX>
<INDEX>
<Name>site</Name>
<Comment></Comment>
<IsUnique>.F.</IsUnique>
</INDEX>
<INDEX>
<Name>siteid</Name>
<Comment></Comment>
<IsUnique>.F.</IsUnique>
</INDEX>
</INDEXES>
</TABLE>
<TABLE>
<Name>LOCALE_SOURCE</Name>
<Comment></Comment>
<Path>locale_source.dbf</Path>
<DeleteTrigger></DeleteTrigger>
<InsertTrigger></InsertTrigger>
<UpdateTrigger></UpdateTrigger>
<PrimaryKey></PrimaryKey>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
<FIELD_ORDER>
id
name
url
page
markers
duration
hits
exclude
timeout
attempt
notes
</FIELD_ORDER>
<FIELDS>
<FIELD>
<Name>attempt</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
<FIELD>
<Name>duration</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
<FIELD>
<Name>exclude</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
<FIELD>
<Name>hits</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
<FIELD>
<Name>id</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
<FIELD>
<Name>markers</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
<FIELD>
<Name>name</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
<FIELD>
<Name>notes</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
<FIELD>
<Name>page</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
<FIELD>
<Name>timeout</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
<FIELD>
<Name>url</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
</FIELDS>
<INDEXES>
<INDEX>
<Name>id</Name>
<Comment></Comment>
<IsUnique>.T.</IsUnique>
</INDEX>
</INDEXES>
</TABLE>
<TABLE>
<Name>LOCALE_XREF</Name>
<Comment></Comment>
<Path>locale_xref.dbf</Path>
<DeleteTrigger></DeleteTrigger>
<InsertTrigger></InsertTrigger>
<UpdateTrigger></UpdateTrigger>
<PrimaryKey></PrimaryKey>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
<FIELD_ORDER>
src_langid
dst_langid
siteid
</FIELD_ORDER>
<FIELDS>
<FIELD>
<Name>dst_langid</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
<FIELD>
<Name>siteid</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
<FIELD>
<Name>src_langid</Name>
<Caption></Caption>
<Comment></Comment>
<DefaultValue></DefaultValue>
<DisplayClass></DisplayClass>
<DisplayClassLibrary></DisplayClassLibrary>
<Format></Format>
<InputMask></InputMask>
<RuleExpression></RuleExpression>
<RuleText></RuleText>
</FIELD>
</FIELDS>
<INDEXES>
<INDEX>
<Name>dst_langid</Name>
<Comment></Comment>
<IsUnique>.F.</IsUnique>
</INDEX>
<INDEX>
<Name>siteid</Name>
<Comment></Comment>
<IsUnique>.F.</IsUnique>
</INDEX>
<INDEX>
<Name>src_langid</Name>
<Comment></Comment>
<IsUnique>.F.</IsUnique>
</INDEX>
</INDEXES>
</TABLE>
</TABLES>
<STOREDPROCEDURES><![CDATA[
]]></STOREDPROCEDURES>
</DATABASE>

601
Locale/locale_back.db2 Normal file
View File

@@ -0,0 +1,601 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="locale_back.dbf" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
<TABLE>
<MemoFile></MemoFile>
<CodePage>1252</CodePage>
<LastUpdate></LastUpdate>
<Database></Database>
<FileType>0x00000030</FileType>
<FileType_Descrip>Visual FoxPro</FileType_Descrip>
<FIELDS>
<FIELD>
<Name>PHRASE</Name>
<Type>M</Type>
<Width>4</Width>
<Decimals>0</Decimals>
<Null>.F.</Null>
<NoCPTran>.F.</NoCPTran>
<Field_Valid_Exp></Field_Valid_Exp>
<Field_Valid_Text></Field_Valid_Text>
<Field_Default_Value></Field_Default_Value>
<Table_Valid_Exp></Table_Valid_Exp>
<Table_Valid_Text></Table_Valid_Text>
<LongTableName></LongTableName>
<Ins_Trig_Exp></Ins_Trig_Exp>
<Upd_Trig_Exp></Upd_Trig_Exp>
<Del_Trig_Exp></Del_Trig_Exp>
<TableComment></TableComment>
<Autoinc_Nextval>0</Autoinc_Nextval>
<Autoinc_Step>0</Autoinc_Step>
</FIELD>
<FIELD>
<Name>LANGUAGE</Name>
<Type>C</Type>
<Width>30</Width>
<Decimals>0</Decimals>
<Null>.F.</Null>
<NoCPTran>.F.</NoCPTran>
<Field_Valid_Exp></Field_Valid_Exp>
<Field_Valid_Text></Field_Valid_Text>
<Field_Default_Value></Field_Default_Value>
<Table_Valid_Exp></Table_Valid_Exp>
<Table_Valid_Text></Table_Valid_Text>
<LongTableName></LongTableName>
<Ins_Trig_Exp></Ins_Trig_Exp>
<Upd_Trig_Exp></Upd_Trig_Exp>
<Del_Trig_Exp></Del_Trig_Exp>
<TableComment></TableComment>
<Autoinc_Nextval>0</Autoinc_Nextval>
<Autoinc_Step>0</Autoinc_Step>
</FIELD>
<FIELD>
<Name>NOTES</Name>
<Type>M</Type>
<Width>4</Width>
<Decimals>0</Decimals>
<Null>.F.</Null>
<NoCPTran>.F.</NoCPTran>
<Field_Valid_Exp></Field_Valid_Exp>
<Field_Valid_Text></Field_Valid_Text>
<Field_Default_Value></Field_Default_Value>
<Table_Valid_Exp></Table_Valid_Exp>
<Table_Valid_Text></Table_Valid_Text>
<LongTableName></LongTableName>
<Ins_Trig_Exp></Ins_Trig_Exp>
<Upd_Trig_Exp></Upd_Trig_Exp>
<Del_Trig_Exp></Del_Trig_Exp>
<TableComment></TableComment>
<Autoinc_Nextval>0</Autoinc_Nextval>
<Autoinc_Step>0</Autoinc_Step>
</FIELD>
<FIELD>
<Name>ID</Name>
<Type>I</Type>
<Width>4</Width>
<Decimals>0</Decimals>
<Null>.F.</Null>
<NoCPTran>.F.</NoCPTran>
<Field_Valid_Exp></Field_Valid_Exp>
<Field_Valid_Text></Field_Valid_Text>
<Field_Default_Value></Field_Default_Value>
<Table_Valid_Exp></Table_Valid_Exp>
<Table_Valid_Text></Table_Valid_Text>
<LongTableName></LongTableName>
<Ins_Trig_Exp></Ins_Trig_Exp>
<Upd_Trig_Exp></Upd_Trig_Exp>
<Del_Trig_Exp></Del_Trig_Exp>
<TableComment></TableComment>
<Autoinc_Nextval>0</Autoinc_Nextval>
<Autoinc_Step>0</Autoinc_Step>
</FIELD>
</FIELDS>
<IndexFiles>
<IndexFile Type="Structural" >
<INDEXES>
<INDEX>
<TagName>ID</TagName>
<TagType>REGULAR</TagType>
<Key>ID</Key>
<Filter></Filter>
<Order>ASCENDING</Order>
<Collate>MACHINE</Collate>
</INDEX>
<INDEX>
<TagName>LANGUAGE</TagName>
<TagType>REGULAR</TagType>
<Key>LANGUAGE</Key>
<Filter></Filter>
<Order>ASCENDING</Order>
<Collate>MACHINE</Collate>
</INDEX>
</INDEXES>
</IndexFile>
</IndexFiles>
<RECORDS>
<RECORD>
<PHRASE><![CDATA[CUSTOMER]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>1</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[CLIENTE]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>1</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Add]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>2</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Agregue]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>2</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Add new record / Save edits]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>3</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Agregue el nuevo expediente/excepto corrige]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>3</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Delete]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>4</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Cancelaci<63>n]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>4</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Delete existing record]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>5</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Expediente existente de la cancelaci<63>n]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>5</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Edit]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>6</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Corrija]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>6</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Edit existing record / Revert edits]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>7</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Corrija el expediente existente/invierta corrige]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>7</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Bottom]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>8</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Fondo]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>8</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Go to bottom of table]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>9</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Vaya al fondo de la tabla]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>9</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Exit]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>10</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Salida]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>10</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Exit input form]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>11</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Salga de la forma de la entrada]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>11</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Find]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>12</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Hallazgo]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>12</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Search for records]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>13</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[B<>squeda para los expedientes]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>13</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Next]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>14</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Despu<70>s]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>14</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Skip to next record]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>15</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Salto a registrar despu<70>s]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>15</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Prev]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>16</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Prev]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES><![CDATA[Could not be properly translated.]]></NOTES>
<ID>16</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Skip to previous record]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>17</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Salto al expediente anterior]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>17</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Print]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>18</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Impresi<73>n]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>18</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Print to report]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>19</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Impresi<73>n a divulgar]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>19</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Top]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>20</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Tapa]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>20</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Go to top of table]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>21</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Vaya a la tapa de la tabla]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>21</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Address:]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>22</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Direcci<63>n:]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>22</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[City:]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>23</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Ciudad:]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>23</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Company:]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>24</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Compa<70><61>a:]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>24</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Contact Name:]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>25</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Nombre Del Contacto:]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>25</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Contact Title:]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>26</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[T<>tulo Del Contacto:]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>26</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Country:]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>27</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Pa<50>s:]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>27</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Customer:]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>28</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Cliente:]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>28</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Fax:]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>29</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[El fax:]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>29</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Phone:]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>30</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Tel<65>fono:]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>30</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Postal Code:]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>31</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[C<>digo Postal:]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>31</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Region:]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>32</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Regi<67>n:]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>32</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Agregue]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>2</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Previous]]></PHRASE>
<LANGUAGE>English</LANGUAGE>
<NOTES></NOTES>
<ID>33</ID>
</RECORD>
<RECORD>
<PHRASE><![CDATA[Anterior]]></PHRASE>
<LANGUAGE>Spanish</LANGUAGE>
<NOTES></NOTES>
<ID>33</ID>
</RECORD>
</RECORDS>
</TABLE>

1328
Locale/locale_lang.db2 Normal file

File diff suppressed because it is too large Load Diff

550
Locale/locale_source.db2 Normal file
View File

@@ -0,0 +1,550 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="locale_source.dbf" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
<TABLE>
<MemoFile></MemoFile>
<CodePage>1252</CodePage>
<LastUpdate></LastUpdate>
<Database>locale.dbc</Database>
<FileType>0x00000030</FileType>
<FileType_Descrip>Visual FoxPro</FileType_Descrip>
<FIELDS>
<FIELD>
<Name>ID</Name>
<Type>I</Type>
<Width>4</Width>
<Decimals>0</Decimals>
<Null>.F.</Null>
<NoCPTran>.F.</NoCPTran>
<Field_Valid_Exp></Field_Valid_Exp>
<Field_Valid_Text></Field_Valid_Text>
<Field_Default_Value></Field_Default_Value>
<Table_Valid_Exp></Table_Valid_Exp>
<Table_Valid_Text></Table_Valid_Text>
<LongTableName>LOCALE_SOURCE</LongTableName>
<Ins_Trig_Exp></Ins_Trig_Exp>
<Upd_Trig_Exp></Upd_Trig_Exp>
<Del_Trig_Exp></Del_Trig_Exp>
<TableComment></TableComment>
<Autoinc_Nextval>0</Autoinc_Nextval>
<Autoinc_Step>0</Autoinc_Step>
</FIELD>
<FIELD>
<Name>NAME</Name>
<Type>C</Type>
<Width>30</Width>
<Decimals>0</Decimals>
<Null>.F.</Null>
<NoCPTran>.F.</NoCPTran>
<Field_Valid_Exp></Field_Valid_Exp>
<Field_Valid_Text></Field_Valid_Text>
<Field_Default_Value></Field_Default_Value>
<Table_Valid_Exp></Table_Valid_Exp>
<Table_Valid_Text></Table_Valid_Text>
<LongTableName></LongTableName>
<Ins_Trig_Exp></Ins_Trig_Exp>
<Upd_Trig_Exp></Upd_Trig_Exp>
<Del_Trig_Exp></Del_Trig_Exp>
<TableComment></TableComment>
<Autoinc_Nextval>0</Autoinc_Nextval>
<Autoinc_Step>0</Autoinc_Step>
</FIELD>
<FIELD>
<Name>URL</Name>
<Type>C</Type>
<Width>100</Width>
<Decimals>0</Decimals>
<Null>.F.</Null>
<NoCPTran>.F.</NoCPTran>
<Field_Valid_Exp></Field_Valid_Exp>
<Field_Valid_Text></Field_Valid_Text>
<Field_Default_Value></Field_Default_Value>
<Table_Valid_Exp></Table_Valid_Exp>
<Table_Valid_Text></Table_Valid_Text>
<LongTableName></LongTableName>
<Ins_Trig_Exp></Ins_Trig_Exp>
<Upd_Trig_Exp></Upd_Trig_Exp>
<Del_Trig_Exp></Del_Trig_Exp>
<TableComment></TableComment>
<Autoinc_Nextval>0</Autoinc_Nextval>
<Autoinc_Step>0</Autoinc_Step>
</FIELD>
<FIELD>
<Name>PAGE</Name>
<Type>M</Type>
<Width>4</Width>
<Decimals>0</Decimals>
<Null>.F.</Null>
<NoCPTran>.F.</NoCPTran>
<Field_Valid_Exp></Field_Valid_Exp>
<Field_Valid_Text></Field_Valid_Text>
<Field_Default_Value></Field_Default_Value>
<Table_Valid_Exp></Table_Valid_Exp>
<Table_Valid_Text></Table_Valid_Text>
<LongTableName></LongTableName>
<Ins_Trig_Exp></Ins_Trig_Exp>
<Upd_Trig_Exp></Upd_Trig_Exp>
<Del_Trig_Exp></Del_Trig_Exp>
<TableComment></TableComment>
<Autoinc_Nextval>0</Autoinc_Nextval>
<Autoinc_Step>0</Autoinc_Step>
</FIELD>
<FIELD>
<Name>MARKERS</Name>
<Type>M</Type>
<Width>4</Width>
<Decimals>0</Decimals>
<Null>.F.</Null>
<NoCPTran>.F.</NoCPTran>
<Field_Valid_Exp></Field_Valid_Exp>
<Field_Valid_Text></Field_Valid_Text>
<Field_Default_Value></Field_Default_Value>
<Table_Valid_Exp></Table_Valid_Exp>
<Table_Valid_Text></Table_Valid_Text>
<LongTableName></LongTableName>
<Ins_Trig_Exp></Ins_Trig_Exp>
<Upd_Trig_Exp></Upd_Trig_Exp>
<Del_Trig_Exp></Del_Trig_Exp>
<TableComment></TableComment>
<Autoinc_Nextval>0</Autoinc_Nextval>
<Autoinc_Step>0</Autoinc_Step>
</FIELD>
<FIELD>
<Name>DURATION</Name>
<Type>N</Type>
<Width>16</Width>
<Decimals>3</Decimals>
<Null>.F.</Null>
<NoCPTran>.F.</NoCPTran>
<Field_Valid_Exp></Field_Valid_Exp>
<Field_Valid_Text></Field_Valid_Text>
<Field_Default_Value></Field_Default_Value>
<Table_Valid_Exp></Table_Valid_Exp>
<Table_Valid_Text></Table_Valid_Text>
<LongTableName></LongTableName>
<Ins_Trig_Exp></Ins_Trig_Exp>
<Upd_Trig_Exp></Upd_Trig_Exp>
<Del_Trig_Exp></Del_Trig_Exp>
<TableComment></TableComment>
<Autoinc_Nextval>0</Autoinc_Nextval>
<Autoinc_Step>0</Autoinc_Step>
</FIELD>
<FIELD>
<Name>HITS</Name>
<Type>B</Type>
<Width>8</Width>
<Decimals>0</Decimals>
<Null>.F.</Null>
<NoCPTran>.F.</NoCPTran>
<Field_Valid_Exp></Field_Valid_Exp>
<Field_Valid_Text></Field_Valid_Text>
<Field_Default_Value></Field_Default_Value>
<Table_Valid_Exp></Table_Valid_Exp>
<Table_Valid_Text></Table_Valid_Text>
<LongTableName></LongTableName>
<Ins_Trig_Exp></Ins_Trig_Exp>
<Upd_Trig_Exp></Upd_Trig_Exp>
<Del_Trig_Exp></Del_Trig_Exp>
<TableComment></TableComment>
<Autoinc_Nextval>0</Autoinc_Nextval>
<Autoinc_Step>0</Autoinc_Step>
</FIELD>
<FIELD>
<Name>EXCLUDE</Name>
<Type>I</Type>
<Width>4</Width>
<Decimals>0</Decimals>
<Null>.F.</Null>
<NoCPTran>.F.</NoCPTran>
<Field_Valid_Exp></Field_Valid_Exp>
<Field_Valid_Text></Field_Valid_Text>
<Field_Default_Value></Field_Default_Value>
<Table_Valid_Exp></Table_Valid_Exp>
<Table_Valid_Text></Table_Valid_Text>
<LongTableName></LongTableName>
<Ins_Trig_Exp></Ins_Trig_Exp>
<Upd_Trig_Exp></Upd_Trig_Exp>
<Del_Trig_Exp></Del_Trig_Exp>
<TableComment></TableComment>
<Autoinc_Nextval>0</Autoinc_Nextval>
<Autoinc_Step>0</Autoinc_Step>
</FIELD>
<FIELD>
<Name>TIMEOUT</Name>
<Type>N</Type>
<Width>3</Width>
<Decimals>0</Decimals>
<Null>.F.</Null>
<NoCPTran>.F.</NoCPTran>
<Field_Valid_Exp></Field_Valid_Exp>
<Field_Valid_Text></Field_Valid_Text>
<Field_Default_Value></Field_Default_Value>
<Table_Valid_Exp></Table_Valid_Exp>
<Table_Valid_Text></Table_Valid_Text>
<LongTableName></LongTableName>
<Ins_Trig_Exp></Ins_Trig_Exp>
<Upd_Trig_Exp></Upd_Trig_Exp>
<Del_Trig_Exp></Del_Trig_Exp>
<TableComment></TableComment>
<Autoinc_Nextval>0</Autoinc_Nextval>
<Autoinc_Step>0</Autoinc_Step>
</FIELD>
<FIELD>
<Name>ATTEMPT</Name>
<Type>N</Type>
<Width>3</Width>
<Decimals>0</Decimals>
<Null>.F.</Null>
<NoCPTran>.F.</NoCPTran>
<Field_Valid_Exp></Field_Valid_Exp>
<Field_Valid_Text></Field_Valid_Text>
<Field_Default_Value></Field_Default_Value>
<Table_Valid_Exp></Table_Valid_Exp>
<Table_Valid_Text></Table_Valid_Text>
<LongTableName></LongTableName>
<Ins_Trig_Exp></Ins_Trig_Exp>
<Upd_Trig_Exp></Upd_Trig_Exp>
<Del_Trig_Exp></Del_Trig_Exp>
<TableComment></TableComment>
<Autoinc_Nextval>0</Autoinc_Nextval>
<Autoinc_Step>0</Autoinc_Step>
</FIELD>
<FIELD>
<Name>NOTES</Name>
<Type>C</Type>
<Width>250</Width>
<Decimals>0</Decimals>
<Null>.F.</Null>
<NoCPTran>.F.</NoCPTran>
<Field_Valid_Exp></Field_Valid_Exp>
<Field_Valid_Text></Field_Valid_Text>
<Field_Default_Value></Field_Default_Value>
<Table_Valid_Exp></Table_Valid_Exp>
<Table_Valid_Text></Table_Valid_Text>
<LongTableName></LongTableName>
<Ins_Trig_Exp></Ins_Trig_Exp>
<Upd_Trig_Exp></Upd_Trig_Exp>
<Del_Trig_Exp></Del_Trig_Exp>
<TableComment></TableComment>
<Autoinc_Nextval>0</Autoinc_Nextval>
<Autoinc_Step>0</Autoinc_Step>
</FIELD>
</FIELDS>
<IndexFiles>
<IndexFile Type="Structural" >
<INDEXES>
<INDEX>
<TagName>ID</TagName>
<TagType>CANDIDATE</TagType>
<Key>ID</Key>
<Filter></Filter>
<Order>ASCENDING</Order>
<Collate>MACHINE</Collate>
</INDEX>
</INDEXES>
</IndexFile>
</IndexFiles>
<RECORDS>
<RECORD>
<ID>1</ID>
<NAME>InterTran</NAME>
<URL>http:&#47;&#47;www.tranexp.com:2000&#47;InterTran</URL>
<PAGE><![CDATA[<form method="POST" ACTION="http://www.tranexp.com:2000/Translate/result.shtml" name="forma">
<INPUT type="hidden" value="yes" name="topframe">
<input type=text name="from" value="@src_lang@">
<input type=text name="to" value="@dst_lang@">
<input type=text name="keyb" value="non">
<textarea name="text">@phrase@</textarea>
<input type="submit" name="Submit">
</form>
<script>document.all.forma.submit()</script>
]]></PAGE>
<MARKERS><![CDATA[>About us<
name=translation
>
</textarea>]]></MARKERS>
<DURATION>0.001</DURATION>
<HITS>1</HITS>
<EXCLUDE>1</EXCLUDE>
<TIMEOUT>20</TIMEOUT>
<ATTEMPT>1</ATTEMPT>
<NOTES>Site has become a pay site.</NOTES>
</RECORD>
<RECORD>
<ID>2</ID>
<NAME>Google</NAME>
<URL>http:&#47;&#47;www.google.com&#47;language_tools</URL>
<PAGE><![CDATA[<form action="http://translate.google.com/translate_t" method="post" name="forma">
<textarea name="text" rows="5" cols="45" wrap="PHYSICAL">@phrase@</textarea>
<input type=text name="langpair" value="@src_lang@|@dst_lang@">
<input type="hidden" name="hl" value="en">
<input type="hidden" name="ie" value="UTF-8">
<input type="hidden" name="oe" value="UTF-8">
<input type="hidden" name="safe" value="off">
<input type="submit" value="Translate">
</form>
<script>document.all.forma.submit()</script>
]]></PAGE>
<MARKERS><![CDATA[</html>
name=q
>
</]]></MARKERS>
<DURATION>92.875</DURATION>
<HITS>4</HITS>
<EXCLUDE>0</EXCLUDE>
<TIMEOUT>20</TIMEOUT>
<ATTEMPT>1</ATTEMPT>
<NOTES></NOTES>
</RECORD>
<RECORD>
<ID>4</ID>
<NAME>AltaVista</NAME>
<URL>http:&#47;&#47;babelfish.altavista.com&#47;</URL>
<PAGE><![CDATA[<form action="http://babelfish.altavista.com/babelfish/tr" method="post" name="transform">
<input type="hidden" name="doit" value="done">
<input type="hidden" name="tt" value="urltext">
<input type="hidden" name="intl" value="1">
<textarea name="urltext">@phrase@</textarea>
<input type=text name="lp" value="@src_lang@_@dst_lang@">
<input type="Submit" value="Translate">
</form>
<script>document.all.transform.submit()</script>
]]></PAGE>
<MARKERS><![CDATA[>Help<
<DIV lang=
>
<]]></MARKERS>
<DURATION>61.846</DURATION>
<HITS>1</HITS>
<EXCLUDE>0</EXCLUDE>
<TIMEOUT>20</TIMEOUT>
<ATTEMPT>1</ATTEMPT>
<NOTES></NOTES>
</RECORD>
<RECORD>
<ID>5</ID>
<NAME>FreeTranslation</NAME>
<URL>http:&#47;&#47;www.freetranslation.com&#47;</URL>
<PAGE><![CDATA[<form name="frmTranslator" method="post" action="http://ets.freetranslation.com">
<input type="hidden" name="sequence" value="core">
<input type="hidden" name="mode" value="html">
<input type="hidden" name="template" value="results_en-us.htm">
<input type=text name="language" value="@src_lang@/@dst_lang@">
<textarea name="srctext" >@phrase@</textarea>
<input type="submit" name="Submit" value="FREE Translation">
</form>
<script>document.all.frmTranslator.submit()</script>
]]></PAGE>
<MARKERS><![CDATA[name=dsttext
name=dsttext
>
</textarea>]]></MARKERS>
<DURATION>196.013</DURATION>
<HITS>109</HITS>
<EXCLUDE>0</EXCLUDE>
<TIMEOUT>20</TIMEOUT>
<ATTEMPT>1</ATTEMPT>
<NOTES></NOTES>
</RECORD>
<RECORD>
<ID>6</ID>
<NAME>Dictionary</NAME>
<URL>http:&#47;&#47;dictionary.reference.com&#47;translate&#47;text.html</URL>
<PAGE><![CDATA[<form action="http://dictionary.reference.com/translate/text.html" method="post" name="trans_form">
<input type="hidden" name="r" value="106252320382962800">
<input type=text name="lp" value="@src_lang@_@dst_lang@">
<textarea name="text" >@phrase@</textarea>
<input type="submit" value="Translate">
</form>
<script>document.all.trans_form.submit()</script>
]]></PAGE>
<MARKERS><![CDATA[</html>
In @dlang@:
<p>
</p>]]></MARKERS>
<DURATION>574.747</DURATION>
<HITS>683</HITS>
<EXCLUDE>0</EXCLUDE>
<TIMEOUT>20</TIMEOUT>
<ATTEMPT>1</ATTEMPT>
<NOTES></NOTES>
</RECORD>
<RECORD>
<ID>7</ID>
<NAME>Wanadoo</NAME>
<URL>http:&#47;&#47;outils.wanadoo.fr&#47;wanadoo&#47;</URL>
<PAGE><![CDATA[<form action="http://outils.wanadoo.fr/wanadoo" method="post" name="textrad" >
<input type="hidden" name="systran_id" value="Wanadoo-fr">
<input type="hidden" name="systran_charset" value="utf-8">
<textarea name="systran_text" >@phrase@</textarea>
<input type=text name=systran_lp value="@src_lang@_@dst_lang@">
<input type=submit name=submit1 id=submit1>
</form>
<script>document.all.textrad.submit()</script>
]]></PAGE>
<MARKERS><![CDATA[</html>
<!--/texte traduit-->
class=littleG width=630>
<
]]></MARKERS>
<DURATION>90.569</DURATION>
<HITS>1</HITS>
<EXCLUDE>0</EXCLUDE>
<TIMEOUT>20</TIMEOUT>
<ATTEMPT>1</ATTEMPT>
<NOTES></NOTES>
</RECORD>
<RECORD>
<ID>8</ID>
<NAME>Voila</NAME>
<URL>http:&#47;&#47;c.voila.fr&#47;</URL>
<PAGE><![CDATA[<form method="post" name="textrad" action="http://trans.voila.fr/voila" >
<input type="hidden" name="systran_id" value="Voila-fr">
<input type="hidden" name="systran_charset" value="utf-8">
<textarea name="systran_text" >@phrase@</textarea>
<input type=text name=systran_lp value="@src_lang@_@dst_lang@">
<input type=submit name=submit1 id=submit1>
</form>
<script>document.all.textrad.submit()</script>
]]></PAGE>
<MARKERS><![CDATA[</html>
<!-- /AUSSI SUR VOILA -->
<td valign=top>
</td>
]]></MARKERS>
<DURATION>77.094</DURATION>
<HITS>1</HITS>
<EXCLUDE>0</EXCLUDE>
<TIMEOUT>20</TIMEOUT>
<ATTEMPT>1</ATTEMPT>
<NOTES></NOTES>
</RECORD>
<RECORD>
<ID>9</ID>
<NAME>Terra</NAME>
<URL>http:&#47;&#47;terra.onlinelanguagelearning.com&#47;en&#47;</URL>
<PAGE><![CDATA[<form name="TRANS" action="http://www.systranbox.com/systran/box" method="post" systran="no">
<input name="systran_id" type="hidden" value="SystranSoft-en">
<input name="systran_charset" type="hidden" value="utf-8">
<input type="radio" value="text" name="ttype" checked><input type="radio" value="url" name="ttype">
<textarea name="systran_text" >@phrase@</textarea>
<input value="http://www." name="systran_url">
<input type=text name=systran_lp value="@src_lang@_@dst_lang@">
<input type=submit name=submit1 id=submit1>
</form>
<script>document.all.TRANS.submit()</script>
]]></PAGE>
<MARKERS><![CDATA[</html>
name="translation"
>
<]]></MARKERS>
<DURATION>57.913</DURATION>
<HITS>3</HITS>
<EXCLUDE>0</EXCLUDE>
<TIMEOUT>20</TIMEOUT>
<ATTEMPT>1</ATTEMPT>
<NOTES></NOTES>
</RECORD>
<RECORD>
<ID>10</ID>
<NAME>SysTran</NAME>
<URL>http:&#47;&#47;www.systransoft.com&#47;</URL>
<PAGE><![CDATA[<form name="TRANS" action="http://www.systranbox.com/systran/box" method="post" systran="no">
<input name="systran_id" type="hidden" value="SystranSoft-en">
<input name="systran_charset" type="hidden" value="utf-8">
<input type="radio" value="text" name="ttype" checked><input type="radio" value="url" name="ttype">
<textarea name="systran_text" >@phrase@</textarea>
<input value="http://www." name="systran_url">
<input type=text name=systran_lp value="@src_lang@_@dst_lang@">
<input type=submit name=submit1 id=submit1>
</form>
<script>document.all.TRANS.submit()</script>
]]></PAGE>
<MARKERS><![CDATA[</html>
name="translation"
>
<]]></MARKERS>
<DURATION>71.539</DURATION>
<HITS>5</HITS>
<EXCLUDE>0</EXCLUDE>
<TIMEOUT>20</TIMEOUT>
<ATTEMPT>1</ATTEMPT>
<NOTES></NOTES>
</RECORD>
<RECORD>
<ID>11</ID>
<NAME>Free</NAME>
<URL>http:&#47;&#47;www.systranbox.com&#47;systran&#47;box</URL>
<PAGE><![CDATA[<form action="http://www.systranbox.com/systran/box" method=POST >
<input name="id" value="Free-fr" type="hidden">
<input name="systran_charset" type="hidden" value="utf-8">
<textarea name="urltext" >@phrase@</textarea>
<input value="http://www." name="systran_url">
<input type=text name=systran_lp value="@src_lang@_@dst_lang@">
<input type=submit name=submit id=submit>
</form>
<script>document.all.submit.click()</script>
]]></PAGE>
<MARKERS><![CDATA[</html>
color="#61718A"
>
<]]></MARKERS>
<DURATION>74.060</DURATION>
<HITS>2</HITS>
<EXCLUDE>0</EXCLUDE>
<TIMEOUT>20</TIMEOUT>
<ATTEMPT>1</ATTEMPT>
<NOTES></NOTES>
</RECORD>
<RECORD>
<ID>12</ID>
<NAME>Lycos</NAME>
<URL>http:&#47;&#47;translation.lycos.com&#47;lycos</URL>
<PAGE><![CDATA[<FORM ACTION="http://translation.lycos.com/lycos" METHOD=POST>
<INPUT NAME="id" VALUE="Lycos-en" type="hidden">
<input name="systran_charset" type="hidden" value="utf-8">
<textarea name="urltext" >@phrase@</textarea>
<input type=text name=systran_lp value="@src_lang@_@dst_lang@">
<input type=submit name=submit id=submit>
</form>
<script>document.all.submit.click()</script>
]]></PAGE>
<MARKERS><![CDATA[</html>
name="urltranslated"
>
<]]></MARKERS>
<DURATION>76.416</DURATION>
<HITS>2</HITS>
<EXCLUDE>0</EXCLUDE>
<TIMEOUT>20</TIMEOUT>
<ATTEMPT>1</ATTEMPT>
<NOTES></NOTES>
</RECORD>
</RECORDS>
</TABLE>

120
Locale/locale_xref.db2 Normal file
View File

@@ -0,0 +1,120 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="locale_xref.dbf" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
<TABLE>
<MemoFile></MemoFile>
<CodePage>1252</CodePage>
<LastUpdate></LastUpdate>
<Database>locale.dbc</Database>
<FileType>0x00000030</FileType>
<FileType_Descrip>Visual FoxPro</FileType_Descrip>
<FIELDS>
<FIELD>
<Name>SRC_LANGID</Name>
<Type>I</Type>
<Width>4</Width>
<Decimals>0</Decimals>
<Null>.F.</Null>
<NoCPTran>.F.</NoCPTran>
<Field_Valid_Exp></Field_Valid_Exp>
<Field_Valid_Text></Field_Valid_Text>
<Field_Default_Value></Field_Default_Value>
<Table_Valid_Exp></Table_Valid_Exp>
<Table_Valid_Text></Table_Valid_Text>
<LongTableName>LOCALE_XREF</LongTableName>
<Ins_Trig_Exp></Ins_Trig_Exp>
<Upd_Trig_Exp></Upd_Trig_Exp>
<Del_Trig_Exp></Del_Trig_Exp>
<TableComment></TableComment>
<Autoinc_Nextval>0</Autoinc_Nextval>
<Autoinc_Step>0</Autoinc_Step>
</FIELD>
<FIELD>
<Name>DST_LANGID</Name>
<Type>I</Type>
<Width>4</Width>
<Decimals>0</Decimals>
<Null>.F.</Null>
<NoCPTran>.F.</NoCPTran>
<Field_Valid_Exp></Field_Valid_Exp>
<Field_Valid_Text></Field_Valid_Text>
<Field_Default_Value></Field_Default_Value>
<Table_Valid_Exp></Table_Valid_Exp>
<Table_Valid_Text></Table_Valid_Text>
<LongTableName></LongTableName>
<Ins_Trig_Exp></Ins_Trig_Exp>
<Upd_Trig_Exp></Upd_Trig_Exp>
<Del_Trig_Exp></Del_Trig_Exp>
<TableComment></TableComment>
<Autoinc_Nextval>0</Autoinc_Nextval>
<Autoinc_Step>0</Autoinc_Step>
</FIELD>
<FIELD>
<Name>SITEID</Name>
<Type>I</Type>
<Width>4</Width>
<Decimals>0</Decimals>
<Null>.F.</Null>
<NoCPTran>.F.</NoCPTran>
<Field_Valid_Exp></Field_Valid_Exp>
<Field_Valid_Text></Field_Valid_Text>
<Field_Default_Value></Field_Default_Value>
<Table_Valid_Exp></Table_Valid_Exp>
<Table_Valid_Text></Table_Valid_Text>
<LongTableName></LongTableName>
<Ins_Trig_Exp></Ins_Trig_Exp>
<Upd_Trig_Exp></Upd_Trig_Exp>
<Del_Trig_Exp></Del_Trig_Exp>
<TableComment></TableComment>
<Autoinc_Nextval>0</Autoinc_Nextval>
<Autoinc_Step>0</Autoinc_Step>
</FIELD>
</FIELDS>
<IndexFiles>
<IndexFile Type="Structural" >
<INDEXES>
<INDEX>
<TagName>DST_LANGID</TagName>
<TagType>REGULAR</TagType>
<Key>DST_LANGID</Key>
<Filter></Filter>
<Order>ASCENDING</Order>
<Collate>MACHINE</Collate>
</INDEX>
<INDEX>
<TagName>SITEID</TagName>
<TagType>REGULAR</TagType>
<Key>SITEID</Key>
<Filter></Filter>
<Order>ASCENDING</Order>
<Collate>MACHINE</Collate>
</INDEX>
<INDEX>
<TagName>SRC_LANGID</TagName>
<TagType>REGULAR</TagType>
<Key>SRC_LANGID</Key>
<Filter></Filter>
<Order>ASCENDING</Order>
<Collate>MACHINE</Collate>
</INDEX>
</INDEXES>
</IndexFile>
</IndexFiles>
<RECORDS>
</RECORDS>
</TABLE>

View File

@@ -0,0 +1,506 @@
*************************************************************************************************************
*!* Procedure actualizeaza_etichete
*!* Lparameters toObiectFundal
*!* With toObiectFundal
*!* IF CPCURRENT(1) <> CPCURRENT()
*!* MESSAGEBOX(CPCONVERT(CPCURRENT(1),CPCURRENT(),.cw_meniu2.lb_meniu1.Caption))
*!* MESSAGEBOX(ASC(SUBSTR(.cw_meniu2.lb_meniu1.Caption,4,1)))
*!* endif
*!* .cw_meniu1.lb_meniu1.Caption = tradu(.cw_meniu1.lb_meniu1.Caption)
*!* .cw_meniu2.lb_meniu1.Caption = tradu(.cw_meniu2.lb_meniu1.Caption)
*!* .cw_meniu3.lb_meniu1.Caption = tradu(.cw_meniu3.lb_meniu1.Caption)
*!* .cw_meniu4.lb_meniu1.Caption = tradu(.cw_meniu4.lb_meniu1.Caption)
*!* .cw_meniu5.lb_meniu1.Caption = tradu(.cw_meniu5.lb_meniu1.Caption)
*!* .config.Caption = tradu(.config.Caption)
*!* .actualizari.Caption = tradu(.actualizari.Caption)
*!* .lb_logoff.Caption = tradu(.lb_logoff.Caption)
*!* Endwith
*!* Endproc
*************************************************************************************************************
Procedure adauga_grup_in_favorite
Lparameters tnIdGrupProg
Local lnIdGrupProg,j
lnIdGrupProg=tnIdGrupProg
lcNumeParinte=[scrollcont]+Alltrim(Str(lnIdGrupProg))
lcNumeContainer=[Application.Forms.Item(1).pgf_optiuni1.page1.]+lcNumeParinte
With &lcNumeContainer.
For j=1 To .Objects.Count
If Upper(.Objects(j).Class)=[CW_PROGRAME]
lcNume=.Objects(j).Name
lnIdProg=.Objects(j).nid_prog
adauga_in_favorite(lcNumeParinte,lcNume,lnIdProg,.F.)
Endif
Endfor
Endwith
Endproc && adauga_grup_in_favorite
*************************************************************************************************************
Procedure sterge_grup_din_favorite
Lparameters tnIdGrupProg
Local lnIdGrupProg,j
lnIdGrupProg=tnIdGrupProg
lcNumeParinte=[scrollcont]+Alltrim(Str(lnIdGrupProg))
lcNumeContainer=[Application.Forms.Item(1).pgf_optiuni1.page1.]+lcNumeParinte
With &lcNumeContainer.
For j=1 To .Objects.Count
If Upper(.Objects(j).Class)=[CW_PROGRAME]
lcNume=.Objects(j).Name
lnIdProg=.Objects(j).nid_prog
sterge_din_favorite(lnIdGrupProg,lcNume,lnIdProg)
Endif
Endfor
Endwith
Endproc && sterge_grup_din_favorite
*************************************************************************************************************
Procedure adauga_in_favorite
Lparameters tcNumeParinte,tcNume,tnIdProg,tlArataMesaj
Local llArataMesaj
Store .T. To llArataMesaj
llArataMesaj=tlArataMesaj
lcNume=Alltrim(tcNume)
lcNumeObiect=[Application.Forms.Item(1).pgf_optiuni1.page1.]+Alltrim(tcNumeParinte)+[.]+lcNume
lcNumeContainerFav=[Application.Forms.Item(1).pgf_optiuni1.page1.scrollcont0]
Do Case
Case Type(lcNumeContainerFav+"."+lcNume)='U'
With &lcNumeContainerFav.
lcSql=[begin pack_drepturi.adauga_program_favorit(]+Alltrim(Str(tnIdProg))+[,]+;
ALLTRIM(Str(.nnrobiecte+1))+[,]+Alltrim(Str(gnIdUtil))+[); end;]
lnSucces = goExecutor.oExecute(lcSql)
If lnSucces < 0
aMessagebox(goExecutor.cEroare,0+16,'Eroare')
Else
lcImagine=&lcNumeObiect..lb_imagine.Picture
&lcNumeObiect..lb_imagine.Picture=Substr(lcImagine,1,Len(lcImagine)-4)+"_fav.png"
.do_adaugaobiect(lcNume,"cw_programe")
.&lcNume..lb_program.Caption= &lcNumeObiect..lb_program.Caption
.&lcNume..lb_imagine.Picture = lcImagine
.&lcNume..cprogram= &lcNumeObiect..cprogram
.&lcNume..Visible=.T.
.&lcNume..nid_grup_prog= 0
.&lcNume..nid_prog = &lcNumeObiect..nid_prog
.&lcNume..nid_grup_prog_tata = &lcNumeObiect..nid_grup_prog
Endif
Endwith
Case llArataMesaj
aMessagebox("Acest program este deja in grupul de programe favorite!",0+48,"Atentie")
Endcase
Endproc && adauga_in_favorite
*************************************************************************************************************
Procedure sterge_din_favorite
Lparameters tnIdGrupParinte,tcNume,tnIdProg
lcNume=Alltrim(tcNume)
lcNumeContainerFav=[Application.Forms.Item(1).pgf_optiuni1.page1.scrollcont0]
If Type(lcNumeContainerFav+"."+lcNume)<>'U'
lcSql=[begin pack_drepturi.sterge_program_favorit(]+Alltrim(Str(tnIdProg))+[,]+;
ALLTRIM(Str(gnIdUtil))+[); end;]
lnSucces = goExecutor.oExecute(lcSql)
If lnSucces < 0
aMessagebox(goExecutor.cEroare,0+16,'Eroare')
Else
lcNumeObiect=[Application.Forms.Item(1).pgf_optiuni1.page1.scrollcont]+Alltrim(Str(tnIdGrupParinte))+[.]+lcNume
lcImagine=lcNumeContainerFav+[.]+lcNume+[.lb_imagine.Picture]
&lcNumeObiect..lb_imagine.Picture=&lcImagine.
With &lcNumeContainerFav.
.do_stergeobiect(lcNume)
Endwith
Endif
Endif
Endproc && sterge_din_favorite
*************************************************************************************************************
Procedure viz_grup_program
Private pogrupprog,pcschema1,pcselect1
Store '' To pogrupprog
If Used('v_grupprog')
Use In v_grupprog
Endif
llAfisare=.F.
pcschema1 = ['id_grup_prog n(5),explicatie c(150),ordine n(5)']
pcselect1=['select id_grup_prog,explicatie,ordine from vdef_grup_programe where 1=2']
pcorder1=[explicatie]
pcfiltru1 = [2=2]
gencursor('pogrupprog','v_grupprog',pcselect1,pcfiltru1,pcschema1,pcorder1,llAfisare)
pogrupprog.ca_baza1.afisare()
*!* Select v_grupprog
*!* Scatter Name poRec
ofrmgrprog=Createobject("frm_grup_prg")
ofrmgrprog.Show(1)
Release ofrmgrprog
Release pogrupprog
Endproc
*************************************************************************************************************
Procedure viz_firme
Private pofirme,pcschema1,pcselect1
Store '' To pofirme
If Used('v_firme')
Use In v_firme
Endif
llAfisare=.F.
pcschema1 = ['']
pcselect1=['select * from SYN_V_nom_firme where 1=2']
pcorder1=[firma]
pcfiltru1 = [2=2]
gencursor('pofirme','v_firme',pcselect1,pcfiltru1,pcschema1,pcorder1,llAfisare)
pofirme.ca_baza1.afisare()
Select v_firme
Scatter Name poRec
ofrmfirme=Createobject("frm_firme")
ofrmfirme.Show(1)
Release ofrmfirme
Release pofirme
Endproc
*************************************************************************************************************
*!* modificare v 2.0.29
*!* Procedure mod_parola
*!* gnButon=1
*!* ofrmparola=Createobject("frm_parola_nou")
*!* ofrmparola.Show(1)
*!* Release ofrmparola
*!* If gnButon=1
*!* aMessagebox("Parola a fost schimbata!",0+64,"Modificare parola")
*!* Release All
*!* goApp.SetCaption("ROA Romfast Applications")
*!* Do Form frm_fundal
*!* Endif
*!* Endproc
*!* modificare v 2.0.29 ^
*************************************************************************************************************
Procedure mod_optiuni
If Used('crsoptiuniprog')
Use In crsoptiuniprog
Endif
Do viz_optiuni_prg In update_start.prg
Select * From v_optiuni_programe Into Cursor crsoptiuniprog Readwrite
If Used('v_optiuni_programe')
Use In v_optiuni_programe
Endif
gnButon=1
ofrmoptiuni=Createobject("frm_optiuni_util")
ofrmoptiuni.Show(1)
Release ofrmoptiuni
If gnButon=1
aMessagebox("Modificarile vor fi vizibile la urmatoarea logare!",0+64,"Modificare optiuni")
Endif
Endproc
*************************************************************************************************************
Procedure viz_utilgrupfirma
Private poprograme,pcschema1,pcselect1,poutilgrup,poutilizatori
Store '' To poprograme,poutilgrup,poutilizatori
llAfisare=.F.
pcschema1 = ['']
pcselect1=['select id_util,utilizator from vutilizatori where 1=2']
pcorder1=[utilizator]
pcfiltru1 = [inactiv=0]
gencursor('poutilizatori','v_utilizatori',pcselect1,pcfiltru1,pcschema1,pcorder1,llAfisare)
poutilizatori.ca_baza1.afisare()
llAfisare=.F.
pcschema1 = ['']
pcselect1=['select id_dug,id_grup,grup,id_firma,firma from vdef_util_grup where 1=2']
pcorder1=[grup]
pcfiltru1 = [1=2]
gencursor('poutilgrup','v_utilgrf',pcselect1,pcfiltru1,pcschema1,pcorder1,llAfisare)
poutilgrup.ca_baza1.afisare()
Select v_utilgrf
Select Distinct id_grup,grup From v_utilgrf Into Cursor v_utgrupuri
Select id_firma,firma From v_utilgrf Into Cursor v_utfirme
pcschema1 = ['']
pcselect1=['select id_program,denumire as program from vdef_grup_drept where 1=2']
pcorder1=[program]
pcfiltru1 = [1=2]
gencursor('poprograme','v_programe',pcselect1,pcfiltru1,pcschema1,pcorder1,llAfisare)
poprograme.ca_baza1.afisare()
ofrmutilgf=Createobject("frm_utilgrupf")
ofrmutilgf.Show(1)
If Used('v_utilizatori')
Use In v_utilizatori
Endif
If Used('v_utilgrf')
Use In v_utilgrf
Endif
If Used('v_utgrupuri')
Use In v_utgrupuri
Endif
If Used('v_utfirme')
Use In v_utfirme
Endif
If Used('v_programe')
Use In v_programe
Endif
Release ofrmutilgf
Release poprograme,poutilgrup,poutilizatori
Endproc
*************************************************************************************************************
Procedure viz_utilizatori
Private pogrupuri,pcschema1,pcselect1
Store '' To poutilizatori
llAfisare=.F.
pcschema1 = ['']
pcselect1=['select * from vutilizatori where 1=2']
pcorder1=[utilizator]
pcfiltru1 = [2=2]
gencursor('poutilizatori','v_utilizatori',pcselect1,pcfiltru1,pcschema1,pcorder1,llAfisare)
poutilizatori.ca_baza1.afisare()
ofrmutil=Createobject("frm_utilizatori")
ofrmutil.Show(1)
Release ofrmutil
Release poutilizatori
Endproc
*************************************************************************************************************
Procedure viz_organigrama_firme
update_organigrama_firme_grup()
update_organigrama_firme_util()
ofrmorganigrama=Createobject("frm_organigrama_firme")
ofrmorganigrama.Show(1)
Release ofrmorganigrama
Endproc
*************************************************************************************************************
Procedure viz_organigrama_programe
update_organigrama_programe_grup()
update_organigrama_programe_firme()
update_organigrama_programe_util()
ofrmorganigrama=Createobject("frm_organigrama_prog")
ofrmorganigrama.Show(1)
Release ofrmorganigrama
Endproc
*************************************************************************************************************
Procedure viz_organigrama_utilizatori
update_organigrama_util_grup()
update_organigrama_util_firme()
ofrmorganigrama=Createobject("frm_organigrama_util")
ofrmorganigrama.Show(1)
Release ofrmorganigrama
Endproc
*************************************************************************************************************
Procedure viz_organigrama_grupuri
update_organigrama_grupuri()
ofrmorganigrama=Createobject("frm_organigrama_grup")
ofrmorganigrama.Show(1)
Release ofrmorganigrama
Endproc
*************************************************************************************************************
Procedure viz_grupprog
Private poprograme,pcschema1,pcselect1,pogrupuri
Store '' To poprograme,pogrupuri
llAfisare=.F.
pcschema1 = ['']
pcselect1=['select * from vdef_grup where 1=2']
pcorder1=[grup]
pcfiltru1 = [2=2]
gencursor('pogrupuri','v_grupuri',pcselect1,pcfiltru1,pcschema1,pcorder1,llAfisare)
pogrupuri.ca_baza1.afisare()
pcschema1 = ['']
pcselect1=['select * from vdef_grup_drept where 1=2']
pcorder1=[denumire]
pcfiltru1 = [1=2]
gencursor('poprograme','v_grupprog',pcselect1,pcfiltru1,pcschema1,pcorder1,llAfisare)
pogrupuri.ca_baza1.afisare()
ofrmgrprog=Createobject("frm_grupprog")
ofrmgrprog.Show(1)
Release ofrmgrprog
Release poprograme,pogrupuri
Endproc
*************************************************************************************************************
Procedure viz_programe
Private poprograme,pcschema1,pcselect1
Store '' To poprograme
llAfisare=.F.
pcschema1 = ['']
pcselect1=['select * from vdef_programe where 1=2']
pcorder1=[ordine_grup,nume]
pcfiltru1 = [2=2]
gencursor('poprograme','v_programe',pcselect1,pcfiltru1,pcschema1,pcorder1,llAfisare)
poprograme.ca_baza1.afisare()
ofrmprog=Createobject("frm_programe")
ofrmprog.Show(1)
Release ofrmprog
Release poprograme
Endproc
*************************************************************************************************************
Procedure viz_grupuri
Private pogrupuri,pcschema1,pcselect1
Store '' To pogrupuri
llAfisare=.F.
pcschema1 = ['id_grup N(10),grup C(100),id_tata N(10),grup_sup C(100)']
pcselect1=['select a.id_grup,a.grup,a.id_tata,TRIM(SUBSTR(a.tata,1,INSTR(a.tata,CHR(92),1,a.nivel)-1)) '+]+;
['as grup_sup from vdef_grup a where 1=2']
pcorder1=[a.grup]
pcfiltru1 = [2=2]
gencursor('pogrupuri','v_grupuri',pcselect1,pcfiltru1,pcschema1,pcorder1,llAfisare)
pogrupuri.ca_baza1.afisare()
ofrmgrup=Createobject("frm_grupuri")
ofrmgrup.Show(1)
Release ofrmgrup
Release pogrupuri
Endproc
*************************************************************************************************************
*************************************************************************************************************
Procedure mod_validari
PRIVATE poutilizatori,pofirme
LOCAL lcschema,lcselect
Store '' To poutilizatori,pofirme,lcgroup
llModParam=.t.
llAfisare=.F.
lcschema = []
lcselect=[select * from vutilizatori]
lcorder=[utilizator]
lcfiltru=[inactiv=0]
gencursor('poutilizatori', 'v_utilizatori', lcselect, lcfiltru, lcschema, lcorder, llAfisare, lcgroup, llModParam)
poutilizatori.ca_baza1.afisare()
llAfisare=.F.
lcschema = []
lcselect=[select distinct a.ID_util,a.id_firma,a.firma,NVL(b.autovalidare,0) as autovalidare,NVL(b.dreptvalidare,0) as dreptvalidare,0 as modificat from vdef_util_grup a left join def_utilizatori_validare b on b.id_util=a.id_util and b.id_firma=a.id_firma]
lcorder=[firma]
lcfiltru=[]
gencursor('pofirme','v_firme',lcselect,lcfiltru,lcschema,lcorder,llAfisare, lcgroup, llModParam)
pofirme.ca_baza1.afisare()
SELECT v_firme
ofrmutil=Createobject("frm_validari")
ofrmutil.Show(1)
PRIVATE porec
porec=null
IF gnbuton=1
Select v_firme
Set Filter To
Scan For(modificat=1)
SCATTER NAME porec
* Messagebox(ALLTRIM(STR(id_util))+","+ALLTRIM(Str(id_firma)) + ","+ALLTRIM(str(autovalidare))+","+ALLTRIM(STR(dreptvalidare)))
lnSucces = 1
&& apelez functia de merge de pe server
IF lnSucces > 0
lcSql = [begin pack_drepturi.mergedatevalidare(?porec.id_util,?porec.id_firma,?porec.autovalidare,?porec.dreptvalidare); end;]
lnSucces = goExecutor.oExecute(lcSql)
IF lnSucces < 0
AMESSAGEBOX(goExecutor.cEroare,0+16,"Eroare")
ENDIF
ENDIF
Endscan
ENDIF
Release ofrmutil
Release poutilizatori
Endproc
*************************************************************************************************************
Procedure conectare
Lparameters tcHost, tcSchema, tcPassword
Private pcexec,pnsucces
If Pcount() <> 3
lcHost = Alltrim(gcHost)
lcSchema = Alltrim(gcUserName)
lcPassword = Alltrim(gcPassword)
Else
lcHost = Alltrim(tcHost)
lcSchema = Alltrim(tcSchema)
lcPassword = Alltrim(tcPassword)
Endif
*!* 22.06.2012
gnHandle = goConn.Connect(lcHost, lcSchema, lcPassword)
*!* If gnhandle < 0
*!* gnhandle = SQLConnect(Alltrim(lcHost),Alltrim(lcSchema),Alltrim(lcPassword))
*!* Endif
*!* 22.06.2012 ^
If gnhandle <= 0
*!* _Screen.Caption="Deconectat: "+Sys(0)
aMessagebox("Conectarea nu a reusit!",0+48,"Atentie")
Return gnhandle
Else
*!* _Screen.Caption="ROA (" + lcHost + ") " + +Sys(0)
Endif
goExecutor.nhandle = gnhandle
Return gnhandle
Endproc
*************************************************************************************************************
Procedure Deconectare( tnHandle )
*!* 22.06.2012
goConn.Disconnect(tnHandle)
*!* SQLDisconnect(0)
*!* gnhandle = -1
*!* goExecutor.nhandle = -1
*!* 22.06.2012 ^
Endproc
*************************************************************************************************************
*!* Procedure iesire
*!* goConn.Disconnect()
*!* *!* SQLDisconnect(0)
*!* Release All
*!* Quit
*!* Endproc
*************************************************************************************************************
Procedure arata_meniu_tray
Lparameters tnXCoord,tnYCoord
Local lcCursor, lnIdActual, lnIdPrec, loPop
lcCursor = [crsprogramemeniu]
lnIdActual = 0
lnIdPrec = 0
Select 0 As id_grup_prog, 'FAVORITE' As grup, nume, explicatie, 0 As ordine_grup,id_prog,ordine_favorit As ordine From v_programe_instalate ;
WHERE favorit = 1 ;
UNION All ;
SELECT id_grup_prog, grup, nume, explicatie, ordine_grup, id_prog, ordine From v_programe_instalate ;
Order By 5,7 Into Cursor (lcCursor)
*!* Select nume, explicatie,ordine_favorit,id_prog From v_programe_instalate ;
*!* WHERE favorit = 1 ;
*!* Order By ordine_favorit Into Cursor (lcCursor)
If Reccount(lcCursor) > 0
loPop = Newobject('PopMenu', 'menuTool.vcx')
With loPop
.nMenuBackColor = Rgb(255,251,247)
.nItemHeight = 23
.nBarStyle = 2
.nBarWidth = 22
.nBarFillColor1 = Rgb(2,2,88) && Rgb(255,251,247)
.nBarFillColor2 = Rgb(255,251,247) && Rgb(214,215,206)
.nTextLeft = 23
.nTextMargin = 8
.nSelectedStyle = 1
.lSelectedEnabled = .T.
.nSelectedForeColor = Rgb(0, 0, 0)
.nReturn = 2
.lOwnerDraw = .T.
Select (lcCursor)
lnIdPrec = -1
Scan
&& ParentKey, Key, Caption, Command, Image
*!* .Add('', '', Alltrim(explicatie), 'goApp.aforms[1].pgf_optiuni1.page1.scrollcont0.cw_'+Alltrim(Str(id_prog))+'.click()', Alltrim(nume)+'.bmp')
lnIdActual = id_grup_prog
If lnIdActual <> lnIdPrec
.Add('', Alltrim(Str(lnIdActual)), caps_first(ALLTRIM(grup)), '', Iif(lnIdActual = 0,'favorites.bmp',''))
lnIdPrec = lnIdActual
Endif
.Add(Alltrim(Str(lnIdActual)), '', caps_first(ALLTRIM(explicatie)), ;
'goApp.aforms[1].pgf_optiuni1.page1.scrollcont'+ALLTRIM(STR(lnIdActual))+'.cw_'+Alltrim(Str(id_prog))+'.click()',;
IIF(FILE(Alltrim(nume)+'.bmp'),Alltrim(nume)+'.bmp','na.bmp'))
Endscan
.Add('','', '\-', '','' )
.Add('','', Upper(Alltrim(gcUserNameApp))+'', 'schimba_utilizator()','iesire.bmp' )
*!* .Add('','', 'Iesire', 'goApp.aforms[1].lb_logoff.click()','logoff.bmp' )
.Add('','', 'Iesire', 'goApp.onshutdown()','logoff.bmp' )
.Show(tnXCoord,tnYCoord,.T.)
Endwith
Endif
Use In (lcCursor)
Release lcCursor, lnIdActual, lnIdPrec, loPop
Endproc
*************************************************************************************************************
PROCEDURE schimba_utilizator
goApp.aforms[1].oobjsystray.icondblclickevent()
goApp.aforms[1].lb_numeutilizator.Click()
Endproc
*************************************************************************************************************

752
Programe/roastart.prg Normal file
View File

@@ -0,0 +1,752 @@
*!* 24.06.2015
*!* marius.mutu
*!* Obiect KeepAlive Tin conexiunea deschisa. La wert??? apare eroarea odbc "timeout occured" daca se lasa peste 1 minut programul fara sa se lucreze
Public gnhandle
Public gTransferTotal
Public gcmdCancelDownload
Public gnewcryptfll
Public gnewcryptxml
gnewcryptfll=.F.
gnewcryptxml=.F.
Store -1 To gTransferTotal
Store -1 To gnhandle
gcmdCancelDownload=.F.
_Screen.Visible = (_VFP.StartMode <> 2)
_Screen.AutoCenter = .T.
_Screen.Caption = "ROA Romfast Applications"
_Screen.MaxButton=.F.
_Screen.BorderStyle=2
_Screen.Closable=.T.
_Screen.Icon=[ROASTART.ICO]
Public gcNumeProgram
gcNumeProgram = 'ROASTART'
Private gcCopyRight
gcCopyRight = '<27> ROA Romfast SRL'
*tparam=myinstance(JUSTPATH(SYS(16,0)))
Set Deleted On
Set Century On
Set Date Dmy
Set Safety Off
Set Console Off
Set NullDisplay To '*'
Set Seconds Off
Set Excl Off
Set Status Off
Set Status Bar Off
Set Exact On
Set Ansi On
Set Hours To 24
Set Sysmenu Off
Local lcMainClassLib
Local lcLastSetTalk,lcLastSetPath,lcLastSetClassLib,lcOnShutdown
*-- Save and configure environment.
lcLastSetTalk=Set("TALK")
Set Talk Off
lcLastSetPath=Set("PATH")
*** variabile publice
*!* Public gcAppPath,gcDatePath,buton,gctemppath,gcDirMare,gcDateRetea, gcSecurityPath, gcSecurityFile
*!* Store 2 To buton
*!* Store "" To gctemppath
Declare Integer GetPrivateProfileString In Kernel32 ;
string, String, String, String @, Integer, String
Declare Integer WritePrivateProfileString In Kernel32 ;
string, String, String, String
Declare Integer CopyFile In kernel32;
STRING lpExistingFileName,;
STRING lpNewFileName,;
INTEGER bFailIfExists
Declare Integer URLDownloadToFile In urlmon.Dll;
INTEGER pCaller, String szURL, String szFileName,;
INTEGER dwReserved, Integer lpfnCB
Declare Integer PathFileExists In shlwapi;
STRING pszPath
*!* modificare v 2.0.23
Declare ExitProcess In WIN32API Integer
*!* modificare v 2.0.23 ^
Push Menu _Msysmenu
***************************************************************
Public gcAppPath,gcAppName,gcDirMare,gcSecurityFile,gcTempPath
Public plEroare
Store .F. To plEroare
Public goApi
SET PROCEDURE TO "D:\ROA\ROASTART\COMUN\utile\web\wwAPI.prg" ADDITIVE
SET PROCEDURE TO "D:\ROA\ROASTART\COMUN\utile\web\wwUtils.prg" ADDITIVE
goApi = CREATEOBJECT("wwAPI")
gcTempPath = Addbs(shortpath(goApi.GetTempPath())) && WWAPI.PRG
gcAppPath = Addbs(shortpath(STRTRAN(GetAppStartPath(),'PROGRAME\','',1,1,1)))
gcAppName=Juststem(Sys(16,0))
liat=Rat("\",gcAppPath,2)
gcDirMare=Left(gcAppPath,liat)
*!* gcDateRetea=gcDirMare+"DateRetea\"
DIRGEN = gcDirMare
gcDatePath=gcAppPath+"\Data\"
*!* modificare v 2.0.14
*!* gcComunPath=Addbs(gcDirMare)+"comun\"
gcComunPath=Addbs(gcDirMare)+"COMUNROA\"
*!* modificare v 2.0.14 ^
gcSecurityPath = gcDirMare + 'Security\'
gcSecurityFile = gcSecurityPath + 'ROA_SECURITY.TXT'
SET DEFAULT TO (m.gcAppPath)
lcPath = gcAppPath + 'Date;' + ;
gcAppPath + 'Include;' + ;
gcAppPath + 'FERESTRE;' + ;
gcAppPath + 'GRAFICE;' + ;
gcAppPath + 'CLASE;' + ;
gcAppPath + 'MENIURI;' + ;
gcAppPath + 'PROGRAME;' + ;
gcAppPath + 'RAPOARTE;' + ;
gcAppPath + 'COMUN\CLASE;' + ;
gcAppPath + 'COMUN\FERESTRE;' + ;
gcAppPath + 'COMUN\PROGRAME;' + ;
gcAppPath + 'COMUN\GRAFICE;' + ;
gcAppPath + 'COMUN\INCLUDE;' + ;
gcAppPath + 'COMUN\RAPOARTE;' + ;
gcAppPath + 'COMUN\UTILE\CTL32;' + ;
gcAppPath + 'COMUN\UTILE\HPDF;' + ;
gcAppPath + 'COMUN\UTILE\HPDF\REPORTOUTPUT;' + ;
gcAppPath + 'COMUN\UTILE\WEB;' + ;
Addbs(Substr(gcAppPath,1,Rat([\],gcAppPath,2)))+[COMUNROA\]
SET PATH TO &lcPath ADDITIVE
*!* Set Path To Addbs(Substr(gcAppPath,1,Rat([\],gcAppPath,2)))+[COMUNROA\] Additive && modificare v 2.0.14
***************************************************************
lcLastSetClassLib=Set("CLASSLIB")
*!* lcMainClassLib="libs\"+gcAppName
lcMainClassLib = gcAppPath + "clase\ostart.vcx"
Set Classlib To (lcMainClassLib) Additive
Set Classlib To registry Additive
Set Classlib To decabaza Additive
Set Classlib To ofundal Additive
Set Classlib To ofundal_start Additive
Set Classlib To ostart_init Additive
Set Classlib To ostart_grup Additive
Set Classlib To ostart_util Additive
Set Classlib To ostart_admin Additive
Set Classlib To scrollcontainer Additive
Set Classlib To Messagebox Additive
Set Classlib To crypto Additive
Set Classlib To wwdialogs Additive
Set Classlib To ofirma Additive
*!* modificare v 2.0.23
Set Classlib To systray Additive
*!* modificare v 2.0.23 ^
SET CLASSLIB TO ctl32.vcx ADDITIVE
SET CLASSLIB TO appwiz_start.vcx ADDITIVE && modificare v 2.1.5
SET CLASSLIB TO accessibility.vcx ADDITIVE && modificare v 2.1.5
Set Procedure To wwcodeupdate Additive
Set Procedure To oproceduri_start Additive
Set Procedure To log_mesaje Additive
Set Procedure To oproceduri_ams Additive
Set Procedure To oproceduri_comune Additive
Set Procedure To proceduri_comune Additive
Set Procedure To gencursor Additive
Set Procedure To update_start Additive
Set Procedure To osecurity Additive
*!* 25.09.2006
*!* marius.mutu
Set Procedure To wwxmlhttp.prg Additive
*!* Set Procedure To wwutils.prg Additive
Set Procedure To WWHTTP.prg Additive
Set Procedure To ini.prg Additive
*!* 05.09.2007
*!* Vasile Cristian
Set Procedure To iniacces.prg Additive
Set Procedure To xmlaccess.prg Additive
Set Procedure To xmlparser.prg Additive
Set Procedure To Version.prg Additive
Set Procedure To filebringer.prg Additive
Set Procedure To procese.prg Additive
Set Procedure To updatecheck.prg Additive
Set Procedure To wwconfig.prg Additive
Set Procedure To oexport.prg Additive
Set Procedure To oupdate.prg Additive
If TooManyInstances(1) &&Too many instance already running?
Quit
Endif
*!* PRIVATE gcInstructiuniPath, gcRaportPath,gcAlfaPath
*!* modificare v 2.0.31
PUBLIC glFontCharSet
glFontCharSet = AFONT(laFontCharSet,"Arial Narrow",238)
*!* modificare v 2.0.31 ^
*!* Locale
Set Classlib To locale Additive
Private gcLocalePath, goLocale, glTraducere
gcLocalePath = gcAppPath + "Locale\"
glTraducere = .F.
lcLocaleDb = gcLocalePath + "locale.dbc"
Open Database (m.lcLocaleDb)
goLocale=Newobject("Locale","Locale.vcx")
lcFisierIni = shortpath(GetIniPath())
lcBuffer=Space(255)
*!* 16.01.2009
lcBuffer2=Space(255)
GetPrivateProfileString( "locale","llocale","", @m.lcBuffer2, Len(m.lcBuffer2), m.lcFisierIni)
lcBuffer2 = Strtran(m.lcBuffer2,Chr(0),"")
lcBuffer2 = Alltrim(m.lcBuffer2)
If Empty(lcBuffer2)
WritePrivateProfileString( "locale","llocale", '0' , m.lcFisierIni)
m.lcBuffer2='0'
Endif
If m.lcBuffer2<>'0'
goLocale.llocale=.T.
Endif
*!* 16.01.2009 ^
GetPrivateProfileString( "locale","lang","", @m.lcBuffer, Len(m.lcBuffer), m.lcFisierIni)
lcBuffer = Strtran(m.lcBuffer,Chr(0),"")
lcBuffer = Alltrim(m.lcBuffer)
If Empty(lcBuffer)
WritePrivateProfileString( "locale","lang", 'Romana' , m.lcFisierIni)
lcBuffer='Romana'
Endif
goLocale.locale = m.lcBuffer
*!* Locale ^
*!* modificare v 2.0.14
*!* Local loex17 As Exception
*!* Try
*!* gnewcryptfll=.T.
*!* Set Default To (gcComunPath)
*!* Set Library To vfpencryption.fll Additive
*!* Catch To loex17
*!* gnewcryptfll=.F.
*!* *MESSAGEBOX(loex17.Message)
*!* Endtry
*!* modificare v 2.0.14 ^
*set library to bbDownLoadURL.fll additive
#include registry.h
*!* **variabile publice care imi folosesc in start pentru nivelele de acces
*!* Public id_utilizator,nivel_acces
*!* Store 0 To id_utilizator
*!* Store .F. To nivel_acces
Public poLog, goLog && obiect pt logarea mesajelor sistemului ; modificare v 2.1.2 : am adaugat goLog
Local lcLog
poLog = Newobject("Log_Mesaje","Log_Mesaje.prg")
lcLog = [0]
goLog = poLog && modificare v 2.1.2
poLog.Log(lcLog,Program())
Public gcHost,gnIdUtil,gcUtil,gcuserName,gcPassword,glIntrat,gcUserNameApp,gnButon,glSupervizor,glAdministrator,gcAcces,gcS
gcAcces="1;2;3;4;"
glSupervizor = .F.
glAdministrator = .F.
gnButon=1
glIntrat=.F.
gcHost = "jcsserver"
gcuserName = "contafin_ORACLE"
gcPassword = "123"
**variabile publice care imi folosesc in start pentru nivelele de acces
*!* gcInstructiuniPath = gcAppPath + 'Instructiuni\'
*!* gcRaportPath = gcAppPath + 'Raport\'
*!* gcAlfaPath = gcAppPath + 'Alfa\'
*!* If !Directory(gcRaportPath)
*!* Md (gcRaportPath)
*!* Endif
*!* If !Directory(gcAlfaPath)
*!* Md (gcAlfaPath)
*!* Endif
*!* If !Directory(gcInstructiuniPath)
*!* Md (gcInstructiuniPath)
*!* Endif
Private goExecutor,goExport
goExecutor = Createobject("oExecutor")
goExport = Createobject("oExportConfig")
&& obiect global wrap pentru sqlconnect, sqldisconnect; apeleaza proceduri postconectare pentru setare variabile sesiune
Private goConn
goConn = Createobject("oConn")
*!* modificare v 2.0.29
PRIVATE gnIdFirma
gnIdFirma = 0
*!* modificare v 2.0.29 ^
*!* 25.09.2006
*!* marius.mutu
Private gcGeneralIniFile, gcSettingsFile
gcGeneralIniFile = DIRGEN + "settings.ini"
gcSettingsFile = gcGeneralIniFile
If !File(gcGeneralIniFile)
TEXT TO lcSettings NOSHOW
[errors]
host=http://roa.romfast.ro:3000/errors/create_xml
ENDTEXT
Strtofile(lcSettings, gcGeneralIniFile)
Endif
*** Tin conexiunea deschisa. La wert??? apare eroarea odbc "timeout occured" daca se lasa peste 1 minut programul fara sa se lucreze
LOCAL lcKeepAlive, lnKeepAlive
PRIVATE goKeepAlive
lcKeepAlive = NVL(getini(m.gcGeneralIniFile,'update','keepalive_seconds'), '')
lnKeepAlive = 0
IF EMPTY(m.lcKeepAlive)
setini(m.gcGeneralIniFile,'update','keepalive_seconds', '0')
lnKeepAlive = 0
ELSE
lnKeepAlive = VAL(m.lcKeepAlive)
ENDIF
IF m.lnKeepAlive >= 5 && minim 5 secunde
goKeepAlive = NEWOBJECT("keepalive","ostart.vcx")
goKeepAlive.interval = m.lnKeepAlive * 1000
goKeepAlive.enabled = .T.
ENDIF
Private goMyXMLHTTP
lcHostErrors = getini(gcGeneralIniFile,'errors','host')
goMyXMLHTTP = Createobject("MyXMLHTTP", lcHostErrors)
*************************
* Modificare IP: roa.romfast.ro in loc de 83.103.197.79
* settings.ini si tnsnames.ora
UpdateIniROA()
*************************
*!* lcLog = [1']
*!* poLog.Log(lcLog,Program())
lcOnShutdown="ShutDown()"
On Shutdown &lcOnShutdown
On Error ErrorHandler(Error(),Program(),Lineno())
*ON ERROR SUSPEND
_Shell="DO Cleanup IN progs\start"
*!* lap=Create("registry")
*!* *** verific cale temporare
*!* If lap.iskey("Contafin\temporare",-2147483647)=.T.
*!* lap.openkey("Contafin\temporare",-2147483647,.F.)
*!* gctemppath=lap.getkeyvalue("temp",)
*!* Else
*!* lap.openkey("Contafin\temporare",-2147483647,.T.)
*!* lcTempPath =[c:\contafin\temp\]
*!* gctemppath = lcTempPath
*!* If Directory(lcTempPath)
*!* lap.setregkey("temp",gctemppath,"Contafin\temporare",,.T.)
*!* Else
*!* lcError = On('error')
*!* On Error Teroare()
*!* Md (lcTempPath)
*!* On Error &lcError
*!* lap.setregkey("temp",gctemppath,"Contafin\temporare",,.T.)
*!* Endif
*!* Endif
*!* If !Directory(gctemppath)
*!* lcError = On('error')
*!* On Error Teroare()
*!* Md (gctemppath)
*!* On Error &lcError
*!* lap.setregkey("temp",gctemppath,"Contafin\temporare",,.T.)
*!* Endif
*!* gctemppath= Addbs(gctemppath)
**** verific cale_server_date
*!* lcCaleServerDate = []
*!* gcserver = "serverdate_"+Strtran(gcDirMare,"\","")
*!* *!* WAIT WINDOW gcserver
*!* If lap.iskey("contafin\"+gcserver,-2147483647)
*!* lap.openkey("contafin\"+gcserver,-2147483647,.F.)
*!* lcCaleServerDate=lap.getkeyvalue("cale",)
*!* If Empty(lcCaleServerDate) Or Type('lcCaleServerDate')!="C"
*!* lap.deletekey(-2147483647,"cale")
*!* lcCaleServerDate= gcDirMare
*!* lap.setregkey("cale",lcCaleServerDate,"contafin\"+gcserver,,.T.)
*!* Endif
*!* Else
*!* lcCaleServerDate= gcDirMare
*!* lap.setregkey("cale",lcCaleServerDate,"contafin\"+gcserver,,.T.)
*!* Endif
*!* gcCaleServerDate = lcCaleServerDate
**** verific numestatie
*!* lcNumeStatie = []
*!* If lap.iskey("contafin\"+gcserver,-2147483647)=.T.
*!* lap.openkey("contafin\"+gcserver,-2147483647,.F.)
*!* gcnumestatie=lap.getkeyvalue("numestatie",)
*!* If Empty(gcnumestatie) Or Type('gcNumeStatie')!="C"
*!* lap.deletekey(-2147483647,"numestatie")
*!* lcSys0 = Sys(0)
*!* gcnumestatie = Alltrim(Left(lcSys0,At("#",lcSys0)-1))
*!* lap.setregkey("numestatie",gcnumestatie ,"contafin\"+gcserver,,.T.)
*!* Endif
*!* Else
*!* lcSys0 = Sys(0)
*!* gcnumestatie = Alltrim(Left(lcSys0,At("#",lcSys0)-1))
*!* lap.setregkey("numestatie",gcnumestatie ,"contafin\"+gcserver,,.T.)
*!* Endif
*!* lcLog = [2]
*!* poLog.Log(lcLog,Program())
*!* Release lap
*!* Do totv
*!* Select cai
*!* lccaledir=Upper(Alltrim(gcDirMare))
*!* Locate For Strtran(Strtran(Upper(Alltrim(caleserver)),"\",""),":","")=Strtran(Strtran(lccaledir,"\",""),":","")
*!* If !Found()
*!* If Flock()
*!* Append Blank
*!* Replace caleserver With gcDirMare
*!* Replace numecale With "Contafin"
*!* Endif
*!* Endif
*!* ENDIF
*!* lcLog = [3]
*!* poLog.Log(lcLog,Program())
*!* Do v_util
*!* lcLog = [4]
*!* poLog.Log(lcLog,Program())
Local loex17 As Exception
Try
gnewcryptfll=.T.
Set Default To (gcComunPath)
Set Library To vfpencryption.fll Additive
Set Library To vfpcompression.fll Additive
Catch To loex17
gnewcryptfll=.F.
*MESSAGEBOX(loex17.Message)
Endtry
UpdateRoastart()
*!* modificare v 2.0.14 ^
*!* idstring=""
*!* Try
*!* idstring=Filetostr(gcDirMare+"USERREPORTS\Userreports_id.txt")
*!* Catch
*!* *MESSAGEBOX(gcDirMare)
*!* idstring="userreports"
*!* Endtry
*!* If idstring#""
*!* loUpdate = createobject("oUpdate")
*!* loUpdate.updatecheck(idstring,lotemp)
*!* Endif
*!* Release lotemp
*-- Instantiate application object.
Release goApp
Public goApp
goApp=Createobject("wzApplication")
*-- Configure application object.
*!* modificare v 2.0.29
*!* goApp.SetCaption("ROA Romfast Applications")
*!* goApp.cStartupMenu=gcAppPath+"menus\start.mpr"
*!* modificare v 2.0.29 ^
goApp.cStartupForm=gcAppPath+"ferestre\frm_fundal.scx"
goApp.SetCaption("ROA Romfast Applications")
*-- Show application.
goApp.Show
*-- Release application.
Release goApp
*-- Restore default menu.
Pop Menu _Msysmenu
*-- Restore environment.
On Error
On Shutdown
If Not lcLastSetClassLib==Set("classlib")
Release Classlib (lcMainClassLib)
Endif
If Empty(lcLastSetPath)
Set Path To
Else
Set Path To &lcLastSetPath
Endif
If lcLastSetTalk=="ON"
Set Talk On
Else
Set Talk Off
Endif
Return
*************************************************************************************************************************
Function ErrorHandler(nError,cMethod,nLine)
Local lcErrorMsg,lcCodeLineMsg
Wait Clear
lcErrorMsg=Message()+Chr(13)+Chr(13)
lcErrorMsg=lcErrorMsg+"Method: "+cMethod
lcCodeLineMsg=Message(1)
If Between(nLine,1,10000) And Not lcCodeLineMsg="..."
lcErrorMsg=lcErrorMsg+Chr(13)+"Line: "+Alltrim(Str(nLine))
If Not Empty(lcCodeLineMsg)
lcErrorMsg=lcErrorMsg+Chr(13)+Chr(13)+lcCodeLineMsg
Endif
Endif
If Type('goMyXMLHTTP') = 'O'
lcLunaHTTP = Iif(Type('gnLuna') = 'N', Transform(gnLuna) + "/","") + Iif(Type('GNAN') = 'N', Transform(gnAn),"")
lcErrorMsgHTTP = Sys(0) + ":" + Iif(Type('GCS')='C'," " + gcS,"") + ": " + lcLunaHTTP + Chr(13) +Chr(10) + lcErrorMsg + ;
CHR(13) +Chr(10) + Chr(13) + Chr(10) + GETCALLSTACK()
lcUserName = gcUserNameApp
lcProgram = Juststem(Sys(16,0))
goMyXMLHTTP.postError(lcErrorMsgHTTP, lcUserName, lcProgram)
Endif
If _vfp.StartMode=0
Debug
Suspend
Endif
If AMESSAGEBOX(lcErrorMsg,17,_Screen.Caption)#1
On Error
Return .F.
Endif
Endfunc
*************************************************************************************************************************
Function Shutdown
&&&&
If Pemstatus(_Screen,"SemaphoreHandle",5)
Declare Integer ReleaseSemaphore In kernel32 Integer hSemaphore, Integer lReleaseCount, Integer @lpPreviousCount
Declare Integer CloseHandle In Kernel32 Integer hObject
ReleaseSemaphore(_Screen.SemaphoreHandle,1,0)
CloseHandle(_Screen.SemaphoreHandle)
Clear Dlls "ReleaseSemaphore", "CloseHandle"
Endif
&&&&
If plEroare=.T.
Quit
Endif
*!* ldel=Create("registry")
*!* ldel.openkey("contafin\"+gcserver,-2147483647,.F.)
*!* ldel.deletekey(-2147483647,"contafin\"+gcserver+"\util")
*!* Select programe
*!* Scan For Id#0
*!* ldel.deletekey(-2147483647,"contafin\"+gcserver+"\prog\"+Alltrim(Juststem(nume)))
*!* Endscan
*!* ldel.deletekey(-2147483647,"contafin\"+gcserver+"\prog")
*!* Release ldel
If Type("goApp")=="O" And Not Isnull(goApp)
Return goApp.OnShutDown()
Endif
Cleanup()
Quit
Endfunc
*************************************************************************************************************************
Function Cleanup
If Cntbar("_msysmenu")=7
Return
Endif
On Error
On Shutdown
Set Classlib To
Set Path To
Clear All
Close All
Pop Menu _Msysmenu
Return
*************************************************************************************************************************
*!* ***************************
*!* Function TooManyInstances(lnInstancesAllowed)
*!* ***************************
*!* #Define GW_CHILD 5 && 0x00000005
*!* #Define GW_HWNDNEXT 2 && 0x00000002
*!* #Define SW_MAXIMIZE 3 && 0x00000003
*!* #Define SW_NORMAL 1 && 0x00000001
*!* #Define WAIT_OBJECT_0 0 && 0x00000000
*!* #Define RF_MESAJ 0xA123
*!* Local lcUniqueProperty, lcUniqueSemaphore, lnhSemaphore, lnHwnd, llReturn
*!* If Pcount() = 0
*!* lnInstancesAllowed = 1 && default
*!* Else
*!* lnInstancesAllowed = Max(lnInstancesAllowed,1) &&At least one
*!* Endif
*!* Do DeclareAPIs
*!* lcUniqueSemaphore = Strtran(Justpath(Sys(16,0)),"\","")
*!* *!* lcUniqueSemaphore = "968360BF-C7AD-4B62-A045-0A06D597EF18"
*!* lcUniqueProperty = "E2429959-D873-4733-8182-7A3F14780A27"
*!* &&&
*!* *!* oTypeLib = CreateObject("scriptlet.typelib")
*!* *!* lcUniqueSemaphore = substr(oTypeLib.GUID, 2, 36)
*!* *!* oTypeLib1 = CreateObject("scriptlet.typelib")
*!* *!* lcUniqueProperty = substr(oTypeLib1.GUID, 2, 36)
*!* &&&
*!* lnhSemaphore = CreateSemaphore(0,lnInstancesAllowed,lnInstancesAllowed,lcUniqueSemaphore)
*!* If lnhSemaphore != 0 And WaitForSingleObject(lnhSemaphore, 0) != WAIT_OBJECT_0
*!* Do DeclareMoreAPIs
*!* llReturn = .T.
*!* lnHwnd = GetWindow(GetDesktopWindow(), GW_CHILD)
*!* Do While lnHwnd != 0 && loop through all windows
*!* If GetProp(lnHwnd, lcUniqueProperty) = 1 && does window have our unique property?
*!* BringWindowToTop(lnHwnd)
*!* *!* modificare v 2.0.23
*!* If IsIconic(lnHwnd) <> 0
*!* SendMessage(lnHwnd, RF_MESAJ, 0, 0)
*!* Else
*!* *!* modificare v 2.0.23 ^
*!* ShowWindow(lnHwnd,SW_NORMAL)
*!* *!* modificare v 2.0.23
*!* Endif
*!* *!* modificare v 2.0.23 ^
*!* llReturn = .T.
*!* Exit
*!* Endif
*!* lnHwnd = GetWindow(lnHwnd, GW_HWNDNEXT)
*!* Enddo
*!* CloseHandle(lnHwnd)
*!* CloseHandle(lnhSemaphore)
*!* Clear Dlls "BringWindowToTop", "GetDesktopWindow", ;
*!* "GetProp", "GetWindow", "ShowWindow", ;
*!* "CloseHandle", "SendMessage", "IsIconic"
*!* Else
*!* =SetProp(_vfp.HWnd, lcUniqueProperty, 1)
*!* _Screen.AddProperty("SemaphoreHandle",lnhSemaphore)
*!* llReturn = .F.
*!* Endif
*!* Clear Dlls "CreateSemaphore", "GetLastError", ;
*!* "SetProp"
*!* Return (llReturn)
*!* Endfunc
*!* *************************************************************************************************************************
*!* ***************************
*!* Procedure DeclareAPIs()
*!* ***************************
*!* Declare Integer CloseHandle In Kernel32 Integer hObject
*!* Declare Integer CreateSemaphore In Kernel32 Integer lpSemaphoreAttributes, Integer lInitialCount, Integer lMaximumCount, String lpName
*!* Declare Integer SetProp In User32 Integer HWnd, String lpString, Integer hData
*!* Declare Integer WaitForSingleObject In kernel32 Integer hHandle, Integer dwMilliseconds
*!* Endproc
*!* *************************************************************************************************************************
*!* ***************************
*!* Procedure DeclareMoreAPIs()
*!* ***************************
*!* Declare Integer BringWindowToTop In Win32API Integer HWnd
*!* Declare Integer GetDesktopWindow In User32
*!* Declare Integer GetProp In User32 Integer HWnd, String lpString
*!* Declare Integer GetWindow In User32 Integer HWnd, Integer uCmd
*!* Declare Integer ShowWindow In Win32API Integer HWnd, Integer nCmdShow
*!* *!* modificare v 2.0.23
*!* Declare Integer SendMessage In user32 Integer HWnd,Integer Msg,Integer wParam, Integer Lparam
*!* Declare Integer IsIconic In user32 Integer HWnd
*!* *!* modificare v 2.0.23 ^
*!* Endproc
*************************************************************************************************************************
Function Teroare()
gcTempPath=Getdir("c:","Alegeti calea fisierelor temporare!","Alegeti directorul!",64)
Do While Empty(gcTempPath)
gcTempPath=Getdir("c:","Alegeti calea fisierelor temporare!","Alegeti directorul!",64)
Enddo
Endfunc
*** pentru goconn.connect
Procedure InitSesiune
ENDPROC
* --------------------------------------
* Modificare IP: roa.romfast.ro in loc de 83.103.197.79
* settings.ini si tnsnames.ora
* --------------------------------------
PROCEDURE UpdateIniROA
Local laDirs[1], lcDir, lcFile, lcInternetPath, lcIsURLROA, lcSkeletonDir, lcSuportVersionURL
Local lcText, lnDir, lnDirs, lnIsURLROA, lcErrorsHost, lcBaseDir
lcIsURLROA = NVL(getini(m.gcGeneralIniFile,'update','is_url_roa'), '')
lnIsURLROA = IIF(EMPTY(NVL(m.lcIsURLROA,'0')), 0, INT(VAL(m.lcIsURLROA)))
* Daca am modificat deja fisierul settings.ini si tnsnames.ora
IF m.lnIsURLROA = 1
RETURN
ENDIF
* settings.ini
lcErrorsHost = NVL(getini(m.gcGeneralIniFile,'errors','host'), '')
IF 'http://83.103.197.79'$m.lcErrorsHost
lcErrorsHost = STRTRAN(m.lcErrorsHost, 'http://83.103.197.79','https://roa.romfast.ro',1,1,1)
setini(m.gcGeneralIniFile,'errors','host', m.lcErrorsHost)
ENDIF
*!* lcInternetPath = NVL(getini(m.gcGeneralIniFile,'update','InternetPath'), '')
*!* IF '83.103.197.79'$m.lcInternetPath
*!* lcInternetPath = STRTRAN(m.lcInternetPath, '83.103.197.79','roa.romfast.ro',1,1,1)
*!* setini(m.gcGeneralIniFile,'update','InternetPath', m.lcInternetPath)
*!* ENDIF
lcSuportVersionURL = NVL(getini(m.gcGeneralIniFile,'update','suportversionurl'), '')
IF '83.103.197.79'$m.lcSuportVersionURL
lcSuportVersionURL = STRTRAN(m.lcSuportVersionURL , 'http://83.103.197.79:3002','https://roa.romfast.ro',1,1,1)
setini(m.gcGeneralIniFile,'update','suportversionurl', m.lcSuportVersionURL)
ENDIF
* tnsnames.ora
lcBaseDir = ADDBS(JUSTPATH(m.gcGeneralIniFile))
lcSkeletonDir = m.lcBaseDir + 'instantclient*'
lnDirs =ADIR(laDirs, m.lcSkeletonDir, "D")
FOR lnDir = 1 TO m.lnDirs
lcDir = m.lcBaseDir + laDirs[lnDir,1] + '\'
lcFile = m.lcDir + 'tnsnames.ora'
IF FILE(m.lcFile)
lcText = FILETOSTR(m.lcFile)
lcText = STRTRAN(m.lcText, '83.103.197.79','roa.romfast.ro',1,100,1)
STRTOFILE(m.lcText, m.lcFile)
ENDIF
ENDFOR
* am facut modificarile
setini(m.gcGeneralIniFile,'update','is_url_roa', '1')
ENDPROC && UpdateIniROA

1
Programe/security.h Normal file
View File

@@ -0,0 +1 @@
#DEFINE ENCRYPTKEY "233!do*32Di3-o23\409"

View File

@@ -0,0 +1,53 @@
**********************************************************
PROCEDURE update_nomenclator
*!* *!* DO update_coresp_tip_part
*!* *!* DO update_coresp_tip_cont
*!* DO update_lunilean
*!* *** tabele meniu deschise din proiect
*!* LOCAL lcCaleDateMenu
*!* lcCaleDateMenu=gcAppPath+[DATEMENU\]
*!* IF !USED('XREQUEST')
*!* USE &lcCaleDateMenu.XREQUEST IN 0 ALIAS XREQUEST
*!* ENDIF
*!* IF !USED('xitems')
*!* USE &lcCaleDateMenu.xitems IN 0 ALIAS xitems
*!* ENDIF
*!* IF !USED('YACT')
*!* USE &lcCaleDateMenu.YACT IN 0 ALIAS YACT
*!* ENDIF
*!* IF !USED('XSETS')
*!* USE &lcCaleDateMenu.XSETS IN 0 ALIAS XSETS ORDER TAG ID_SET
*!* ENDIF
*!* IF !USED('xACT')
*!* USE &lcCaleDateMenu.xACT IN 0 ALIAS xACT
*!* ENDIF
*!* IF !USED('xnote')
*!* USE &lcCaleDateMenu.xnote IN 0 ALIAS xnote
*!* ENDIF
*!* IF !USED('menu1')
*!* USE &lcCaleDateMenu.menu1 IN 0 ALIAS menu1 EXCL
*!* ENDIF
*!* IF !USED('INFISIERE')
*!* USE &lcCaleDateMenu.INFISIERE IN 0 ALIAS INFISIERE
*!* ENDIF
*!* IF !USED('nom_meniu')
*!* USE &lcCaleDateMenu.nom_meniu IN 0 ALIAS nom_meniu
*!* ENDIF
*!* IF !USED('refaceri')
*!* USE &lcCaleDateMenu.refaceri IN 0 ALIAS refaceri
*!* ENDIF
*!* IF !USED('tabela_fisa_cont')
*!* USE &lcCaleDateMenu.tabela_fisa_cont IN 0 ALIAS tabela_fisa_cont
*!* ENDIF
ENDPROC && update_nomenclator

229
Programe/update_start.prg Normal file
View File

@@ -0,0 +1,229 @@
******************************************************************************
Procedure citeste_drepturi
Lparameters tnIdGrup,tnIdProgram
lcCursor = [v_obiectegrup]
If Used(lcCursor)
*!* Select v_obiectegrup
*!* Locate For id_firma=gnIdFirma
*!* If Found()
*!* Return
*!* Else
Use In (lcCursor)
*!* Endif
Endif
lcSql=[select cheie from vdef_grup_obiecte_prog ]+;
[where id_grup=]+Alltrim(Str(tnIdGrup))+[ and id_program=]+Alltrim(Str(tnIdProgram))
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
If lnSucces < 0
aMessagebox(goExecutor.cEroare,0+16,'Eroare')
Return
Endif
Endproc
******************************************************************************
Procedure viz_prg_instalat
If Used('v_programe_instalate')
Use In v_programe_instalate
Endif
*!* lcSql = [select * from vdef_util_programe where id_util=]+Alltrim(Str(gnIdUtil))+;
*!* [ order by ordine]
lcSql = [{call pack_drepturi.programe_utilizator(]+ALLTRIM(STR(gnIdUtil))+[)}]
lcCursor = [v_programe_instalate]
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
goExecutor.oReset()
Endproc
******************************************************************************
Procedure viz_optiuni_prg
If Used('v_optiuni_programe')
Use In v_optiuni_programe
Endif
lcSql = [select * from vdef_util_optiuni where id_util=]+Alltrim(Str(gnIdUtil))+;
[ order by ordine]
lcCursor = [v_optiuni_programe]
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
goExecutor.oReset()
Endproc
******************************************************************************
Procedure update_organigrama_firme_util
If Used('v_organigrama_fu')
Use In v_organigrama_fu
Endif
lcSql = [select * from vdef_organigrama_firme_util]
lcCursor = [v_organigrama_fu]
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
goExecutor.oReset()
Endproc
******************************************************************************
Procedure update_organigrama_firme_grup
If Used('v_organigrama_fg')
Use In v_organigrama_fg
Endif
lcSql = [select * from vdef_organigrama_firme_grup]
lcCursor = [v_organigrama_fg]
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
goExecutor.oReset()
Endproc
******************************************************************************
Procedure update_organigrama_programe_firme
If Used('v_organigrama_pf')
Use In v_organigrama_pf
Endif
lcSql = [select * from vdef_organigrama_prog_firme]
lcCursor = [v_organigrama_pf]
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
goExecutor.oReset()
Endproc
******************************************************************************
Procedure update_organigrama_programe_util
If Used('v_organigrama_pu')
Use In v_organigrama_pu
Endif
lcSql = [select * from vdef_organigrama_programe_util]
lcCursor = [v_organigrama_pu]
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
goExecutor.oReset()
Endproc
******************************************************************************
Procedure update_organigrama_programe_grup
If Used('v_organigrama_pg')
Use In v_organigrama_pg
Endif
lcSql = [select * from vdef_organigrama_programe_grup]
lcCursor = [v_organigrama_pg]
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
goExecutor.oReset()
Endproc
******************************************************************************
Procedure update_organigrama_util_firme
If Used('v_organigrama_uf')
Use In v_organigrama_uf
Endif
lcSql = [select * from vdef_organigrama_util_firme]
lcCursor = [v_organigrama_uf]
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
goExecutor.oReset()
Endproc
******************************************************************************
Procedure update_organigrama_util_grup
If Used('v_organigrama_ug')
Use In v_organigrama_ug
Endif
lcSql = [select * from vdef_organigrama_util_grup]
lcCursor = [v_organigrama_ug]
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
goExecutor.oReset()
Endproc
******************************************************************************
Procedure update_organigrama_grupuri
If Used('v_organigrama')
Use In v_organigrama
Endif
lcSql = [select * from vdef_organigrama_grupuri]
lcCursor = [v_organigrama]
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
goExecutor.oReset()
Endproc
******************************************************************************
Procedure update_programe
Lparameters tnIdGrup
If Used('v_programe')
Use In v_programe
Endif
If Empty(tnIdGrup)
lcSql = [select ide_program,nume from vdef_programe where instalat=1 order by nume]
Else
lcSql = [{call pack_drepturi.programe_grup(]+Alltrim(Str(tnIdGrup))+[)}]
Endif
lcCursor = [v_programe]
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
goExecutor.oReset()
Endproc
******************************************************************************
Procedure update_obiecte_prog
Lparameters tnIdGrup,tnIdProgram
If Used('v_obiecte')
Use In v_obiecte
Endif
lcSql = [select * from vdef_obiecte where id_program=]+Alltrim(Str(tnIdProgram))+;
[ order by cale]
*!* lcSql = [{call pack_drepturi.obiecte_program(]+Alltrim(Str(tnIdGrup))+[,]+;
*!* Alltrim(Str(tnIdProgram))+[)}]
lcCursor = [v_obiecte]
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
If lnSucces<0
aMessagebox(goExecutor.cEroare+" "+lcSql)
Endif
goExecutor.oReset()
Endproc
******************************************************************************
*!* modificare v 2.0.25
*!* Procedure update_obiecte_grup
*!* Lparameters tnIdGrup
*!* If Used('v_obiectegrup')
*!* Use In v_obiecte
*!* Endif
*!* lcSql = [select * from vdef_grup_drept_obiecte where id_grup=]+Alltrim(Str(tnIdGrup))+;
*!* [ order by id_obiect]
*!* lcCursor = [v_obiectegrup]
*!* lnSucces = goExecutor.oExecute(lcSql,lcCursor)
*!* goExecutor.oReset()
*!* Endproc
*!* modificare v 2.0.25 ^
******************************************************************************
Procedure update_grupuri
If Used('v_grupuri')
Use In v_grupuri
Endif
lcSql = [select * from vdef_grup order by grup]
lcCursor = [v_grupuri]
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
goExecutor.oReset()
Endproc
******************************************************************************
Procedure update_firme
If Used('v_firme')
Use In v_firme
Endif
If Used('v_firmeo')
Use In v_firmeo
Endif
lcSql = [select id_firma,firma from v_nom_firme order by firma]
lcCursor = [v_firmeo]
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
goExecutor.oReset()
Create Cursor v_firme(id_firma N(10),firma C(100))
Select v_firme
Append Blank
Replace id_firma With -1,firma With "<<TOATE FIRMELE>>"
Insert Into v_firme(id_firma,firma) Select id_firma,firma From v_firmeo Order By firma
If Used('v_firmeo')
Use In v_firmeo
Endif
Endproc
******************************************************************************
Procedure update_nom_programe
If Used('vnom_programe')
Use In vnom_programe
Endif
lcSql = [select id_program,denumire as nume from vnom_programe order by 2]
lcCursor = [vnom_programe]
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
goExecutor.oReset()
Endproc
******************************************************************************
Procedure update_grup_prog
If Used('vgrup_programe')
Use In vgrup_programe
Endif
lcSql = [select id_grup_prog,explicatie,ordine from vdef_grup_programe ]+;
[order by ordine]
lcCursor = [vgrup_programe]
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
If lnSucces<0
aMessagebox(goExecutor.cEroare+" "+lcSql)
Endif
goExecutor.oReset()
Endproc
******************************************************************************

222
Programe/updatecheck.prg Normal file
View File

@@ -0,0 +1,222 @@
*!* 24.11.2016
*!* marius.mutu
*!* UpdateRoastart - nu mai verific romfast_suport.exe de pe site-ul romfast.ro. Unele calculatoare nu au internet si sta mult sa verifice.
#Define crlf Chr(13)+Chr(10)
Procedure citeste_server_info
Local lColNumeServer, lcSelect, lcCursor, lnSucces
lcSelect = "select distinct f.nume_server ;
from nom_firme f inner join def_util_grup ug on ;
f.id_firma = ug.id_firma and ug.id_util = " + Transform(gnIdUtil) + ;
" where f.sters = 0 and ug.sters = 0"
lcCursor = "crsServerUtil"
lnSucces = goExecutor.oExecute(lcSelect, lcCursor)
lColNumeServer = lnSucces > 0
lcSelect = "SELECT VALUE,ID_SERVER_INFO FROM SERVER_INFO where Name='NAME'"
lcCursor = "crstempsrv"
lnSucces = goExecutor.oExecute(lcSelect, lcCursor)
If lColNumeServer
Select c.* From crstempsrv c INNER Join crsServerUtil S On c.Value=S.nume_server Into Cursor crstempsrv1
Use In crstempsrv
Select * From crstempsrv1 Into Cursor crstempsrv
Endif
If Used('crsserverinfo')
Use In crsserverinfo
Endif
Create Cursor crsserverinfo (Value c(35),id_server_info N(3))
If lnSucces > 0
Insert Into crsserverinfo Select Alltrim(Substr(Value,1,35)),id_server_info From crstempsrv Order By id_server_info
Select crsserverinfo
Go Top
Endif
If Used('crstempsrv')
Use In crstempsrv
Endif
Endproc
********************************************
* Verifica daca programul care ruleaza
* este la ultima versiune de pe server
********************************************
Procedure UpdateRoastart
Local iniHandler As Object,lnTipFisier,lcdefa,lnTipActualizare,loUpdatei
IF !DIRECTORY(gcSecurityPath)
MD (gcSecurityPath)
ENDIF
llXMLStart=.T.
polog.Log("S-a pornit actualizarea Roastart.xml.",Program())
lotemp=Createobject("EditBox")
If !File(gcDirMare+"settings.ini")
updatecheckfiles("settings.ini")
Endif
iniHandler=Createobject("iniaccess")
loUpdatei = Createobject("oUpdate",[ROASTART],loTemp)
If Type('loUpdatei') = 'O'
*!* modificare v 2.1.8 : romfast_suport.exe
* loUpdatei.updatecheckTxt([romfast_suport], .T.) && nu mai verific romfast_suport de pe site-ul romfast.ro, pentru ca sunt unele calculatoare fara acces la internet si dureaza mult verificarea
*!* modificare v 2.1.8 ^
loUpdatei.createUpdateCursor("cRoastartXml")
Select cRoastartXml
Scan
If !Deleted()
lcitem=UPPER(Alltrim(cRoastartXml.Item))
lnTipActualizare = IIF(lcItem = [ROASTART],2,1)
Do Case
Case Upper(Alltrim(Left(lcitem,4)))="USER" Or Like("*_USER*",Upper(lcitem))
lcitem = Iif(Upper(Alltrim(Left(lcitem,4)))="USER",lcitem,Substr(lcitem,At("_USER",lcitem)+1))
idstring=""
Try
idstring=Filetostr(gcDirMare+lcitem+"\"+lcitem+"_id.txt")
Catch
idstring=Upper(Alltrim(lcitem))
Endtry
If idstring#""
loUpdatei.updatecheck(idstring,.F.,lnTipActualizare,lcitem)
lnRecno = Recno()
Delete From cRoastartXml Where Like("*"+lcitem+"*",Item)
Go lnRecno
Endif
Case Upper(Alltrim(lcitem))="SECURITY"
Delete File(gcSecurityPath+"ROA_SECURITY.TXT")
Otherwise
loUpdatei.updatecheck(lcitem,.F.,lnTipActualizare)
Endcase
Endif
Endscan
If Used("cRoastartXml")
Use In cRoastartXml
Endif
If !File(gcSecurityPath+"ROA_SECURITY.TXT")
updatecheckfiles("ROA_SECURITY.XML",.T.) && modificare 25.06.2012 : sa nu mai apara mesajul de eroare daca nu exista ROA_SECURITY.XML pe server
Endif
Endif
Release lotemp,loUpdatei
Endproc
Function UpdatePrograme
#Define crlf Chr(13)+Chr(10)
Local lcdefa,loUpdates
polog.Log("S-a pornit formularul de actualizari in masa.",Program())
loUpdates=Createobject("oUpdate",IIF(Reccount('crsserverinfo') = 0,[],Alltrim(crsserverinfo.Value)))
iniHandler=Createobject("iniaccess")
If Type('loUpdates') = 'O'
Local lcLanPath
If (iniHandler.getDefault()="NetworkPath")
lcdefa=Alltrim(Sys(5))+Curdir()
cale=iniHandler.getNetworkPath()
polog.Log("Calea de retea : "+ADDBS(cale),Program())
Try
Set Default To Justpath(Alltrim(cale))
Catch
aMessagebox("Nu s-a putut ajunge la calea de retea.",16,"Eroare")
polog.Log("Nu s-a putut ajunge la "+ADDBS(cale),Program())
Return .F.
Endtry
If Reccount('crsserverinfo') = 0
polog.Log("NU exista tabela SERVER_INFO",Program())
Else
***!* Daca exista fisierul xml pentru un server
****
lcServerName = Alltrim(crsserverinfo.Value)
polog.Log("Se aduce lista programelor din "+Addbs(cale)+lcServerName+".xml",Program())
Select cProgrameUpdate
*!* Parcurgere programe
Scan
lcidentifier=cProgrameUpdate.nume
XmlData=loUpdates.getVersion(Alltrim(lcidentifier)) &&se verifica versiunea
Select cProgrameUpdate
If(XmlData#"nu s-a putut conecta" And XmlData#"<>(){}")
If(Not Compareversion(stripXmlVersion(XmlData),XmlData,Alltrim(lcidentifier),.T.))
*!* Daca versiunea programului este aceeasi cu cea din xml nu se mai trece in lista
Delete
Else
*!* modificare v 2.0.6
*!* Scatter Name oTest Blank
Scatter Name oTest Fields versiune,imagine
*!* modificare v 2.0.6 ^
*UPDATE cProgrameUpdate SET versiune="&lcVersionData" WHERE nume=lcidentifier
oTest.versiune=stripXmlVersion(XmlData)
*!* modificare v 2.0.6
If Not File(oTest.imagine)
oTest.imagine="na.png"
Endif
*!* Gather Name oTest Fields versiune
Gather Name oTest Fields versiune,imagine
*!* modificare v 2.0.6 ^
Endif
Else
Delete
Endif
Endscan
*!* Curatari----------------&&|
Set Default To (lcdefa) &&|
Go Top &&|
*!* ---------------------------
****
Endif
Else
*!* ------------------ web
*-------------------------
*!* clocalfile=Alltrim(Sys(5))+Alltrim(Curdir())+"temp.txt"
*!* loUpdate=Createobject("wwCodeUpdate")
*!* polog.Log("Calea de internet : "+iniHandler.getURL(),Program())
If Reccount('crsserverinfo') = 0
polog.Log("NU s-a gasit tabela Server_Info",Program())
Else
lcServerName = Alltrim(crsserverinfo.Value)
Select cProgrameUpdate
*!* Parcurgere programe
Scan
lcidentifier=cProgrameUpdate.nume
XmlData=loUpdates.getVersion(Alltrim(cProgrameUpdate.nume)) &&se verifica versiunea
polog.Log("Se cauta in "+lcServerName+".XML programul : "+Alltrim(lcidentifier),Program())
If(XmlData#"nu s-a putut conecta" And XmlData#"<>(){}")
If(Not Compareversion(stripXmlVersion(XmlData),XmlData,Alltrim(lcidentifier),.T.))
polog.Log("Programul din XML are aceeasi versiune cu programul de pe disc.Nu se mai adauga in lista",Program())
*!* Daca versiunea programului este aceeasi cu cea din xml nu se mai trece in lista
Delete
Else
polog.Log("Programul din XML este diferit fata de programul de pe disc.Se adauga in lista : "+Alltrim(lcidentifier)+" "+Alltrim(stripXmlVersion(XmlData)),Program())
Select cProgrameUpdate
Scatter Name oTest Fields versiune,imagine
*UPDATE cProgrameUpdate SET versiune="&lcVersionData" WHERE nume=lcidentifier
oTest.versiune=stripXmlVersion(XmlData)
If Not File(oTest.imagine)
oTest.imagine="na.png"
Endif
Gather Name oTest Fields versiune,imagine
Endif
Else
*!* Daca pentru program nu s-a gasit un fisier xml nu se mai verifica versiunea
*!* se sterge direct din lista
Delete
Endif
*!* /Parcurgere programe
Endscan
Endif
Endif
Release loUpdates
Release iniHandler
Return .T.
Else
Return .F.
Endif
Endfunc

473
Rapoarte/rap_grup_prog.fr2 Normal file
View File

@@ -0,0 +1,473 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="rap_grup_prog.frx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="1" objcode="53" name="" vpos="1.000" hpos="3327.000" height="0.000" width="75340.000" order="" unique=".F." environ=".T." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="Times New Roman" fontstyle="1" fontsize="10" mode="0" ruler="1" rulerlines="0" grid=".T." gridv="12" gridh="12" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".T." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="1" curpos=".T." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[{8}{0}{18}{0}1{0}{1}{0}winspool{0}{0}\\contafin\KONICA MINOLTA 162{0}{0}USB001{0}{0}{0}{0}{0}{0}{0}{0}{0}{0}{0}{0}{0}{0}{0}{0}{0}{0}]]>
<tag2><![CDATA[XFxjb250YWZpblxLT05JQ0EgTUlOT0xUQSAxNjIAAAABBAoBnAD4AwMvgAcBAAkAAAAAAGQAAQAHALQAAgABALQAAQABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAAACAAAAAQAAAAEBAAAAAAAAAAAAAAAAAAAAAAAACgEAAEsATwBOAEkAQwBBACAATQBJAE4ATwBMAFQAQQAgADEANgAyAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAAA1AQAAHgGAAAAAAAAAAAAANQEAAD0BAAAAAAAAAEAAABhEwAAahsAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAABAAAAAAAAAAAAAAABAAAAZAAAAAEAAAAPJwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADIAAAAyAAAAMgAAADIAAAAUAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAAAAMgAAAC0AAAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAAAAAAAAAEgAAAAyAAAAAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADQAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAP////8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAAA=]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[DRIVER=winspool
DEVICE=\\contafin\KONICA MINOLTA 162
OUTPUT=USB001
ORIENTATION=0
PAPERSIZE=9
COPIES=1
DEFAULTSOURCE=7
PRINTQUALITY=180
COLOR=2
YRESOLUTION=180
]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="9" objcode="0" name="" vpos="0.000" hpos="0.000" height="10938.000" width="0.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="9" objcode="1" name="" vpos="0.000" hpos="0.000" height="6667.000" width="0.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="9" objcode="4" name="" vpos="0.000" hpos="0.000" height="1980.000" width="0.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="9" objcode="7" name="" vpos="0.000" hpos="0.000" height="3438.000" width="0.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".T." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="5" objcode="0" name="" vpos="16666.667" hpos="2187.500" height="1666.667" width="2812.500" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="0" fontsize="9" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="238" curpos=".F." supalways=".T." supovflow=".F." suprpcol="3" supgroup="6" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA["Nr.crt."]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="8" objcode="0" name="" vpos="21875.000" hpos="2187.500" height="1875.000" width="3125.000" order="" unique=".F." environ=".F." boxchar=" " fillchar="C" pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="0" fontsize="9" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".T." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".T." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="1" resoid="238" curpos=".F." supalways=".T." supovflow=".F." suprpcol="3" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[nrcrt]]>
<supexpr><![CDATA[liniegrup=1]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="8" objcode="0" name="" vpos="21875.000" hpos="49270.833" height="1875.000" width="16041.667" order="" unique=".F." environ=".F." boxchar=" " fillchar="C" pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="0" fontsize="9" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="1" resoid="238" curpos=".F." supalways=".T." supovflow=".F." suprpcol="3" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[program]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="5" objcode="0" name="" vpos="16666.667" hpos="33645.833" height="1666.667" width="5937.500" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="0" fontsize="9" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="238" curpos=".F." supalways=".T." supovflow=".T." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA["Grup superior"]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="5" objcode="0" name="" vpos="13333.333" hpos="2083.333" height="1666.667" width="27395.833" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="1" fontsize="9" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".T." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="238" curpos=".F." supalways=".T." supovflow=".T." suprpcol="0" supgroup="6" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA["DREPTURILE DE ACCES PE GRUPURI DE UTILIZATORI"]]>
<supexpr><![CDATA[_PAGENO<>1]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="5" objcode="0" name="" vpos="17604.167" hpos="49479.167" height="1666.667" width="3750.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="0" fontsize="9" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="238" curpos=".F." supalways=".T." supovflow=".F." suprpcol="3" supgroup="6" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA["Program
"]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="5" objcode="0" name="" vpos="16666.667" hpos="12500.000" height="1666.667" width="2187.500" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="0" fontsize="9" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="238" curpos=".F." supalways=".T." supovflow=".T." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA["Grup"]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="8" objcode="0" name="" vpos="21875.000" hpos="5520.833" height="1875.000" width="16770.833" order="" unique=".F." environ=".F." boxchar=" " fillchar="C" pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="1" fontsize="9" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".T." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".T." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="1" resoid="238" curpos=".F." supalways=".T." supovflow=".F." suprpcol="3" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[ALLTRIM(grup)]]>
<supexpr><![CDATA[liniegrup=1]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="5" objcode="0" name="" vpos="17708.333" hpos="65729.167" height="1666.667" width="8645.833" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="0" fontsize="9" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="238" curpos=".F." supalways=".T." supovflow=".F." suprpcol="3" supgroup="6" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA["Integral / cu restrictii"]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="8" objcode="0" name="" vpos="21875.000" hpos="65520.833" height="1875.000" width="8125.000" order="" unique=".F." environ=".F." boxchar=" " fillchar="C" pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="0" fontsize="9" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="1" resoid="238" curpos=".T." supalways=".T." supovflow=".F." suprpcol="3" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[tip]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="8" objcode="0" name="" vpos="520.833" hpos="1250.000" height="2500.000" width="41354.167" order="" unique=".F." environ=".F." boxchar=" " fillchar="C" pengreen="-1" penblue="-1" fillred="-1" fillgreen="-1" fillblue="-1" pensize="0" penpat="0" fillpat="0" fontface="Arial" fontstyle="1" fontsize="14" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="2" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="1" resoid="1" curpos=".F." supalways=".T." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[-1]]>
<style><![CDATA[]]>
<expr><![CDATA['Server : '+gcHost]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="7" objcode="4" name="" vpos="15625.000" hpos="1666.667" height="3958.333" width="73125.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="-1" penblue="-1" fillred="-1" fillgreen="-1" fillblue="-1" pensize="1" penpat="8" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".T." supovflow=".F." suprpcol="3" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[-1]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="8" objcode="0" name="" vpos="26666.667" hpos="25104.167" height="1770.833" width="50000.000" order="" unique=".F." environ=".F." boxchar=" " fillchar="C" pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="0" fontsize="8" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="2" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="1" topmargin="0" botmargin="0" totaltype="0" resettotal="1" resoid="1" curpos=".F." supalways=".T." supovflow=".T." suprpcol="0" supgroup="6" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[gcCopyRight + " - Pag. "+allt(str(_PAGENO))+"/"+allt(str(_PAGETOTAL))+" - Data/ora listarii: "+pcDataora]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="5" objcode="0" name="" vpos="5729.167" hpos="17083.333" height="2395.833" width="42083.333" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="1" fontsize="14" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="238" curpos=".F." supalways=".T." supovflow=".T." suprpcol="0" supgroup="6" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA["DREPTURILE DE ACCES PE GRUPURI DE UTILIZATORI"]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="8" objcode="0" name="" vpos="21875.000" hpos="22395.833" height="1875.000" width="26666.667" order="" unique=".F." environ=".F." boxchar=" " fillchar="C" pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="0" fontsize="9" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".T." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".T." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="1" resoid="238" curpos=".F." supalways=".T." supovflow=".F." suprpcol="3" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[ALLTRIM(NVL(tata,'*'))]]>
<supexpr><![CDATA[liniegrup=1]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="6" objcode="0" name="" vpos="21770.833" hpos="1666.667" height="104.167" width="73125.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="-1" penblue="-1" fillred="-1" fillgreen="-1" fillblue="-1" pensize="1" penpat="8" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".T." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="1" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".T." supovflow=".F." suprpcol="3" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[-1]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[liniegrup=1 and nrcrt<>1]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="5" objcode="0" name="" vpos="15729.167" hpos="55416.667" height="1666.667" width="13020.833" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="0" fontsize="9" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="238" curpos=".F." supalways=".T." supovflow=".T." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA["Drepturi de acces la programe
"]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="6" objcode="0" name="" vpos="17500.000" hpos="49270.833" height="104.167" width="25312.500" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="-1" penblue="-1" fillred="-1" fillgreen="-1" fillblue="-1" pensize="1" penpat="8" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".T." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="1" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".T." supovflow=".T." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[-1]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="6" objcode="0" name="" vpos="15625.000" hpos="49166.667" height="3854.167" width="104.167" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="-1" penblue="-1" fillred="-1" fillgreen="-1" fillblue="-1" pensize="1" penpat="8" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".T." supovflow=".F." suprpcol="3" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[-1]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="6" objcode="0" name="" vpos="17604.167" hpos="65312.500" height="1979.167" width="104.167" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="-1" penblue="-1" fillred="-1" fillgreen="-1" fillblue="-1" pensize="1" penpat="8" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".T." supovflow=".T." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[-1]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="6" objcode="0" name="" vpos="15625.000" hpos="5312.500" height="3854.167" width="104.167" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="-1" penblue="-1" fillred="-1" fillgreen="-1" fillblue="-1" pensize="1" penpat="8" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".T." supovflow=".F." suprpcol="3" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[-1]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="6" objcode="0" name="" vpos="15625.000" hpos="22291.667" height="3854.167" width="104.167" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="-1" penblue="-1" fillred="-1" fillgreen="-1" fillblue="-1" pensize="1" penpat="8" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".T." supovflow=".F." suprpcol="3" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[-1]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="18" objcode="0" name="nrcrt" vpos="0.000" hpos="0.000" height="0.000" width="0.000" order="" unique=".T." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="2" resettotal="1" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[0]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[IIF(liniegrup=1,1,0)]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="23" objcode="0" name="" vpos="16.000" hpos="6.000" height="12.000" width="33.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="1" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="Times New Roman" fontstyle="1" fontsize="10" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[3]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="23" objcode="0" name="" vpos="16.000" hpos="4.000" height="13.000" width="14.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="0" fontsize="9" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[3]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="23" objcode="0" name="" vpos="16.000" hpos="5.000" height="13.000" width="14.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="1" fontsize="9" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[3]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="23" objcode="0" name="" vpos="23.000" hpos="9.000" height="18.000" width="50.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="1" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="Arial" fontstyle="1" fontsize="14" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[4]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="23" objcode="0" name="" vpos="15.000" hpos="4.000" height="12.000" width="13.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="0" fontsize="8" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[3]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="23" objcode="0" name="" vpos="23.000" hpos="7.000" height="19.000" width="22.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="1" fontsize="14" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[4]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="0" objcode="0" name="" vpos="0.000" hpos="0.000" height="0.000" width="0.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[* WIZARD = QREPORT
* WIZNAME = D:\FPW26\WIZARDS\WZ_QREPO.APP
* WIZCLASS = REPORT
* VERSION = 1.0
* TIMESTAMP = 575439450,00
* STYLE = EXECUTIVE
* LAYOUT = TABULAR
* TITLE = nirmarf
* COLUMNS = 1,00
* TABLE = "D:\CONT97\DATE01\FACTMARF.DBF"
* FIELDS = Denumire;Um;Tut;Cant;Pret;Adaos;Pretv;Valftva;Tva;Tvav;
* SORTS = ;
* GROUPS = ;
* MODIFIERS = ;
* TOTALS = 0,00
* SUBTOTALS = 0,00
* TOPBOTTOM = 1,00
* LABELS = ;
* AVERY = 1,00
* TAGASCEND = 1,00
]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="25" objcode="0" name="dataenvironment" vpos="0.000" hpos="0.000" height="0.000" width="0.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[Top = 0
Left = 0
Width = 0
Height = 0
DataSource = .NULL.
Name = "Dataenvironment"
]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>

425
Rapoarte/rap_util_gf.fr2 Normal file
View File

@@ -0,0 +1,425 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="rap_util_gf.frx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="1" objcode="53" name="" vpos="1.000" hpos="3327.000" height="0.000" width="75340.000" order="" unique=".F." environ=".T." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="Times New Roman" fontstyle="1" fontsize="10" mode="0" ruler="1" rulerlines="0" grid=".T." gridv="12" gridh="12" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".T." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="1" curpos=".T." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[{8}{0}{18}{0}1{0}{1}{0}winspool{0}{0}\\contafin\KONICA MINOLTA 162{0}{0}USB001{0}{0}{0}{0}{0}{0}{0}{0}{0}{0}{0}{0}{0}{0}{0}{0}{0}{0}]]>
<tag2><![CDATA[XFxjb250YWZpblxLT05JQ0EgTUlOT0xUQSAxNjIAAAABBAoBnAD4AwMvgAcBAAkAAAAAAGQAAQAHALQAAgABALQAAQABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAAACAAAAAQAAAAEBAAAAAAAAAAAAAAAAAAAAAAAACgEAAEsATwBOAEkAQwBBACAATQBJAE4ATwBMAFQAQQAgADEANgAyAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAAA1AQAAHgGAAAAAAAAAAAAANQEAAD0BAAAAAAAAAEAAABhEwAAahsAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAABAAAAAAAAAAAAAAABAAAAZAAAAAEAAAAPJwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADIAAAAyAAAAMgAAADIAAAAUAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAAAAMgAAAC0AAAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAAAAAAAAAEgAAAAyAAAAAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADQAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAP////8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAAA=]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[DRIVER=winspool
DEVICE=\\contafin\KONICA MINOLTA 162
OUTPUT=USB001
ORIENTATION=0
PAPERSIZE=9
COPIES=1
DEFAULTSOURCE=7
PRINTQUALITY=180
COLOR=2
YRESOLUTION=180
]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="9" objcode="0" name="" vpos="0.000" hpos="0.000" height="10938.000" width="0.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="9" objcode="1" name="" vpos="0.000" hpos="0.000" height="6667.000" width="0.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="9" objcode="4" name="" vpos="0.000" hpos="0.000" height="1980.000" width="0.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="9" objcode="7" name="" vpos="0.000" hpos="0.000" height="3438.000" width="0.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".T." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="5" objcode="0" name="" vpos="16666.667" hpos="2187.500" height="1666.667" width="2812.500" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="0" fontsize="9" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="238" curpos=".F." supalways=".T." supovflow=".F." suprpcol="3" supgroup="6" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA["Nr.crt."]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="8" objcode="0" name="" vpos="21875.000" hpos="1458.333" height="1875.000" width="3958.333" order="" unique=".F." environ=".F." boxchar=" " fillchar="C" pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="0" fontsize="9" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".T." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="1" resoid="238" curpos=".F." supalways=".T." supovflow=".F." suprpcol="3" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[nrcrt]]>
<supexpr><![CDATA[linieutil=1]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="8" objcode="0" name="" vpos="21875.000" hpos="49375.000" height="1875.000" width="25520.833" order="" unique=".F." environ=".F." boxchar=" " fillchar="C" pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="0" fontsize="9" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="1" resoid="238" curpos=".T." supalways=".T." supovflow=".F." suprpcol="3" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[ALLTRIM(firma)]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="5" objcode="0" name="" vpos="16666.667" hpos="36145.833" height="1666.667" width="2187.500" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="0" fontsize="9" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="238" curpos=".F." supalways=".T." supovflow=".T." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA["Grup"]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="5" objcode="0" name="" vpos="13333.333" hpos="2083.333" height="1666.667" width="23541.667" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="1" fontsize="9" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".T." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="238" curpos=".F." supalways=".T." supovflow=".T." suprpcol="0" supgroup="6" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA["DREPTURILE DE ACCES ALE UTILIZATORILOR"]]>
<supexpr><![CDATA[_PAGENO<>1]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="5" objcode="0" name="" vpos="16666.667" hpos="12500.000" height="1666.667" width="3750.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="0" fontsize="9" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="238" curpos=".F." supalways=".T." supovflow=".T." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA["Utilizator"]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="8" objcode="0" name="" vpos="21875.000" hpos="5520.833" height="1875.000" width="19583.333" order="" unique=".F." environ=".F." boxchar=" " fillchar="C" pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="1" fontsize="9" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".T." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".T." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="1" resoid="238" curpos=".F." supalways=".T." supovflow=".F." suprpcol="3" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[ALLTRIM(utilizator)]]>
<supexpr><![CDATA[linieutil=1]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="8" objcode="0" name="" vpos="520.833" hpos="1250.000" height="2500.000" width="41354.167" order="" unique=".F." environ=".F." boxchar=" " fillchar="C" pengreen="-1" penblue="-1" fillred="-1" fillgreen="-1" fillblue="-1" pensize="0" penpat="0" fillpat="0" fontface="Arial" fontstyle="1" fontsize="14" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="2" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="1" resoid="1" curpos=".F." supalways=".T." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[-1]]>
<style><![CDATA[]]>
<expr><![CDATA['Server : '+gcHost]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="7" objcode="4" name="" vpos="15625.000" hpos="1666.667" height="3958.333" width="73125.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="-1" penblue="-1" fillred="-1" fillgreen="-1" fillblue="-1" pensize="1" penpat="8" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".T." supovflow=".F." suprpcol="3" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[-1]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="8" objcode="0" name="" vpos="26666.667" hpos="25104.167" height="1770.833" width="50000.000" order="" unique=".F." environ=".F." boxchar=" " fillchar="C" pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="0" fontsize="8" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="2" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="1" topmargin="0" botmargin="0" totaltype="0" resettotal="1" resoid="1" curpos=".F." supalways=".T." supovflow=".T." suprpcol="0" supgroup="6" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[gcCopyRight + " - Pag. "+allt(str(_PAGENO))+"/"+allt(str(_PAGETOTAL))+" - Data/ora listarii: "+pcDataora]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="5" objcode="0" name="" vpos="5729.167" hpos="19895.833" height="2395.833" width="36354.167" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="1" fontsize="14" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="238" curpos=".F." supalways=".T." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA["DREPTURILE DE ACCES ALE UTILIZATORILOR"]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="8" objcode="0" name="" vpos="21875.000" hpos="25312.500" height="1875.000" width="23854.167" order="" unique=".F." environ=".F." boxchar=" " fillchar="C" pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="0" fontsize="9" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".T." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".T." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="1" resoid="238" curpos=".F." supalways=".T." supovflow=".F." suprpcol="3" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[ALLTRIM(NVL(grup,'*'))]]>
<supexpr><![CDATA[liniegrup=1]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="6" objcode="0" name="" vpos="21770.833" hpos="1666.667" height="104.167" width="73125.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="-1" penblue="-1" fillred="-1" fillgreen="-1" fillblue="-1" pensize="1" penpat="8" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".T." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="1" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".T." supovflow=".F." suprpcol="3" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[-1]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[linieutil=1 and nrcrt<>1]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="5" objcode="0" name="" vpos="16875.000" hpos="54583.333" height="1666.667" width="15104.167" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="255" fillgreen="255" fillblue="255" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="0" fontsize="9" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="238" curpos=".F." supalways=".T." supovflow=".T." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA["Drept de acces la firma / sucursala
"]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="6" objcode="0" name="" vpos="15625.000" hpos="49166.667" height="3854.167" width="104.167" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="-1" penblue="-1" fillred="-1" fillgreen="-1" fillblue="-1" pensize="1" penpat="8" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".T." supovflow=".F." suprpcol="3" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[-1]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="6" objcode="0" name="" vpos="15625.000" hpos="5312.500" height="3854.167" width="104.167" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="-1" penblue="-1" fillred="-1" fillgreen="-1" fillblue="-1" pensize="1" penpat="8" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".T." supovflow=".F." suprpcol="3" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[-1]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="6" objcode="0" name="" vpos="15625.000" hpos="25208.333" height="3854.167" width="104.167" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="-1" penblue="-1" fillred="-1" fillgreen="-1" fillblue="-1" pensize="1" penpat="8" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".T." supovflow=".F." suprpcol="3" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[-1]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="6" objcode="0" name="" vpos="21770.833" hpos="24895.833" height="104.167" width="49895.833" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="-1" penblue="-1" fillred="-1" fillgreen="-1" fillblue="-1" pensize="1" penpat="8" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".T." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="1" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".T." supovflow=".F." suprpcol="3" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[-1]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[linieutil<>1 and nrcrt<>1 and liniegrup=1]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="18" objcode="0" name="nrcrt" vpos="0.000" hpos="0.000" height="0.000" width="0.000" order="" unique=".T." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="2" resettotal="1" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[0]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[IIF(linieutil=1,1,0)]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="23" objcode="0" name="" vpos="16.000" hpos="6.000" height="12.000" width="33.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="1" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="Times New Roman" fontstyle="1" fontsize="10" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[3]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="23" objcode="0" name="" vpos="16.000" hpos="4.000" height="13.000" width="14.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="0" fontsize="9" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[3]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="23" objcode="0" name="" vpos="16.000" hpos="5.000" height="13.000" width="14.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="1" fontsize="9" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[3]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="23" objcode="0" name="" vpos="23.000" hpos="9.000" height="18.000" width="50.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="1" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="Arial" fontstyle="1" fontsize="14" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[4]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="23" objcode="0" name="" vpos="15.000" hpos="4.000" height="12.000" width="13.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="0" fontsize="8" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[3]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="23" objcode="0" name="" vpos="23.000" hpos="7.000" height="19.000" width="22.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="Arial Narrow" fontstyle="1" fontsize="14" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[4]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="0" objcode="0" name="" vpos="0.000" hpos="0.000" height="0.000" width="0.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[* WIZARD = QREPORT
* WIZNAME = D:\FPW26\WIZARDS\WZ_QREPO.APP
* WIZCLASS = REPORT
* VERSION = 1.0
* TIMESTAMP = 575439450,00
* STYLE = EXECUTIVE
* LAYOUT = TABULAR
* TITLE = nirmarf
* COLUMNS = 1,00
* TABLE = "D:\CONT97\DATE01\FACTMARF.DBF"
* FIELDS = Denumire;Um;Tut;Cant;Pret;Adaos;Pretv;Valftva;Tva;Tvav;
* SORTS = ;
* GROUPS = ;
* MODIFIERS = ;
* TOTALS = 0,00
* SUBTOTALS = 0,00
* TOPBOTTOM = 1,00
* LABELS = ;
* AVERY = 1,00
* TAGASCEND = 1,00
]]>
<user><![CDATA[]]>
</Reportes>
<Reportes
platform="WINDOWS " uniqueid="" timestamp="0" objtype="25" objcode="0" name="dataenvironment" vpos="0.000" hpos="0.000" height="0.000" width="0.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
<picture><![CDATA[]]>
<tag><![CDATA[]]>
<tag2><![CDATA[]]>
<penred><![CDATA[0]]>
<style><![CDATA[]]>
<expr><![CDATA[Top = 0
Left = 0
Width = 0
Height = 0
DataSource = .NULL.
Name = "Dataenvironment"
]]>
<supexpr><![CDATA[]]>
<comment><![CDATA[]]>
<user><![CDATA[]]>

698
changelog_roastart.txt Normal file
View File

@@ -0,0 +1,698 @@
<!--
04/10/2025
ROASTART - 2.2.10
:modificare:
Corectare afisare mesaje de atentionare.
-->
<!--
25/07/2025
ROASTART - 2.2.9
:eroare:
S-a rezolvat o eroare la crearea unei firme noi.
-->
<!--
19/03/2024
ROASTART - 2.2.8
:modificare:
S-a schimbat metoda de dezarhivare a versiunilor noi de programe. Dezarhivarea nu functiona in anumite cazuri.
-->
<!--
13/09/2022
ROASTART - 2.2.7
:modificare:
Se pot crea firme cu anul de initializare 2022.
-->
<!--
10/09/2019
ROASTART - 2.2.6
:modficare:
Modificari interne.
-->
<!--
05/08/2019
ROASTART - 2.2.5
:modificare:
S-a schimbat fontul din Arial Narrow 9, in Arial 10 in formularul de conectare la baza de date.
-->
<!--
24/11/2016
ROASTART - 2.2.4
:modificare:
Nu se mai actualizeaza programul "romfast suport" de pe serverul romfast.ro la lansarea roastart.exe
-->
<!--
25/06/2015
ROASTART - 2.2.3
:nou:
S-a introdus o optiune de simulare a activitatii pe serverul Oracle pentru cazurile in care sistemul de operare/firewallul inchide conexiunile inactive.
-->
<!--
28/04/2015
ROASTART - 2.2.2
:nou:
RTVAI: Pe serverul ROA se importa zilnic Registrul TVA Incasare de pe serverul ANAF.
In partea stanga-jos, langa data ultimei actualizari ROA, apare si data ultimei actualizari RTVAI.
Baza de date RTVAI din ROA este folosita de aplicatiile ROA la alegerea furnizorilor pentru facturile de achizitie.
-->
<!--
06/11/2014
ROASTART - 2.2.1
:eroare:
S-a corectat o eroare la afisarea progresului la crearea unei firme noi.
-->
<!--
04/09/2014
ROASTART - 2.2.0
:nou:
S-a implementat un mecanism de monitorizare si control a procesului de actualizare automata server ROA.
In partea stanga-jos apare starea ultimei actualizari (Succes, Eroare, In curs de executie).
Utilizatorii cu rol de administrare pot sa lanseze manual procesul de actualizare pe serverul ROA.
-->
<!--
22/05/2014
ROASTART - 2.1.9
:eroare:
S-a corectat o eroare la lansarea ROASTART.
-->
<!--
21/05/2014
ROASTART - 2.1.8
:modificare:
La lansarea ROASTART se actualizeaza automat aplicatia "Romfast Suport Tehnic" in directorul ROA.
-->
<!--
24/02/2014
ROASTART - 2.1.7
:modificari:
Modificari interne la iesirea din aplicatie.
:eroare:
Daca se alegea optiunea "Iesire" din meniul din systray, atunci aparea un mesaj de eroare. A fost corectata problema.
-->
<!--
20/02/2014
ROASTART - 2.1.6
:eroare:
A fost rezolvata problema de la minimizarea programului in systray.
-->
<!--
13/02/2014
ROASTART - 2.1.5
:modificare:
Apare din nou iconita ROASTART in bara aplicatiei.
:modificare:
Modificari interne
-->
<!--
18/07/2013
ROASTART - 2.1.4
:nou:
Au fost adaugate pictogramele pentru programul ROADEVIZE.
-->
<!--
13/03/2013
ROASTART - 2.1.3
:modificare:
S-a corectat o problema cu iconita din systray la minimizarea aplicatiei.
-->
<!--
11/03/2013
ROASTART - 2.1.3
:modificare:
S-a marit perioada de Timeout la actualizarea programelor.
-->
<!--
24/09/2012
ROASTART - 2.1.2
:modificare:
Modificari interne la scrierea logurilor.
-->
<!--
04/07/2012
ROASTART - 2.1.1
:nou:
Arhivele cu programele noi au extensia .zip.
:eroare:
A fost corectata problema de la stergerea fisierelor temporare dupa actualizarea programelor.
-->
<!--
21/06/2012
ROASTART - 2.1.0
:nou:
La introducerea unei firme noi se va creeaza automat si structura fizica a firmei in baza de date.
:nou:
S-a introdus conceptul de utilizator ADMIN. Acest utilizator are acces la toate operatiile legate de firme, roluri, utilizatori.
-->
<!--
07/05/2012
ROASTART - 2.0.33
:modificare:
A fost modificat mesajul care apare la minimizarea aplicatiei ca sa contina si referiri la modificarile din versiunea 2.0.32 : "Faceti dublu-click pentru maximizare! Faceti click dreapta pentru acces la lansarea rapida a programelor!".
-->
<!--
02/05/2012
ROASTART - 2.0.32
:nou:
Se pot lansa programele din meniul care apare la apasarea butonului dreapta al mouse-ului pe iconita ROASTART din tray.
Pe langa grupurile de programe pe care are dreptul utilizatorul respectiv, meniul mai contine doua optiuni : cea in care apare numele utilizatorului conectat este folosita pentru logarea cu un alt utilizator si optiunea de iesire din ROASTART.
-->
<!--
11/08/2011
ROASTART - 2.0.31
:nou:
La "Initializari > Firme" se pot modifica doar informatiile de la "Este grup", "Grup parinte" si "Schema". Restul datelor pot fi modificate doar din programul "Definirea companiei" ( optiunea "Organizarea companiei > Datele firmei" ).
:nou:
Au fost actualizate iconitele programelor "Venituri din activitati independente" si "Definitii salarizare"
:nou:
Au fost adaugate diacriticele in interfata.
-->
<!--
18/06/2010
ROASTART - 2.0.30
:modificare:
Modificari interne pentru citirea caii de actualizare din retea ( in cazul in care nu avea "\" la sfarsit ).
-->
<!--
16/12/2009
ROASTART - 2.0.29
:nou:
Se retine ultimul server la care s-a conectat utilizatorul pentru a fi selectat automat la urmatoarea pornire.
:nou:
Au fost incluse pictogramele pentru programele noi din ROA.
:modificare:
A fost modificata transmiterea cailor catre updater.exe .
:modificare:
Daca nu exista definite nicio asociere intre versiunile de programe si firme, atunci nu este activata optiunea "Verifica actualizari".
:modificare:
Modificari interne.
:eroare:
A fost corectata eroarea de la apasarea butonului "Renunta".
:eroare:
A fost corectata eroarea care aparea cand nu existau servere definite.
:eroare:
Atunci cand se facea dublu click pe iconita din tray, uneori aparea aplicatia mai mare decat initial. A fost corectata problema.
-->
<!--
16/09/2009
ROASTART - 2.0.28
:eroare:
S-a corectat o eroare la dezarhivarea fisierelor din directorul ROACLIENT\COMUNROA.
-->
<!--
08/07/2009
ROASTART - 2.0.27
:eroare:
Pentru utilizatorii cu drepturi de administrare si care nu aveau drept pe vreun program, se suprapunea meniul din stanga cu optiunile de actualizare.
-->
<!--
06/07/2009
ROASTART - 2.0.26
:modificare:
La "Grupuri > Drepturi pe programe", a fost adaugata bifa "Se propaga drepturile pe acest program si la copiii acestui grup?".
:modificare:
Nu se pot sterge utilizatorii "ADMIN","SERVER", "SUPER" si "SUPERVIZOR".
:modificare:
A fost modificata fereastra de la "Utilizatori > Modificare drepturi validari" ca sa nu mai apara in interiorul ferestrei principale.
:modificare:
Modificari interne.
:eroare:
A fost corectata actualizarea programelor pentru cazul in care calea locala continea spatii.
:eroare:
Au fost corectate erorile de la "Initializari > Informatii programe", "Grupuri > Informatii grupuri" si "Utilizatori > Informatii utilizatori".
-->
<!--
03/06/2009
ROASTART - 2.0.25
:eroare:
S-a corectat o eroare la modificarea drepturilor pe obiectele unui program.
-->
<!--
01/06/2009
ROASTART - 2.0.24
:eroare:
S-a corectat o eroare la minimizarea aplicatiei in systray.
-->
<!--
30/04/2009
ROASTART - 2.0.23
:modificare:
Dupa ce utilizatorul a fost autentificat, daca se minimizeaza aplicatia, aceasta nu mai apare in bara de lucru, ci in tray. Daca se face dublu-click pe iconita din tray, atunci se va maximiza aplicatia.
:modificare:
Modificari la afisarea programelor : numarul programelor vizibile intr-un grup, fara a fi nevoie de derulare, este egal cu numarul maxim de programe din grupuri, dar nu mai mult de 6.
:modificare:
La apasarea tastei F2 se paraseste aplicatia.
La apasarea combinatiei de taste CTRL + A, apare fereastra de configurare a actualizarilor.
:eroare:
A fost corectata eroarea de actualizare a programelor din ROASTART.xml atunci cand este setata parola pe server.
:eroare:
A fost corectata afisarea mesajelor de actualizare ca sa nu se mai suprapuna cu numele grupurilor de programe.
:modificare:
Modificari interne.
-->
<!--
10/03/2009
ROASTART - 2.0.22
:modificare:
Modificari interne la apelarea updater.exe.
-->
<!--
27/02/2009
ROASTART - 2.0.21
:modificare:
Modificari interne privind actualizarea programelor.S-a modificat structura fisierelor Xml de actualizare.
-->
<!--
19/01/2009
ROASUPORT - 2.0.19
:modificare:
Modificari interne privind traducerea in limba engleza.
-->
<!--
24/12/2008
ROASTART - 2.0.18
:modificare:
La intrarea in Roastart se alege implicit limba Romana.
-->
<!--
19/12/2008
ROASTART - 2.0.17
:nou:
La intrarea in Roastart se poate alege limba Romana sau Engleza pentru traducerea automata a meniurilor si etichetelor din programe.
-->
<!--
12/12/2008
ROASTART - 2.0.16
:modificare:
Fereastra pentru verificarea actualizarilor este vizibila in totalitate chiar daca fereastra aplicatiei are dimensiunile mai mici decat aceasta.
-->
<!--
21/11/2008
ROASTART - 2.0.15
:nou:
Initializari -Firme- Modificare Firma . Se poate modifica o firma.
-->
<!--
24/10/2008
ROASTART - 2.0.14
:modificare:
Fisierele comune au fost mutate in directorul COMUNROA si se actualizeaza inainte de lansarea ferestrei de autentificare.
-->
<!--
08/09/2008
ROASTART - 2.0.13
:modificare:
A fost modificata comparatia dintre versiunea curenta si cea care exista pe server ( Daca versiunea curenta era 1.0.10, iar cea de pe server 1.0.100, nu se mai facea actualizarea ).
-->
<!--
16/08/2008
ROASTART - 2.0.12
:modificare:
Modificari interne.
-->
<!--
16/08/2008
ROASTART - 2.0.12
:modificare:
Modificari interne.
-->
<!--
16/07/2008
ROASTART - 2.0.11
:modificare:
Modificari interne.
-->
<!--
15/07/2008
ROASTART - 2.0.10
:modificare:
A fost modificata modalitatea de selectie a serverului de actualizari. Apar doar serverele de pe firmele la care are acces utilizatorul.
-->
<!--
27/06/2008
ROASTART - 2.0.9
:modificare:
A fost modificat criteriul de ordonare pentru lista cu versiuni de pe un server.
-->
<!--
27/06/2008
ROASTART - 2.0.8
:modificare:
Modificari interne.
-->
<!--
26/06/2008
ROASTART - 2.0.7
:modificare:
Modificari interne.
-->
<!--
26/06/2008
ROASTART - 2.0.6
:modificare:
In cazul in care exista mai multe versiuni de programe ce ruleaza pe acelasi server, deasupra optiunii "Config actualizari" va aparea o lista cu numele reprezentative pentru fiecare versiune in parte.
:modificare:
Modificari interne.
-->
<!--
06/06/2008
ROASTART - 2.0.5
:modificare:
* S-au rezolvat neregulile la actualizarea de pe serverele http
* S-au completat actiunile in log
-->
<!--
02/06/2008
ROASTART - 2.0.4
:modificare:
* S-au completat actiunile de actualizare a aplicatiei in log
-->
<!--
12/05/2008
ROASTART - 2.0.2
:modificare:
Locatii diferite ale noilor versiuni de programe diferentiate in functie de serverul la care este conectat clientul.
-->
<!--
10/03/2008
ROASTART - 2.0.1
:nou:
Au fost adaugate listari la "Grupuri > Drepturi pe programe" si "Utilizatori > Definire roluri".
-->
<!--
07/02/2008
ROASTART - 2.0.0
:nou:
Se pot defini firmele ca grupuri de firme si/sau sucursale.
S-a modificat formularul de initializare firme astfel incat sa se poata configura grupurile de firme si sucursalele.
-->
<!--
20/12/2007
ROASTART - 1.0.21
:modificare:
Modificari interne
-->
<!--
12/12/2007
ROASTART - 1.0.20
:modificare:
Modificari interne
-->
<!--
10/12/2007
ROASTART - 1.0.19
:modificare:
Modificari interne
-->
<!--
20/11/2007
ROASTART - 1.0.18
:modificare:
Modificari interne
-->
<!--
16/11/2007
ROASTART - 1.0.17
:nou:
In pagina "Utilizatori > Modificare drepturi validari" se pot configura drepturile utilizatorilor pentru autovalidarea si validarea inregistrarilor.
-->
<!--
09/11/2007
ROASTART - 1.0.16
-->
<!--
25/10/2007
ROASTART - 1.0.15
-->
<!--
23/10/2007
ROASTART - 1.0.14
:modificare:
Se poate configura utilizatorul si parola pentru serverul web pentru actualizari
-->
<!--
04/10/2007
ROASTART - 1.0.13
:modificare:
se actualizeaza manualul aplicatiei
-->
<!--
03/10/2007
ROASTART - 1.0.12
:modificare:
s-au tratat erorile de copiere la actualizare.
-->
<!--
26/09/2007
ROASTART - 1.0.11
:nou:
Aplicatia Roastart se instaleaza pe calculatoarele client si actualizeaza automat celelalte module dintr-o cale de retea sau din internet.
-->
<!--
15/08/2007
ROASTART-1.0.10
:nou:
Iconite pentru ROAREGISTRATURA.
-->
<!--
05/04/2007
ROASTART-1.0.9
:nou:
Iconite pentru ROAREPARTIZSAL.
-->
<!--
27/03/2007
ROASTART-1.0.8
:modificare:
A fost scoasa optiunea "Licentiere programe" din "Initializari".
-->
<!--
01/02/2007
ROASTART-1.0.7
:modificare:
In fereastra de autentificare, dupa alegerea serverului din lista, va aparea textul "CONECTAT" in cazul in care programul s-a conectat la server sau "NECONECTAT" altfel.
:modificare:
Modificari interne.
-->
<!--
04/10/2006
ROASTART-1.0.6
:modificare:
Pot fi adaugate fara erori programele de Contracte Clienti si Contracte Facturare in grupul de favorite.
-->
<!--
25/09/2006
ROASTART-1.0.5
:modificare:
Dialogurile cu mesaje de atentionare nu mai apar in spatele ferestrei principale.
-->
<!--
15/09/2006
ROASTART-1.1.470
:modificare:
Modificari interne
-->
<!--
19/06/2006
ROASTART-1.1.469
:nou:
Iconita pentru ROASTART in bara de titlu.
-->
<!--
19/06/2006
ROASTART-1.1.468
:nou:
Iconite pentru ROAPRODUCTIE, ROAFACTURARE, ROACOMENZI, ROACONTRACTE.
-->
<!--
19/06/2006
ROASTART-1.1.467
:nou:
Iconita pentru ROAPRETURI.
-->
<!--
19/06/2006
ROASTART-1.1.465
:nou:
Butoanele de la mesajele informative,de erori si de la confirmari sunt in limba romana.
-->

40
config.fpw Normal file
View File

@@ -0,0 +1,40 @@
SCREEN = OFF
_STARTUP = ""
* to eliminate load time:
_BROWSER = ""
_SPELLCHK = ""
_GENMENU = ""
_GENGRAPH = ""
_GENXTAB = ""
_COVERAGE = ""
_SCCTEXT = ""
_CONVERTER = ""
_TRANSPORTER = ""
_BUILDER = ""
_WIZARD = ""
* other special CONFIG.FPW settings you may wish to change:
* (these are the defaults)
MVCOUNT = 1025
OUTSHOW = ON
* Set other global settings here if you like, for example:
RESOURCE = OFF
_THROTTLE = 0
* See the application object's SetDataSessionSets() method
* for some additional settings you
* may like to use in your config file.
* The following are not the default settings,
* (and ordinarily will be taken care of in the
* Load of private-session forms and formsets):
TALK = OFF
MULTILOCKS = ON
EXCLUSIVE = OFF
SAFETY = OFF
CODEPAGE = 1252

4557
ctl32.h Normal file

File diff suppressed because it is too large Load Diff

184
diag.ps1 Normal file
View File

@@ -0,0 +1,184 @@
$report = "claude-code-diagnostic-PROBLEMA.md"
$out = @()
$out += "# Claude Code Diagnostic - MASINA CU PROBLEME - $env:COMPUTERNAME - $(Get-Date -Format 'yyyy-MM-dd HH:mm')"
$out += ""
$out += "## 1. Versiuni si instalare"
$out += '```'
$out += "claude --version: $(claude --version 2>&1)"
$out += "where claude : $((where.exe claude 2>&1) -join '; ')"
$out += "node --version : $(node --version 2>&1)"
$out += "npm --version : $(npm --version 2>&1)"
$out += "where node : $((where.exe node 2>&1) -join '; ')"
$out += "where npm : $((where.exe npm 2>&1) -join '; ')"
$out += ""
$out += "npm global claude pkg:"
$out += (npm list -g --depth=0 2>$null | Select-String -Pattern "claude" | Out-String).Trim()
$out += ""
$out += "Native installer existence:"
$out += " ~\.local\bin\claude.exe : $(Test-Path "$env:USERPROFILE\.local\bin\claude.exe")"
$out += " LOCALAPPDATA\Programs\claude\ : $(Test-Path "$env:LOCALAPPDATA\Programs\claude\claude.exe")"
$out += " ~\.claude\local\ : $(Test-Path "$env:USERPROFILE\.claude\local")"
$out += '```'
$out += ""
$out += "## 2. claude doctor"
$out += '```'
$out += "RULEAZA MANUAL: claude doctor"
$out += "(nu se poate captura non-interactiv - copiaza output-ul aici manual)"
$out += '```'
$out += ""
$out += "## 3. Configuratie Claude"
$out += '```'
if (Test-Path "$env:USERPROFILE\.claude.json") {
try {
$cfg = Get-Content "$env:USERPROFILE\.claude.json" -Raw | ConvertFrom-Json
$out += "~/.claude.json keys:"
$out += ($cfg.PSObject.Properties.Name -join ", ")
$out += ""
$out += "installMethod: $($cfg.installMethod)"
$out += "autoUpdates : $($cfg.autoUpdates)"
$out += "autoUpdatesProtectedForNative: $($cfg.autoUpdatesProtectedForNative)"
} catch {
$out += "ERROR parsing .claude.json: $_"
}
} else {
$out += "~/.claude.json: MISSING"
}
$out += ""
$out += "Settings files:"
$out += " ~/.claude/settings.json : $(Test-Path "$env:USERPROFILE\.claude\settings.json")"
$out += " ./.claude/settings.json : $(Test-Path ".\.claude\settings.json")"
$out += " ./.claude/settings.local.json : $(Test-Path ".\.claude\settings.local.json")"
$out += ""
$out += "Credentials file: $(Test-Path "$env:USERPROFILE\.claude\.credentials.json")"
if (Test-Path "$env:USERPROFILE\.claude\.credentials.json") {
$credSize = (Get-Item "$env:USERPROFILE\.claude\.credentials.json").Length
$out += " size: $credSize bytes"
}
$out += '```'
$out += ""
$out += "## 4. Variabile de mediu"
$out += '```'
$envs = Get-ChildItem Env: | Where-Object { $_.Name -match '^(CLAUDE_|ANTHROPIC_|NODE_|HTTP_PROXY|HTTPS_PROXY|NO_PROXY|ALL_PROXY)' }
if ($envs) {
$out += ($envs | Format-Table -AutoSize | Out-String).Trim()
} else {
$out += "(none set)"
}
$out += '```'
$out += ""
$out += "## 5. Retea"
$out += '```'
$out += "DNS servers:"
$out += (Get-DnsClientServerAddress -AddressFamily IPv4 | Where-Object {$_.ServerAddresses} | Format-Table InterfaceAlias, ServerAddresses -AutoSize | Out-String).Trim()
$out += ""
$out += "WinHTTP proxy:"
$out += (netsh winhttp show proxy | Out-String).Trim()
$out += ""
$out += "IE/system proxy:"
$ie = Get-ItemProperty 'HKCU:\Software\Microsoft\Windows\CurrentVersion\Internet Settings' -ErrorAction SilentlyContinue
$out += " ProxyEnable : $($ie.ProxyEnable)"
$out += " ProxyServer : $($ie.ProxyServer)"
$out += " AutoConfigURL: $($ie.AutoConfigURL)"
$out += ""
$out += "DNS resolution api.anthropic.com:"
$out += " A : $((Resolve-DnsName api.anthropic.com -Type A -ErrorAction SilentlyContinue).IPAddress -join ', ')"
$out += " AAAA : $((Resolve-DnsName api.anthropic.com -Type AAAA -ErrorAction SilentlyContinue).IPAddress -join ', ')"
$out += ""
$out += "TCP 443 to api.anthropic.com:"
$tcp = Test-NetConnection -ComputerName api.anthropic.com -Port 443 -WarningAction SilentlyContinue
$out += " RemoteAddress : $($tcp.RemoteAddress)"
$out += " TcpTestSucceeded : $($tcp.TcpTestSucceeded)"
$out += ""
$out += "HTTP test (POST /v1/messages, expect 401):"
try {
$resp = Invoke-WebRequest -Uri https://api.anthropic.com/v1/messages -Method POST -UseBasicParsing -TimeoutSec 10 -ErrorAction Stop
$out += " Status: $($resp.StatusCode) - UNEXPECTED (should be 401)"
} catch {
$sc = $_.Exception.Response.StatusCode.value__
if ($sc) {
$out += " Status: $sc $($_.Exception.Response.StatusCode) (401 = OK / a ajuns la API)"
} else {
$out += " ERROR: $($_.Exception.Message)"
}
}
$out += '```'
$out += ""
$out += "## 6. Securitate"
$out += '```'
$out += "Antivirus products:"
try {
$av = Get-CimInstance -Namespace root/SecurityCenter2 -ClassName AntiVirusProduct -ErrorAction Stop
$out += ($av | Select-Object displayName, productState | Format-Table -AutoSize | Out-String).Trim()
} catch {
$out += " (could not query - $_)"
}
$out += ""
$out += "Defender state:"
try {
$mp = Get-MpPreference
$out += " DisableRealtimeMonitoring: $($mp.DisableRealtimeMonitoring)"
$out += " EnableNetworkProtection : $($mp.EnableNetworkProtection)"
$st = Get-MpComputerStatus
$out += " AntivirusEnabled : $($st.AntivirusEnabled)"
$out += " RealTimeProtectionEnabled: $($st.RealTimeProtectionEnabled)"
} catch {
$out += " (need admin for full info)"
}
$out += ""
$out += "Firewall rules claude:"
$fwc = Get-NetFirewallRule -DisplayName "*claude*" -ErrorAction SilentlyContinue
if ($fwc) {
$out += ($fwc | Select-Object DisplayName, Enabled, Direction, Action | Format-Table -AutoSize | Out-String).Trim()
} else {
$out += " No claude rules"
}
$out += ""
$out += "Firewall rules node:"
$fwn = Get-NetFirewallRule -DisplayName "*node*" -ErrorAction SilentlyContinue
if ($fwn) {
$out += ($fwn | Select-Object DisplayName, Enabled, Direction, Action | Format-Table -AutoSize | Out-String).Trim()
} else {
$out += " No node rules"
}
$out += '```'
$out += ""
$out += "## 7. Sistem"
$out += '```'
$ver = Get-ItemProperty 'HKLM:\SOFTWARE\Microsoft\Windows NT\CurrentVersion'
$out += "OS DisplayVersion: $($ver.DisplayVersion)"
$out += "Build : $($ver.CurrentBuild).$($ver.UBR)"
$out += "PowerShell : $($PSVersionTable.PSVersion)"
$out += "Architecture : $env:PROCESSOR_ARCHITECTURE"
$out += ""
$out += "Network profiles:"
$out += (Get-NetConnectionProfile | Select-Object Name, NetworkCategory, IPv4Connectivity, IPv6Connectivity | Format-Table -AutoSize | Out-String).Trim()
$out += ""
$out += "VPN-like adapters:"
$vpn = Get-NetAdapter | Where-Object { $_.InterfaceDescription -match 'VPN|TAP|WireGuard|Tailscale|ZeroTier|WARP|OpenVPN' }
if ($vpn) {
$out += ($vpn | Select-Object Name, InterfaceDescription, Status | Format-Table -AutoSize | Out-String).Trim()
} else {
$out += " none"
}
$out += '```'
$out += ""
$out += "## 8. Test minim Claude Code (CAPTUREAZA RETRY LOOP)"
$out += '```'
$out += "RULEAZA MANUAL in alt terminal si lipeste output-ul aici:"
$out += " claude --debug"
$out += "Apoi tasteaza: buna"
$out += "Asteapta 1-2 retries, apoi Ctrl+C si copiaza ULTIMELE 30-40 linii."
$out += '```'
$out -join "`r`n" | Out-File -FilePath $report -Encoding UTF8
Write-Host ""
Write-Host "Report written to: $report" -ForegroundColor Green
Write-Host "Locatie completa : $((Resolve-Path $report).Path)" -ForegroundColor Green

4
readme_roademo.txt Normal file
View File

@@ -0,0 +1,4 @@
roastart_roademo.exe nu se minimizeaza in tray, ci in taskbar ( normal ), si nu descarca roa_security.xml.
- frm_fundal.scx : minimizeaza
- updatecheck.prg : UpdateRoastart

487
roastart.pj2 Normal file
View File

@@ -0,0 +1,487 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="roastart.pjx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
LPARAMETERS tcDir
lcCurdir = SYS(5)+CURDIR()
CD ( EVL( tcDir, JUSTPATH( SYS(16) ) ) )
*<DevInfo>
_Author = ""
_Company = ""
_Address = ""
_City = ""
_State = ""
_PostalCode = ""
_Country = ""
*--
_Comments = "Comentarii"
_CompanyName = "Romfast S.R.L."
_FileDescription = "ROA Start"
_LegalCopyright = "<22> Romfast S.R.L."
_LegalTrademark = ""
_ProductName = "ROA - Start"
_MajorVer = "2"
_MinorVer = "2"
_Revision = "10"
_LanguageID = "Romana"
_AutoIncrement = "0"
*</DevInfo>
*<BuildProj>
*<.HomeDir = 'd:\roa\roastart' />
FOR EACH loProject IN _VFP.Projects FOXOBJECT
loProject.Close()
ENDFOR
STRTOFILE( '', '__newproject.f2b' )
BUILD PROJECT roastart.PJX FROM '__newproject.f2b'
FOR EACH loProject IN _VFP.Projects FOXOBJECT
loProject.Close()
ENDFOR
MODIFY PROJECT 'roastart.PJX' NOWAIT NOSHOW NOPROJECTHOOK
loProject = _VFP.Projects('roastart.PJX')
WITH loProject.FILES
.ADD('..\comunroa\vfpcompression.fll') && *< FileMetadata: Type="L" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('..\comunroa\vfpencryption.fll') && *< FileMetadata: Type="L" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('clase\appwiz_start.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('clase\ofundal_start.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('clase\ostart.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('clase\ostart_admin.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('clase\ostart_grup.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('clase\ostart_init.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('clase\ostart_obiecte.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('clase\ostart_util.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\_baza.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\_ca_base.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\_cb_base.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\_cmd_base.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\_crypt.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\_ct_base.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\_cus_odata_base.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\_de_base.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\_ed_base.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\_frm_base.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\_frm_child.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\_frxcursor.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\_gdiplus.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\_grd_base.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\_lb_base.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\_pf_base.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\_therm.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\_tx_base.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\accessibility.vcx') && *< FileMetadata: Type="V" Cpid="1250" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\appwiz.vcx') && *< FileMetadata: Type="V" Cpid="0" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\autoresize.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\baza.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\caut_ora.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\cautare.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\chatbot.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\clase\cmd_butoane.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\crypto.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\decabaza.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\gridsort.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\importdata.vcx') && *< FileMetadata: Type="V" Cpid="1250" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\lb.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\lb_tx.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\locale.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\mb_iconexclamation.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\clase\mb_iconinformation.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\clase\mb_iconquestion.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\clase\mb_iconstop.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\clase\messagebox.h') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\clase\messagebox.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\ofirma.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\ofundal.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\onomenclatoare.vcx') && *< FileMetadata: Type="V" Cpid="0" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\registry.h') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\clase\registry.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\resizer.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\scrollcontainer.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\serii_numere.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\systray.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\utility.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\wwdialogs.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\clase\xresize.vcx') && *< FileMetadata: Type="V" Cpid="1254" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\ferestre\frm_about.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\ferestre\frm_changelog.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\ferestre\frm_filtru_luna.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\ferestre\frm_filtru_numar.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\ferestre\frm_filtru_text.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\grafice\alege.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\attach_sus.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\calendar.png') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\compara_sus.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\copy_sus.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\da_jos.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\da_sus.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\excel_jos.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\excel_sus.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\exclam.ico') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\f2.jpg') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\f3.jpg') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\factura1.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\na_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\nablank_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roa_hanulpiratilor_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roaacnpro_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roaapp_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roaaprov_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roaauto_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roabavert_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roaclienti_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roacomenzi_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roaconstructii_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roacont_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roacontracte_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roadecl_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roadef_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roadefsalarii_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roadevize_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roafacturare_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roafurnizori_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roagen_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roagest_descarcare_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roagest_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roagrestaurant_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roaimob_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roalucrari_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roamanager_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roanor_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roaobinv_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roaoferta_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roapreturi_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roaproductie_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roaprospectare_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roaravert_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roaregistratura_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roarepartizsal_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roares_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roarestaurant_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roasal_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roasalspec_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roasitfin_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roasitop_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roasuport_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\favorite\roavin_fav.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\gb.gif') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\grafic_jos.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\grafic_sus.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\help\_active_help.ico') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\help_jos.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\help_sus.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\ico\roastart.ico') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\jos1.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\jos2.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\chatbot.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\na.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\nablank.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roa_hanulpiratilor.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roaacnpro.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roaapp.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roaappupdate.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roaaprov.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roaauto.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roabavert.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roaclienti.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roacomenzi.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roaconstructii.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roacont.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roacontracte.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roadecl.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roadef.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roadefsalarii.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roadevize.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roafacturare.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roafurnizori.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roagen.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roagest.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roagest_descarcare.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roagrestaurant.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roaimob.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roalucrari.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roamanager.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roanor.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roaobinv.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roaoferta.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roapreturi.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roaprint.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roaproductie.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roaprospectare.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roaravert.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roaregistratura.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roarepartizsal.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roares.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roarestaurant.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roasal.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roasalspec.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roasitfin.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roasitop.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roasuport.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\roavin.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\lansare\romfast_suport.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\listare_jos.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\listare_sus.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\favorites.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\na.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roa_hanulpiratilor.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roaacnpro.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roaapp.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roaappupdate.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roaaprov.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roaauto.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roabavert.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roaclienti.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roacomenzi.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roaconstructii.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roacont.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roacontracte.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roadecl.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roadef.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roadefsalarii.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roadevize.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roafacturare.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roafurnizori.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roagen.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roagest.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roagest_descarcare.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roagrestaurant.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roaimob.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roalucrari.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roamanager.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roanor.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roaobinv.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roaoferta.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roapreturi.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roaprint.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roaproductie.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roaprospectare.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roaravert.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roaregistratura.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roarepartizsal.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roares.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roarestaurant.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roasal.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roasalspec.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roasitfin.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roasitop.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roasuport.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\roavin.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\meniutray\romfast_suport.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\modific_jos.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\modific_sus.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\modifica1.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\modifica2.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\modiparam_sus.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\nou1.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\nou2.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\nou_jos.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\nou_sus.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\nou_sus_dis.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\nu_jos.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\nu_sus.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\orb.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\precedent1.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\precedent2.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\refac_sus.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\renunt1.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\renunt2.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\renunt_jos.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\renunt_sus.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\reset_sus.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\retur1.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\ro.gif') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\save_sus.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\searchalb.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\sg.ico') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\start.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\sterg2_sus_dis.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\sterg_jos.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\sterg_sus.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\sterge1.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\sterge2.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\sus1.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\sus2.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\terminat2.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\terminat_jos.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\terminat_jos_verde.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\terminat_sus.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\terminat_sus_verde.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\urmator1.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\urmator1_tot.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\urmator2.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\verificare1.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\grafice\verificare2.bmp') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\include\security.h') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\programe\cauta_alfa.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\filebringer.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\gencursor.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\gridproc.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\ini.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\iniacces.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\lista2cursor.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\log_mesaje.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\obj2arr.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\ocautare.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\oexport.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\oinit_optiuni.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\onomenclatoare.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\oproceduri_ams.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\oproceduri_comune.prg') && *< FileMetadata: Type="P" Cpid="1251" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\oproceduri_parteneri.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\oscrie_in_fisiere.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\osecurity.prg') && *< FileMetadata: Type="P" Cpid="1251" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\oupdate.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\proceduri_comune.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\procese.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\update_roadef_sal.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\validare.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\programe\version.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\xmlaccess.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\xmlefactura.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\programe\xmlparser.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\ctl32\ctl32.h') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\utile\ctl32\ctl32.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\ctl32\ctl32.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\ctl32\ctl32_api.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\ctl32\ctl32_classes.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\ctl32\ctl32_common.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\ctl32\ctl32_functions.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\ctl32\ctl32_progressbar.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\ctl32\ctl32_structures.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\ctl32\ctl32_vfp2c32.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\ctl32\vfpx.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\gridextras\add16.png') && *< FileMetadata: Type="x" Cpid="1250" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\utile\gridextras\addfilter16.bmp') && *< FileMetadata: Type="x" Cpid="1250" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\utile\gridextras\clearfilter16.bmp') && *< FileMetadata: Type="x" Cpid="1250" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\utile\gridextras\close16.bmp') && *< FileMetadata: Type="x" Cpid="1250" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\utile\gridextras\delete16.png') && *< FileMetadata: Type="x" Cpid="1250" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\utile\gridextras\excel24.jpg') && *< FileMetadata: Type="x" Cpid="1250" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\utile\gridextras\exit.png') && *< FileMetadata: Type="x" Cpid="1250" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\utile\gridextras\gridextras.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\gridextras\gridextrasprocs.prg') && *< FileMetadata: Type="P" Cpid="1250" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\gridextras\search16.bmp') && *< FileMetadata: Type="x" Cpid="1250" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\utile\gridextras\showfilters16.bmp') && *< FileMetadata: Type="x" Cpid="1250" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\utile\gridextras\table_sql_view.png') && *< FileMetadata: Type="x" Cpid="1250" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\utile\gridextras\table_sql_view16.png') && *< FileMetadata: Type="x" Cpid="1250" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\utile\hpdf\_libpdf.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\hpdf\build_err_msgs.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\hpdf\hpdf_consts.h') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\utile\hpdf\hpdf_types.h') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\utile\hpdf\pdflistener.h') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\utile\hpdf\pdflistener.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\hpdf\reportoutput\_reportoutputconfig.dbf') && *< FileMetadata: Type="D" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\utile\hpdf\reportoutput\foxpro_reporting.h') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\utile\hpdf\reportoutput\frxoutput.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\hpdf\reportoutput\listener.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\menu\menutool.vcx') && *< FileMetadata: Type="V" Cpid="936" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\menu\win32api.h') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\utile\web\wconnect.h') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('comun\utile\web\wwapi.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\web\wwcodeupdate.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\web\wwconfig.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\web\wwhttp.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\web\wwutils.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\web\wwxml.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('comun\utile\web\wwxmlhttp.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('config.fpw') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('ferestre\frm_fundal.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('ferestre\frm_iniconfig.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('ferestre\frm_update.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('ferestre\waitwindow.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('grafice\2downarrow.gif') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\admin\contafin nou.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\admin\firma noua.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\admin\import alfa contafin.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\admin\import alfa.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\admin\informatii.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\admin\main.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\admin\verificare.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\favorite.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\favorite2.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\grup\configurareg.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\grup\drepturig.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\grup\informatiig.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\ico\grup.ico') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\ico\utilizator.ico') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\iesire.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\iesire.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\init\firme.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\init\informatiif.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\init\informatiip.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\init\programe.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\init\programegrup.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\init\serii.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\logoff.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\logoff.png') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\roastart.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\update-disabled.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\update-yellow.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\util\configurareu.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\util\detaliiu.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\util\informatiiu.png') && *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\util\parola.png') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('grafice\util\personalizare.png') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('locale\locale.dbc') && *< FileMetadata: Type="d" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('programe\oproceduri_start.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('programe\roastart.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('programe\update_start.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('programe\updatecheck.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
.ADD('rapoarte\rap_grup_prog.frx') && *< FileMetadata: Type="R" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('rapoarte\rap_util_gf.frx') && *< FileMetadata: Type="R" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
*</BuildProj>
.ITEM('__newproject.f2b').Remove()
*<FileComments>
*</FileComments>
*<ExcludedFiles>
.ITEM("..\comunroa\vfpcompression.fll").Exclude = .T.
.ITEM("..\comunroa\vfpencryption.fll").Exclude = .T.
.ITEM("locale\locale.dbc").Exclude = .T.
*</ExcludedFiles>
*<TextFiles>
.ITEM("comun\clase\messagebox.h").Type = 'T'
.ITEM("comun\clase\registry.h").Type = 'T'
.ITEM("comun\include\security.h").Type = 'T'
.ITEM("comun\utile\ctl32\ctl32.h").Type = 'T'
.ITEM("comun\utile\hpdf\hpdf_consts.h").Type = 'T'
.ITEM("comun\utile\hpdf\hpdf_types.h").Type = 'T'
.ITEM("comun\utile\hpdf\pdflistener.h").Type = 'T'
.ITEM("comun\utile\hpdf\reportoutput\foxpro_reporting.h").Type = 'T'
.ITEM("comun\utile\menu\win32api.h").Type = 'T'
.ITEM("comun\utile\web\wconnect.h").Type = 'T'
.ITEM(lcCurdir + 'config.fpw').Type = 'T'
*</TextFiles>
ENDWITH
WITH loProject
*<ProjectProperties>
.SetMain("programe\roastart.prg")
.Icon = "comun\grafice\ico\roastart.ico"
.Debug = .F.
.Encrypted = .F.
*<.CmntStyle = 1 />
*<.NoLogo = .F. />
*<.SaveCode = .T. />
*<.User = '' />
.ProjectHookLibrary = ''
.ProjectHookClass = ''
*</ProjectProperties>
ENDWITH
_VFP.Projects('roastart.PJX').Close()
*ERASE '__newproject.f2b'
CD (lcCurdir)
RETURN

1
versiune_db.txt Normal file
View File

@@ -0,0 +1 @@
2015_04_28_02