STANDARD DATA DICTIONARY #440.8 -- PRCH AFC CHARGE TRANSMISSION LOG FILE                                          6/27/25    PAGE 1
STORED IN ^PRCH(440.8,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                      (VERSION 5.1)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains a record of each transmission batch from the Credit Card System of Purchase Card Charges and Purchase Card
Demographic Changes to be posted to IFCAP files (#440.6 and #440.5, respectively).  This file is the source for the report Daily
Charge Transmission Log [PRCH DAILY CHARGE TRANS LOG].  


              DD ACCESS: @
              RD ACCESS: @
              WR ACCESS: @
             DEL ACCESS: @
           LAYGO ACCESS: @
           AUDIT ACCESS: @

CROSS
REFERENCED BY: AFC TRANSMISSION FILE ID(B), RECEIVED TIME(C), LOG DATE(D)



440.8,.01     AFC TRANSMISSION FILE ID 0;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
              LAST EDITED:      NOV 14, 1997 
              HELP-PROMPT:      Answer must be 3-30 characters in length. 
              DESCRIPTION:
                                This is the AFC transmission file id.  

              CROSS-REFERENCE:  440.8^B 
                                1)= S ^PRCH(440.8,"B",$E(X,1,30),DA)=""
                                2)= K ^PRCH(440.8,"B",$E(X,1,30),DA)


440.8,1       RECEIVED TIME          0;2 DATE

              INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:3990101X) X
              LAST EDITED:      NOV 17, 1997 
              HELP-PROMPT:      TYPE A DATE BETWEEN 1/1/1997 AND 1/1/2099 
              DESCRIPTION:
                                This is the received time of charges from AFC.  

              CROSS-REFERENCE:  440.8^C 
                                1)= S ^PRCH(440.8,"C",$E(X,1,30),DA)=""
                                2)= K ^PRCH(440.8,"C",$E(X,1,30),DA)
                                This is the cross-reference for the received time.  



440.8,2       POSTING START TIME     0;3 DATE

              INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      NOV 14, 1997 
              DESCRIPTION:
                                This is the IFCAP posting start time.  


440.8,3       POSTING END TIME       0;4 DATE

              INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      NOV 20, 1997 
              DESCRIPTION:
                                This the IFCAP posting end time.  


440.8,4       AFC CHARGE COUNT       0;5 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99999999999)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      NOV 14, 1997 
              HELP-PROMPT:      Type a Number between 0 and 99999999999, 0 Decimal Digits 
              DESCRIPTION:
                                This is the AFC charge count.  


440.8,5       IFCAP CHARGE COUNT     0;6 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      NOV 14, 1997 
              HELP-PROMPT:      Type a Number between 0 and 999999999, 0 Decimal Digits 
              DESCRIPTION:
                                This is the IFCAP charge count.  


440.8,6       LOG DATE               0;7 DATE

              INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      NOV 19, 1997 
              DESCRIPTION:
                                The is a log date.  

              CROSS-REFERENCE:  440.8^D 
                                1)= S ^PRCH(440.8,"D",$E(X,1,30),DA)=""
                                2)= K ^PRCH(440.8,"D",$E(X,1,30),DA)
                                This is a cross-reference by log date.  




INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):