PSJBCMA6 ;B'ham/JCH - Send Message when Clinic Order Setup incomplete ; 18 Aug 98 / 2:48 PM
Source file <PSJBCMA6.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| NOCLDEF(DFN,ORDER) | ; If clinic not defined in Clinic Definition file for Pending order, send message
|
|
| MSGEN(PSJCLMSG) | ; Begin
|
|
| SENDMSG | ;Send mail message
|
|
| DONE | ;
|
|
| GETDT | ; check date/time for job to run
|
|
| CON() | ;
|
|
| CWARN(DFN,ORDER) | ; Display warning about undefined CLINIC DEFINITION
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^SC - [#44] | Classic Fileman Calls |
| ^PS(53.46 - [#53.46] | Classic Fileman Calls |