SDECINIT ;ALB/SAT - VISTA SCHEDULING RPCS ;JAN 15, 2016
Source file <SDECINIT.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PRE | ;
|
|
| POST | ;
|
|
| SCH | ;schedule options
|
|
| SCHTSK(OPTNAME,QTIME,QFREQ) | ; Schedule Option
|
|
| ONE | ;One time queue setup for SDEC IDX REFRESH
|
|
| RPC | ;register SDEC rpcs
|
|
| RESCLIN | ;populate SDEC RESOURCE with clinics from file 44
|
|
| RESPRVA | ;called from RSCLIN
|
|
| RESUPRV1 | ;add privileged provider to SDEC RESOURCE USER
|
|
| SDRTYP(SDRTYP) | ;build array of resource types
|
|
| RESAV | ;add AVAILABLE and UNAVAILABLE to SDEC ACCESS TYPE file
|
|
| AVAILADD(SDTXT) | ;add to SDEC ACCESS TYPE file
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZTLOAD | ONE+6 |
| ^DIC | SCHTSK+6 |
| UPDATE^DIE | SCHTSK+15, RESUPRV1+9, AVAILADD+10 |
| CLEAN^DILF | SCHTSK+17 |
| $$GET1^DIQ | RESPRVA+6, RESPRVA+11, RESPRVA+13, SDRTYP+9 |
| RESCLIN1^SDEC01B | RESCLIN+11 |
| RESDGA^SDEC01B | RESCLIN+9 |
| RESPRV1^SDEC01B | RESPRVA+8, RESPRVA+16 |
| INDEX^SDECINI1 | POST+3 |
| CHK^SDECINI2 | POST+2 |
| SDAPPT^SDECINI2 | POST+8 |
| REGNMSP^SDECRPC | RPC+5, RPC+6, RPC+7, RPC+8, RPC+9, RPC+10, RPC+11, RPC+12, RPC+13, RPC+14 |
| CLEAR^SDECU | RESCLIN+8 |
| $$FMADD^XLFDT | ONE+4 |
| $$FMTE^XLFDT | SCH+2, RPC+2, RESCLIN+4, RESAV+2 |
| $$NOW^XLFDT | SCH+2, SCHTSK+3, ONE+4, RPC+2, RESCLIN+4, RESPRVA+14, RESAV+2 |
| $$UP^XLFSTR | SCH+10, RESPRVA+6, RESPRVA+11 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DIC(19 - [#19] | Classic Fileman Calls |
| ^VA(200 - [#200] | GET1^DIQ |
| ^SDEC(409.831 - [#409.831] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^SC - [#44] | RESCLIN+10, RESPRVA+4, RESPRVA+5, RESPRVA+9, RESPRVA+10 |
| ^SDEC(409.823 - [#409.823] | RESAV+5, RESAV+6, AVAILADD+2 |
| ^SDEC(409.831 - [#409.831] | SDRTYP+8 |
| ^SDEC(409.833 - [#409.833] | RESUPRV1+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DIC | SCHTSK+1~, SCHTSK+5* |
| DIC(0 | SCHTSK+5* |
| FDA | SCHTSK+1~ |
| FDA( | SCHTSK+8*, SCHTSK+12*, SCHTSK+13* |
| NOW | SCH+1~, SCH+9*, SCH+10 |
| OPTNAME | SCHTSK~, SCHTSK+2, SCHTSK+5, SCHTSK+10, SCHTSK+16 |
| QFREQ | SCHTSK~, SCHTSK+4*, SCHTSK+13 |
| QTIME | SCH+1~, SCH+6*, SCH+7, SCHTSK~, SCHTSK+3*, SCHTSK+12 |
| SCHNM | SCHTSK+1~, SCHTSK+6*, SCHTSK+8, SCHTSK+9 |
| SDAV | AVAILADD+1~, AVAILADD+2*, AVAILADD+3 |
| SDCL | RESCLIN+1~, RESCLIN+10*, RESCLIN+11, RESPRVA+4, RESPRVA+5, RESPRVA+8, RESPRVA+9, RESPRVA+10, RESPRVA+16 |
| SDCLN | RESCLIN+1~ |
| SDDATA | RESCLIN+1~ |
| SDF | RESUPRV1+1~, RESUPRV1+2* |
| SDFDA | RESCLIN+1~, RESUPRV1+1~, RESUPRV1+6*, RESUPRV1+7, RESUPRV1+8, AVAILADD+1~ |
| SDFDA( | RESUPRV1+6, AVAILADD+4*, AVAILADD+5*, AVAILADD+6*, AVAILADD+7*, AVAILADD+8*, AVAILADD+9* |
| SDFIELDS | RESCLIN+1~ |
| SDFOUND | RESCLIN+1~, RESPRVA+2~, RESPRVA+3* |
| SDI | RESCLIN+1~, SDRTYP+6~, SDRTYP+8*, SDRTYP+9, SDRTYP+10 |
| SDIEN | SCHTSK+1~*, RESCLIN+1~, RESUPRV1+1~ |
| SDIN | RESCLIN+2~ |
| >> SDJ | RESPRVA+4*, RESPRVA+5, RESPRVA+9*, RESPRVA+10, RESPRVA+13 |
| SDMSG | RESCLIN+1~, RESUPRV1+1~ |
| SDNOD | RESUPRV1+1~ |
| >> SDPRV | RESPRVA+5*, RESPRVA+6, RESPRVA+8, RESPRVA+10*, RESPRVA+11, RESPRVA+16, RESUPRV1+3, RESUPRV1+8 |
| >> SDPRVN | RESPRVA+6*, RESPRVA+7, RESPRVA+8, RESPRVA+11*, RESPRVA+12, RESPRVA+16 |
| SDRES11 | RESCLIN+1~ |
| SDRESH | RESCLIN+1~, RESCLIN+3*, RESCLIN+11, RESPRVA+17, RESUPRV1+3, RESUPRV1+7 |
| SDRN | RESCLIN+2~ |
| SDRTYP | SDRTYP~, SDRTYP+7! |
| SDRTYP( | SDRTYP+10* |
| SDRU | RESUPRV1+1~, RESUPRV1+4*, RESUPRV1+6 |
| SDTS | RESCLIN+1~ |
| SDTXT | AVAILADD~, AVAILADD+2, AVAILADD+4, AVAILADD+5, AVAILADD+6, AVAILADD+7, AVAILADD+8 |
| SDTYP | SDRTYP+6~, SDRTYP+9*, SDRTYP+10 |
| TD | RESPRVA+2~, RESPRVA+13*, RESPRVA+14 |
| U | RESPRVA+5, RESPRVA+10 |
| X | SCHTSK+1~, SCHTSK+5*, SCHTSK+8* |
| >> XPDQUES("POS1 | NIGHTJOB" , SCH+6 |
| >> XPDQUES("POS2 | NOWJOB" , SCH+9 |
| Y | SCH+1~, SCH+2*, SCH+4, SCHTSK+1~, SCHTSK+6, RPC+1~, RPC+2*, RPC+4, RESCLIN+1~, RESCLIN+4* , RESCLIN+6, RESAV+1~, RESAV+2*, RESAV+4 |
| ZTDESC | ONE+1~, ONE+5* |
| ZTDTH | ONE+1~, ONE+4* |
| ZTIO | ONE+1~, ONE+3* |
| ZTRTN | ONE+1~, ONE+2* |