ACDDE ;IHS/ADC/EDE/KML - CDMIS DATA ENTRY;
Source file <ACDDE.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
TCDLP | ; LOOP AT TYPE CONTACT AND DATE LEVEL
|
|
SAVBILL | ; EP-SAVE DATA FOR BILLING
; Note - should get here once for each CDMIS VISIT ; Local array set as CDMIS entries added or edited: ; ACDPCCL(patient ien,visit ien)="" ; ACDPCCL(patient ien,visit ien,"CS",cs ien)="" ; ACDPCCL(patient ien,visit ien,"IIF",iif ien)="" ; ACDPCCL(patient ien,visit ien,"TDC",tdc ien)="" |
|
EOJ | ; END OF JOB
|
|
CHK | ;
|
|
ADD | ; EP - ADD CDMIS FORMS
|
|
ADDTC | ; ADD DATA BASED ON TYPE CONTACT
|
|
PATLP | ; LOOP AT PATIENT LEVEL
|
|
PROVLP | ; LOOP AT PROVIDER LEVEL
|
|
SAVBILL2 | ;
|
|
OUTERLP | ; OUTER LOOP FOR CS (NO PRIMARY PROVIDER)
|
|
MAIN | ; MAINLINE LOGIC
|
|
DATELP | ; LOOP AT DATE LEVEL FOR CS ONLY
|
Name | Field # of Occurrence |
---|---|
EN^ACDAUTO | CHK+9 |
EN^ACDAUTO1 | CHK+14 |
GETPROV^ACDDE2 | PROVLP+3 |
GETTC^ACDDE2 | OUTERLP+4, TCDLP+4 |
GETVDATE^ACDDE2 | TCDLP+9, DATELP+4 |
INIT^ACDDE2 | MAIN+1 |
^ACDDEGP | PATLP+3 |
DSPHIST^ACDDEU | PATLP+7 |
GETVSITS^ACDDEU | PATLP+5 |
HDR^ACDDEU | OUTERLP+3, PROVLP+2, TCDLP+3, DATELP+3, PATLP+1 |
PAUSE^ACDDEU | PATLP+7 |
AUTO^ACDDIK | ADDTC+5, CHK+18 |
DIC^ACDFMC | OUTERLP+7 |
FILE^ACDFMC | SAVBILL2+7, SAVBILL2+14 |
^ACDKILL | EOJ+1 |
^ACDPCCL | ADDTC+9 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^ACDBILL - [#9002172.9] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ACDIIF("C" | CHK+5 |
^ACDTDC("C" | CHK+9 |
^DD(9002172.9 | SAVBILL2+13 |
Name | Line Occurrences |
---|---|
@( | ADDTC+2 |
ADDTC | TCDLP+12, TCDLP+13, PATLP+6 |
CHK | ADDTC+7 |
DATELP | OUTERLP+6 |
EOJ | MAIN+2, MAIN+4 |
MAIN | ADD+2 |
OUTERLP | MAIN+3 |
PATLP | TCDLP+14, DATELP+6 |
PROVLP | OUTERLP+13 |
SAVBILL | ADDTC+8 |
SAVBILL2 | SAVBILL+8 |
TCDLP | PROVLP+5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ACDBFT | SAVBILL2+2~, SAVBILL2+3*, SAVBILL2+4, SAVBILL2+5, SAVBILL2+6, SAVBILL2+9 |
ACDBIEN | SAVBILL2+2~, SAVBILL2+10*, SAVBILL2+13 |
ACDBYPAS | OUTERLP+12*, TCDLP+1, TCDLP+4, TCDLP+5! |
ACDCOMC | CHK+9~, SAVBILL2+1 |
ACDCOMT | CHK+9~ |
ACDCONT | OUTERLP+2*, OUTERLP+6, TCDLP+1*, TCDLP+7, TCDLP+12, TCDLP+13, PATLP+8, ADDTC+2, ADDTC+5, CHK+9~ , CHK+16, SAVBILL2+3 |
>> ACDCONTL | OUTERLP+2*, TCDLP+1* |
>> ACDCS | CHK+14 |
>> ACDCSDP | OUTERLP+9*, TCDLP+7* |
ACDCSIEN | SAVBILL2+2~, SAVBILL2+11*, SAVBILL2+12*, SAVBILL2+13 |
>> ACDDECSN | CHK+14 |
ACDDFNP | ADDTC+8, ADDTC+9, CHK+2~*, CHK+18, SAVBILL+9, SAVBILL2+4, SAVBILL2+5, SAVBILL2+6, SAVBILL2+12 |
>> ACDFHCP | ADDTC+8, CHK+18 |
>> ACDFHCPT | SAVBILL2+1 |
>> ACDFHCPT( | SAVBILL2+1 |
>> ACDFPCC | ADDTC+9, CHK+18, SAVBILL+9 |
>> ACDLPTYP | OUTERLP+1*, DATELP+1* |
>> ACDMODE | ADD+1*, SAVBILL2+5 |
>> ACDPCCL( | ADDTC+8, ADDTC+9, CHK+18!, SAVBILL+9!, SAVBILL2+4, SAVBILL2+6, SAVBILL2+12 |
>> ACDPROV | PROVLP+1* |
>> ACDPROVN | PROVLP+1*, TCDLP+7 |
>> ACDQ | MAIN+2, MAIN+3, OUTERLP+5, OUTERLP+6, OUTERLP+11, OUTERLP+13, PROVLP+4, PROVLP+5, PROVLP+6*, TCDLP+6 , TCDLP+8, TCDLP+10, TCDLP+14, TCDLP+15*, DATELP+5, DATELP+6, DATELP+7*, PATLP+2*, PATLP+4, PATLP+7 , PATLP+8* |
ACDTOUT | CHK+4!, CHK+18* |
>> ACDVDTE | TCDLP+2*, DATELP+2* |
>> ACDVDTI | TCDLP+2*, DATELP+2* |
ACDVIEN | ADDTC+1*, ADDTC+3, ADDTC+5, ADDTC+6, CHK+1~, SAVBILL+9, SAVBILL2+4, SAVBILL2+5, SAVBILL2+6, SAVBILL2+12 |
>> ACDVISP | ADDTC+5*, ADDTC+6*, CHK+3, CHK+5, CHK+9, CHK+18 |
>> DA(1 | SAVBILL2+13* |
>> DIC | OUTERLP+7*, SAVBILL2+5*, SAVBILL2+13* |
>> DIC("A" | OUTERLP+7* |
>> DIC("DR" | SAVBILL2+5*, SAVBILL2+6* |
>> DIC("P" | SAVBILL2+13* |
>> DIC(0 | OUTERLP+7*, SAVBILL2+5*, SAVBILL2+13* |
DT | SAVBILL2+5 |
>> DTOUT | PATLP+7, ADDTC+5 |
>> DUOUT | PATLP+7 |
U | SAVBILL2+13 |
>> X | CHK+2*, SAVBILL2+5*, SAVBILL2+13* |
>> Y | OUTERLP+8, SAVBILL2+8, SAVBILL2+10, SAVBILL2+15 |
>> Y(0 | OUTERLP+9 |