Commit 6e56dafb8afd74899f06dc2bc28c4fce0c22e15b

Authored by perry.werneck@gmail.com
1 parent e29f8443

Acertando suporte a scripts rexx (incluindo funções que faltavam), testando méto…

…dos para verificação se um ponto da tela é editável
Showing 1 changed file with 6 additions and 1 deletions   Show diff stats
ctlr.c
... ... @@ -612,6 +612,11 @@ LIB3270_EXPORT int lib3270_get_next_unprotected(H3270 *hSession, int baddr0)
612 612 return 0;
613 613 }
614 614  
  615 +LIB3270_EXPORT int lib3270_get_is_protected_at(H3270 *h, int row, int col) {
  616 + CHECK_SESSION_HANDLE(h);
  617 + return lib3270_get_is_protected(h, ((row-1) * h->cols) + (col-1));
  618 +}
  619 +
615 620 LIB3270_EXPORT int lib3270_get_is_protected(H3270 *hSession, int baddr)
616 621 {
617 622 CHECK_SESSION_HANDLE(hSession);
... ... @@ -621,7 +626,7 @@ LIB3270_EXPORT int lib3270_get_is_protected(H3270 *hSession, int baddr)
621 626  
622 627 int faddr = find_field_attribute(hSession,baddr);
623 628  
624   - return FA_IS_PROTECTED(hSession->ea_buf[faddr].fa);
  629 + return FA_IS_PROTECTED(hSession->ea_buf[faddr].fa) ? 1 : 0;
625 630 }
626 631  
627 632  
... ...