IBTRH5C ;ALB/FA - HCSR Create 278 Request ;12-AUG-2014
Source file <IBTRH5C.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CONTPH(FIELD) | ||
| CRTENTRY(IBTRIEN,RIEN,IEN312,REQBY,DELCCDE,DELAY,NOOUTPUT,TTYPE) | ||
| COPYERR(TYPE,ERROR) | ; Displays any errors encountered while copying a request
; Input: TYPE - 0 - Error while reading data ; - 1 - Error while filing data ; ERROR - Array used for FM error reporting ; Output: Error(s) are displayed |
|
| MLTCPY(SFNUM,NEWIENS) | ; Copies the specified multiple
; Input: SFNUM - Sub-file number of the multiple to copy ; NIENS - IENs of the new entry (copied to) ; OLDENTRY - FDA array to get data from (defined in the calling tag) ; Returns: 1 on successful copy, 0 on failure |
|
| COPYINT(NEW) | ; Copies an array of internal values to a new array
; Input: NEW - Current Array of internal values ; Retrieved using D GETS^DIQ(356.22,IENS,FLDS,"NI","OLD","ERROR") ; e.g. NEW(356.223,"+1,19,",.02,"I")=7209320 ; Output: NEW - Updated array of internal values, stripping off the "I" subscript ; e.g. NEW(356.223,"+1,19,",.02)=7209320 |
|
| OXYET(IBTRIEN) | ||
| ATTPHY(IBTRIEN) | ;EP
; Returns the Attending Physician for the admission of the ; specified Inpatient event ; Input: IBTRIEN - IEN of the Inpatient Event ; Returns: IEN in file 200 of the Attending Physician or "" |
|
| REQCAT(FIELD) | ||
| CERTCD() | ||
| AMBTI(IBTRIEN) | ;EP
; Called from Input Template IB CREATE 278 REQUEST to check if any of the ; Ambulance Transport Information fields has a value. Used to potentially ; skip to potentially skip the Patient Event Transport Information questions ; Input: IBTRIEN - IEN of the 356.22 entry being edited ; Returns: 1 - At least one field has a value, 0 otherwise |
|
| SLDXDUP(FIELD) | ||
| TOOTHSP(FIELD) | ;EP
; Called from Input Template IB CREATE 278 REQUEST for Service Line Tooth ; Surface fields. Checks to see if subsequent Tooth Surfaces have values. ; Input: FIELD - Field # of the field being checked ; DA - IEN of the Tooth multiple being edited ; DA(1) - IEN of the Service Line Multiple being edited ; DA(2) - IEN of the 356.22 entry being edited ; Returns: 1 - Subsequent entries have values, 0 otherwise |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^IBT(356.22 - [#356.22] | GET1^DIQ, GETS^DIQ |
| 356.2213 | GETS^DIQ |
| 356.2216 | GETS^DIQ |
| 356.22168 | GETS^DIQ |
| ^IBE(365.021 - [#365.021] | GET1^DIQ |
| ^DGPM - [#405] | GET1^DIQ |
