Incluindo mecanismo para conferir se uma coordenada está protegida

perry.werneck@gmail.com
1 parent 81b0b853
Showing 1 changed file with 13 additions and 0 deletions Show diff stats
ctlr.c
@@ -612,6 +612,19 @@ LIB3270_EXPORT int lib3270_get_next_unprotected(H3270 *hSession, int baddr0)
 	return 0;
 }
  
+LIB3270_EXPORT int lib3270_get_is_protected(H3270 *hSession, int baddr)
+{
+    CHECK_SESSION_HANDLE(hSession);
+
+    if(baddr < 0)
+        baddr = hSession->cursor_addr;
+
+	int faddr = find_field_attribute(hSession,baddr);
+
+	return FA_IS_PROTECTED(hSession->ea_buf[faddr].fa);
+}
+
+
 /**
  * Perform an erase command, which may include changing the (virtual) screen size.
  *
...	...	@@ -612,6 +612,19 @@ 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(H3270 *hSession, int baddr)
	616	+{
	617	+ CHECK_SESSION_HANDLE(hSession);
	618	+
	619	+ if(baddr < 0)
	620	+ baddr = hSession->cursor_addr;
	621	+
	622	+ int faddr = find_field_attribute(hSession,baddr);
	623	+
	624	+ return FA_IS_PROTECTED(hSession->ea_buf[faddr].fa);
	625	+}
	626	+
	627	+
615	628	/**
616	629	* Perform an erase command, which may include changing the (virtual) screen size.
617	630	*
...	...