//pag;l1;c1;l2;c2;desc;borda;preget;posget;preinc;posinc
 1;13; 3;22;78;Despacho de Solicitacao de Servico;;;;;
:SKEL
VARIAVEL z_blkjunta = {||alltrim(z_mdet1)+" "+alltrim(z_mdet2)+" "+alltrim(z_mdet3)+" "+alltrim(z_mdet4)+" "+alltrim(z_mdet5)}
VARIAVEL z_blkmais = {||m_cr_obs:=eval(z_blkjunta),if(z_maisdet<>"N",Editor(@m_cr_obs,"Observacoes",12,18,21,79),.t.),.t.}
VARIAVEL z_blkusufech = {|xusu|zsel:=select(),abra_arq('oc_usuid'),oc_usuid->(DbSeek(xusu)),M_FNUMERO:=oc_usuid->fnumero,oc_usuid->(DbCloseArea()),DbSelectArea(zsel),.t.}
VARIAVEL z_det1    = pad( memoline(cr_obs,50,1) ,50)
VARIAVEL z_det2    = pad( memoline(cr_obs,50,2) ,50)
VARIAVEL z_det3    = pad( memoline(cr_obs,50,3) ,50)
VARIAVEL z_det4    = pad( memoline(cr_obs,50,4) ,50)
VARIAVEL z_det5    = pad( memoline(cr_obs,50,5) ,50)
VARIAVEL z_mdet1   = spac(50)
VARIAVEL z_mdet2   = spac(50)
VARIAVEL z_mdet3   = spac(50)
VARIAVEL z_mdet4   = spac(50)
VARIAVEL z_mdet5   = spac(50)
VARIAVEL z_maisdet = "N"
VARIAVEL z_nil     = OcOcor("EXIB_OCOR",StrZero(fnumped,6)+"NAO_APAGAR_DADOS_OC")

// 1; 2; 2;Mt.Solicitante:;N; 5;FNUMERO;99999;.f.;M_FNUMERO>0.AND.PSQ_BROW;FP_PTFUN;PFPFUN;N;S;4;30;FNOME;@S40;
// 1; 8; 2;Detalhes......:;M;10;cr_obs;9Memo];;Editor(@m_cr_obs,"",12,18,21,79);;;N;; 0; 0;;;
//    1; 1; 2;Despachar para:;N; 5;FNUMERO;99999;;M_FNUMERO>0.AND.PSQ_BROW;FP_PTFUN;PFPFUN;N;S;1;30;FNOME;@S40;
:TFIE
//pag;l;c;desc;tipo;tam;campo;pict;when;valid;dbname;objcons;chave?;seek?;le;ce;cexib;pictexib
 
 1; 1; 2;Despachar para:;C; 8;USU_FECH;@!8;;empty(m_USU_FECH).or.psq_brow;OC_USUID;POCUSUID;N;S;0;0;;;
 1; 1;29;Matric:;N; 5;FNUMERO;99999;eval(z_blkusufech,m_USU_FECH);lastkey()=5.or.M_FNUMERO>0.AND.PSQ_BROW;FP_PTFUN;PFPFUN;N;S;1;45;FNOME;@S25;
 
 1; 2; 2;Obs Adicionais:;P;50;z_mdet1;@S50;;;;;N;; 0; 0;;; 
 1; 3;16;:;P;50;z_mdet2;@S50;;;;;N;; 0; 0;;;
 1; 4;16;:;P;50;z_mdet3;@S50;;;;;N;; 0; 0;;;
 1; 5;16;:;P;50;z_mdet4;@S50;;;;;N;; 0; 0;;; 
 1; 6;16;:;P;50;z_mdet5;@S50;;;
 1; 7; 2;Mais Obs Adic.?;P;1;z_maisdet;!;;eval(z_blkmais);;;N;; 0; 0;;; 
