FHMTK8 ; HIOFO/SS - DIET PATTERN RELATED UPDATES ;02/22/01 09:02
Source file <FHMTK8.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| AGN | ||
| CONT | ||
| TRYSF | ||
| CLEANTMP | ; | |
| UPDSF(FHDFN,FHADM,FHSF,FHPSF) | ;updates diet related Suppl.Feed. | |
| ADDSO(FHDFN,FHADM,FHML,FHSO,FHN) | ||
| SF | ;check/update diet related SF,called from FHMTK7 | |
| CANCSF | ||
| UPDTSO(FHDFN,FHADM,FHUCSO) | ;update Standing orders. | |
| DOSO(FHDFN,FHADM) | ;check/update SO | |
| SO | ;check and update Stand.Orders,called from FHMTK7 | |
| CURDT(FHDFN,FHADM) | ;get current patient's diet pattern ien of 111.1 | |
| FETCH(FHX,FHSUB,FHDP) | ; | |
| CANCSO | ;cancel SO | |
| DOSF(FHDFN,FHADM) | ;check/update SF | |
| CHKSO(FHDT,FHCSO) | ;compares SO of diet patterns(FHDT) | |
| NEWTMP | ;save original state before editing | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^FH(111.1 - [#111.1] | CHKSO+6, CHKSO+8, DOSF+8, CURDT+4, NEWTMP+2 | 
| ^FH(118.1 - [#118.1] | UPDSF+10 | 
| ^FHPT - [#115] | DOSO+9, CANCSO+1*, AGN, AGN+1*, AGN+2, AGN+3, AGN+4, AGN+5*, DOSF+11, DOSF+16 , DOSF+18, TRYSF, TRYSF+1*, TRYSF+2, TRYSF+3, TRYSF+5*, TRYSF+9*, TRYSF+10*, TRYSF+12*, CANCSF+1* , CANCSF+2*, CURDT+2, CURDT+3 | 
| ^FHPT("ASP" | DOSO+8, CANCSO+2!, AGN+5* | 
| ^TMP($J | DOSO+6, DOSF+6, NEWTMP+1, NEWTMP+2*, CLEANTMP+3, CLEANTMP+5! | 
| Name | Line Occurrences | 
|---|---|
| $$ADDSO | UPDTSO+14, UPDTSO+17 | 
| $$CHKSO | DOSO+11 | 
| $$CURDT | DOSO+3, DOSF+4 | 
| $$DOSO | SO+1 | 
| $$FETCH | CLEANTMP+5 | 
| AGN | AGN+4 | 
| CANCSF | UPDSF+8, TRYSF+7 | 
| CANCSO | UPDTSO+10, UPDTSO+13 | 
| CONT | UPDSF+12, UPDSF+14 | 
| DOSF | SF+1 | 
| TRYSF | TRYSF+3 | 
| UPDSF | DOSF+27 | 
| UPDTSO | CHKSO+17 | 
| Name | Field # of Occurrence | 
|---|---|
| ^(0 | AGN+2*, TRYSF+2* | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> % | UPDTSO+6, UPDSF+2 | 
| ADM | SO+1, UPDTSO+5~*, SF+1, UPDSF+5~* | 
| >> DA | NEWTMP+1, NEWTMP+2 | 
| DUZ | UPDTSO+7, CANCSO+1, AGN+5, UPDSF+6, CONT, TRYSF+10, CANCSF+1 | 
| >> EVT | UPDTSO+14*, UPDTSO+17*, CANCSO+3*, TRYSF+14*, CANCSF+3* | 
| FH | SO+1~*, DOSO+2~, DOSO+8*, DOSO+9, DOSO+10, CHKSO+2~, UPDTSO+2~, UPDTSO+9*, UPDTSO+12*, UPDTSO+14 , UPDTSO+16*, UPDTSO+17, CANCSO+1, CANCSO+2, CANCSO+3, ADDSO+1~, ADDSO+2*, AGN+2*, AGN+4, AGN+5 , AGN+6, DOSF+2~, DOSF+4*, DOSF+6, DOSF+8 | 
| FH1 | CHKSO+2~, CHKSO+5*, CHKSO+6*, CHKSO+8 | 
| FH2 | CHKSO+2~, CHKSO+9*, CHKSO+10*, CHKSO+11, CHKSO+12*, CHKSO+13, CHKSO+14 | 
| FHA1 | CLEANTMP+1~, CLEANTMP+4*, CLEANTMP+5 | 
| FHADM | DOSO~, DOSO+3, DOSO+8, DOSO+9, CHKSO+17, UPDTSO~, UPDTSO+5, UPDTSO+14, UPDTSO+17, CANCSO+1 , CANCSO+2, ADDSO~, AGN, AGN+1, AGN+2, AGN+3, AGN+4, AGN+5, DOSF~, DOSF+4 , DOSF+11, DOSF+16, DOSF+18, DOSF+27, UPDSF~, UPDSF+5, TRYSF, TRYSF+1, TRYSF+2, TRYSF+3 , TRYSF+5, TRYSF+9, TRYSF+10, TRYSF+12, CANCSF+1, CANCSF+2, CURDT~, CURDT+2, CURDT+3 | 
| FHB1 | CLEANTMP+1~, CLEANTMP+4*, CLEANTMP+5 | 
| FHCNT | DOSO+2~, DOSO+7*, DOSO+10* | 
| FHCNT2 | CHKSO+2~, CHKSO+3*, CHKSO+7*, CHKSO+8, CHKSO+12, CHKSO+13, CHKSO+14 | 
| FHCSO | CHKSO~, CHKSO+17 | 
| FHCSO("C" | CHKSO+10, CHKSO+11, CHKSO+12, CHKSO+13, CHKSO+14! | 
| FHCSO("N" | CHKSO+8*, CHKSO+12, CHKSO+13, CHKSO+14! | 
| FHCSO("U" | CHKSO+13* | 
| FHDA | CLEANTMP+1~, CLEANTMP+2*, CLEANTMP+3*, CLEANTMP+5 | 
| FHDFN | SO+1, DOSO~, DOSO+3, DOSO+8, DOSO+9, CHKSO+17, UPDTSO~, UPDTSO+14, UPDTSO+17, CANCSO+1 , CANCSO+2, ADDSO~, AGN, AGN+1, AGN+2, AGN+3, AGN+4, AGN+5, SF+1, DOSF~ , DOSF+4, DOSF+11, DOSF+16, DOSF+18, DOSF+27, UPDSF~, TRYSF, TRYSF+1, TRYSF+2, TRYSF+3 , TRYSF+5, TRYSF+9, TRYSF+10, TRYSF+12, CANCSF+1, CANCSF+2, CURDT~, CURDT+2, CURDT+3 | 
| FHDP | DOSO+2~, DOSO+3*, DOSO+6, DOSO+11, FETCH~, FETCH+2 | 
| FHDSF | DOSF+2~, DOSF+8*, DOSF+25, DOSF+26, DOSF+27 | 
| FHDT | CHKSO~, CHKSO+6, CHKSO+8, CURDT+1~, CURDT+2*, CURDT+3, CURDT+4*, CURDT+5 | 
| FHML | CHKSO+2~, CHKSO+4*, CHKSO+6, CHKSO+8, CHKSO+11, ADDSO~, AGN+5 | 
| FHMX | DOSO+2~ | 
| FHN | ADDSO~, AGN+5 | 
| FHNEW | UPDTSO+2~, UPDTSO+14*, UPDTSO+17* | 
| FHNO | UPDSF+1~, TRYSF+2*, TRYSF+3, TRYSF+5, TRYSF+9, TRYSF+10, TRYSF+12, TRYSF+14 | 
| FHNO(0 | UPDSF+8*, TRYSF+2*, CANCSF, CANCSF+1, CANCSF+3 | 
| FHNOW | UPDTSO+2~, UPDTSO+6*, CANCSO+1, AGN+5, UPDSF+1~, UPDSF+2*, CONT, TRYSF+10, CANCSF+1 | 
| FHOR | CURDT+1~, CURDT+3*, CURDT+4 | 
| FHPNN | UPDSF+1~, CONT*, TRYSF+5 | 
| FHPNO | UPDSF+1~, UPDSF+10*, UPDSF+16, CONT | 
| FHPSF | DOSF+2~, DOSF+18*, DOSF+20, DOSF+22, DOSF+25, DOSF+27, UPDSF~, UPDSF+14, UPDSF+16 | 
| FHPSF("C" | DOSF+20*, UPDSF+12, CANCSF | 
| FHPSF("E" | DOSF+12*, DOSF+16, DOSF+26 | 
| FHPSF("N" | DOSF+11*, DOSF+12, DOSF+16*, DOSF+18, UPDSF+8, UPDSF+12 | 
| FHPSO | DOSO+2~, DOSO+11 | 
| FHPSO("C" | DOSO+10* | 
| FHS1 | DOSO+2~, DOSO+9*, DOSO+10 | 
| FHSF | UPDSF~, UPDSF+8, UPDSF+10, UPDSF+14, CONT | 
| FHSO | CHKSO+2~, ADDSO~, AGN+5 | 
| FHSUB | FETCH~, FETCH+2 | 
| FHUCSO | UPDTSO~ | 
| FHUCSO("C" | UPDTSO+9 | 
| FHUCSO("N" | UPDTSO+16, UPDTSO+17 | 
| FHUCSO("U" | UPDTSO+12, UPDTSO+14 | 
| FHX | ADDSO+1~, AGN+2*, UPDSF+1~, TRYSF+2*, FETCH~, FETCH+1*, FETCH+2*, FETCH+3 | 
| FHZ | CURDT+1~, CURDT+3* |