©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
SDSCOMP ;ALB/JAM/RBS - ASCD Compile list of encounters for Service Connection Review ; 3/12/07 4:36pm
Source file <SDSCOMP.m>
| Package | Total | Call Graph |
|---|---|---|
| Scheduling | 5 | $$GETOE^SDOE $$SC^SDSCAPI (AUDIT,EN)^SDSCINS EN^SDSCPRG ($$NBFP,$$NBTP,$$NCTCL)^SDSCUTL |
| VA Fileman | 4 | EN^DDIOL UPDATE^DIE $$GET1^DIQ ^DIR |
| Kernel | 3 | HOME^%ZIS ^%ZTLOAD ($$FMADD,$$FMTE)^XLFDT |
| MailMan | 1 | ^XMD |
| PCE Patient Care Encounter | 1 | $$PRIMVPRV^PXUTL1 |
| Registration | 1 | $$SITE^VASITE |
| Toolkit | 1 | $$GET^XPAR |
| Package | Total | Caller Graph |
|---|---|---|
| Scheduling | 14 | SDSC COMPILE SDSC NIGHTLY COMPILE SDSCCHK SDSCEDT SDSCINS SDSCLST SDSCMSR SDSCNSCP SDSCPRV SDSCRP1 SDSCRP2 SDSCRPT1 SDSCSSD SDSCUSR |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| OPT | ; Loop through all outpatient encounters for the specified dates.
|
|
| TASK1 | ; Start compile (scheduled compile - don't remove from queue)
|
|
| ELIG | ; Compile list of service connected eligibility codes.
|
|
| MMSG | ; Send Mail Message
|
|
| COMPILE | ; Called by option "SDSC COMPILE"
; - Compile ASCD Encounters by Date Range ; (Rated Disabilities/ICDs for Encounters) |
|
| GETDATE1 | ; Entry point for SDSC COMPILE option - Get START and END dates
; Output: ; Set var 'SDSCTDT' (loop start point) to a user selected date. |
|
| TASK | ; Start compile (one-time compile - remove from queue when complete)
|
|
| END | ; Clear all variables before exiting.
|
|
| AUTODT | ; Called by option "SDSC NIGHTLY COMPILE"
; - Compile ASCD Encounters on a Nightly Basis ; (Rated Disabilities/ICDs for Prior Day Encounters) |
|
| OPT1 | ; Check the service connected info for one encounter.
|
|
| STORE | ; Save the information for the found encounter.
|
|
| GETDATE | ; Entry point for edit or report - Get START and END dates
|
| Name | Field # of Occurrence |
|---|---|
| HOME^%ZIS | COMPILE+5 |
| ^%ZTLOAD | COMPILE+26 |
| EN^DDIOL | GETDATE+3, COMPILE+23, COMPILE+27, COMPILE+30 |
| UPDATE^DIE | STORE+12 |
| $$GET1^DIQ | OPT1+30 |
| ^DIR | GETDATE1+15, GETDATE1+26, COMPILE+22 |
| $$PRIMVPRV^PXUTL1 | OPT1+42 |
| $$GETOE^SDOE | OPT1+7 |
| $$SC^SDSCAPI | OPT1+33 |
| AUDIT^SDSCINS | MMSG+21 |
| EN^SDSCINS | OPT+9 |
| EN^SDSCPRG | OPT+15 |
| $$NBFP^SDSCUTL | OPT1+27 |
| $$NBTP^SDSCUTL | OPT1+27 |
| $$NCTCL^SDSCUTL | OPT1+25 |
| $$SITE^VASITE | COMPILE+8 |
| $$FMADD^XLFDT | AUTODT+6, COMPILE+12 |
| $$FMTE^XLFDT | GETDATE1+7, GETDATE1+12, GETDATE1+24, MMSG+2, MMSG+5 |
| ^XMD | MMSG+25 |
| $$GET^XPAR | COMPILE+9 |
| FileNo | Call Tags |
|---|---|
| ^AUPNVSIT - [#9000010] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(8 - [#8] | ELIG+5 |
| ^SCE("B" | OPT+4, OPT+5 |
| ^SDSC(409.48 - [#409.48] | GETDATE+1, OPT1+4, OPT1+45 |
| Name | Line Occurrences |
|---|---|
| ELIG | AUTODT+10, COMPILE+16 |
| END | COMPILE+14, COMPILE+23, COMPILE+24, TASK+3, TASK1+2 |
| GETDATE1 | COMPILE+14 |
| MMSG | OPT+12 |
| OPT | TASK+1, TASK1+1 |
| OPT1 | OPT+5 |
| STORE | OPT1+45, OPT1+46 |
| TASK1 | AUTODT+11 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | AUTODT+4~ |
| DIC | AUTODT+4~ |
| DIFROM | MMSG+1~ |
| DIR | GETDATE1+3~, GETDATE1+21!, COMPILE+3~, COMPILE+18! |
| DIR("?" | GETDATE1+7*, GETDATE1+13*, GETDATE1+25*, COMPILE+21* |
| DIR("A" | GETDATE1+5*, GETDATE1+23*, COMPILE+20* |
| DIR("B" | GETDATE1+12*, GETDATE1+24*, COMPILE+19* |
| DIR(0 | GETDATE1+4*, GETDATE1+22*, COMPILE+19* |
| DT | AUTODT+6, GETDATE+1, GETDATE1+4, GETDATE1+22, GETDATE1+24, COMPILE+12, STORE+4 |
| DTOUT | GETDATE1+16, GETDATE1+27, COMPILE+23, END+2! |
| DUOUT | GETDATE1+16, GETDATE1+27, COMPILE+23, END+2! |
| DUZ | MMSG+22, MMSG+23 |
| I | ELIG+1~, ELIG+5* |
| J | ELIG+1~, ELIG+5* |
| L | END+2! |
| P | END+2! |
| SDABRT | END+2! |
| SDCLIN | OPT1+1~, OPT1+21*, OPT1+25 |
| SDCNT | MMSG+1~, MMSG+20*, MMSG+21 |
| SDCST | OPT1+1~, OPT1+23* |
| SDEC | OPT1+1~, OPT1+14*, OPT1+16 |
| SDEDT | AUTODT+4~, AUTODT+8*, GETDATE+3*, GETDATE1+16*, GETDATE1+27*, GETDATE1+28*, OPT+4, MMSG+2, END+1! |
| SDERR | STORE+1~, END+1! |
| SDFILEOK | OPT1+1~, OPT1+33*, OPT1+35, OPT1+37, OPT1+38, OPT1+40, OPT1+45, OPT1+46, STORE+7 |
| SDIEN | STORE+1~, END+1! |
| SDIEN(1 | STORE+2* |
| SDLIST | ELIG+2!, END+2! |
| SDLIST( | ELIG+5*, OPT1+16 |
| SDOE | OPT+2~, OPT+5*, OPT1+4, OPT1+7, OPT1+27, OPT1+33, OPT1+45, STORE+2, STORE+3 |
| SDOEDAT | OPT1+1~, OPT1+7*, OPT1+8, OPT1+10, OPT1+12, OPT1+14, OPT1+18, OPT1+21, OPT1+23, OPT1+29 , STORE+9 |
| SDOEDT | OPT+2~, OPT+4*, OPT+5, STORE+5 |
| SDOEX | END+1! |
| SDOSC | OPT1+1~, OPT1+30*, OPT1+31, OPT1+46, STORE+11 |
| SDPAT | OPT1+1~, OPT1+18*, OPT1+33, STORE+8 |
| SDPRV | OPT1+1~, OPT1+42*, STORE+6 |
| SDRD | END+1! |
| SDRDIEN | END+1! |
| SDSC | STORE+1~, END+1! |
| SDSC( | STORE+3*, STORE+4*, STORE+5*, STORE+6*, STORE+7*, STORE+8*, STORE+9*, STORE+10*, STORE+11* |
| SDSCBAD | OPT+1~, OPT+3*, OPT1+8*, OPT1+14*, OPT1+18*, OPT1+21*, OPT1+23*, OPT1+29*, MMSG+16 |
| SDSCBDT | GETDATE+1*, GETDATE+3, GETDATE1+4, GETDATE1+7, GETDATE1+11, GETDATE1+12, GETDATE1+19*, GETDATE1+22, COMPILE+3~, COMPILE+7* , COMPILE+12*, MMSG+4, MMSG+5, END+1! |
| SDSCDAY | COMPILE+4~, COMPILE+7*, COMPILE+9*, COMPILE+11*, COMPILE+12 |
| SDSCEDT | GETDATE+1*, GETDATE1+11, GETDATE1+24, COMPILE+3~, COMPILE+7*, MMSG+4, MMSG+5, END+1! |
| SDSCEXS | OPT+1~, OPT+3*, OPT1+4*, MMSG+17 |
| SDSCINS | OPT+2~, OPT+3*, OPT+9, MMSG+7, MMSG+8 |
| SDSCITE | COMPILE+4~, COMPILE+8*, COMPILE+9 |
| SDSCMAP1 | OPT+2~, OPT+3*, OPT1+38*, MMSG+9, MMSG+11 |
| SDSCMAP2 | OPT+2~, OPT+3*, OPT1+39*, MMSG+10, MMSG+11 |
| SDSCNBL | OPT+1~, OPT+3*, OPT1+12*, OPT1+27*, OPT1+31*, MMSG+13 |
| SDSCNCT | OPT+1~, OPT+3*, OPT1+25*, MMSG+14 |
| SDSCNDX | OPT+1~, OPT+3*, OPT1+35*, MMSG+15 |
| SDSCNSC | OPT+1~, OPT+3*, OPT1+16*, OPT1+40*, MMSG+12 |
| SDSCSVC | OPT+1~, OPT+3*, OPT+9, OPT1+44*, MMSG+7, MMSG+11 |
| SDSCTDT | AUTODT+4~, AUTODT+6*, AUTODT+8, GETDATE+3*, GETDATE1+16*, GETDATE1+17*, GETDATE1+19, GETDATE1+27*, COMPILE+14, OPT+4 , MMSG+2, END+1! |
| SDSCTOT | OPT+1~, OPT+3*, OPT1+2*, OPT1+10*, MMSG+19 |
| SDTEXT | MMSG+1~, MMSG+21 |
| SDTEXT( | MMSG+10* |
| SDTEXT(1 | MMSG+2* |
| SDTEXT(10 | MMSG+14* |
| SDTEXT(11 | MMSG+15* |
| SDTEXT(12 | MMSG+16* |
| SDTEXT(13 | MMSG+17* |
| SDTEXT(14 | MMSG+18* |
| SDTEXT(15 | MMSG+19* |
| SDTEXT(2 | MMSG+3*, MMSG+4*, MMSG+5* |
| SDTEXT(3 | MMSG+6* |
| SDTEXT(4 | MMSG+7* |
| SDTEXT(5 | MMSG+8* |
| SDTEXT(6 | MMSG+9* |
| SDTEXT(7 | MMSG+11* |
| SDTEXT(8 | MMSG+12* |
| SDTEXT(9 | MMSG+13* |
| SDV0 | OPT1+1~, OPT1+29*, OPT1+30, OPT1+42 |
| SDVBA | END+2! |
| SDVBAI | END+2! |
| U | COMPILE+8, OPT1+10, OPT1+12, OPT1+14, OPT1+18, OPT1+21, OPT1+23, OPT1+29, OPT1+45, OPT1+46 , STORE+7, STORE+9 |
| X | GETDATE1+3~, COMPILE+3~, END+2! |
| X1 | GETDATE1+3~ |
| X2 | GETDATE1+3~ |
| XMDUN | MMSG+1~ |
| XMDUZ | MMSG+1~, MMSG+23* |
| XMSUB | MMSG+1~, MMSG+24* |
| XMTEXT | MMSG+1~, MMSG+24* |
| XMY | MMSG+1~ |
| XMY("G.SDSC N | IGHTLY TALLY" , MMSG+23* |
| XMZ | MMSG+1~ |
| XMZ( | MMSG+22*, MMSG+23* |
| Y | GETDATE1+3~, GETDATE1+17, GETDATE1+28, COMPILE+3~, COMPILE+24, END+2! |
| ZTDESC | COMPILE+3~, COMPILE+25* |
| ZTIO | COMPILE+3~, COMPILE+25* |
| >> ZTQUEUED | TASK+2 |
| >> ZTREQ | TASK+2* |
| ZTRTN | COMPILE+3~, COMPILE+25* |
| ZTSAVE | COMPILE+3~ |
| ZTSAVE("*" | COMPILE+25* |
| ZTSK | COMPILE+27, COMPILE+28! |