APCPHOSP ; IHS/TUCSON/LAB - VISIT REVIEW - HOSPITALIZATIONS AUGUST 14, 1992 ; [ 04/03/98 08:39 AM ]
Source file <APCPHOSP.m>
| Package | Total | Call Graph |
|---|---|---|
| Patient Care Component Data Transmission | 2 | ^APCPHOS1 (,GETACC)^APCPHOS2 |
| Package | Total | Caller Graph |
|---|---|---|
| Patient Care Component Data Transmission | 1 | APCPAH |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETPOVS | ;
|
|
| CHECKPVS | ;
|
|
| E11 | ;
|
|
| SETPOV | ;
|
|
| XIT | ;
|
|
| E3 | ;IF PRIMARY DX IS V30-V39(.1) ADM SRV MUST BE ,11
|
|
| E4 | ;IF PRIM DX (V30-V39 (.0 OR ,.1)) AGE CANNOT BE > 3 DAYS
|
|
| C2 | ;CERTAIN "V" CODES CANNOT BE PRIMARY DXS
|
|
| C1 | ;IF PRIMARY DX IS A "V" CODE SECONDARY MUST BE "V" CODE ALSO
|
|
| E1 | ;CERTAIN CODES REQUIRE AN ACCEPT COMMAND
|
|
| CHKHOSP | ;
|
|
| GETTS | ;
|
|
| E2 | ;IF CODE V30-V39 (.0) ADM SRV MUST BE NEWBORN
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^APCDINPT(1 | C1+2 |
| ^APCDINPT(2 | C2+1 |
| ^APCDINPT(3 | E3+1, E4+1 |
| ^APCDINPT(4 | E2+1, E2+2, E4+1 |
| ^APCDINPT(8 | E1+1, E11+1 |
| ^AUPNVINP - [#9000010.02] | CHKHOSP+4, GETTS+1 |
| ^AUPNVINP("AD" | CHKHOSP+2, CHKHOSP+3, GETTS+1 |
| ^AUPNVPOV - [#9000010.07] | SETPOV+1 |
| ^AUPNVPOV("AD" | GETPOVS+1 |
| ^DIC(45.7 - [#45.7] | GETTS+4 |
| ^ICD9 - [#80] | SETPOV+3, SETPOV+4 |
| Name | Line Occurrences |
|---|---|
| CHECKPVS | CHKHOSP+14 |
| E11 | E1+2 |
| GETPOVS | CHKHOSP+8 |
| GETTS | CHKHOSP+6 |
| SETPOV | GETPOVS+1 |
| XIT | CHKHOSP+2, CHKHOSP+4, CHKHOSP+7, CHKHOSP+9, CHKHOSP+10, CHKHOSP+11, CHKHOSP+13, CHKHOSP+15 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> APCP("V DFN" | CHKHOSP+2, CHKHOSP+3, CHKHOSP+15, GETTS+1, GETPOVS+1 |
| APCP1 | XIT+1!, GETPOVS+1*, SETPOV+4, C1+3*, C1+4, E1+2*, E11+1 |
| APCP2 | XIT+1!, GETPOVS+1*, SETPOV+1, SETPOV+3, SETPOV+4 |
| APCP3 | CHKHOSP+10, XIT+1!, GETPOVS+1*, SETPOV+3* |
| >> APCPE | CHKHOSP+15 |
| >> APCPE("EDFN" | CHKHOSP+15* |
| >> APCPE("ERROR" | CHKHOSP+2*, CHKHOSP+4*, CHKHOSP+7, CHKHOSP+9*, CHKHOSP+10*, CHKHOSP+11, CHKHOSP+13, GETTS+2*, GETTS+3*, GETTS+5* , GETTS+6*, C2+1*, C1+4*, C1+7, E1+1*, E1+3, E2+1*, E2+2*, E3+1*, E4+1* , E11+1* |
| >> APCPE("FILE" | CHKHOSP+15* |
| >> APCPH("A TS C | ODE" , GETTS+1*, GETTS+2, GETTS+4*, GETTS+5, E2+1, E2+2, E3+1 |
| >> APCPH("D TS C | ODE" , GETTS+1*, GETTS+3, GETTS+4*, GETTS+6 |
| >> APCPH("POV" | CHKHOSP+9, SETPOV+3*, SETPOV+4*, C2+1, C1+2, C1+3, C1+4, E1+1, E1+2, E2+1 , E2+2, E3+1, E4+1, E11+1 |
| >> APCPH("VINP P | TR" , CHKHOSP+3*, CHKHOSP+4, GETTS+1* |
| >> APCPH("VINP R | EC" , GETTS+1* |
| APCPPREC | XIT+1!, SETPOV+1*, SETPOV+2, SETPOV+3, SETPOV+4 |
| APCPSC | XIT+1!, SETPOV+2*, SETPOV+3, SETPOV+4 |
| >> APCPV("ACC" | E1+1, E11+1 |
| >> APCPV("V REC" | , CHKHOSP+1 |
| >> AUPNDAYS | E4+1 |
| U | CHKHOSP+1, CHKHOSP+4, GETTS+1, GETTS+4, SETPOV+2, SETPOV+3, SETPOV+4, C2+1, C1+2, C1+4 , E1+1, E2+1, E2+2, E3+1, E4+1, E11+1 |