APSPQ ; IHS/DSD/ENM - CHECK/ASK DUE QUESTIONNAIRE INFO ; [ 09/03/97 1:30 PM ]
Source file <APSPQ.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| CK | ; | |
| GETAS | ;SET  PARAMS AND ASK ANSWER SHEET QUESTIONS | |
| XIT | ||
| EP | ;Check for drug in questionnaire file | 
| Name | Field # of Occurrence | 
|---|---|
| EP^APSPQ1 | GETAS+9 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^PS(50.073 - [#50.073] | EP+5, GETAS+2, GETAS+5 | 
| Name | Line Occurrences | 
|---|---|
| CK | EP+5 | 
| GETAS | CK+1 | 
| XIT | EP+6 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| APACT | GETAS+3*, XIT! | 
| >> APFLAG | EP+2*, EP+3, GETAS+7, GETAS+8 | 
| APNODE | GETAS+2*, GETAS+3, XIT! | 
| >> APSP | EP+1*, EP+5* | 
| >> APSPCTR | EP+1*, CK+1* | 
| >> APSPD | EP+1*, EP+3*, CK+1 | 
| >> APSPDR | EP+1*, EP+5*, CK+1 | 
| >> APSPZRN | EP+1*, EP+5*, GETAS+2, GETAS+5 | 
| >> PSDFN | GETAS+7*, GETAS+8* | 
| >> PSODFN | GETAS+7, GETAS+8 | 
| >> PSODRUG("IEN" | EP+3, GETAS+7* | 
| >> PSONEW("IRXN" | GETAS+7*, GETAS+8* | 
| >> PSONEW("PROVIDER" | GETAS+7*, GETAS+8* | 
| >> PSONEW("RX #" | , GETAS+7*, GETAS+8* | 
| >> PSOREF("IRXN" | GETAS+7 | 
| >> PSOREF("RX0" | EP+3, GETAS+7 | 
| >> PSORENW("DRUG | IEN" , EP+3 | 
| >> PSORENW("OIRXN" | GETAS+8 | 
| >> PSORENW("RX0" | GETAS+8 |