APCHSUTL ; IHS/CMI/LAB - UTILITIES FOR APCHS -- SUMMARY PRODUCTION COMPONENTS
Source file <APCHSUTL.m>
| Package | Total | Call Graph |
|---|---|---|
| DRG Grouper | 2 | ($$ICDD,$$ICDDX,$$ICDOP)^ICDEX $$CPT^ICPTCOD |
| VA Fileman | 2 | EN^DIFGG ^DIR |
| IHS Patient | 1 | ($$VSTD,$$VSTP)^AUPNVUTL |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CONT | ||
| PRTTXT | ;PEP - PUBLISHED ENTRY POINT
; GENERALIZED TEXT PRINTER |
|
| GEN1 | ;
|
|
| PRTICD | ;ENTRY POINT
|
|
| PRTICDE | ;ENTRY POINT
|
|
| GETSITE | ;ENTRY POINT
|
|
| PRTTXT1 | ;
|
|
| PRTTXT2 | ||
| GETNARR | ;ENTRY POINT
|
|
| DSPLST | ; COMMON CODE FOR BUILD HLTH SUM & HLTH SUM MNX LISTS
|
|
| LC | ;ENTRY POINT - FOR APCHSLST HLTH SUM COMPONENTS
|
|
| GETICDDX | ;ENTRY POINT
|
|
| LM | ;ENTRY POINT - FOR APCHSLST MEASUREMENT PANEL TYPES
|
|
| FLOW | ;
|
|
| LI | ;ENTRY POINT - FOR APCHSLST HLTH SUM FLOWSHEET ITEMS
|
|
| LS | ;ENTRY POINT - FOR APCHSLST HLTH SUM TYPES
|
|
| GENFG | ;generate filegrams for export
|
|
| LF | ;ENTRY POINT - FOR APCHSLST HLTH SUM FLOWSHEETS
|
|
| GETCPT | ;ENTRY POINT
|
|
| GETSITEV | ;ENTRY POINT
|
|
| GETFRAG | ||
| WANTPN(T) | ;EP
|
|
| QUIT | ||
| TYPE | ;
|
|
| GETICDOP | ;ENTRY POINT
|
|
| MEASPAN | ;
|
| 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 |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^APCHSCTL - [#9001015] | WANTPN+1, WANTPN+2, GETNARR+1 |
| ^APCHSCTL("B" | TYPE+3 |
| ^APCHSFLC("B" | FLOW+4 |
| ^APCHSMPN("B" | MEASPAN+4 |
| ^AUPNVSIT - [#9000010] | GETSITEV+1, GETSITE+4, GETSITE+5 |
| ^AUTNPOV - [#9999999.27] | GETNARR+1 |
| ^AUTTLOC - [#9999999.06] | GETSITE+2 |
| ^DIC(4 - [#4] | GETSITE+4 |
| ^DIPT("B" | MEASPAN+2, FLOW+2, TYPE+1 |
| ^ICD0 - [#80.1] | GETICDOP+3 |
| ^ICD9 - [#80] | GETICDDX+4 |
| Name | Line Occurrences |
|---|---|
| DSPLST | LC+1, LS+1, LM+1, LI+1, LF+1 |
| GEN1 | MEASPAN+7, FLOW+7, TYPE+6 |
| GETFRAG | PRTTXT2 |
| PRTTXT | PRTICD+5, PRTICDE+4 |
| PRTTXT1 | PRTTXT+4 |
| PRTTXT2 | PRTTXT+4 |
| QUIT | CONT |
| TYPE | FLOW+1 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | GETSITE+4 |
| ^(2 | GETNARR+1 |
| ^(21 | GETSITE+4, GETSITE+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| APCHC | MEASPAN+2*, MEASPAN+6*, FLOW+2*, FLOW+6*, TYPE+1*, TYPE+5*, TYPE+8! |
| >> APCHCSVD | GETICDDX+2, GETICDDX+5, GETICDOP+2, GETICDOP+4 |
| APCHSC | PRTTXT+6!, GETFRAG+1*, GETFRAG+2*, GETFRAG+3 |
| >> APCHSCKP | PRTTXT2 |
| APCHSCNT | DSPLST+5*, CONT*, QUIT! |
| >> APCHSCVD | GETICDDX+4, GETICDOP+3 |
| APCHSDLT | PRTTXT+3*, PRTTXT+6!, PRTTXT2* |
| APCHSDSC | GETICDDX+1~, GETICDDX+5*, GETICDOP+1~, GETICDOP+4* |
| APCHSDSC(1 | GETICDDX+6, GETICDOP+5 |
| APCHSF | PRTTXT+6!, PRTTXT2, GETFRAG*, GETFRAG+3* |
| >> APCHSICD | GETICDDX+2, GETICDDX+4, GETICDDX+6*, GETICDDX+7*, GETICDDX+8*, GETICDOP+2, GETICDOP+3, GETICDOP+5*, GETICDOP+6*, GETICDOP+7* , GETCPT+1, GETCPT+2*, GETCPT+3*, GETCPT+4*, PRTICD+1*, PRTICD+2, PRTICDE+1* |
| >> APCHSICF | GETICDDX+6, GETICDDX+7, GETICDDX+8, GETICDOP+5, GETICDOP+6, GETICDOP+7, GETCPT+2, GETCPT+3, GETCPT+4, PRTICD+1 , PRTICDE+1 |
| >> APCHSICL | PRTTXT+3, PRTTXT2* |
| APCHSILN | PRTTXT+3*, PRTTXT+6!, PRTTXT2*, GETFRAG, GETFRAG+1, GETFRAG+2 |
| >> APCHSITE | GETSITEV+1*, GETSITE+1*, GETSITE+2, GETSITE+4, GETSITE+5, GETSITE+7 |
| APCHSLST | LC+1*, LS+1*, LM+1*, LI+1*, LF+1*, DSPLST+2, DSPLST+3, DSPLST+4, CONT, QUIT! |
| >> APCHSNAB | GETSITE+7* |
| >> APCHSNFL | GETSITE+4* |
| >> APCHSNRQ | PRTICD+1*, PRTTXT1+1*, PRTTXT1+2, GETNARR+1*, GETNARR+2* |
| >> APCHSNSH | GETSITE+5* |
| APCHSNTE | PRTICD+3*, PRTICD+4*, PRTICDE+2*, PRTICDE+3*, PRTTXT+2*, PRTTXT+5!, PRTTXT1+2* |
| >> APCHSP | GETSITEV+1*, GETSITE+2*, GETSITE+4, GETSITE+5, GETSITE+7 |
| >> APCHSQ | PRTTXT+4* |
| >> APCHSQIT | PRTTXT2 |
| APCHSTXT | PRTICD+2*, PRTTXT+4, PRTTXT+6!, PRTTXT1+1*, PRTTXT1+2*, GETFRAG*, GETFRAG+1, GETFRAG+3* |
| >> APCHSTYP | GETNARR+1 |
| APCHSVDF | GETSITEV+1, GETSITE+3*, GETSITE+4, GETSITE+5, GETSITE+6! |
| >> APCHSVSC | GETSITEV+1* |
| APCHT | MEASPAN+2*, FLOW+2*, TYPE+1*, TYPE+8!, GEN1+2, GEN1+5 |
| >> APCHX | MEASPAN+2*, MEASPAN+4, MEASPAN+5, FLOW+2*, FLOW+4, FLOW+5, TYPE+1*, TYPE+3, TYPE+4, GEN1+5 |
| APCHXY | GETICDDX+1~, GETICDDX+2*, GETICDDX+3, GETICDDX+4*, GETICDDX+5, GETICDDX+6, GETICDDX+7, GETICDDX+8, GETICDOP+1~, GETICDOP+2* , GETICDOP+3*, GETICDOP+4, GETICDOP+5, GETICDOP+6, GETICDOP+7 |
| >> DIFG("FE" | MEASPAN+4*, MEASPAN+5, FLOW+4*, FLOW+5, TYPE+3*, TYPE+4 |
| >> DIFG("FGR" | GEN1+2* |
| >> DIFG("FUNC" | GEN1+1* |
| >> DIFGER | GEN1+5 |
| >> DIFGT | MEASPAN+2*, MEASPAN+3, FLOW+2*, FLOW+3, TYPE+1*, TYPE+2 |
| >> DILC | GEN1+3* |
| DIR | DSPLST+1!, CONT+1!, QUIT! |
| DIR(0 | CONT*, CONT+1* |
| IOF | DSPLST+3, CONT |
| IOM | PRTTXT+3 |
| IOSL | CONT |
| T | WANTPN~, WANTPN+1, WANTPN+2 |
| U | GETICDDX+3, GETICDDX+4, GETICDDX+5, GETICDDX+6, GETICDDX+7, GETICDDX+8, GETICDOP+3, GETICDOP+4, GETICDOP+5, GETICDOP+6 , GETICDOP+7, GETCPT+2, GETCPT+3, GETCPT+4, WANTPN+2, GETNARR+1, GETSITEV+1, GETSITE+4, GETSITE+5, GETSITE+7 , DSPLST+2, DSPLST+3, DSPLST+4 |
| X | QUIT! |
| Y | GETCPT+1*, GETCPT+2, GETCPT+3, GETCPT+4, CONT, QUIT! |