TIUPXAPI ; SLC/JER - Interface w/PCE/Visit Tracking ;11/02/23 11:00
Source file <TIUPXAPI.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
CREDIT(DFN,TIU,VSIT) | ; Get Dx, CPT, (& SC) for the CMD's mandate
|
|
REENTER | ||
ICDCALL | ||
CPTCALL | ||
INSUFF | ||
POST | ||
CONFIRM(TIUAICD,TIUCPT,TIUSC) | ; Show user and confirm
|
|
GETICD(TIULOC,TIUICDAR,TIUVDT) | ; Get ICD-9 or 10 codes for clinic
|
|
ICD(TIUAICD,TIUICDAR,TIUVDT,CSYSINFO) | ; Select Dx's
|
|
ASKPRMRY(TIUAICD) | ; Which Dx is Primary
|
|
PRMAGN | ||
ICDOUT(TIUAICD,TIUI,TIUVDT,CSYSINFO) | ; Go off-list for Dx
|
|
PROVLIST(PROVLIST) | ; Identify primary provider
|
|
ASKPR | ||
ASKDOC(DFLT) | ; Call ^DIC to look-up provider
|
|
DFLTDOC(HLOC) | ; Get the default Provider
|
|
CSYSINFO(DATE) | ;Function: Coding system Information
; DATE is date of interest; defaults to today ; Returns CodesystemIENin757.3^AppNamespacein757.2^ImpDateofICD-10 |
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 |
|
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 |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|