SCRPW72 ;BP-CIOFO/KEITH,ESW - Clinic appointment availability extract (cont.) ; 5/23/03 12:16pm
Source file <SCRPW72.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SCL | ;Select clinics for detail
|
|
| VCP(Y) | ;Validate credit pair
|
|
| SORT(SDSORT) | ;Gather sort values for detailed report
|
|
| CL | ;Evaluate list of clinics
|
|
| STOP | ;Check for stop task request
|
|
| CNAME(SC) | ;Massage clinic name
|
|
| ADDL(SDZ) | ;Format additional data
|
|
| SCP | ;Get credit pairs for detail
|
|
| START | ;Gather data for printed report
|
|
| TIME(SDBEG,SDEND) | ;Calculate length of run time
|
|
| ARRSET(SDCP,SC,SDI) | ;Set daily counts into array
|
|
| DIV(SDIV) | ;Evaluate division
|
|
| ORD | ;Build list to order clinic output
|
|
| CP | ;Evaluate list of credit pairs
|
|
| EXTRACT | ;Gather data for extract
|
|
| CA(SORT) | ;Evaluate list of clinics for selected patient
|
|
| OE(SDBDT,SDEDT,MAX,SDEX) | ;Count clinic workload
|
| Name | Field # of Occurrence |
|---|---|
| ^%DTC | START+11, OE+23, EXTRACT+6 |
| $$S^%ZTLOAD | STOP+1 |
| ^DIC | SCL+4 |
| WAIT^DICD | START+2 |
| ^DIR | SCP+8 |
| END^SCRPW50 | START+26 |
| EXXM^SCRPW70 | EXTRACT+35, EXTRACT+38 |
| TXXM^SCRPW70 | EXTRACT+21 |
| $$CLINIC^SCRPW71 | START+20, CA+13, CL+6, CP+6, EXTRACT+14 |
| $$CPAIR^SCRPW71 | OE+15, CA+9, CP+4 |
| $$DIV^SCRPW71 | OE+19, CA+8, CL+8 |
| ARRINI^SCRPW71 | OE+20 |
| INIT^SCRPW71 | START+10, EXTRACT+4 |
| PRT^SCRPW73 | START+28, EXTRACT+35, EXTRACT+38 |
| XMTX^SCRPW73 | EXTRACT+27, EXTRACT+28, EXTRACT+29, EXTRACT+30, EXTRACT+31, EXTRACT+32, EXTRACT+33, EXTRACT+34 |
| EXIT^SCRPW74 | START+13, START+21, START+24, START+29, EXTRACT+39 |
| NAVA^SCRPW75 | START+23, EXTRACT+18 |
| HINI^SCRPW76 | START+5, EXTRACT+7 |
| FOOT^SCRPW77 | START+5, EXTRACT+7 |
| $$GETOE^SDOE | OE+10 |
| $$HTE^XLFDT | EXTRACT+25 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^SC - [#44] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(40.7 - [#40.7] | VCP+4, VCP+6 |
| ^DPT - [#2] | OE+12, CA+4, CA+6 |
| ^SC - [#44] | START+17, START+19, ORD+4, OE+14, CA+6, CL+4, CP+2, CP+3, CNAME+3, EXTRACT+13 |
| ^SCE("B" | OE+7, OE+8 |
| ^TMP( | START+9! |
| ^TMP("SD" | START+6!, START+22, ORD+1, ORD+2, ORD+3, OE+20, OE+21*, OE+22*, ARRSET+6, ARRSET+9* , CL+9*, EXTRACT+5!, EXTRACT+17 |
| ^TMP("SDIP" | CA+12* |
| ^TMP("SDIPLST" | CA+12* |
| ^TMP("SDORD" | CA+12* |
| ^TMP("SDPAT" | CA+2 |
| ^TMP("SDPLIST" | START+7!, CL+5*, CP+5* |
| ^TMP("SDS" | START+6!, ORD+5*, EXTRACT+5! |
| ^TMP("SDTMP" | START+6!, EXTRACT+5! |
| ^TMP("SDTOT" | START+6! |
| ^TMP("SDXM" | EXTRACT+5!, EXTRACT+21!, EXTRACT+37! |
| Name | Line Occurrences |
|---|---|
| $$DIV | START+19, OE+13, CA+6, CL+4, CP+3 |
| $$TIME | EXTRACT+24 |
| $$VCP | SCP+10 |
| @( | START+16, SORT+9 |
| ARRSET | OE+24 |
| CA | START+15 |
| OE | START+12, EXTRACT+10 |
| ORD | START+25, EXTRACT+21 |
| STOP | START+18, OE+9, CA+5, CL+3 |
| Name | Field # of Occurrence |
|---|---|
| ^( | CA+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CC | START+9~* |
| DFN | OE+5~, OE+11*, OE+12, CA+1~, CA+2*, CA+4, CA+6, CA+12 |
| DIC | SCL+1~, SCL+2* |
| DIC("A" | SCL+2* |
| DIC("S" | SCL+2* |
| DIC(0 | SCL+2* |
| DIR | SCP+1~ |
| DIR("?" | SCP+3*, SCP+4*, SCP+5*, SCP+6* |
| DIR("A" | SCP+2* |
| DIR(0 | SCP+2* |
| DT | START+4, EXTRACT+4 |
| >> DTOUT | SCL+4, SCP+8 |
| >> DUOUT | SCL+4, SCP+8 |
| IOM | START+3, EXTRACT+2 |
| IOST | START+2, START+26 |
| MAX | START+1~, START+11*, START+12, START+20, OE~, OE+20, CA+13, CL+6, CP+6, EXTRACT+2~ , EXTRACT+6*, EXTRACT+10, EXTRACT+14 |
| SC | START+1~, START+17*, START+19, START+20, ORD+3*, ORD+4, ORD+5, OE+13*, OE+14, OE+20 , OE+22, OE+24, ARRSET~, ARRSET+6, ARRSET+9, CA+6*, CA+12, CA+13, CL+4*, CL+5 , CL+6, CP+1~*, CP+2*, CP+3, CP+5, CP+6, CNAME~, CNAME+3, EXTRACT+1~, EXTRACT+13* , EXTRACT+14 |
| SC0 | START+19*, OE+14*, OE+15, OE+17, OE+19, CA+1~, CA+6*, CA+7, CA+8, CA+9 , CA+11, CL+1~, CL+4*, CL+8, CP+1~, CP+3*, CP+4, EXTRACT+13* |
| SCNA | START+1~, ORD+4*, ORD+5, EXTRACT+1~ |
| SDAY | OE+5~, OE+23*, OE+24 |
| SDBDT | START+4, START+11, START+12, START+20, START+23, OE~, OE+6, OE+23, CA+3, CA+13 , CL+6, CP+6, EXTRACT+6, EXTRACT+10, EXTRACT+14, EXTRACT+18 |
| SDBEG | EXTRACT+1~, EXTRACT+4*, EXTRACT+24, EXTRACT+25*, EXTRACT+30, TIME~, TIME+5, TIME+6* |
| SDCCP | CP+1~, CP+4 |
| SDCNAM | CA+1~, CL+1~, CL+2*, CL+4, CL+9 |
| >> SDCOL | START+10*, EXTRACT+4* |
| SDCP | START+1~, ORD+2*, ORD+3, ORD+5, OE+5~, OE+15, OE+18, OE+20, OE+21, OE+22 , OE+24, ARRSET~, ARRSET+6, ARRSET+9, CA+1~, CA+9, CA+10, CA+12, EXTRACT+1~ |
| SDCT | OE+5~, OE+6*, OE+9* |
| >> SDDIV | DIV+1 |
| >> SDDIV( | DIV+1 |
| SDDT | CA+3~*, CA+4*, CA+6 |
| SDEDT | START+11, START+12, START+20, START+23, OE~, OE+7, CA+4, CA+13, CL+6, CP+6 , EXTRACT+6, EXTRACT+10, EXTRACT+14, EXTRACT+18 |
| SDEND | EXTRACT+1~, EXTRACT+24*, EXTRACT+25*, EXTRACT+31, TIME~, TIME+5*, TIME+6 |
| SDEX | START+23, OE~, OE+16 |
| SDEXDT | EXTRACT+2~, EXTRACT+4* |
| SDFMT | START+14, START+17, START+20, OE+23, CA+13, CL+6, CP+6, EXTRACT+1~, EXTRACT+4*, EXTRACT+14 , EXTRACT+24* |
| >> SDFMTS | START+14, START+17 |
| SDFOOT | START+1~, START+5, EXTRACT+1~, EXTRACT+7 |
| SDI | START+1~, START+3*, START+18*, ARRSET~, ARRSET+5, CA+1*, CA+5*, CL+1*, CL+3*, ADDL+3~ , ADDL+4*, EXTRACT+1~, EXTRACT+3*, EXTRACT+34*, EXTRACT+36*, EXTRACT+38 |
| SDIOM | START+1~, START+3*, START+4*, START+10, EXTRACT+1~, EXTRACT+2* |
| SDIV | ORD+1*, ORD+2, ORD+3, OE+19*, OE+20, OE+21, OE+22, ARRSET+6, ARRSET+9, DIV~ , DIV+1, CA+1~, CA+8*, CA+12, CL+1~, CL+8*, CL+9 |
| >> SDJN | CA+2 |
| >> SDMD | START+22*, EXTRACT+17* |
| SDOE | OE+5~, OE+8*, OE+10 |
| SDOE0 | OE+5~, OE+10*, OE+11, OE+13 |
| SDOUT | START+1~, START+3*, START+12, START+13, START+17, START+18, START+21, START+24, START+27, ORD+1 , ORD+2, ORD+3, OE+7, OE+8, OE+9, CA+5, CL+2, CL+3, CP+2, SCL+1* , SCL+3, SCL+4*, SCP+1*, SCP+7, SCP+8*, STOP+1*, EXTRACT+1~, EXTRACT+4* |
| SDP | ARRSET+4~, ARRSET+5*, ARRSET+6, ARRSET+9 |
| >> SDPAGE | START+28* |
| SDPAST | START+1~, START+4*, START+10, START+12, START+20, START+23, OE+20, CA+13, CL+6, CP+6 , EXTRACT+10, EXTRACT+14, EXTRACT+18, EXTRACT+26, EXTRACT+36 |
| >> SDPAT | CA+2 |
| >> SDPBDT | EXTRACT+29 |
| >> SDPEDT | EXTRACT+29 |
| SDPNAME | CA+1~, CA+2*, CA+12 |
| SDQUIT | OE+5~, OE+6*, OE+16*, OE+17*, OE+18*, SCL+1~*, SCL+3, SCL+5*, SCP+1~*, SCP+7 , SCP+9* |
| >> SDREPORT | START+27*, START+28 |
| >> SDREPORT( | START+27, START+28, EXTRACT+3* |
| >> SDREPORT(4 | START+7, CL+5, CP+5 |
| >> SDREPORT(5 | START+8, START+12, START+15, CA+12 |
| SDS | ARRSET+4~, ARRSET+5*, ARRSET+6, ARRSET+9 |
| SDSORT | START+15, START+16, OE+16, OE+17, OE+18, SORT~, SORT+7, SORT+8, SORT+9 |
| SDSORT( | OE+17, OE+18, CL+2, CL+4, CP+4, SCL+6*, SCP+11* |
| SDSX | SORT+7~*, SORT+9 |
| SDT | OE+5~, OE+6*, OE+7*, OE+8, OE+23 |
| SDTIME | EXTRACT+1~, EXTRACT+24*, EXTRACT+32 |
| SDX | START+20*, ARRSET+4~, ARRSET+6*, ARRSET+7*, ARRSET+8*, ARRSET+9, CA+13*, CL+6*, CL+7, CL+9 , CP+6*, CNAME+1~, CNAME+3*, CNAME+5*, CNAME+7*, CNAME+8, ADDL+3~*, ADDL+4*, ADDL+5, EXTRACT+1~ , EXTRACT+14*, EXTRACT+27* |
| SDXM | START+1~, EXTRACT+1~, EXTRACT+27*, EXTRACT+35, EXTRACT+37*, EXTRACT+38 |
| SDY | EXTRACT+1~, EXTRACT+26*, EXTRACT+27 |
| SDZ | ADDL~, ADDL+4 |
| SORT | CA~, CA+10, CA+11 |
| SORT( | CA+10, CA+11 |
| U | START+19, ORD+4, OE+10, OE+11, OE+12, OE+13, OE+14, OE+15, OE+17, OE+21 , OE+22, ARRSET+6, ARRSET+9, CA+2, CA+6, CA+7, CA+11, CA+12, CL+4, CL+7 , CL+9, CP+3, CNAME+3, SCL+6, ADDL+4 |
| X | START+1~, START+11, OE+23, SCL+5, SCP+9, EXTRACT+2~, EXTRACT+6, TIME+4~, TIME+6*, TIME+7* |
| X1 | START+1~, START+11*, OE+23*, EXTRACT+2~, EXTRACT+6* |
| X2 | START+1~, START+11*, OE+23*, EXTRACT+2~, EXTRACT+6* |
| XX | CA+1~, CA+2* |
| Y | SCL+6, SCP+10, SCP+11, VCP~, VCP+3, VCP+4, VCP+5, VCP+6, TIME+4~ |
| Y("D" | TIME+6*, TIME+8*, TIME+12 |
| Y("H" | TIME+7*, TIME+9*, TIME+12 |
| Y("M" | TIME+7*, TIME+10*, TIME+12 |
| Y("S" | TIME+7*, TIME+11*, TIME+12 |
| >> ZTQUEUED | STOP+1 |
| >> ZTSK | EXTRACT+33 |
| >> ZTSTOP | STOP+1* |