SCMCCV2 ;ALB/JLU;PC Attending conversion;6/4/1999
Source file <SCMCCV2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| STRTQJOB | ;this is the start of the queue job to convert PC Attending
|
|
| BLDLIST | ;gathers all the PC Attending Assignments within PCMM database.
|
|
| PROCLIST | ;works through the list built by the builder via the SCMCTYPE
|
|
| BPERCNT | ;bumps the error counter
|
|
| BPTOTCNT | ;bumps the total counter
|
|
| BPFXCNT | ;bumps the fixed counter
|
|
| SETERR(ERR) | ;set the error into the error global array.
|
|
| CONVERT | ;performs two checks then calls the tag to conver data.
|
|
| CONQ | ||
| REASGN | ;discharge old PC Attending and makes new PC Practitioner for today.
|
|
| CHKTM(ASGIEN,ERR) | ;Performs checks on the team assignments
|
|
| CHKQ | ||
| ;sets up message for conversion and delivers.
|
||
| TEXT | ;fills in the text of the message
|
|
| HDR | ;header for check mode.
|
|
| LISTA | ;
|
|
| LISTT | ;
|
|
| LISTP | ;
|
|
| TOTALS | ;fills the totals into the message.
|
|
| ERRORS | ;load in the error messages into the report.
|
|
| PADTO(TOT,VAR) | ;
|
|
| SET(X) | ;sets data into the correct mail storage global
|
|
| STOPPED | ;
|
