frm_modific2024, pgfArticole.PAGE3 - editare in memorie, fara scriere in Oracle (aceea ramane S5). - sub-blocul A: cantitate/pret/pret_cu_tva editabile inline, marcaj lmodificat pe linie, coloana valoare pe linie - sub-blocul B: stergere logica de linii (sters/DynamicForeColor gri) si adaugare de linii prin frm_articol_factura, cu alegerea articolului prin caut_articol() - sub-blocul C: bara de totaluri sub grid (total linii convertit RON la cursul documentului, discount de antet editabil, total net), ascunsa pe transfer/custodie; verdict de corelatie ACT/RUL informativ, cu 3 stari - suma ACT: sold net debit-credit, cont pe tip de document (4111 / 418 / 461, iar pe rate/contract 4111, 411 sau 461) - suma RUL: doar ID_TIP_RULAJ = 0, adica miscarile reale; perechile ID_TIP_RULAJ = 3 sunt virtuale (tin locul procesului verbal de schimbare de pret) si nu intra in suma. Corectie cu liniile nestocate, marcata "ajustat" - adaugarea de linii pe document in valuta: dialogul primeste tip_valuta si cursul documentului de pe tvanz, deci pretul se introduce direct in valuta; ofacturare.vc2 ramane neatins - cei 5 apelanti frm_modific2024 (afisjurcom, anaf_efactura, cele doua .sc2 de import) pregatesc cursorul de articole inainte de Createobject, gardat pe SET PROCEDURE - registrul jurnal din ROACONT/ROAGEST ramane neschimbat Teste headless pe MARIUSM_AUTO, suite care isi descopera singure documentele: test_page3_articole 14/2 (cele 2 = artefact de grid nematerializat headless, acoperit pe ecran), test_incarca_vanzare_din_nota 5/0, test_adauga_linie_articol 20/0, test_adauga_linie_valuta 16/0, test_ui_sterge_linie 8/0, test_verdict_act_rul 26/0. docs/todos.txt: punctele 13 si 20, scrise de Marius. Co-Authored-By: Claude Opus 5 <noreply@anthropic.com> Claude-Session: https://claude.ai/code/session_01SN8snvkk94KuhWwoXUUey3
112 lines
8.2 KiB
Markdown
112 lines
8.2 KiB
Markdown
# Flux editare .vcx/.scx pe text (comun proiectelor VFP)
|
|
|
|
Textul .vc2/.sc2 e sursa de editare; write-back in binar cu `txt2vcx.ps1`, fara VFP IDE.
|
|
Detalii complete: `D:\ROA\UTIL\foxbin2prg\CLAUDE.md`. Parametrii per proiect: sectiunea de mai jos.
|
|
|
|
**Proiecte migrate (ROACONT, COMUN, …): flux in-arbore.** Textul .??2 sta langa binare, il
|
|
improspateaza `git_sync.ps1 -ProjectRoot <root>` (nu cache extern) — la inceput de sesiune si
|
|
inainte de orice `git commit`. Write-back doar pentru vcx/scx; `frx/mnx/lbx/pjx/dbc/dbf` doar
|
|
in IDE. `txt2vcx.ps1` cu `-CacheRoot` = `-ProjectRoot` (implicit). Pasul 0 de mai jos devine
|
|
rularea `git_sync.ps1`; restul pasilor raman la fel. Fluxul cu cache extern (`vcx2txt.ps1` +
|
|
`-CacheRoot` separat) ramane doar pentru proiectele nemigrate.
|
|
|
|
**Capcana: `git_sync.ps1` cu `-ProjectRoot` pe COMUN direct.** Lista implicita
|
|
`-RoundtripExempt` are cai de forma `COMUN\clase\<f>.vcx` (raportate la radacina unei aplicatii,
|
|
unde COMUN e subfolder) si se lipeste de `-ProjectRoot`. Cand radacina E chiar COMUN, caile nu
|
|
mai potrivesc si clasele scutite (FFC/third-party cu `#INCLUDE`, ex. `oinventar.vcx`) raporteaza
|
|
fals `roundtrip text1 != text2`. Ruleaza atunci cu lista rebazata:
|
|
`git_sync.ps1 -ProjectRoot 'D:\ROA\ROAGEST\COMUN' -RoundtripExempt @('clase\accessibility.vcx',
|
|
'clase\oinventar.vcx','clase\_gdiplus.vcx','clase\_reportlistener.vcx',
|
|
'utile\foxcharts\foxcharts.vcx','utile\web\_webview.vcx')` - si apeleaza scriptul cu `&`, nu cu
|
|
`powershell -File` (acolo lista nu se leaga ca array).
|
|
|
|
## Parametri per proiect (nemigrate, cache extern)
|
|
|
|
- **ROAGEST**: `-Project 'D:\ROA\ROAGEST\roagest.pjx' -ProjectRoot 'D:\ROA\ROAGEST'
|
|
-CacheRoot 'D:\ROA\_vfp_textcache\roagest'`; patch-uri de review in
|
|
`docs/diff_runda<N>_<subiect>.patch`.
|
|
|
|
## Pasii unei runde
|
|
|
|
0. Refresh cache (obligatoriu dupa orice sesiune IDE — staleness pe mtime):
|
|
`vcx2txt.ps1 -Project <pjx> -ProjectRoot <root> -CacheRoot <cache> -Types vcx,scx`
|
|
1. Baseline: `Copy-Item <f>.vc2 <f>.vc2.pre_runda<N>.bak` (in cache; la runde succesive
|
|
necomise, diff-ul fata de HEAD ar amesteca rundele).
|
|
2. Editare byte-safe: PowerShell `[IO.File]::ReadAllText/WriteAllText(..., GetEncoding(1252))` -
|
|
doar pentru round-trip pe octeti, NU pentru retastat literal diacritice (antetul zice
|
|
`CPID="1252"`, dar octetii diacriticelor sunt de fapt cp1250: `conventie_encoding_cp1252.md`).
|
|
NU tool-ul Edit/Write (UTF-8 strica diacriticele). Continut nou ASCII, TAB-uri ca in jur,
|
|
fara reflow (format position-sensitive, proprietati alfabetizate). Valabil si pentru `.prg`.
|
|
3. Patch review: `git diff --no-index <bak> <editat> > docs/diff_runda<N>_<subiect>.patch`
|
|
(exit 1 = normal). Utilizatorul revizuieste FISIERUL de patch si aproba — aprobarea
|
|
conditioneaza COMMIT-ul, nu write-back-ul: pasii 5 si 6 se fac imediat, fara sa astepti
|
|
raspunsul (si pe `COMUN`), ca review-ul sa primeasca rezultate de test, nu o propunere
|
|
netestata. Rollback daca patch-ul e respins sau modificarea nu merge: `git checkout` pe
|
|
binare (`.vcx`+`.vct`) sau write-back din `*.pre_runda<N>.bak`.
|
|
Comentariile in cod: conventia din `reguli_lucru.md` (punctul 2).
|
|
Obligatoriu inainte de a preda patch-ul la review: skill-ul de code-review rulat pe bucatile
|
|
de cod din diff (nu doar citire manuala) - prinde defecte gen IIF cu numar gresit de
|
|
argumente, deduplicari care nu se declanseaza niciodata, interogari mai largi decat e nevoie.
|
|
Review-ul verifica si compactitatea/reutilizarea: cod care refoloseste functiile si clasele
|
|
comune existente in loc sa le reinventeze (ex. cursor2lista()/cursor2listac() pentru liste
|
|
dintr-un cursor in loc de Scan manual; butoane din cmd_butoane.vcx in loc de butoane ad-hoc).
|
|
Inventarul comunelor: COMUN\docs\inventar-comun.md - se consulta si la pasul de plan/arhitectura,
|
|
inainte de a scrie cod nou.
|
|
4. Preconditie write-back: binarul tinta sa nu fie blocat. `txt2vcx.ps1` verifica singur
|
|
(`Test-ExclusiveAccess` pe `.vcx`+`.vct`) si refuza cu mesaj clar daca e lock. NU conteaza
|
|
existenta altor instante `vfp9` — utilizatorul poate lucra in paralel in alt proiect VFP —
|
|
si NU se omoara procese: cand lock-ul exista, se cere utilizatorului sa inchida sesiunea.
|
|
5. Write-back: `txt2vcx.ps1 -TextFile <vc2> -ProjectRoot <root> -CacheRoot <cache>`
|
|
(+ `-AllowComun` pentru tinte COMUN — afecteaza toate aplicatiile ROA, deci schimbarea in sine
|
|
se propune explicit, dar write-back-ul local nu asteapta aprobarea; nimic nu pleaca la celelalte
|
|
aplicatii pana la commit+push).
|
|
Succes = fidelity-check trecut: binar cu mtime nou; `vcx2txt.ps1` ulterior il vede la zi.
|
|
6. Teste finale pe cerinta initiala (cerinta Marius, valabila in toate proiectele VFP):
|
|
dupa ultima runda, teste e2e (harness UI, pe fluxul real al utilizatorului) care verifica
|
|
ca rezultatul construit *arata si se comporta* conform cerintei initiale — scenariul concret
|
|
dat de Marius, cu valorile lui asteptate — nu doar teste per-fix. Assert-uri pe continutul
|
|
rezultatului (sume, campuri, randuri), nu pe efecte de suprafata ("a aparut un rand" nu e
|
|
suficient).
|
|
7. Curatenie dupa commit (backup-uri `.pre_runda*.bak`, patch-uri, artefacte de test):
|
|
`powershell -File COMUN\utile\curatenie.ps1` — vezi regula 1 din `reguli_lucru.md`.
|
|
|
|
## Capcane
|
|
|
|
- `.mnx`/`.frx` raman read-only (GENMENU in IDE / round-trip fragil).
|
|
- Linii complet goale in metode pica fidelity doar pe whitespace; fix: preia `verify\*.vc2`
|
|
din staging peste cache si reia write-back-ul.
|
|
- Metoda noua de clasa cere `*m: nume` in `*<DefinedPropArrayMethod>`; fara ea, prima salvare
|
|
din IDE o arunca tacut, iar refresh-ul urmator absoarbe pierderea in cache (si in .bak-uri).
|
|
Override-urile de metode de baza (Init, Show, hook-uri) nu au nevoie de `*m:`.
|
|
- **Proprietate noua de clasa cere identic `*p: nume` in `*<DefinedPropArrayMethod>`** — nu doar
|
|
valoarea in `*<PropValue>`. Fara `*p:`, valoarea se scrie in text, **trece fidelity-check-ul**
|
|
(fidelity compara doar text-sursa cu text-regenerat) si ajunge in binar ca text, dar VFP nu o
|
|
materializeaza pe obiect: `PEMSTATUS(o,'nume',5)` da `.F.` si orice acces cade cu eroarea 1734
|
|
"Property ... is not found". Dovedit in ambele sensuri pe o clasa de proba izolata (cu `*p:` ->
|
|
`.T.`, fara -> `.F.`).
|
|
- **FoxBin2Prg sorteaza alfabetic cu `_` DUPA literele obisnuite**, nu in ordine ASCII brut (unde
|
|
`'_' (0x5F) < 'v' (0x76)` pe litere mici). O intrare `*p:`/`*m:` scrisa de mana in ordine "ASCII
|
|
corecta" pica fidelity-check-ul; ordinea canonica se citeste din textul regenerat in
|
|
`<staging>\verify\*.vc2` (vezi punctul de mai jos despre pozitia metodelor noi — se aplica identic
|
|
proprietatilor).
|
|
- FoxBin2Prg NU pastreaza pozitia in text a unei metode noi: o regenereaza la pozitia
|
|
alfabetica din `*<DefinedPropArrayMethod>`. O metoda scrisa in alta parte a fisierului
|
|
face fidelity-check-ul sa pice. Sursa de adevar pentru relocare e textul regenerat din
|
|
`<staging>\verify\` - muta metoda unde apare acolo si reia write-back-ul.
|
|
- Salvarea din VFP IDE peste un binar scris de txt2vcx poate PIERDE si definitii `*m:` deja
|
|
existente, desi corpurile PROCEDURE raman (patit pe ROAGEST: `import_adauga_factura.recalc_tva`,
|
|
`import_nota.do_adauga/do_copie/do_reface`); simptom: crash la Createobject cu
|
|
"Data type mismatch" raportat la linia apelanta. Dupa orice sesiune IDE pe clasa: refresh
|
|
cache + compara lista `*m:` cu starea de dinainte.
|
|
- Nu folosi *Project > Build* ca sa recompilezi un binar vizat: rebuild-ul recompileaza toate
|
|
`.vcx`/`.vct` din proiect si le rescrie antetul (timestamp compilare) si posibil p-code-ul
|
|
intern si la librarii neatinse efectiv, aparand fals ca "modificate" in diff — de aici
|
|
fluxul text->bin punctual pe binarul vizat.
|
|
- Subagentii delegati primesc regulile 2-5 in prompt si raporteaza unicitatea sirurilor
|
|
inlocuite + rezultatul fidelity-check-ului.
|
|
- Fisierele `.vc2`/`.sc2` sunt CRLF, dar here-string-urile PowerShell (`"...`r`n..."` sau
|
|
`@"..."@`) produc LF simplu pe orice linie noua inserata daca nu incluzi explicit `` `r`n ``
|
|
la fiecare capat de linie - rezultatul e un fisier cu sfarsituri de linie amestecate (CRLF pe
|
|
continutul vechi, LF pe cel nou). Verificare finala obligatorie dupa orice scriere: numara
|
|
octetii `0x0A` neprecedati de `0x0D` (LF izolati) - trebuie sa fie 0.
|