©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
SDOECPT ;ALB/MJK - ACRP CPT APIs For An Encounter ;8/12/96
Source file <SDOECPT.m>
| Package | Total | Call Graph |
|---|---|---|
| Scheduling | 3 | $$VALOE^SDOEOE ($$OLD,$$VIEN)^SDOEUT BLD^SDQVAL |
| DRG Grouper | 1 | $$CPT^ICPTCOD |
| PCE Patient Care Encounter | 1 | ($$CPT,CPTARR)^PXAPIOE |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| VALCPT(SDCPTID,SDERR) | ; -- validate CPT input
|
|
| CPTQ | ||
| GETCPTG | ; -- goto entry point
; -- do validation checks |
|
| OLDCPT(SDOE) | ; -- at least one cpt for OLD encounter?
|
|
| OLDCPTS(SDOE,SDARY) | ; -- get cpt's for OLD encounter
|
|
| FINDCPT(SDOE,SDCPTID,SDERR) | ; -- SDOE FIND PROCEDURE
; API ID: 71 |
|
| CPT(SDOE,SDERR) | ; -- SDOE ASSIGNED A PROCEDURE
; API ID: 65 |
|
| GETCPT(SDOE,SDCPT,SDERR) | ; -- SDOE GET PROCEDURES
; API ID: 61 |
|
| FINDCPTQ | ||
| COUNT(SDOE,SDZARY) | ; -- count/find cpt's for OLD encounter
|
|
| GETCPTQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(40.7 - [#40.7] | COUNT+15 |
| ^SCE - [#409.68] | COUNT+2 |
| ^SDV - [#409.5] | COUNT+8, COUNT+9, COUNT+10 |
| ^SDV("ADT" | COUNT+6 |
| Name | Line Occurrences |
|---|---|
| $$OLDCPT | CPT+9 |
| $$VALCPT | FINDCPT+8 |
| COUNT | OLDCPTS+2 |
| CPTQ | CPT+8, CPT+9 |
| FINDCPTQ | FINDCPT+8 |
| GETCPT | FINDCPT+11 |
| GETCPTQ | GETCPTG+2, GETCPTG+3 |
| OLDCPTS | GETCPTG+3, OLDCPT+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| I | FINDCPT+4~, FINDCPT+12*, FINDCPT+13*, COUNT+1~, COUNT+17* |
| MODNODE | GETCPTG+6~, GETCPTG+8*, GETCPTG+11* |
| SDARY | OLDCPTS~, OLDCPTS+8, OLDCPTS+9 |
| SDATE | COUNT+1~, COUNT+4*, COUNT+6 |
| SDCL | COUNT+1~, COUNT+5*, COUNT+15 |
| SDCNT | OLDCPTS+1~, OLDCPTS+3*, OLDCPTS+5*, OLDCPTS+9 |
| SDCPT | GETCPT~, GETCPTG+3, GETCPTG+7, GETCPTG+11 |
| SDCPTID | FINDCPT~, FINDCPT+8, FINDCPT+13, VALCPT~, VALCPT+4, VALCPT+8, VALCPT+9 |
| SDCPTS | FINDCPT+4~, FINDCPT+5*, FINDCPT+11 |
| SDCPTS( | FINDCPT+13 |
| SDERR | CPT~, CPT+8, CPT+11, GETCPT~, GETCPTG+2, GETCPTG+7, FINDCPT~, FINDCPT+8, FINDCPT+11, VALCPT~ , VALCPT+10 |
| SDFN | COUNT+1~, COUNT+3*, COUNT+6 |
| SDIEN | OLDCPTS+1~, OLDCPTS+3*, OLDCPTS+4*, OLDCPTS+5, OLDCPTS+6, OLDCPTS+8 |
| SDIN | VALCPT+7~, VALCPT+10 |
| SDIN("ID" | VALCPT+8* |
| SDOE | CPT~, CPT+8, CPT+9, CPT+11, GETCPT~, GETCPTG+2, GETCPTG+3, GETCPTG+7, FINDCPT~, FINDCPT+11 , OLDCPT~, OLDCPT+2, OLDCPTS~, OLDCPTS+2, COUNT~, COUNT+2 |
| SDOE0 | COUNT+1~, COUNT+2*, COUNT+3, COUNT+4, COUNT+5 |
| SDOK | CPT+4~, CPT+5*, CPT+9*, CPT+11*, CPTQ, FINDCPT+4~, FINDCPT+8*, FINDCPT+12*, FINDCPT+13*, FINDCPTQ |
| SDOUT | VALCPT+7~, VALCPT+10 |
| SDOUT("ID" | VALCPT+9* |
| SDPR | COUNT+1~, COUNT+10*, COUNT+17 |
| SDPROC | COUNT+1~, COUNT+17* |
| SDSC | COUNT+1~, COUNT+8*, COUNT+9, COUNT+10 |
| SDSC0 | COUNT+1~, COUNT+9*, COUNT+15 |
| SDT | COUNT+1~, COUNT+6*, COUNT+8, COUNT+9, COUNT+10 |
| SDXARY | OLDCPT+1~, OLDCPT+3 |
| SDYARY | OLDCPTS+1~ |
| SDYARY( | OLDCPTS+4, OLDCPTS+5 |
| SDZARY | COUNT~, COUNT+17 |
| U | OLDCPTS+6, OLDCPTS+7, COUNT+3, COUNT+5, COUNT+15, COUNT+17 |
| X | OLDCPTS+1~, OLDCPTS+5*, OLDCPTS+7 |
| Y | OLDCPTS+1~, OLDCPTS+6*, OLDCPTS+7*, OLDCPTS+8 |