SI_SUMAR;Datas das Ultimas Sumarizacoes;sys_tbbrow; 5; 0;20;79;padrao;;
:SKEL
VARIAVEL Z_AAMM = RIGHT( SI_SUMAR, 4)
VARIAVEL Z_BFNAME = {|| alltrim(r_siga)+alltrim(diretorio)+if(arquivo<>spac(8),ALLTRIM(arquivo),ALLTRIM(PREFIXO)+Z_AAMM)+".DBF"}
VARIAVEL Z_BLKFNAME = { || zv_attrfile:=directory(EVAL(Z_BFNAME)) , if(len(zv_attrfile)>0, dtoc(zv_attrfile[1,3])+" "+Left(zv_attrfile[1,4],5),"Inexiste") }
:TBFI
Arquivo;if(arquivo<>spac(8),arquivo,PREFIXO)+" "+Str(Loja,2);C;@S11;11;N;
Copia_existente;eval(Z_BLKFNAME);C;@s15;15;N;
Ult_Copia_Usada;Dtoc(datafile)+" "+Left(horafile,5);C;@s14;14;N;
Data_Ult_Sumario;Dtoc(DATASUM)+" "+Left(HORASUM,5);C;@s14;14;N;
Registros;REGSUM;N;99999999;  9;N;
Diretorio;DIRETORIO;C;@S20; 20;S;
Lj;Loja;N;99;2;S;
Arquivo;Arquivo;C;@s8;8;S;
Prefixo;Prefixo;C;@s8;8;S;
