SCMCCV2 ;ALB/JLU;PC Attending conversion;6/4/1999
Source file <SCMCCV2.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
CONQ | ||
CONVERT | ;performs two checks then calls the tag to conver data.
|
|
HDR | ;header for check mode.
|
|
CHKTM(ASGIEN,ERR) | ;Performs checks on the team assignments
|
|
BPFXCNT | ;bumps the fixed counter
|
|
CHKQ | ||
ERRORS | ;load in the error messages into the report.
|
|
PROCLIST | ;works through the list built by the builder via the SCMCTYPE
|
|
STRTQJOB | ;this is the start of the queue job to convert PC Attending
|
|
SET(X) | ;sets data into the correct mail storage global
|
|
TEXT | ;fills in the text of the message
|
|
PADTO(TOT,VAR) | ;
|
|
BLDLIST | ;gathers all the PC Attending Assignments within PCMM database.
|
|
SETERR(ERR) | ;set the error into the error global array.
|
|
REASGN | ;discharge old PC Attending and makes new PC Practitioner for today.
|
|
STOPPED | ;
|
|
BPTOTCNT | ;bumps the total counter
|
|
LISTT | ;
|
|
LISTP | ;
|
|
TOTALS | ;fills the totals into the message.
|
|
BPERCNT | ;bumps the error counter
|
|
;sets up message for conversion and delivers.
|
||
LISTA | ;
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | PROCLIST+12 |
^SCPT(404.42 - [#404.42] | BLDLIST+12, CHKTM+11 |
^SCPT(404.43 - [#404.43] | BLDLIST+7, BLDLIST+8, BLDLIST+9, BLDLIST+11, CHKTM+5 |
^SCTM(404.51 - [#404.51] | SETERR+5, LISTT+4, LISTP+4 |
^SCTM(404.57 - [#404.57] | SETERR+4, LISTP+8 |
^TMP("SCMC" | STRTQJOB+13, STRTQJOB+15!, BLDLIST+5!, BLDLIST+16*, PROCLIST+8, PROCLIST+10, SETERR+8, SETERR+14*, SETERR+18*, SETERR+20 , SETERR+21*, MAIL+5, ERRORS+14, ERRORS+18, ERRORS+19, ERRORS+20, ERRORS+22, ERRORS+33, SET+3* |
^XTMP("SCMCATTCONV" | STRTQJOB+15! |
Name | Line Occurrences |
---|---|
$$CHKTM | CONVERT+11 |
@( | CONVERT+15 |
BLDLIST | STRTQJOB+12 |
BPERCNT | CONVERT+13 |
BPFXCNT | CONVERT+16 |
BPTOTCNT | CONVERT+3 |
CONVERT | PROCLIST+17, PROCLIST+18, PROCLIST+19 |
ERRORS | MAIL+12 |
HDR | TEXT+2 |
LISTA | TEXT+3 |
LISTP | TEXT+5 |
LISTT | TEXT+4 |
STRTQJOB+14 | |
PADTO | ERRORS+24, ERRORS+26, ERRORS+28, ERRORS+30 |
PROCLIST | STRTQJOB+13 |
SET | MAIL+6, MAIL+7, HDR+2, HDR+4, HDR+6, HDR+7, HDR+10, LISTA+1, LISTT+2, LISTT+4 , LISTT+5, LISTT+6, LISTP+2, LISTP+4, LISTP+5, LISTP+6, LISTP+8, TOTALS+2, TOTALS+3, TOTALS+4 , TOTALS+5, TOTALS+6, TOTALS+7, ERRORS+5, ERRORS+6, ERRORS+7, ERRORS+8, ERRORS+9, ERRORS+10, ERRORS+15 , ERRORS+16, ERRORS+17, ERRORS+19, ERRORS+32, ERRORS+33, STOPPED+1, STOPPED+2, STOPPED+3, STOPPED+4 |
SETERR | CONVERT+8, REASGN+5, REASGN+11, CHKTM+6, CHKTM+9, CHKTM+12, CHKTM+14, CHKTM+16 |
STOPPED | TEXT+6 |
TEXT | MAIL+10 |
TOTALS | MAIL+11 |
Name | Field # of Occurrence |
---|---|
^(0 | BLDLIST+11, PROCLIST+13 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ASGIEN | CHKTM~, CHKTM+5 |
ASGNDT | BLDLIST+4~, BLDLIST+7*, BLDLIST+8, BLDLIST+16, ERRORS+12~ |
ASGNDTE | PROCLIST+9~, PROCLIST+16*, SETERR+18 |
ASGNDTI | PROCLIST+9~, PROCLIST+14*, CONVERT+5 |
CNTR | MAIL+2~, SET+2*, SET+3 |
DFN | BLDLIST+4~, BLDLIST+7*, BLDLIST+8, BLDLIST+16, PROCLIST+9~, PROCLIST+11*, SETERR+18, SETERR+20, SETERR+21, CONVERT+5 , REASGN+4, REASGN+7, ERRORS+12~, ERRORS+20*, ERRORS+22, ERRORS+33 |
DT | BLDLIST+11, REASGN+4, REASGN+6, REASGN+7 |
DUZ | REASGN+6 |
ERR | SETERR~, SETERR+21, CONVERT+2~, CONVERT+8*, CONVERT+11, CONVERT+13, CONVERT+14, REASGN+5*, REASGN+11*, CHKTM~ , CHKTM+6*, CHKTM+9*, CHKTM+12*, CHKTM+14*, CHKTM+16*, ERRORS+21~, ERRORS+33* |
EXTPOS | SETERR+3~, SETERR+4*, SETERR+8, SETERR+14, SETERR+18, SETERR+20, SETERR+21 |
EXTTM | SETERR+3~, SETERR+5*, SETERR+8, SETERR+14, SETERR+18, SETERR+20, SETERR+21 |
FIELDS | REASGN+2~ |
FIELDS( | REASGN+6* |
LAST | SETERR+3~, SETERR+20*, SETERR+21 |
LP | ERRORS+21~, ERRORS+33* |
PAT | PROCLIST+9~, PROCLIST+12*, SETERR+18, ERRORS+21~ |
POS | PROCLIST+6~, PROCLIST+8*, PROCLIST+10, PROCLIST+19, SETERR+4, SETERR+11, REASGN+7, ERRORS+12~, ERRORS+18*, ERRORS+19 , ERRORS+20, ERRORS+22, ERRORS+29, ERRORS+33 |
POSASGN | BLDLIST+4~, BLDLIST+8*, BLDLIST+9, BLDLIST+11, BLDLIST+16, PROCLIST+6~, PROCLIST+8*, PROCLIST+10, CONVERT+11, CONVERT+15 , REASGN+4, REASGN+5 |
POSASGNZ | PROCLIST+6~, CHKTM+2~, CHKTM+5*, CHKTM+6, CHKTM+8 |
REASSIGN | CONVERT+2~, CONVERT+15 |
RES | CHKTM+2~, CHKTM+3*, CHKTM+6*, CHKTM+9*, CHKTM+12*, CHKTM+14*, CHKTM+16*, CHKQ |
RETURN | REASGN+2~, REASGN+7*, REASGN+9 |
SCCONER | REASGN+2~, REASGN+3*, REASGN+4, REASGN+7, REASGN+8 |
SCDATES | SETERR+9~ |
SCDATES("INCL" | SETERR+10* |
SCMCCNT | STRTQJOB+8~, STRTQJOB+9*, PROCLIST+20, BPERCNT+1*, BPTOTCNT+1*, BPFXCNT+1*, TOTALS+4, TOTALS+5, TOTALS+6 |
SCMCERR | SETERR+9~ |
>> SCMCFIX | CONVERT+15, HDR+2, HDR+4, TOTALS+5 |
>> SCMCPOS( | PROCLIST+19, LISTP+8 |
SCMCPROV | SETERR+9~ |
SCMCPROV(1 | SETERR+14 |
>> SCMCTM( | PROCLIST+18, LISTT+4 |
>> SCMCTM(0 | LISTP+3 |
>> SCMCTYPE | PROCLIST+17, PROCLIST+18, PROCLIST+19, TEXT+3, TEXT+4, TEXT+5 |
SSN | PROCLIST+9~, PROCLIST+13*, SETERR+18 |
STOP | STRTQJOB+8~, STRTQJOB+10* |
TITLE | ERRORS+21~, ERRORS+23*, ERRORS+24, ERRORS+25*, ERRORS+26, ERRORS+27*, ERRORS+28, ERRORS+29*, ERRORS+30, ERRORS+31* , ERRORS+32 |
TM | BLDLIST+4~, BLDLIST+14*, BLDLIST+15, BLDLIST+16, PROCLIST+6~, PROCLIST+8*, PROCLIST+10, PROCLIST+18, SETERR+5, ERRORS+12~ , ERRORS+13*, ERRORS+14*, ERRORS+17, ERRORS+18, ERRORS+19, ERRORS+20, ERRORS+22, ERRORS+27, ERRORS+33 |
TMASGN | BLDLIST+4~, BLDLIST+9*, BLDLIST+10, BLDLIST+12, CHKTM+2~, CHKTM+8*, CHKTM+9, CHKTM+11*, CHKTM+12, CHKTM+14 , CHKTM+16 |
TMASGNZ | BLDLIST+4~, BLDLIST+12*, BLDLIST+13, BLDLIST+14 |
TMPOS | BLDLIST+4~, BLDLIST+8*, BLDLIST+16 |
TMPZ | PROCLIST+9~, PROCLIST+10*, PROCLIST+11, PROCLIST+12, PROCLIST+14 |
TOT | PADTO~, PADTO+1 |
U | BLDLIST+11, BLDLIST+14, PROCLIST+11, PROCLIST+12, PROCLIST+13, PROCLIST+14, PROCLIST+20, BPERCNT+1, BPTOTCNT+1, BPFXCNT+1 , SETERR+4, SETERR+5, SETERR+14, CONVERT+7, CONVERT+8, REASGN+9, CHKTM+8, CHKTM+14, CHKTM+16, LISTT+4 , LISTP+4, LISTP+8, TOTALS+4, TOTALS+5, TOTALS+6, ERRORS+23, ERRORS+25, ERRORS+31 |
VAR | SETERR+9~, SETERR+11*, SETERR+12, LISTT+1~, LISTT+3*, LISTT+4*, LISTP+1~, LISTP+3*, LISTP+4, LISTP+7* , LISTP+8*, ERRORS+4~, PADTO~, PADTO+1* |
VAR1 | ERRORS+21~, ERRORS+22*, ERRORS+23, ERRORS+25, ERRORS+31 |
VARONE | CONVERT+2~, CONVERT+5*, CONVERT+6, CONVERT+7, CONVERT+8, CONVERT+11* |
VARTHREE | REASGN+2~, REASGN+4*, REASGN+5 |
X | SET~, SET+3 |
XMDUZ | MAIL+2~ |
XMSUB | MAIL+2~ |
XMTEST | MAIL+2~ |
XMY | MAIL+2~ |
Y | PROCLIST+9~, PROCLIST+14*, PROCLIST+16 |
ZSTOP | STRTQJOB+8~, STRTQJOB+10*, PROCLIST+8, PROCLIST+20*, TEXT+6 |