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,6 +612,19 @@ LIB3270_EXPORT int lib3270_get_next_unprotected(H3270 *hSession, int baddr0)
612	return 0;	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	* Perform an erase command, which may include changing the (virtual) screen size.	629	* Perform an erase command, which may include changing the (virtual) screen size.
617	*	630	*