User Tools

Site Tools


cdc:nos2.source:nam5871:smniptx

SMNIPTX

Table Of Contents

  • [00003] PROC SUPMSG

Source Code

SMNIPTX.txt
  1. *DECK,SMNIPTX
  2. USETEXT NIPDEF
  3. PROC SUPMSG;
  4. BEGIN
  5. CONTROL STEXT;
  6. BASED ARRAY SUPMSG P(11);
  7. BEGIN
  8. *CALL SUPMSG
  9. *CALL SMAPPL
  10. *CALL SMRBF
  11. END
  12. BASED ARRAY SMNIP P(3);
  13. BEGIN
  14. *CALL SMNIP
  15. END
  16. BASED ARRAY SMNVF P(11);
  17. BEGIN
  18. *CALL SMNVF
  19. END
  20. END
  21. TERM
cdc/nos2.source/nam5871/smniptx.txt ยท Last modified: 2023/08/05 17:23 by Site Administrator