SCMCHLB ;BP/DJB - PCMM HL7 Bld Segment Array ; 3/2/00 2:12pm
Source file <SCMCHLB.m>
| Package | Total | Call Graph |
|---|---|---|
| Scheduling | 4 | $$PRPTTPC^SCAPMC $$TPACHK^SCMCHLB ($$CHECK,$$DFN,SEGMENTS,ZPC)^SCMCHLB1 (POS,PRE,PTP,PTPD)^SCMCHLB2 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PRE | ;Preceptor Assign History (#404.53)
|
|
| QUIT | ||
| PTP(PTPI,SCTPAIN) | ;Patient Team Position Assignment (#404.43).
|
|
| TPACHGRL(SCROLEIN) | ;ROLE ABBREVIATION
|
|
| POS | ;Position Assign History (#404.52)
|
|
| GETOEF(PTPI,EFFDT,ENDDT) | ;Find All OIF OEF RELATIONSHIPS FOR THIS TP in TPS array
; NEW RTN ADDED W PATCH 515 BY DLL |
|
| TPAIDS(ARRAY,OLDPTPI) | ;GET ROLE FROM ID & CHANGE
|
|
| BUILD(VARPTR,HL,XMITARRY) | ;Build an array of HL7 segments based on EVENT
|
|
| TPACHK(SCTP,SCPTPI,SCROLEP) | ||
| POS1(TMPOS) | ;Find every primary care PT TM POS ASSIGN for this TEAM POSITION
|
|
| SETDATE | ;Set all encompassing date array
|
|
| QT |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^SCPT(404.42 - [#404.42] | GETOEF+14, GETOEF+21, GETOEF+22 |
| ^SCPT(404.43 - [#404.43] | PTP+14, POS1+12, POS1+14, POS1+15, TPACHK+10, GETOEF+12, GETOEF+26, GETOEF+27 |
| ^SCTM(404.51 - [#404.51] | TPACHK+28 |
| ^SCTM(404.52 - [#404.52] | POS+8 |
| ^SCTM(404.53 - [#404.53] | POS+19, PRE+9, PRE+14 |
| ^SCTM(404.57 - [#404.57] | TPACHK+17 |
| ^SD(403.46 - [#403.46] | TPACHK+21 |
| ^SD(403.47 - [#403.47] | TPACHK+30 |
| Name | Line Occurrences |
|---|---|
| $$GETOEF | PTP+30 |
| $$TPACHGRL | TPACHK+22, TPACHK+23 |
| $$TPACHK | PTP+26, POS1+7 |
| $$TPAIDS | GETOEF+35 |
| POS | BUILD+37 |
| POS1 | POS+12, POS+19, PRE+11, PRE+16 |
| PRE | BUILD+38 |
| PTP | BUILD+36, POS1+20 |
| QUIT | BUILD+32, BUILD+36, BUILD+37, BUILD+38 |
| SETDATE | PTP+22 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ARRAY | TPAIDS~ |
| ARRAY( | TPAIDS+4, TPAIDS+6, TPAIDS+8, TPAIDS+9, TPAIDS+19*, TPAIDS+20! |
| COUNT | GETOEF+5~, GETOEF+20*, GETOEF+30*, GETOEF+31 |
| DATA | TPAIDS+1~, TPAIDS+9*, TPAIDS+19 |
| DFN | PTP+11~, PTP+15*, PTP+37 |
| DFNX | GETOEF+5~, GETOEF+14*, GETOEF+16, GETOEF+17 |
| DFNY | GETOEF+5~, GETOEF+13*, GETOEF+14 |
| EFFDT | GETOEF~ |
| ENDDT | GETOEF~, GETOEF+7* |
| ERROR | PTP+11~ |
| HL | BUILD~ |
| HL("ECH" | BUILD+28 |
| HL("FS" | BUILD+29 |
| HL("Q" | BUILD+30 |
| HLECH | BUILD+20~, BUILD+28* |
| HLEID | BUILD+20~ |
| HLFS | BUILD+20~, BUILD+29* |
| HLQ | BUILD+20~, BUILD+30* |
| ID | TPAIDS+1~, TPAIDS+7*, TPAIDS+8*, TPAIDS+9, TPAIDS+11, TPAIDS+12, TPAIDS+14, TPAIDS+17, TPAIDS+20 |
| IFN | POS1+6~, POS1+13*, POS1+14*, POS1+15, POS1+20 |
| ND | PTP+11~, PTP+14*, PTP+15, POS1+6~, POS1+15*, POS1+18, TPACHK+3~, TPACHK+10*, TPACHK+13, TPACHK+14 , GETOEF+12*, GETOEF+13, GETOEF+15 |
| NUM | PTP+42*, TPAIDS+1~, TPAIDS+3*, TPAIDS+4*, TPAIDS+6, TPAIDS+8, TPAIDS+9, TPAIDS+20, TPAIDS+21, TPAIDS+22* , TPAIDS+24* |
| >> NUMX | TPAIDS+21*, TPAIDS+24 |
| OLDPTPI | TPAIDS~, TPAIDS+19, TPAIDS+22 |
| PTPI | PTP~, PTP+14, PTP+23, PTP+26, PTP+28, PTP+30, PTP+37, PTP+42, GETOEF~, GETOEF+6 , GETOEF+10, GETOEF+12, GETOEF+35 |
| RESULT | BUILD+19~, BUILD+23*, BUILD+25, BUILD+32, PTP+23*, GETOEF+34* |
| SCGLB | BUILD+19~, BUILD+33, BUILD+34, BUILD+35, BUILD+36, BUILD+37, BUILD+38 |
| SCIEN | BUILD+19~, BUILD+36, POS+8, PRE+9, PRE+14 |
| >> SCLIMIT | PTP+47* |
| SCLOW | PTP+11~, PTP+28*, PTP+30*, TPACHK+3~, TPACHK+8*, TPACHK+32, GETOEF+5~, GETOEF+6*, GETOEF+35*, GETOEF+36 , TPACHGRL+1~, TPACHGRL+6*, TPACHGRL+8, TPAIDS+1~, TPAIDS+2*, TPAIDS+30 |
| SCNEWID | TPAIDS+1~, TPAIDS+17*, TPAIDS+18*, TPAIDS+19 |
| SCNEWROL | TPAIDS+1~, TPAIDS+14*, TPAIDS+16, TPAIDS+18 |
| >> SCOLD43I | GETOEF+10* |
| SCOLDPAT | GETOEF+5~, GETOEF+16*, GETOEF+21 |
| SCOLDTM | GETOEF+5~, GETOEF+17*, GETOEF+23 |
| SCOLDTP | GETOEF+5~, GETOEF+15*, GETOEF+33 |
| SCPC | TPACHK+3~, TPACHK+13*, TPACHK+14 |
| SCPCP | GETOEF+8! |
| SCPCP( | GETOEF+29, GETOEF+32* |
| SCPTPI | TPACHK~, TPACHK+9, TPACHK+10, TPAIDS+1~, TPAIDS+12*, TPAIDS+19, TPAIDS+23 |
| SCPURX | TPACHK+3~, TPACHK+5*, TPACHK+33, TPACHGRL+1~, TPACHGRL+2*, TPACHGRL+9, TPACHGRL+10, TPACHGRL+11 |
| SCROL | TPACHK+3~, TPACHK+20*, TPACHK+21*, TPACHK+22*, TPACHK+23*, TPACHK+25 |
| SCROLE | TPAIDS+1~, TPAIDS+11*, TPAIDS+13 |
| SCROLEIN | TPACHGRL~, TPACHGRL+4, TPACHGRL+8*, TPACHGRL+9, TPACHGRL+10, TPACHGRL+11 |
| SCROLEP | TPACHK~, TPACHK+22, TPACHK+23 |
| >> SCROLOUT | TPACHGRL+3*, TPACHGRL+9*, TPACHGRL+10*, TPACHGRL+11*, TPACHGRL+12 |
| SCROLX | TPACHK+3~, TPACHK+6*, TPACHK+26 |
| SCROLY | TPACHK+3~, TPACHK+25*, TPACHK+26 |
| SCSEQ | PTP+11~ |
| SCTM | TPACHK+3~, TPACHK+24*, TPACHK+28 |
| SCTMP | TPACHK+3~, TPACHK+29*, TPACHK+30*, TPACHK+32*, TPACHK+33 |
| SCTP | TPACHK~, TPACHK+14*, TPACHK+16, TPACHK+17 |
| SCTPA | TPACHK+3~, TPACHK+4*, TPACHK+16, TPACHK+19, TPACHK+26*, TPACHK+34*, QT |
| SCTPAIN | PTP~ |
| SCTPD | TPACHK+3~, TPACHK+17*, TPACHK+18, TPACHK+20, TPACHK+24 |
| SCTPS | GETOEF+8! |
| SCTPS( | GETOEF+31* |
| SCTPTA | TPACHK+3~, TPACHK+33*, TPACHK+34 |
| SCTPTPA | PTP+11~, PTP+26*, PTP+30, PTP+42, POS1+6~, POS1+7*, POS1+18 |
| SCTPX | TPACHK+3~, TPACHK+18*, TPACHK+19 |
| SCUP | TPACHK+3~, TPACHK+7*, TPACHK+32, TPACHGRL+1~, TPACHGRL+5*, TPACHGRL+8 |
| TM | POS1+6~, POS1+11*, POS1+12*, POS1+14 |
| TMD | TPACHK+3~, TPACHK+28*, TPACHK+29 |
| TMPOS | POS+5~, POS+8*, POS+9, POS+12, POS+19, POS1~, POS1+5, POS1+7, POS1+12, POS1+14 , PRE+6~, PRE+9*, PRE+10, PRE+11, PRE+14*, PRE+15, PRE+16 |
| TP | POS+5~, POS+18*, POS+19*, GETOEF+5~, GETOEF+28*, GETOEF+29, GETOEF+31, GETOEF+32, GETOEF+33 |
| TPD | GETOEF+5~ |
| TPDX | GETOEF+5~, GETOEF+22*, GETOEF+23 |
| TPDXX | GETOEF+5~, GETOEF+27*, GETOEF+28 |
| TPX | GETOEF+5~, GETOEF+19*, GETOEF+21*, GETOEF+22, GETOEF+26 |
| TPXX | GETOEF+5~, GETOEF+25*, GETOEF+26*, GETOEF+27, GETOEF+34 |
| TYPE | TPAIDS+1~, TPAIDS+5*, TPAIDS+6*, TPAIDS+8, TPAIDS+9, TPAIDS+20 |
| U | POS+8, POS1+18, PRE+9, PRE+14, TPACHK+13, TPACHK+14, TPACHK+18, TPACHK+20, TPACHK+21, TPACHK+24 , TPACHK+29, GETOEF+13, GETOEF+15, GETOEF+16, GETOEF+17, GETOEF+23, GETOEF+28 |
| VARPTR | BUILD~, BUILD+23 |
| XMITARRY | BUILD~ |
| ZDATE | PTP+11~ |
| ZDATE("BEGIN" | SETDATE+1* |
| ZDATE("END" | SETDATE+2* |
| ZDATE("INCL" | SETDATE+3* |
| ZPTP | PTP+11~, PTP+21!, PTP+34, PTP+45, GETOEF+35 |