Télémiroir multiple (acq de plusieurs écrans)

BoTTom |
 
 Cet outils permet de faire du télémiroir (votre écran étant source)
 
  vers plusieurs écrans cibles (1 à 20)
 
1/ Entrez la cde CPYDSP
 
   Les paramètres sont initalisés (JOBQ et noms d'écrans)
 
   Le télémiroir n'est pas actif,ce qui vous permet de vous rendre sur
    l'écran de votre choix.
 
   Quand vous voulez démarrer le télémiroir, appuyez sur ATTN et attendez
    le message de confirmation "C pour refuser, G pour accepter"
   ATTENTION: tous les écrans cibles doivent être au SIGNON.
 
   A Partir de ce moment tous vos écrans sont retransmis sur les écrans
    choisis avec une particularité :
 
   - un pgm spécial est associé a la touche ATTN,
 
 
 
 Quand vous appuyez sur ATTN ce pgm utilise en DSPF n'effacant pas l'écran.
 
  il vous suffit alors de faire:
 
     + <ENTREE> et les écrans cibles auront le MEME écran que vous.
                (plus d'écran de retard)
 
     + F24      et le télémiroir s'arrete.
 
     + F23      et l'on vous affiche l'écran suivant.
      ################################################################# 
      #                                                               # 
      #                                                               # 
      #                                                               # 
      #                                                               # 
      #                                                               # 
      #                                                               # 
      #                                                               # 
      #                                                               # 
      # F3 = sortie,F8 = ne pas aff. l'écran suivant,F24 arret.       # 
      ################################################################# 


|
 
  Cet écran permet
 
                   + d'afficher du texte
   tapez votre texte et votre écran sera retransmis
          (fin de zone efface la ligne de bas d'écran)
 
 
                   + De "sauter" un écran
   Appuyer sur F8 et l'écran suivant ne sera pas retransmis
 
                   + F24 arret du télémiroir.
 
 
 
 
 
 
 
 
 
 
 
 PRINCIPE DE FONCTIONNEMENT:
 
 
 le pgm démarre le télémiroir système SANS écran cible mais avec résultat
  dans un fichier de travail
 
       STRCPYSCN      SRCDEV(*REQUESTER)
                      OUTDEV(*NONE)
 
                      OUTFILE(xxxxxx)
 
 puis soumet un pgm qui va:
 
 1/ acquerir toutes les unités MAXDEV(*NOMAX) sur le DSPF
                               code-op ACQ    en  RPG
 
 2/ lire le fichier de travail avec attente des enregistrements
                              EOFDLY(xxx) sur le PF
 
 3/ toutes les 24 lectures,envoyer un écran complet sur les unités
     avec INVITE (source SDD) afin de ne pas être bloqué.


|
    votre écran                                   écran cible
    ------------                                ------------
    ! xxx  yy  !                                ! xxx  yy  !
    !  zzzzzzzz!                                !  zzzzzzzz!
    ------------                                ------------
   /          /                                /          /
  ------------                                ------------
         ^                                         /          écran cible
         !                                write   !          ------------
         !                                +       !         /! xxx  yy  !
         !                                read    !       /  !  zzzzzzzz!
INTER.   !                              (INVITE)  !     /    ------------
---------!----------------------------------------!---/-    /          /
BATCH.   !              ----------                ! /      ------------
    ------------        ( xxx  yy)         -------------
   < STRCPYSCN  >       (  zzzzzz)        <  CPYDSP     >
   <  système   >-----> (        )<------ <   AF4TOOL   >
    -----------  write  (        ) read    -------------
                        ----------  (EOFDLY)
                        fichier de
                         travail
 
 
Cet exemple permet d'illustrer
 
            - le télémiroir dans un OUTFILE
            - l'attente d'enregistrements sur un fichier EOFDLY
              (attention cette attente est ILLIMITEE,ilfaut prévoir un moyen
               de terminer le pgm correctement)
            - l'ordre ACQ (ACQUIRE en COBOL)
            - les lectures multiples avec INVITE.
 
 
 
Vous pouvez essayer ce pgm tout de suite (en appuyant sur ENTREE)
 
 ou bien sortir (F3) et regarder les sources.
 
 
 
 
 
 F3 = Sortir, ENTREE = CPYDSP.
 





©AF400