RMPOLM1 ;EDS/MDB - HOME OXYGEN LISTMAN CODE ;7/24/98
Source file <RMPOLM1.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN01 | ; -- Edit Patient
|
|
COMMON(PIKRTN) | ;
|
|
REDRAW | ;
|
|
EN02 | ; -- Edit Billing Transactions
|
|
EN03 | ; -- Accept Transactions
|
|
EN04 | ; -- Unaccept Transactions
|
|
EN09 | ; -- QUIK EDIT
|
|
EN10 | ; -- ADD BILLING PATIENT
|
|
EN11 | ; -- DELETE BILLING PATIENT
|
|
EN06 | ; -- Display 2319
|
|
EN07 | ; -- Post Transactions
|
|
EN08 | ; -- Change View
|
|
PIKONE | ; ALLOW SELECTION OF 1 ENTRY FROM DISPLAYED ENTRIES
|
|
PIKSOM | ; ALLOW SELECTION FROM DISPLAYED ENTRIES
|
|
PIKALL | ; ALLOW SELECTION FROM ALL ENTRIES
|
|
QUIT() | ||
EQUIT() |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> DFLAG | EN08+6* |
DFNS | EN07+2!, EN07+12! |
DFNS( | EN07+9* |
DIR | EN01+2!, REDRAW+1!, EN09+2!, EN11+2!, EN06+2!, EN07+12!, EN08+2!, EN08+6!, PIKONE+1!, PIKSOM+1! , PIKALL+1! |
DIR("A" | EN08+4* |
DIR("B" | EN08+3* |
DIR(0 | EN08+2*, PIKONE+1*, PIKSOM+1*, PIKALL+1* |
>> DIROUT | QUIT |
>> DTOUT | QUIT, EQUIT |
>> DUOUT | QUIT |
IOF | EN10+1 |
LFN | COMMON+7*, COMMON+8, COMMON+11!, EN07+7*, EN07+8, EN07+12! |
LFNS | COMMON+4*, COMMON+11!, EN07+5*, EN07+6, EN07+7, EN07+12! |
LFNS( | COMMON+6 |
PIKRTN | COMMON~, COMMON+2, COMMON+3, COMMON+11! |
>> QUIT | QUIT*, EQUIT* |
RMI | COMMON+6*, COMMON+11! |
RMJ | COMMON+5*, COMMON+6*, COMMON+11! |
RMPODFN | COMMON+8*, EN07+8*, EN07+9, EN07+12! |
RMZ | COMMON+6*, COMMON+7, COMMON+11! |
RMZI | COMMON+6*, COMMON+11! |
RTN | EN01+1*, EN01+2!, COMMON+9, EN02+1*, EN02+2!, EN03+1*, EN03+2!, EN04+1*, EN04+2!, EN09+1* , EN09+2!, EN11+1*, EN11+2!, EN06+1*, EN06+2! |
>> VALMAR | COMMON+8, EN07+8 |
>> VALMBCK | COMMON+2*, COMMON+10*, EN07+4*, EN07+12* |
>> VALMBG | PIKONE+1, PIKSOM+1 |
>> VALMCNT | PIKALL+1 |
>> VALMLST | PIKONE+1, PIKSOM+1 |
>> Y | COMMON+2, COMMON+3, COMMON+4, EN07+4, EN07+5, EN08+5, EN08+6, EQUIT |
>> Y(0 | COMMON+3* |
ZI | EN07+6*, EN07+7, EN07+12! |