Table of Contents

NETTEXT

Table Of Contents

Source Code

NETTEXT.txt 
  1. *DECK NETTEXT 
  2.           IDENT  NETTEXT
  3.           STEXT 
  4. *IF DEF,IMS 
  5. *#
  6. *1DC  NETTEXT 
  7. *     1. MACRO   SUBMACRO    AUTHOR              DATE 
  8. *        NETON               S.KRULEVITCH        77/10/10 
  9. *        NETCHEK
  10. *         NETFUNC '?NET#P 
  11. *        NETOFF 
  12. *        NETSETP
  13. *        NETGET  '?NET#G
  14. *        NETGETF '?NET#G
  15. *         NETGETQ '?NET#Q 
  16. *        NETGETL '?NET#G
  17. *        NETGTFL '?NET#G
  18. *         NETGTLQ '?NET#Q 
  19. *        NETPUT  '?NET#P
  20. *        NETWAIT '?NET#P
  21. *        NETSTC  '?NET#P
  22. *        NETPUTF '?NET#D
  23. *         NETPUTS '?NET#D 
  24. *        NETDBG  '?NET#D
  25. * 
  26. *     2. FUNCTIONAL DESCRIPTION 
  27. *        NETTEXT CONTAINS THE COMPASS MACROS REQUIRED BY NAM. 
  28. *        THE COMPASS MACROS THAT COMMUNICATE WITH AIP SYMPL ROUTINES
  29. *        WILL CREATE A PARAMETER LIST,PASS THE ADDRESS OF A PARAMETER 
  30. *        LIST,AND/OR CALL THE CORRESPONDING AIP ROUTINE.
  31. * 
  32. *     3. METHOD USED
  33. *        A. IF THERE IS ONLY ONE PARAMETER PASSED TO A NETTEXT MACRO, 
  34. *           THEN THE FORMAT MUST BE LIST=ADDRESS,WHERE ADDRESS IS THE 
  35. *           LOCATION OF THE PARAMETER LIST. THAT PARAMETER LIST WILL
  36. *           BE USED FOR THE SUBSEQUENT AIP CALL.
  37. *        B. IF NETTEXT MACROS ARE CALLED WITH MORE THAN ONE PARAMETER,
  38. *           THEN A PARAMETER LIST WILL BE BUILT.
  39. *        C. IF THE LIS/LIST PARAMETER IS EMPTY THEN THE CORRESPONDING 
  40. *           AIP SYMPL ROUTINE WILL BE CALLED. 
  41. * 
  42. *     4. ENTRY CONDITIONS 
  43. *        PASSED PARAMETERS ARE ADDRESSES (LAST PARAMETER EXCLUDED)
  44. * 
  45. *     5. EXIT CONDITIONS
  46. *        A. NONE
  47. *        B. ADDRESS OF A PARAMETER LIST 
  48. *        C. NONE
  49. * 
  50. *     6. COMDECKS CALLED
  51. *        CMACROS - CONTAINS COMPASS MACROS
  52. *        NETMAC  FAKEMIC  DEFMAC  ITMMAC  STSMAC  USERDEFS  HEADER
  53. *        USERITMS 
  54. *        USERDEFS CALLS THE FOLLOWING COMDECKS: 
  55. *          CONDEF  CTRLDEF  DCDEF  ERRDEF  FCDEF  FILEDEF  LOUTDEF
  56. *          LSTDEF  MSGDEF  SHUTDEF  TCHDEF
  57. *        USERITMS CALLS THE FOLLOWING COMDECKS: 
  58. *          SUPMSG  CON  CTRL  DC  ERR  FC  FILE  LOUT  LST  MSG  SHUT 
  59. *          TCH
  60. * 
  61. *     7. PROCEDURES CALLED
  62. *        NONE 
  63. * 
  64. *     8. DAYFILE/DIAGNOSTIC MESSAGES
  65. *        MUST BE LIST=
  66. *        NTH PARAMETER/ADDRESS MISSING
  67. * 
  68. *     9. NETMAC DESCRIPTION 
  69. * 
  70. *#
  71. *ENDIF
  72. *CALL NP$CRT
  73.           SKIP   1
  74. *CALL CMACROS 
  75. *CALL NETMAC
  76.           END    NETTEXT