romfast/comun
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

introducere_compacta: aduc explicatia/4/5 in cursorul introdc

Browse Source 
Permite editarea celor 3 explicatii pe fiecare rand in grila apelantului
(ROACONT frm_introd_compact2007). Strict aditiv: 3 campuri in plus in
cursor, restul comportamentului neschimbat pentru celelalte produse ROA.

Co-Authored-By: Claude Opus 4.8 (1M context) <noreply@anthropic.com>
Claude-Session: https://claude.ai/code/session_015DQoCUF3QSCgQCwCBK1qbz
This commit is contained in:
Marius Mutu
2026-07-20 14:19:13 +03:00
parent 76422f6aad
commit 97ec743559
1 changed files with 7 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
programe/pmenu.prg
View File

@@ -54,6 +54,11 @@
* Am introdus Calendar.impozit_profit * Am introdus Calendar.impozit_profit
* ID_SET = 10609 Platitorii impozit venit, pentru limitare deducere 50% nu le trebuie 2 note CHELTUIELI DEDUCTIBILE si NEDEDUCTIBILE * ID_SET = 10609 Platitorii impozit venit, pentru limitare deducere 50% nu le trebuie 2 note CHELTUIELI DEDUCTIBILE si NEDEDUCTIBILE
*!* 20.07.2026
*!* marius.mutu
*!* introducere_compacta
*!* Aduc explicatia, explicatia4 si explicatia5 in cursorul introdc, ca sa poata fi editate pe fiecare rand din grila
*-------------------------------------------- *--------------------------------------------
Function deschide_menu Function deschide_menu
Parameters tabela, cc1, cc2, mnrtata, stinga, sus, ONT Parameters tabela, cc1, cc2, mnrtata, stinga, sus, ONT
@@ -875,7 +880,8 @@ Procedure introducere_compacta
Select N.*, A.id_responsabil, A.id_partd, A.id_partc, A.partd, A.partc, ; Select N.*, A.id_responsabil, A.id_partd, A.id_partc, A.partd, A.partc, ;
A.nresp, A.id_sectie, A.sectie, A.id_venchelt, A.dst_chlt, N.id_jtax As id_jtva_coloana, ; A.nresp, A.id_sectie, A.sectie, A.id_venchelt, A.dst_chlt, N.id_jtax As id_jtva_coloana, ;
00000000000000 As id_factd, 00000000000000 As id_factc, 00000000000000 As pereched, 00000000000000 As perechec, ; 00000000000000 As id_factd, 00000000000000 As id_factc, 00000000000000 As pereched, 00000000000000 As perechec, ;
a.nrord, a.id_lucrare ; a.nrord, a.id_lucrare, ;
A.explicatia, A.explicatia4, A.explicatia5 ;
From cnote_contabile N Join actactan A On N.ID_SET = A.ID_SET ; From cnote_contabile N Join actactan A On N.ID_SET = A.ID_SET ;
Where N.ID_SET = tn_idset ; Where N.ID_SET = tn_idset ;
Into Cursor introdc Readwrite Order By ordine Into Cursor introdc Readwrite Order By ordine