30 lines
1.4 KiB
Plaintext
30 lines
1.4 KiB
Plaintext
Trebuie adaugate in update_nomenclator.prg :
|
|
|
|
|
|
goExecutor.oExecute([select id_set, nr_set, nume_set, fix as fixTemp, lista_note, explicatia, model, ] + ;
|
|
[formgest, nu_sterg as nu_stergTemp, param1, listare, param2, frm_date, discount as discountTemp, adaos as adaosTemp, factura as facturaTemp,id_selst,] + ;
|
|
[id_seldr, tip_doc, tip_ctr, expl_fixa,aleg_cont as aleg_contTemp, frm_plata,valuta as valutatemp, compens,] + ;
|
|
[id_tip_rul, id_jnetax, id_jtax, tipjurnal, id_jtaxn, productie as productieTemp, formproduc, cursval as cursvaltemp ] + ;
|
|
[from xsets], [XSetsTemp]) && are valuta si aleg_cont cu valori 1,0 care vor fi transf in .t., .f.
|
|
|
|
Select *,Iif(valutaTemp = 1, .T., .F.) As valuta,;
|
|
IIF(aleg_contTemp = 1,.T.,.F.) As aleg_cont,;
|
|
IIF(cursvalTemp = 1,.T.,.F.) as cursval,;
|
|
IIF(productieTemp = 1,.T.,.F.) as productie,;
|
|
IIF(discountTemp = 1,.T.,.F.) as discount,;
|
|
IIF(fixTemp = 1,.T.,.F.) as fix,;
|
|
IIF(nu_stergTemp = 1,.T.,.F.) as nu_sterg,;
|
|
IIF(adaosTemp = 1,.T., .F.) as adaos,;
|
|
IIF(facturaTemp = 1,.T.,.F.) as factura ;
|
|
From XSetsTemp Into Cursor xSets Readwrite
|
|
|
|
goExecutor.oExecute([select * from xrequest], [XRequest])
|
|
goExecutor.oExecute([select * from xnote], [XNote])
|
|
goExecutor.oExecute([select * from xact], [XAct])
|
|
goExecutor.oExecute([select * from xitems], [XItems])
|
|
|
|
nvl2Default("xrequest", "id_tipdoc")
|
|
nvl2Default("xnote")
|
|
nvl2Default("xact")
|
|
nvl2Default("xsets")
|
|
nvl2Default("XItems") |