IBCEP5D ;ALB/JEH - EDI UTILITIES - for State License ;29-MAR-01
Source file <IBCEP5D.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ;Add/edit state and license number
|
|
STALIC | ;Add/edit file 200 field 54.1 multiple,state(.01) and license#(1) - DBIA 224
|
|
STATQ | ;
|
|
GETLIC(IBPRV) | ; Get license # for provider in file 200 IBPRV
; Pass IBPRV by reference to retrieve #'s by state ; IBPRV(state ien)=id ; Returns 0 if no license # found |
|
EDIT(IBFILE,IBFLD,IB0,IBOLD,IBIEN,IBCK1) | ; Generic edit flds
|
|
EDITQ |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | Classic Fileman Calls |
^IBA(355.9 - [#355.9] | GET1^DID |
^IBA(355.93 - [#355.93] | GET1^DIQ |
^IBE(355.97 - [#355.97] | GET1^DIQ |
^DIC(36 - [#36] | Classic Fileman Calls |