ALIAS SP_MOVF
// INDEX temp0101 pdesc
COMANDO ANTES #TEXTO_FONTE
   Private z_np:=0 
   
   oLst:cAlias_DataCols := '_movf'
   oLst:cAliasMaster := '_movf'
   oLst:lPortrait := .t.
   oLst:lOutputPdf := .t.
   // oLst:lOutputFr3 := .t.

   oLst:Cab1( "Sugestao de Compras "+w_pedido)
   oLst:Cab4( "Impressao em "+Dtoc(s_datual)+" as "+time())
  
   oLst:AddCab( '_LINHA_FINA_' )
   oLst:AddCab( '_CABCOLS_' )
   oLst:AddCab( '_LINHA_GROSSA_' )

   oLst:AddCol('Codigo;pCod;N;999999;6;;;Direita;NaoSome;')
   oLst:AddCol('Descricao;pDesc;C;@s35;35;;;Esquerda;NaoSome;') 
   oLst:AddCol('CxFechPed;unid_fech;N;999999999;9;;;Direita;Some;') 
   oLst:AddCol('Frc;pitens;N;9999;4;;;Direita;NaoSome;') 
   oLst:AddCol('Pr.Venda;PVLUVENDA;N;999999.99;9;;;Direita;NaoSome;') 
   oLst:AddCol('PrTotVda;mValor;N;999999.99;9;;;Direita;Some;') 
   oLst:AddCol('PrCompra;PVLUVEN3;N;999999.99;9;;;Direita;NaoSome;') 
   oLst:AddCol('PrTotCpa;mValor3;N;999999.99;9;;;Direita;Some;') 
   
   // oLst:AddCol('Ref.Fabr;Preffab;C;@S8;8;S;;') 

   oLst:AddCol('Cf;PCATEGORIA;C;XXX;2;;;Esquerda;NaoSome;') 
   oLst:AddCol('Tp;ptipoitem;P;!!;2;S;')
   oLst:AddCol('Finalidade;Efd_TipoItem();P;@S13;13;N;')

   oLst:AddRodape( '_LINHA_FINA_', "", {|| "Pagina "+Str(++pag,4)+" / ####"} )
   debugalert('1')

   oLst:DbEval({||++z_np} ) 
   oLst:PrtD( '_LINHA_GROSSA_' )
   oLst:PrtD( 'Produtos Listados: '+Transform(z_np,'@E 999,999') )

   debugalert('3')

#FIM_TEXTO_FONTE