Como encontrar um objeto do tipo Subroutine cujo nome lógico é diferente do nome físico desse objeto?
Considere que a subrotina ISNUMGT0 (criada no post nº 1) tenha sido salva com o nome físico S12345AB. Assim, num programa qualquer que use essa subrotina, teríamos algo do tipo:
...
PERFORM ISNUMGT0 #NUM #EH-NUM
...
Porém, ao editarmos ISNUMGT0 (comando "E ISNUMGT0"), não achamos objeto algum. Como proceder então? É simples. Ao editar, basta acrescentar a opção F, assim: E F ISNUMGT0
Até a próxima.
