SD53P491 ;ALB/ESW - SD*5.3*491 POST INIT; Oct 04, 2006 ; 10/23/06 5:40pm ; Compiled June 17, 2008 10:41:32
Source file <SD53P491.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| POST | ;
|
|
| ATADD | ; New Billable Appointment Type (352.1) to correspond to the New 'SERVICE CONNECTED' Appointment Type (409.1)
|
|
| ATADDQ | ||
| CHKSC | ;Match SC encounter value with proper Appointment Type.
; look for encounters only |
|
| APPT(DFN,SDT,SCE,UPDAP,SDR) | ;update appointment multiple in Patient file
|
|
| RETR(SCE) | ; mark encounter for retransmission
|
|
| MSG(X) | ;
|
|
| CRST(SDVST,SDSCV,SDAPDPT,CNT) | ;check for credit stop encounter for each scanned encounter
|
|
| UPDINS(SDWLSC,CNT,INERROR) | ; update 409.32 and the related entries in 409.3
|
|
| MSGG(SDX) | ;send message
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^DIC(4 - [#4] | GET1^DIQ |
| ^SDWL(409.3 - [#409.3] | Classic Fileman Calls |
| ^SDWL(409.32 - [#409.32] | Classic Fileman Calls, DELIX^DDMOD, GET1^DIQ |
| ^SC - [#44] | GET1^DIQ |
| ^AUPNVSIT - [#9000010] | GET1^DIQ |