OpaccERP logo

F-Script

Anwendung / Praxis

BO-Redefinitionen auslesen

Für das Auslesen von BO-Redefinitionen sollte immer der Service GetInfoBoAttr verwendet werden.

Zusatzinformation

Die BO-Redefinition werden im Studio BC 86920 erfasst.

Beispiel

BO-Redefinitions-Informationen des Attributs SalDoc.Free7 auslesen.
Dabei wird die BO-Redefinition im Kontext eines Dokuments (im Code-Beispiel fix "11594") ausgelesen.
Redefinition von SalDoc.Free7
BO_Redef_1.jpg
Eigene Code-Tabelle welche bei dieser BO-Redefinition hinterlegt ist.
BO_Redef_2.jpg
Zugehöriger F-Script Code für das Auslesen der obigen BO-Redefinition:
/headerreport
«MARK(1,OFF)»
#
# BO-Redefinition auslesen.
«/GetInfoBoAttr»
#
# BO-Redefinitions-Informationen ausgeben.
RelatedObject: «XRES(res:RelatedObject)»
Name:          «XRES(res:Name)»
ShortName:     «XRES(res:ShortName)»
Info:          «XRES(res:Info)»
#
# Falls RelatedObject vorhanden, GetInfoCodeValue ausführen.
«nzXRES(res:RelatedObject)\I»«MARK(1,ON)»
«z~MARK(1)\I»«GOTO(# End_GetInfo)»
«zMARK(1)\I»«/GetInfoCodeValue»
#
# Informationen des RelatedObject (Code-Tabelle) ausgeben.
Anzahl Einträge in Code-Tabelle: «XRES(res2:rows)»
#
«NO(1,NULL)»
«REPEAT»
Eintrag Nr. «NO(1)»: «XRES(res2:ShortName,«NO(1,0)»)»
«z~NO(1,0)=«XRES(res2:rows)»» «LOOP»
#
# End_GetInfo
/

/GetInfoBoAttr
«XSER(req:GetInfoBoAttr)»
«XSER(req:addArg=SalDoc)»                            # BO-Typ
«XSER(req:addArg=SalDoc.Free7)»                      # BO-Attribut
«XSER(req:addArg=RelatedObject,Name,ShortName,Info)» # Gewünschte Information
«XSER(req:addArg=51)»                                # Sprache: 51=De, 53=Fr, 54=En, 55=It
«XSER(req:addArg=BoContext=11594)»                   # Kontext (Hier die BoId des aktiven Dokuments)
«XSER(req:addArg=1)»                                 # BO-Redefinition berücksichtigen (1=Ja, 0=Nein)
«XSER(req:addArg=)»
«nXSER(req:execute>res)»
/

/GetInfoCodeValue
«XSER(req2:GetInfoCodeValue)»
«XSER(req2:addArg=«XRES(res:RelatedObject)»)»        # Name der Code-Tabelle aus GetInfoBoAttr-Request
«XSER(req2:addArg=)»                                 # Konstante (CodeValue) leer=alle Einträge
«XSER(req2:addArg=Name,ShortName,Info)»              # Gewünschte Informationen                                
«XSER(req2:addArg=51)»                               # Sprache: 51=De, 53=Fr, 54=En, 55=It
«XSER(req2:addArg=BoContext=11594)»                  # Kontext (Hier die BoId des aktiven Dokuments)
«nXSER(req2:execute>res2)»
/