RCAMADD ;WASH-ISC@ALTOONA,PA/RGY - Get debtor address ;10/8/96 5:15 PM
Source file <RCAMADD.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 |
|---|---|---|
| V | ;;4.5;Accounts Receivable;**34,190,336**;Mar 20, 1995;Build 45
|
|
| DADD(RCDB,RCCONF,RCCSW) | ;
|
|
| Q | ||
| PER(RCDB) | ;Get person address
|
|
| Q1 | ||
| INST(RCDB) | ;Get institution address
|
|
| Q2 | ||
| PAT(RCDB,RCCONF) | ;Get patient address as "Str1^Str2^Str3^City^State^ZIP^Telephone" from ^DPT
; if RCCONF=0 (default), then return patients permanent address ; if RCCONF=1, then return confidential address, or NULL |
|
| Q3 | ||
| PAT1(RCDB,RCCONF) | ;Get patient address as "Str1^Str2^Str3^City^State^ZIP^Telephone" from ^DPT ;PRCA*4.5*336
; if RCCONF=0 (default), then return patients permanent address ; if RCCONF=1, then return confidential address, or NULL |
|
| Q3A | ||
| VEN(RCDB) | ;Get vendor address
|
|
| Q4 | ||
| INSUR(RCDB) | ;Get insurance company address
|
|
| Q5 | ||
| ARDEB(RCDB) | ;Get address from AR Debtor file (340)
|
|
| Q6 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(36 - [#36] | INSUR+2, INSUR+3, INSUR+4 |
| ^DIC(4 - [#4] | INST+2, INST+3 |
| ^DIC(5 - [#5] | PER+5, INST+4, PAT+11, PAT+17, PAT1+9, PAT1+15, VEN+4, INSUR+5, ARDEB+3 |
| ^DPT - [#2] | PAT+4, PAT1+4 |
| ^PRC(440 - [#440] | VEN+2, VEN+3 |
| ^RCD(340 - [#340] | DADD+3, DADD+7, ARDEB+2 |
| ^VA(200 - [#200] | PER+2, PER+3, PER+4 |
| Name | Field # of Occurrence |
|---|---|
| ^( | PER+3, PER+4, VEN+3, INSUR+3, INSUR+4 |
| ^(1 | INST+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | PAT+3~, PAT+6*, PAT1+3~, PAT1+5* |
| I | PER+3*, VEN+1~, VEN+3*, INSUR+1~, INSUR+3* |
| RCCONF | DADD~, DADD+5, PAT~, PAT+5*, PAT+9, PAT+15, PAT1~, PAT1+7, PAT1+13 |
| RCCSW | DADD~, DADD+8 |
| RCDB | DADD~, DADD+2, DADD+3*, DADD+5, DADD+7, DADD+8, DADD+9, DADD+10, DADD+11, DADD+12 , PER~, PER+2, PER+3, PER+4, INST~, INST+2, INST+3, PAT~, PAT+4, PAT+6 , PAT1~, PAT1+4, PAT1+5, VEN~, VEN+2, VEN+3, INSUR~, INSUR+2, INSUR+3, INSUR+4 , ARDEB~, ARDEB+2 |
| RCII | PAT+3~, PAT+21*, PAT1+3~, PAT1+17*, ARDEB+4* |
| RCTRY | PAT1+3~ |
| RCX | PAT+3~, PAT+4*, PAT+7*, PAT+10*, PAT+11*, PAT+12*, PAT+15*, PAT+16*, PAT+17*, PAT+18* , PAT+24*, Q3, PAT1+3~, PAT1+4*, PAT1+6*, PAT1+8*, PAT1+9*, PAT1+10*, PAT1+13*, PAT1+14* , PAT1+15*, PAT1+16*, PAT1+19*, PAT1+20*, PAT1+21*, PAT1+22*, PAT1+23*, Q3A |
| RCXX | PAT+3~, PAT+19*, PAT+20, PAT+21, PAT1+3~, PAT1+17*, ARDEB+1~, ARDEB+4* |
| RCY | PAT+3~, PAT+10*, PAT+16*, PAT1+3~, PAT1+8*, PAT1+14* |
| RCYY | PAT+3~, PAT+19*, PAT+21*, PAT+22, PAT+23, PAT1+3~, PAT1+17*, PAT1+18, ARDEB+1~, ARDEB+4* , ARDEB+5 |
| TELPHN | PAT1+3~, PAT1+10*, PAT1+16*, PAT1+17 |
| U | DADD+7, PAT+15, PAT1+13, PAT1+19, PAT1+20, PAT1+21, PAT1+22, PAT1+23 |
| VAERR | PAT+3~ |
| VAPA | PAT+3~, PAT1+3~ |
| VAPA( | PAT+10, PAT+16, PAT1+8, PAT1+14 |
| VAPA(11 | PAT+12, PAT1+10 |
| VAPA(12 | PAT+15, PAT1+13 |
| VAPA(17 | PAT+17, PAT1+15 |
| VAPA(18 | PAT+18, PAT1+16 |
| VAPA(22 | PAT+15, PAT1+13 |
| VAPA(23 | PAT1+22 |
| VAPA(24 | PAT1+22 |
| VAPA(25 | PAT1+21, PAT1+23 |
| VAPA(4 | PAT1+22 |
| VAPA(5 | PAT+11, PAT1+9 |
| VAPA(8 | PAT+19, PAT+22*, PAT+23*, PAT+24, PAT1+10, PAT1+16, PAT1+18*, PAT1+19 |
| X | DADD+1~, DADD+2*, DADD+5*, DADD+7*, DADD+8*, DADD+9*, DADD+10*, DADD+11*, DADD+12*, Q , PER+1~, PER+2*, PER+3*, PER+4*, PER+5*, Q1, INST+1~, INST+2*, INST+3*, INST+4* , Q2, PAT+3~, VEN+1~, VEN+2*, VEN+3*, VEN+4*, Q4, INSUR+1~, INSUR+2*, INSUR+3* , INSUR+4*, INSUR+5*, Q5, ARDEB+1~, ARDEB+2*, ARDEB+3*, ARDEB+4, ARDEB+5*, Q6 |
| Y | PER+1~, PER+3*, INST+1~, INST+3*, VEN+1~, VEN+3*, INSUR+1~, INSUR+3*, ARDEB+1~ |
