IBCE837S ;EDE/JWS - RPC to change 837 FHIR Transmit Yes/No in IB SITE PARAMETERS;10/14/2018
Source file <IBCE837S.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 3 | DTNOLF^DICRW ^DIE $$GET1^DIQ |
Integrated Billing | 1 | FINISH^IBCE837I |
Kernel | 1 | ENCODE^XLFJSONE |
Registration | 1 | $$SITE^VASITE |
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 |
Package | Total | Caller Graph |
---|---|---|
Integrated Billing | 1 | IBTAS 837 FHIR ENABLE |
Name | Comments | DBIA/ICR reference |
---|---|---|
PUT(RESULT,ARG) | ;
|
|
RET | ; setup return JSON
; create JSON structured message |
RPC Name | Call Tags |
---|---|
IBTAS 837 FHIR ENABLE | PUT |
FileNo | Call Tags |
---|---|
^IBE(350.9 - [#350.9] | Classic Fileman Calls, GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^IBE(350.9 - [#350.9] | PUT+11, PUT+12 |
Name | Line Occurrences |
---|---|
RET | PUT+10, PUT+13 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARG | PUT~ |
ARG("837ENABLE" | PUT+9 |
>> DA | PUT+11* |
>> DIE | PUT+11* |
DILOCKTM | PUT+2~ |
DISYS | PUT+2~ |
>> DR | PUT+11* |
DT | PUT+2~ |
DTIME | PUT+2~ |
IB837 | PUT+2~, PUT+9*, PUT+10, PUT+11, PUT+13 |
IO | PUT+2~ |
RES | PUT+2~ |
RES("site" | PUT+6* |
RES("status" | PUT+10*, PUT+13*, PUT+14* |
RESULT | PUT~, PUT+3! |
U | PUT+6 |
X | PUT+2~ |