Redirectarea mesajelor de atentionare/eroare la import
Posted: 25 Oct 2017, 12:58
La import facturi în hMARFA de obicei documentele importate se validează automat.
Acestea pot genera mesaje de atenţionare sau de eroare, care se afişează pe ecran dar care nu se păstrează.
În continuare prezint o modalitate simplă pentru memorarea eventualelor mesaje de avertisment/eroare apărute şi includerea lor în fişierul log.
În scriptul de import se inserează următoarele modificări:
1.creaţi comanda generală INIT (dacă nu există) şi creaţi secţiunea #DECLARATII (sau dacă există deja completaţi) cu următorul conţinut:
2.în secţiunea #PAC_DECL:
3.în secţiunea #DOC_SFIRSIT
4.Secţiunea #PAC_SFIRSIT1 completaţi:
În acest mod operaţia de import va fi rulată fără mesaje, eventualele mesaje apărute vor fi incluse în fişierul log
Acestea pot genera mesaje de atenţionare sau de eroare, care se afişează pe ecran dar care nu se păstrează.
În continuare prezint o modalitate simplă pentru memorarea eventualelor mesaje de avertisment/eroare apărute şi includerea lor în fişierul log.
În scriptul de import se inserează următoarele modificări:
1.creaţi comanda generală INIT (dacă nu există) şi creaţi secţiunea #DECLARATII (sau dacă există deja completaţi) cu următorul conţinut:
Code: Select all
#DECLARATII
ApelBat := .F.
#SFIRSIT_DECLARATIICode: Select all
...
// Activarea regimului "batch"
h_SetBat (.T.,.F.)
#SFIRSIT_PAC_DECL
Code: Select all
...
// Citirea eventualelor mesaje si includerea lor in fisierul log
ames := h_MesBat ()
if(Valtype(ames)="A",AEval(ames,{|p| h_PutLine(p)}),)
h_SetBat(.F.)
h_SetBat(.T.,.F.)
#SFIRSIT_DOC_SFIRSIT
Code: Select all
#PAC_SFIRSIT1
h_SetBat (.F.)
...