Štampanje Alt-P napomene umesto naziva artikla u fakturama

%WHILE i_fak == faktur->f_id
%IF i_usl == 0
%COMMAND CalcFakRec()
//
%COMMAND m_memo := DodArtRead(i_id) // Ucitaj napomenu
%IF Empty(m_memo) // Ako je prazna, uzmi naziv artikla
%COMMAND m_memo := Artikli->a_naziv
%ENDIF
%COMMAND m_lines := MLCount (m_memo) // Broj linija u napomeni
%COMMAND i := 1 // Ispisi stavku
%WHILE i <= m_lines
%COMMAND m_line := PadR(MemoLine (m_memo,,i),62)
//
%IF i == 1
│%Right(Cnt(),3)%│%m_line%│ %m_jm%│%Tk(m_kol)%│%Tc(i_cena)%│%Tc(m_kol*i_cena)%│
%ELSE
│ │%m_line%│ │ │ │ │
%ENDIF
%COMMAND i := i+1
%ENDDO
//
%ENDIF
%SKIP
%ENDDO