AMERBSDU ; IHS/OIT/SCR - PRIMARY ROUTINE FOR INTERFACE WITH PIMS OUTSIDE OF AMER NAMESPACE
Source file <AMERBSDU.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| PAD(D,L) | ;localcopy of BSDU2^PAD ; -- D=data L=length | |
| GETAPPS(AMERDFN,AMERTIME,AMERARR) | ||
| APPNTMNT(AMERDFN,AMERTALK,AMERTIME,AMERARR) | ; EP FROM AMER1 and ERCHECKIN ; called by AMER1 to display scheduled appoitments for all clinics from day of admission forward ; called by ERCHEKIN to populate array of scheduled appointments for further refinement | |
| CANCEL(AMERDFN,AMERTIME) | ;EP FROM | |
| ERCHCKIN(AMERDFN,AMERTIME) | ; EP FROM AMER0 after admission information has been collected ; INPUT: AMERDFN - PATIENT IEN OF PATIENT BEING CHECKED INTO SCHEDULING ; AMERTIME - TIME OF ADMISSION COLLECTED FROM ERS INTERFACE | 
| Name | Field # of Occurrence | 
|---|---|
| ^%DT | GETAPPS+24, ERCHCKIN+20, ERCHCKIN+27 | 
| NOW^%DTC | CANCEL+22 | 
| %XY^%RCR | APPNTMNT+36 | 
| APPNTMNT^AMERBSDU | GETAPPS+15 | 
| EN^AMERCLP | ERCHCKIN+31, ERCHCKIN+47 | 
| $$SCHEDULD^AMERPCC | ERCHCKIN+28 | 
| $$VISIT^AMERPCC | ERCHCKIN+45 | 
| RTNGSLP^AMERVSIT | ERCHCKIN+32, ERCHCKIN+48 | 
| $$CANCEL^BSDAPI | CANCEL+29 | 
| $$CI^BSDU2 | GETAPPS+27 | 
| $$OI^BSDU2 | APPNTMNT+25 | 
| $$SCIEN^BSDU2 | GETAPPS+25 | 
| EN^DDIOL | APPNTMNT+31, GETAPPS+30, GETAPPS+31, ERCHCKIN+16, ERCHCKIN+17, ERCHCKIN+30, ERCHCKIN+41, ERCHCKIN+52, CANCEL+30 | 
| ^DIC | CANCEL+26 | 
| $$GET1^DIQ | APPNTMNT+24 | 
| ^DIR | ERCHCKIN+24 | 
| $$FMTE^XLFDT | APPNTMNT+21, APPNTMNT+24 | 
| $$REPEAT^XLFSTR | PAD+2 | 
| FileNo | Call Tags | 
|---|---|
| ^SD(409.2 - [#409.2] | Classic Fileman Calls | 
| ^SC - [#44] | GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^AMER(2.5 - [#9009082.5] | GETAPPS+20, CANCEL+18 | 
| ^DPT - [#2] | APPNTMNT+14, APPNTMNT+15 | 
| Name | Line Occurrences | 
|---|---|
| $$PAD | APPNTMNT+25 | 
| GETAPPS | ERCHCKIN+8 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| % | CANCEL+16~, CANCEL+23 | 
| %DT | GETAPPS+24*!, ERCHCKIN+27*! | 
| %X | APPNTMNT+34~, APPNTMNT+35* | 
| %Y | APPNTMNT+34~, APPNTMNT+35* | 
| AMERANS | ERCHCKIN+5~, ERCHCKIN+25*, ERCHCKIN+26, ERCHCKIN+40 | 
| AMERARR | APPNTMNT~, APPNTMNT+33, APPNTMNT+35, GETAPPS~, GETAPPS+15, ERCHCKIN+5~, ERCHCKIN+7*, ERCHCKIN+8 | 
| AMERARR( | GETAPPS+18, GETAPPS+19, GETAPPS+23, GETAPPS+27*, GETAPPS+31, GETAPPS+35*, ERCHCKIN+13, ERCHCKIN+15, ERCHCKIN+16, ERCHCKIN+17 , ERCHCKIN+19, ERCHCKIN+27, ERCHCKIN+30, ERCHCKIN+41 | 
| AMERARR(0 | ERCHCKIN+10 | 
| AMERARR(2 | GETAPPS+16 | 
| AMERBSDR | CANCEL+16~, CANCEL+29 | 
| AMERBSDR("ADT" | CANCEL+21* | 
| AMERBSDR("CDT" | CANCEL+23* | 
| AMERBSDR("CLN" | CANCEL+19* | 
| AMERBSDR("CR" | CANCEL+27* | 
| AMERBSDR("NOT" | CANCEL+28* | 
| AMERBSDR("PAT" | CANCEL+17* | 
| AMERBSDR("TYP" | CANCEL+20* | 
| AMERBSDR("USR" | CANCEL+24* | 
| >> AMERCLN | CANCEL+18*, CANCEL+19 | 
| AMERCNT | APPNTMNT+11~, APPNTMNT+13*, APPNTMNT+20*, APPNTMNT+21, APPNTMNT+23*, APPNTMNT+25, APPNTMNT+26, APPNTMNT+27, APPNTMNT+29, GETAPPS+13~ , GETAPPS+14*, GETAPPS+17*, GETAPPS+18*, GETAPPS+19, GETAPPS+23, GETAPPS+27, GETAPPS+31, GETAPPS+33, GETAPPS+35 | 
| AMERCNT2 | GETAPPS+13~, GETAPPS+17*, GETAPPS+29* | 
| AMERDFN | APPNTMNT~, APPNTMNT+14, APPNTMNT+15, APPNTMNT+25, GETAPPS~, GETAPPS+15, GETAPPS+25, GETAPPS+27, ERCHCKIN~, ERCHCKIN+8 , ERCHCKIN+28, ERCHCKIN+31, ERCHCKIN+32, ERCHCKIN+45, ERCHCKIN+47, ERCHCKIN+48, CANCEL~, CANCEL+17 | 
| AMERDONE | ERCHCKIN+5~, ERCHCKIN+6* | 
| AMERDT | APPNTMNT+11~, APPNTMNT+13*, APPNTMNT+14*, APPNTMNT+15, APPNTMNT+24, APPNTMNT+25 | 
| >> AMERERR | CANCEL+29*, CANCEL+30 | 
| AMERINDX | CANCEL+16~ | 
| AMERLN | APPNTMNT+11~, APPNTMNT+31 | 
| AMERLN( | APPNTMNT+21*, APPNTMNT+25*, APPNTMNT+26*, APPNTMNT+29* | 
| AMERLN(1 | APPNTMNT+28*, APPNTMNT+30* | 
| AMERLOC | GETAPPS+13~, GETAPPS+20*, GETAPPS+21, GETAPPS+22, GETAPPS+35 | 
| AMERNODE | APPNTMNT+11~, APPNTMNT+15*, APPNTMNT+16, APPNTMNT+17, APPNTMNT+19, APPNTMNT+24, APPNTMNT+25, APPNTMNT+26 | 
| AMERNUM | ERCHCKIN+5~, ERCHCKIN+10*, ERCHCKIN+12, ERCHCKIN+13*, ERCHCKIN+14, ERCHCKIN+15, ERCHCKIN+16, ERCHCKIN+17, ERCHCKIN+19, ERCHCKIN+27 , ERCHCKIN+30, ERCHCKIN+41 | 
| AMERPCC | ERCHCKIN+5~, ERCHCKIN+6*, ERCHCKIN+12, ERCHCKIN+28*, ERCHCKIN+29, ERCHCKIN+30, ERCHCKIN+34, ERCHCKIN+44, ERCHCKIN+45*, ERCHCKIN+46 , ERCHCKIN+50, ERCHCKIN+52, ERCHCKIN+57 | 
| AMERQUIT | GETAPPS+13~, GETAPPS+14* | 
| >> AMERRARR( | GETAPPS+33* | 
| AMERSCIE | GETAPPS+13~, GETAPPS+25*, GETAPPS+27 | 
| AMERSDCL | GETAPPS+13~, GETAPPS+19*, GETAPPS+22, GETAPPS+25, GETAPPS+27, GETAPPS+35 | 
| AMERSDTM | GETAPPS+13~, GETAPPS+23*, GETAPPS+24*, GETAPPS+25, GETAPPS+27, GETAPPS+28, GETAPPS+33, ERCHCKIN+5~, ERCHCKIN+27*, ERCHCKIN+28 | 
| AMERSP | APPNTMNT+11~, APPNTMNT+12*, APPNTMNT+21, APPNTMNT+24, APPNTMNT+25 | 
| AMERTALK | APPNTMNT~, APPNTMNT+12, APPNTMNT+31 | 
| AMERTIME | APPNTMNT~, APPNTMNT+13, GETAPPS~, GETAPPS+15, GETAPPS+28, GETAPPS+33, ERCHCKIN~, ERCHCKIN+8, ERCHCKIN+21, ERCHCKIN+28 , ERCHCKIN+32, ERCHCKIN+45, ERCHCKIN+48, CANCEL~, CANCEL+21 | 
| D | PAD~, PAD+2 | 
| >> DIC | CANCEL+25* | 
| >> DIC(0 | CANCEL+25* | 
| DIR | ERCHCKIN+5~ | 
| DIR("A" | ERCHCKIN+22* | 
| DIR("B" | ERCHCKIN+23* | 
| DIR(0 | ERCHCKIN+23* | 
| DUZ | CANCEL+24 | 
| DUZ(2 | GETAPPS+20, CANCEL+18 | 
| I | APPNTMNT+11~, APPNTMNT+19*, APPNTMNT+21, APPNTMNT+29* | 
| L | PAD~, PAD+2 | 
| U | APPNTMNT+12, APPNTMNT+16, APPNTMNT+17, APPNTMNT+19, APPNTMNT+21, GETAPPS+23, GETAPPS+27, GETAPPS+31, ERCHCKIN+16, ERCHCKIN+17 , ERCHCKIN+19, ERCHCKIN+27, ERCHCKIN+30, ERCHCKIN+41, ERCHCKIN+46, ERCHCKIN+50, ERCHCKIN+52 | 
| X | APPNTMNT+11~, APPNTMNT+19*, APPNTMNT+21, APPNTMNT+24*, APPNTMNT+25, GETAPPS+24*, ERCHCKIN+5~, ERCHCKIN+19*, ERCHCKIN+27*, CANCEL+25* | 
| Y | GETAPPS+24, ERCHCKIN+5~, ERCHCKIN+21, ERCHCKIN+25, ERCHCKIN+27, CANCEL+27 |