| 2764 | // |
| 2765 | |
| 2766 | static void gen_receive( const act* action, int column, const gpre_port* port) |
| 2767 | { |
| 2768 | PAT args; |
| 2769 | const TEXT* pattern = |
| 2770 | "%RH->receive (%V1, %RL, %PN, %PL, CAST_MSG(&%PI));"; |
| 2771 | |
| 2772 | args.pat_request = action->act_request; |
| 2773 | args.pat_vector1 = status_vector(action); |
| 2774 | args.pat_port = port; |
| 2775 | PATTERN_expand((USHORT) column, pattern, &args); |
| 2776 | |
| 2777 | set_sqlcode(action, column); |
| 2778 | } |
| 2779 | |
| 2780 | |
| 2781 | //____________________________________________________________ |
no test coverage detected