Tabela
VG4 Numeracao Remessa Garantia
Campo Tipo Tamanho Decimal Titulo Formato Validacao F3 Contexto Lista Condicao PYME
VG4_FILIAL C 2 0 Filial S
VG4_ANONRO C 4 0 Ano @!S4 M->VG4_ANONRO=str(year(DDatabase),4) S
VG4_CODMAR C 3 0 Marca @!S3 FG_Seek("VE1","M->VG4_CODMAR",1,.f.,"VG4_DESMAR","VE1_DESMAR") XE3 S
VG4_DESMAR C 30 0 Descricao @!S30 V S
VG4_NUMERO C 7 0 Numero @!S7 FG_Strzero("M->VG4_NUMERO",7) .AND. ExistChav("VG4",M->VG4_ANONRO+M->VG4_CODMAR+M->VG4_NUMERO,1,"EXIANONRO") S