Bom dia, Existe alguma funcao do progress quem me retorne o nome do label de um campo e o type do campo de uma tabela. Por exemplo: campo -> emitente.nome-abrev, preciso que retorne o nome do label: Nome Abreviado e o type do campo: char
Se voce estive com o campo em uma frame, basta informar: Código: find first emitente no-lock no-error. disp emitente.cod-emitente emitente.nome-abrev with frame x 1 columns. message "Valor: " emitente.cod-emitente:screen-value skip "Label: " emitente.cod-emitente:label skip "Tipo: " emitente.cod-emitente:type skip "Tipo: " emitente.cod-emitente:data-type skip "Tipo: " emitente.cod-emitente:format skip(1) "Valor: " emitente.nome-abrev:screen-value skip "Label: " emitente.nome-abrev:label skip "Tipo: " emitente.nome-abrev:type skip "Tipo: " emitente.nome-abrev:data-type skip "Tipo: " emitente.nome-abrev:format skip(1) view-as alert-box. Agora se estive fora de uma frame, pode usar buscando no _field os dados (altere o <nome_banco> para o banco onde está a tabela). Código: find first <nome_banco>._file where <nome_banco>_file._File-Name = "emitente" no-lock no-error. for each <nome_banco>._field of _file no-lock where <nome_banco>_field._Field-Name = "cod-emitente" or <nome_banco>_field._Field-Name = "nome-abrev": disp <nome_banco>_file._File-Name <nome_banco>_field._Field-Name <nome_banco>_field._Data-Type <nome_banco>_field._Format <nome_banco>_field._Label skip(1) with 1 columns. end.