Saisie d'un masque sous Telnet

Owned by Philip Meyer (Unlicensed)
02/12/2022

Présentation

Le module APM_TNT_SAISIE_PAGE.DHOP contient les routines nécessaires à une saisie Telnet.

Un masque .dhsi sera interprété pour faire le masque écran.

Programme

Les routines à utiliser sont basées sur les prototypes que la partie xwpf. Vous pouvez donc vous référer à la documentation existante. Ces routines sont simplement suffixées de TNT_.

Exemple de boucle de saisie sous Telnet
;Chargement des pages
TNT_Masque_Load(MZ.MeCle)
TNT_Masque_Charger(MZ.MeCle, 1, XME_MODE_GOSUB)
TNT_Masque_Input(MZ.MeCle, gvEtapeNavigation, 0, XME_MODE_GOSUB)
do 
	Switch Harmony.Key
		Case K_RETURN 
			...
			Fini = True
		Case Harmony.Dataarret = 10 
			...
		Case K_ESCAPE
			Fini = True
		Default
			TNT_Xmt_Call("U_Traitement")
	EndSwitch
while Fini = false
	TNT_Masque_Next(Harmony.Retour, Harmony.Cplretour)
Wend
TNT_Masque_Ret

A l'exception du _BUF qui n'existe pas côté Xwpf, l'algorithme de saisie est le même :

Masque


Il n'est pas nécessaire de compiler un masque Telnet ; il est interprété en mode texte par le module pour l'exécution sous Telnet.

On utilise dans le SDK XWIN l'outil de création d'un masque d'impression caractère, qui est détourné pour cette exécution. Son extension est donc dhsi. On nommera par convention le masque xxeerfxxx.dhsi. « ee » permet de rappeler qu'il s'agit bien d'un masque écran.

Les attributs des champs et labels posés dans le masque sont détournés :


Attribut DHSIFonction dans le Telnet
Gras = OuiAffichage en gras
Italique = OuiChamp en saisie (que l'on met habituellement en gras en standard)
Souligné = OuiAffichage en souligné
CommentaireCf. chapitre dédié
Nom sélectionISO
Position / Taille / CadrageISO

Les fonctions suivantes sont utilisables avec le paramètre Nom sélection :

  • TNT_GetVisible et TNT_SetVisible, TNT_Afficher et TNT_Cacher
  • TNT_GetAlignement et TNT_SetAlignement
  • TNT_GetGras et TNT_SetGras
  • TNT_GetHauteur, TNT_SetHauteur, TNT_GetLargeur, TNT_SetLargeur
  • TNT_GetVideoInverse et TNT_SetVideoInverse
  • TNT_GetSurligne et TNT_SetSurligne
  • TNT_GetOrdreSaisi et TNT_SetOrdreSaisi
  • TNT_GetSaisissable et TNT_SetSaisissable
  • TNT_GetObligatoire et TNT_SetObligatoire
  • TNT_GetTexteAide et TNT_SetTexteAide
  • TNT_getPositionCol et TNT_SetPositionCol

Attribut Commentaire

Gestion des attributs d'un champ en saisie

Exemple de l'attribut Commentaire :