Import eFactura in lot: borderou cu ce lipseste, coada de contabilizare, alegerea contului

Borderoul tine per factura ce mai are de completat si daca are articole de gestiune
(camp gest, coloana si filtru), coada contabilizeaza in serie facturile bifate si
incheie cu un rezumat, iar contul de furnizor/client se alege din planul de conturi.
Cheia normalizata de articol, rezolvarea automata a partenerului si anularea in bloc
intra tot aici. Pozitia in lista se pastreaza peste reaplicarea filtrului.

Co-Authored-By: Claude Opus 5 <noreply@anthropic.com>
Claude-Session: https://claude.ai/code/session_01Aroafxp4z8bmM5oVECZRXY

programe/pmenu.prg

@@ -691,7 +691,7 @@ Function lans
 
 	*----------------------------------------------
 Procedure introducere_compacta
-	Parameters tcFis, tcscd, tcscc, tl_calcTVA, tl_plata, tctitlu, tctva, tn_idset, tl_acont, tnDeducere, tlCursorCreat, tnTotcTVA
+	Parameters tcFis, tcscd, tcscc, tl_calcTVA, tl_plata, tctitlu, tctva, tn_idset, tl_acont, tnDeducere, tlCursorCreat, tnTotcTVA, tnTop
 	Local llVerificaAcont, llSucces, llN50, llN100, llNeexigibil, llCursorCreat
 	llCursorCreat = .F.
 	llVerificaAcont = .T.
@@ -708,6 +708,7 @@ Procedure introducere_compacta
 	*!*		   tnDeducere = 0/1 - daca se scriu notele pentru cheltuieli deductibile 50%
 	*!*		   tlCursorCreat (optional) = .T. daca cursorul cnote_contabile este creat anterior (Ex: import din eFactura)
 	*!*		   tnTotcTVA (optional) = Valoarea cu TVA import eFactura
+	*!*		   tnTop (optional) = pozitia Top cat timp ruleaza lotul de import eFactura
 
 	If Pcount() >= 9
 		llVerificaAcont = tl_acont
@@ -1070,7 +1071,7 @@ Procedure introducere_compacta
 
 
 	obj.titlufrumos1.Caption = tctitlu
-	obj.Show(1)
+	obj.Show(1, tnTop)
 
 	USE IN (SELECT('crsTaxTable'))
 	USE IN (SELECT('crsjtva'))