Table of Contents

NP$RCL

Table Of Contents

  • [00003] NP$RCL

Source Code

NP$RCL.txt 
  1. *DECK NP$RCL
  2.           IDENT  NP$RCL 
  3.           TITLE  NP$RCL 
  4. *CALL NP$CRT
  5.           ENTRY  NP$RCL 
  6.           SST 
  7.  OPL      XTEXT  COMSPRD
  8. *#
  9. *1DC  NP$RCL
  10. * 
  11. *     1. PROC NAME           AUTHOR              DATE 
  12. *        NP$RCL              J.C. LEE            79/02/12 
  13. * 
  14. *     2. FUNCTIONAL DESCRIPTION 
  15. *        ALLOW AIP ROUTINE TO GO INTO RECALL ON BIT 0 OF A WORD 
  16. *        SPECIFIED BY THE INPUT PARAMETER IF THE INPUT PARAMETER
  17. *        IS NOT EQUAL TO ZERO, ELSE THE INPUT PARAMETER IS ZERO 
  18. *        AND THE ROUTINE WILL GO INTO RECALL FOR AN 
  19. *        INSTALLATION SPECIFIED TIME. 
  20. * 
  21. *     3. METHOD USED
  22. *        USE COMPASS MACRO RECALL.
  23. * 
  24. *     4. ENTRY CONDITIONS.
  25. *        (X1) = ADDRESS OF WORD SPECIFIED FOR THE RECALL OR ZERO. 
  26. * 
  27. *     5. EXIT CONDITIONS
  28. *        OPERATION COMPLETED
  29. * 
  30. *     6. COMDECKS CALLED
  31. *        NP$CRT 
  32. * 
  33. *     7. ROUTINES CALLED
  34. *        NONE 
  35. * 
  36. *     8. DAYFILE MESSAGES 
  37. *        NONE 
  38. * 
  39. *#
  40.  
  41.  NP$RCL   DATA   0           ENTRY/EXIT 
  42.           SA1    X1 
  43.           ZR     X1,NOEVENT 
  44.           RECALL X1          RECALL ON EVENT. 
  45.           EQ     NP$RCL      RETURN 
  46.  
  47.  NOEVENT  RECALL             RECALL AFTER TIME PERIOD.
  48.           EQ     NP$RCL      RETURN 
  49.           END